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

Prof. Dr. Dörte Haftendorn, nach eineme Vortrag MNU Halle von Dr. W. Löding

Äquator

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)