a = 40000 (slider from 39000 to 41000, step 5)
A = Intersect(xAxis, yAxis)
c = Circle(A, a / 1.61 / 2.0 / 3.141592653589793)
B, C = Intersect(c, xAxis)
D = Point(c)
b = 240 (slider from 200 to 300, step 1)
d = Segment(A, D)
D'_1 = Rotate(D, -(b / d), A)
α = Angle(D'_1, A, D)
e = Ray(A, D'_1)
f = Tangent(D, c)
E = Intersect(e, f)
g = Segment(D'_1, E)
h = Ray(A, D)
i = Segment(D'_1, E)
j = 2 (slider from 0 to 4, step 0.1)
D' = Dilate(D, (d + j / 1000.0) / d, A)
k, l = Tangent(D', c)
F = Intersect(k, e)