Pane ratas sõitma

Stopp

a = -3.25 (slider from -5 to 18)
b = 5.201081170943102 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
A: (a, 0)
c = Circle(A, 1.5)
B = Intersect(c, xAxis, 2)
B' = Rotate(B, (-b), A)
α = Angle(B', A, B)
f = Segment(A, B')
C = (3, -2)
D = (9, -2)
u = Vector(C, D)
c' = Translate(c, u)
A' = Translate(A, u)
E = Intersect(c', xAxis, 1)
F = Midpoint(B, E)
d = Circle(A, 0.2)
e = Circle(F, 0.5)
G = Point(e)
H = Point(e)
J = Point(d)
h = Segment(J, H)
I = Point(d)
g = Segment(I, G)
l1 = Sequence(Segment[A, Rotate[B', (k * π / 8), A]], k, 1, 16)
l1' = Translate(l1, u)
K = (2, 3)
L = (5, 3)
v = Vector(K, L)
B'' = Translate(B', v)
i = Line(B'', F)
M = Point(i)
M' = Mirror(M, F)
j = Segment(M', M)
N: A
O: A'
p: y = -1.5
P = (12.580479368693931, 0.37857031630094956)
Q = Point(e)
l = Segment(F, Q)
U = (13.615230746296639, 10.481443761865847)
k = Circle(A, 0.4)
k' = Translate(k, u)
R = Point(k')
S = Point(k)
m = Segment(A, S)
n = Segment(A', R)