Curva

Traza

a = 1 (slider from 0 to 2, step 0.1)
a_1 = 1
B = Point(xAxis)
C = Point(xAxis)
c = Segment(B, C)
A = Point(c)
t: x(A)
T1: "t = " + t
P_t: (t - a sin(t), 1.000000000000000 - a cos(t))
loc1 = CurveCartesian(t - a sin(t), 1.000000000000000 - a cos(t), t, 0.000000000000000, 12.56637061435917)
T2: "P_t = (t - a sin(t), 1 - a cos(t)) = " + P_t
e = Circle(A + (0.000000000000000, a_1), a_1)
M = Center(e)
b_1 = Segment(M, P_t)
d = Circle(M, P_t)
b = false
Q: P_t + (0.000000000000000, 0.000000000000000)
f = false