Kugelgeometrie, kürzester Weg von A nach B
Author: Prof. Dr. Dörte Haftendorn

Ha, 2004, nach einem Vortrag MNU.Halle von Dr. W. Löding

Äquator

Ha 08

M = (0, 0)
H_1 = (3, 0)
c = Circle(M, H_1)
a = Line(H_1, M)
H_2 = Intersect(c, a, 2)
b = Segment(H_2, H_1)
A_B = 53
A = Rotate(H_1, A_B °, M)
α = Angle(H_1, M, A)
d = Segment(A, M)
B_B = 40
B' = Rotate(H_2, -B_B °, M)
β = Angle(B', M, H_2)
e = Segment(B', M)
f = OrthogonalLine(M, a)
N = Intersect(c, f, 1)
g = OrthogonalLine(B', f)
C = Intersect(c, g, 2)
h = Segment(B', C)
D = Midpoint(h)
Bkreis = Circle(D, B')
L_d = 110
E = Rotate(C, L_d °, D)
γ = Angle(C, D, E)
i = Segment(D, E)
k = CircleArc(D, C, E)
j = OrthogonalLine(E, h)
B = Intersect(j, h)
l = Segment(E, B)
F = Mirror(B, M)
G = Mirror(N, M)
H = Mirror(B, b)
p = Conic(N, B, H, G, F)