h = 2 (slider from 0 to 5, step 0.001)
A_1 = (1, 1, -1)
A_2 = (1, -1, -1)
A_3 = (-1, -1, -1)
A_4 = (-1, 1, -1)
B_1 = (1, 1, 1)
a, B_2, B_3, B_4, face1, face2, face4, face5, face3, face6, edge1, edge4, edge6, edge2, edge3, edge5, edge7, edge8, edge9, edgeAB_1, edgeBC, edge10 = Prism(A_1, A_2, A_3, A_4, B_1)
Q: ((-2), (-2), (-h))
P: (2, 2, h)
b = Line(P, Q)
c = OrthogonalPlane(P, b)
d = 2 (slider from 1 to 3, step 0.001)
e = Circle(P, d / 1.41421, b)
A = Point(e)
f = Circle(A, d, b)
Intersect()
B, C = Intersect(f, e)
g = Line(A, P)
D, E = Intersect(g, e)
h_1 = Line(A, b)
F = Point(h_1)
i, G, H, I, faceABDC, faceABGF, faceBDHG, faceCDHI, faceACIF, faceFGHI, edgeAB, edgeBD, edgeCD, edgeAC, edgeAF, edgeBG, edgeDH, edgeCI, edgeFG, edgeGH, edgeHI, edgeFI = Prism(A, B, D, C, F)