visualizza la cardioide

A = Intersect(xAxis, yAxis)
B = (1, 0)
c = Circle(A, B)
α = 0.6108652381980153 rad (slider from -90*° to 90*°, step 0.08726646259971647)
D = Intersect(c, xAxis, 1)
A' = Rotate(A, α, D)
γ = Angle(A, D, A')
a = Line(D, A')
C = Intersect(c, a, 2)
d = Circle(C, 2)
E, F = Intersect(d, a)
e = CurveCartesian(((2 + (2 * cos(t))) * cos(t)) - 1, ((2 + (2 * cos(t))) * sin(t)), t, 0, 6.283185307179586)
b = false
f = Segment(B, C)
β = Angle(D, C, B)