γ = 2.3 (slider from 0 to 5, step 0.01)
α = 1.6 (slider from 0 to 5, step 0.01)
β: sqrt(γ^(2.0) - α^(2.0))
E_1: (-(γ), 0.0)
E_2: (γ, 0.0)
f = If(x ≥ 0.0, β * sqrt(x^(2.0) / α^(2.0) - 1.0))
g = If(x ≥ 0.0, -(β) * sqrt(x^(2.0) / α^(2.0) - 1.0))
f_1 = If(x ≤ 0.0, β * sqrt(x^(2.0) / α^(2.0) - 1.0))
g_1 = If(x ≤ 0.0, -(β) * sqrt(x^(2.0) / α^(2.0) - 1.0))
A = (-2.4955555555555535, 6.553525757788054)
a = Ray(E_2, A)
B = (-3.7755555555555538, 5.501789734248752)
b = Ray(E_2, B)
C = (-5.535555555555554, 4.0932147027229)
c = Ray(E_2, C)
D = (-5.2, -2.08)
d = Ray(E_2, D)
E = (-5.54, 1.94)
e = Ray(E_2, E)
F = (-4.82, -5.28)
h = Ray(E_2, F)
G = (-2.22, -6.44)
i = Ray(E_2, G)
H = Intersect(f, a, (1.7550261372997735, 0.7447521366495032))
I = Intersect(f, b, (1.6876923182925285, 0.5544823163252046))
J = Intersect(f, c, (1.6349832325838047, 0.3473980101941849))
K = Intersect(f, e, (1.6085556601771498, 0.17109719625991715))
L = Intersect(g, d, (1.610674175102933, -0.19117302829933172))
M = Intersect(g, h, (1.6639239052474764, -0.47169687925427645))
N = Intersect(g, i, (1.7631374764081218, -0.7649103212222116))
j = Segment(H, A)
k = Segment(I, B)
l = Segment(J, C)
m = Segment(K, E)
n = Segment(D, L)
p = Segment(M, F)
q = Segment(G, N)
r = Segment(H, E_1)
s = Segment(I, E_1)
t = Segment(J, E_1)
a_1 = Segment(K, E_1)
b_1 = Segment(L, E_1)
c_1 = Segment(M, E_1)
d_1 = Segment(N, E_1)