s = 6.283185307179586 (slider from 0 to (2 * π), step 0.1)
Q: (0, cos(s + π / 2), sin(s + π / 2))
R: Q / 2
O: (0, 0)
f = Segment(O, Q)
c = Circle(R, sqrt(3) / 2, f)
a, d, b = Cone(R, O, sqrt(3) / 2)
k = 0.3 (slider from -5 to 5, step 0.1)
e: x = k
P = Point(c)
g = Segment(Q, P)
h = Segment(P, O)