F = (13, -3)
P = (-2, -3)
hoekgeel = 0.9424777960769379 rad (slider from 0 to 179°, step °)
hoogte = 3 (slider from 0 to 5, step 0.1)
d = Circle(P, hoogte)
t = Line(P, F)
i = OrthogonalLine(P, t)
A, B = Intersect(d, i)
j = OrthogonalLine(B, i)
lengtebasis = 4 (slider from 0 to 8, step 0.1)
c = Circle(P, lengtebasis)
T, U = Intersect(c, t)
P' = Rotate(P, (-hoekgeel), U)
k = Ray(U, P')
E = Intersect(j, k)
g = Segment(P, U)
e = Circle(E, g)
C, D = Intersect(e, j)
r = Segment(C, U)
h = Segment(E, P)
δ = Angle(U, E, P)
γ = Angle(C, E, U)
ζ = Angle(U, C, E)
β = Angle(E, U, C)
α = Angle(P, U, E)
ε = Angle(E, P, U)
s = Segment(U, E)
f = Segment(E, C)