bande

affi

O = Intersect(xAxis, yAxis)
B = Point(yAxis)
A = Point(yAxis)
c = Circle(O, A)
h = OrthogonalLine(B, d)
C = Intersect(c, h, 1)
i = OrthogonalLine(C, h)
F' = Intersect(b, i)
F = Mirror(F', O)
k = Ellipse(F', F, B)
t = Circle(O, B)
P = Point(c)
a = Segment(P, O)
P_1 = Intersect(t, a, 1)
e = OrthogonalLine(P, b)
f = OrthogonalLine(P_1, d)
M = Intersect(f, e)
P' = Mirror(P, b)
g = Segment(O, P')
H = Intersect(b, e)
j = Line(M, g)
D = Intersect(j, b)
E = Intersect(j, d)
l = Segment(E, D)
m = Segment(P, P')
n = Segment(E, M)
p = Segment(M, D)
q = Segment(B, O)
fb = true
fa = false
r = Segment(P, H)
s = Segment(P_1, M)