E = (3, 2, 5)
B = (4, 0.5, 0)
A = (1, 1, 0)
p = Plane(A, B, E)
p1 = IntersectPath(p, xOyPlane)
C = (3, 4, 0)
D = (1, 3, 0)
a, stenaABCD, stenaABE, stenaBCE, stenaCDE, stenaADE, hranaAB, hranaBC, hranaCD, hranaAD, hranaAE, hranaBE, hranaCE, hranaDE = Pyramid(A, B, C, D, E)
E1: (x(E), y(E), 0)
f = Segment(D, E1)
g = Segment(C, E1)
h = Line(E, p1)
i = Segment(B, E1)
j = Segment(E1, A)
h1 = Line(E1, p1)
maxu: 180° - Angle[xOyPlane, p]
u = 1.8280082640422486 rad (slider from 0° to maxu, step 0.01°)
p' = Rotate(p, u, hranaAB)
E' = Rotate(E, u, hranaAB)
k = Segment(A, E')
l = Segment(E', B)