Geval II

A_1 = (2, -6)
lengterood = 4.7 (slider from 0 to 7, step 0.1)
W = (-4, -6)
c_1 = Circle(W, lengterood)
E = (14, -6)
q = Ray(W, E)
hoekgeel = 0.9599310885968813 rad (slider from 0 to 179°, step °)
Z' = Rotate(E, hoekgeel, W)
k_1 = Ray(W, Z')
E_1 = Intersect(c_1, k_1, 1)
hoekrood = 1.2217304763960306 rad (slider from 0 to (179° * hoekgeel), step °)
W' = Rotate(W, 180° - hoekgeel - hoekrood, E_1)
b = Ray(E_1, W')
Z = Intersect(q, b)
ι = Angle(W, Z, E_1)
g_1 = Segment(W, Z)
c = Circle(A_1, g_1)
B_1, F = Intersect(c, q)
G = Rotate(A_1, (-ι), F)
d = Ray(F, G)
ζ = Angle(Z, W, Z')
F' = Rotate(F, ζ, A_1)
l_1 = Ray(A_1, F')
m_1 = Segment(Z, E_1)
F_1 = Intersect(d, l_1)
q_1 = Segment(W, E_1)
r_1 = Segment(A_1, F_1)
n_1 = Segment(F, F_1)
θ = Angle(A_1, F, F_1)
η = Angle(F, A_1, F')
verschil = 1 (slider from 0 to 2, step 0.1)
g = Circle(F, verschil)
J, K = Intersect(g, q)
p_1 = Segment(J, F_1)
κ = Angle(A_1, J, F_1)
i_1 = Segment(A_1, J)
j_1 = Segment(J, F)