getal2 = 5 (slider from 0.1 to 7, step 0.1)
getal1 = 7 (slider from 0.1 to 7, step 0.1)
getal3 = 6 (slider from 0.1 to 7, step 0.1)
A = (-3, 7)
B = Point(Circle[A, getal1])
f = Segment(A, B)
C = (-3, 5)
D = Point(Circle[C, getal2])
g = Segment(C, D)
E = (-3, 3)
F = Point(Circle[E, getal3])
h = Segment(E, F)
G = (13, 7)
getal4 = 5 (slider from 0.1 to 7, step 0.1)
H = Point(Circle[G, getal4])
i = Segment(G, H)
I = (13, 5)
J = Point(Circle[I, (g * i) / f])
j = Segment(I, J)
K = (13, 3)
L = Point(Circle[K, (h * i) / f])
k = Segment(K, L)