α = 0 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
a: y = tan(α) x
O = (0, 0)
A = Intersect(c, a, 2)
B = Point(yAxis)
d = Line(B, a)
e = Line(O, B)
V = Point(e)
C = (0, -1)
P, v, c_1, a_1 = Polygon(C, A, V)
b = OrthogonalLine(A, e)
f = Segment(O, A)