visualizza la cardioide

A = Intersect(xAxis, yAxis)
B = (1, 0)
c = Circle(A, B)
α = 1.0471975511965976 rad (slider from 0 to 6.283185307179586, step 0.08726646259971647)
C = Rotate(B, α, A)
β = Angle(B, A, C)
D = Intersect(c, xAxis, 1)
d = Circle(C, D)
a = Segment(A, C)
b = CurveCartesian((2 * cos(t)) + cos((2 * t)), (2 * sin(t)) + sin((2 * t)), t, 0, 6.283185307179586)
e = false
f = OrthogonalLine(C, xAxis)
E = Intersect(f, xAxis)
h = Segment(E, C)