A = (-2.82, 1.36)
B = (0.66, 0.74)
a = 2.5 (slider from 0.1 to 5, step 0.01)
b = Segment(A, B)
c = Circle(A, a)
C = Point(c)
d = Circle(B, a)
e = Circle(C, b)
D, E = Intersect(d, e)
f = Segment(A, C)
g = Segment(C, D)
h = Segment(D, B)
P: (D + C) / 2
i = Segment(C, E)
j = Segment(E, B)
P': (C + E) / 2
Ortslinie1 = Locus(P, C)
Ortslinie2 = Locus(P', C)
Text1: "a : b =1 : " + (LaTeX[b / a]) + ""
Text2: "(1 : \sqrt 2 = 1 : " + (LaTeX[1.4142]) + ")"