Afficher Γ

B = (0, 0)
I = (1, 0)
J = (0, 1)
A = (4, -2)
a = OrthogonalLine(A, xAxis)
C = Intersect(xAxis, a)
b = Ray(C, A)
M = Point(b)
c = Circle(B, Segment[C, M])
D, N = Intersect(c, yAxis)
d = Line(A, N)
e = Line(B, M)
P = Intersect(d, e)
g = false
h = Segment(B, N)
i = Segment(C, M)