straalbl = 2 (slider from 0 to 5, step 0.1)
A = (-8, -13)
c = Circle(A, straalbl)
B = Point(c)
f = Line(A, B)
straalro = 3 (slider from 0 to 5, step 0.1)
d = Circle(B, straalro)
C = Intersect(d, f, 2)
e = Circle(C, B)
D = PointIn(c)
E = PointIn(e)
g = Line(D, E)
F = Intersect(c, g, 2)
G = Intersect(e, g, 1)
h = Segment(B, D)
j = Segment(F, D)
i = Segment(F, G)
k = Segment(G, E)
l = Segment(E, B)
H = (2, -14)
I = (3, -14)
m = Segment(H, I)
J = (4, -14)
n = Segment(I, J)
K = (5, -14)
p = Segment(J, K)