Cylindre

r = 3 (slider from 0 to 5, step 1)
A = (0, 0, 3)
O_1 = (0, 0, 0)
pz = 0 (slider from -3 to 3, step 0.5)
px = 0 (slider from -3 to 3, step 0.5)
α = -0.6283185307179586 rad (slider from (-(90°)) to 90°, step 2°)
a = OrthogonalLine(O_1, xOyPlane)
B = (0, 0, -3)
O: (px, 0, pz)
R: O + (0, 1, 0)
Q: O + ((5 * cos(α)), 0, (5 * sin(α)))
i = Plane(O, R, Q)
Co = InfiniteCylinder(O_1, A, r)
c = IntersectPath(i, Co)