C = (-3, 5)
I = (0, 5)
hellingro = 1.3788101090755203 rad (slider from 0 to 90°, step °)
C' = Rotate(C, hellingro, I)
hoekge = 0.5585053606381855 rad (slider from 0 to 178°, step °)
lengtero = 5.7 (slider from 0 to 8, step 0.1)
g_2 = Circle(I, lengtero)
g = Ray(I, C')
J = Intersect(g_2, g)
J' = Rotate(J, hoekge, I)
ζ = Angle(J, I, J')
r = Ray(I, J')
lengtebl = 4.5 (slider from 0 to 8, step 0.1)
e = Circle(I, lengtebl)
K = Intersect(e, r)
s = Segment(I, K)
t = Segment(I, J)
f = Segment(J, K)
α = Angle(I, J, K)
β = Angle(J, K, I)
B = (5, 5)
h = Line(I, B)
γ = Angle(C, I, C')
I' = Rotate(I, γ, B)
δ = Angle(I, B, I')
i = Ray(B, I')
c = Circle(B, t)
A = Intersect(c, i, 1)
j = Segment(B, A)
I'' = Rotate(I', ζ, B)
ε = Angle(I', B, I'')
k = Ray(B, I'')
d = Circle(B, s)
D = Intersect(d, k, 1)
l = Segment(A, D)
m = Segment(D, B)
η = Angle(A, D, B)
θ = Angle(B, A, D)