Inverse d'un nombre plus petit que 1

O = Intersect(xAxis, yAxis)
I = (1, 0)
J = Point(yAxis)
c = CircleArc(O, I, J)
a = Segment(O, I)
OP = 0.5 (slider from 0 to 1, step 0.1)
P: (OP; 0)
b = OrthogonalLine(P, a)
M, A = Intersect(c, b)
d = Segment(M, P)
e = Segment(O, M)
T_1 = OrthogonalLine(M, e)
T = Intersect(T_1, xAxis)
f = Segment(O, T)
α = Angle(P, O, M)
g = Segment(O, P)
text1: "L'inverse de OP = " + OP + " est OT = ou ~ " + f + " en effet OP * OT = ou ~ " + (f g)