stap = 3 (slider from 0 to 3, step 1)
straal = 2 (slider from 0 to 5, step 0.1)
lengte = 3 (slider from 0 to (2 * straal), step 0.1)
A = (7, 2)
B = Point(Circle[A, lengte])
f = Segment(A, B)
C = (2, 0)
c = Circle(C, straal)
D = Point(c)
g = Line(D, C)
d = Circle(D, f)
E = Intersect(d, g, 2)
F = Intersect(c, d, 2)
h = Segment(D, F)
i = Segment(D, E)
G = Intersect(c, g, 2)
j = Segment(E, G)