A = (-2, 0, 0)
B = (0, -2, 0)
C = (2, 0, 0)
D = (0, 2, 0)
Vieleck1, a, b, c, d = Polygon(A, B, C, D)
M = (0, 0, 0)
e = Sphere(M, A)
f = OrthogonalLine(M, exy)
E, F = Intersect(f, e)
g, FlächeABCD_1, FlächeABE, FlächeBCE, FlächeCDE, FlächeADE, KanteAB_1, KanteBC_1, KanteCD_1, KanteAD_1, KanteAE, KanteBE, KanteCE, KanteDE = Pyramid(A, B, C, D, E)
h, FlächeABCD, FlächeABF, FlächeBCF, FlächeCDF, FlächeADF, KanteAB, KanteBC, KanteCD, KanteAD, KanteAF, KanteBF, KanteCF, KanteDF = Pyramid(A, B, C, D, F)