Radius r

Höhe h

M = (0, 0, 0)
r = 2 (slider from 0 to 5, step 0.1)
h = 3 (slider from 0 to 5, step 0.1)
S: (0, h, 0)
e = Segment((r, 0, 0), S)
dw = 0 rad (slider from 0 to 6.283185307179586, step 0.08726646259971647)
e' = Rotate(e, (-dw), yAxis)
a = Segment(M, (r, 0, 0))
b = Segment(M, S)