Geval I

O = (-4, -1)
F: (x(O) + 100, y(O))
j = Ray(O, F)
A = Point(j)
i = Segment(O, A)
B = Point(j)
k = Circle(B, i)
C, D = Intersect(k, j)
N: (-1.3, 3)
a = Segment(N, A)
f = Segment(N, O)
A_1 = (2, -6)
ν = Angle(A, O, N)
ξ = Angle(N, A, O)
n = Line(B, f)
p = Line(D, a)
P = Intersect(p, n)
λ = Angle(A, N, O)
f_1 = Segment(D, P)
μ = Angle(D, P, B)
H = Point(Segment[B, P])
e = Segment(D, H)
t = Segment(H, P)
s = Segment(B, H)
α = Angle(B, D, H)
γ = Angle(H, D, P)
E = (-4.935177002886256, -2.6525258121379705)
β = Angle(D, B, P)
l = Segment(B, If[x(D) > x(C), D, C])