Pour voir la position du point M (en rouge)

Vcoeff = 12.4 (slider from 0 to 1000, step 0.1)
cad1 = (0, 0)
cad2 = (1, 0)
O_Centre = (0.5, 0.5)
cad4 = (0, 1)
cad3 = (1, 1)
poly1, cad1_1, cad2_1, cad3_1, cad4_1 = Polygon(cad1, cad2, cad3, cad4)
rayoncercle = 0.438 (slider from 0 to 0.70710678, step 0.001)
e = Circle(O_Centre, rayoncercle)
Mordonnée = 0.908 (slider from 0 to 1, step 0.001)
Mabscisse = 0.49 (slider from 0 to 1, step 0.001)
M: (Mabscisse, Mordonnée)
A = (0.8380979094650203, 0.13246485596707402)
a = Line(M, A)
C_3, C_4 = Intersect(a, poly1)
A_1, A_2 = Intersect(e, a)
B = (0.13409790946502007, 0.6083167078189248)
b = OrthogonalLine(B, a)
C_1, C_2 = Intersect(b, poly1)
B_2, B_1 = Intersect(e, b)
ang2 = Angle(A_1, B_1, A_2)
p1, b_1, a_2, b_2, a_1 = Polygon(B_1, A_2, B_2, A_1)
ang1 = Angle(B_2, A_1, B_1)
M_1: (cos(ang1)^(2), p1)
p2, c, d, f, g, h = Polygon(M, M_1, A_2, cad3, cad4)
M_2: (p2, cos(ang2)^(2))
p3, m, m_1, m_2, cad1_2, cad2_2 = Polygon(M, M_1, M_2, cad1, cad2)
ang3 = Angle(B_1, A_2, B_2)
M_3: (sin(ang3)^(2), p3)
p4, m_3, m_4, m_5, m_6, a_3, b_3 = Polygon(M, M_1, M_2, M_3, A_1, B_1)
C = Intersect(a, b)
q3, c_7, cad3_2, c_8, c_9 = Polygon(C_2, cad3, C_4, C)
Rcoeff = 15.7 (slider from 0 to 1000, step 0.1)
q2, c_4, c_5, c_6, cad1_3 = Polygon(C_3, C, C_1, cad1)
Bcoeff = 12.8 (slider from 0 to 1000, step 0.1)
q1, c_3, c_1, c_2, cad4_2 = Polygon(C_3, C, C_2, cad4)
ma = Segment(M, A)
VoirABCD = 1 (slider from 0 to 1, step 1)
VoirM = 1 (slider from 0 to 1, step 1)
voircadre = 1 (slider from 0 to 1, step 1)
Mvisible = 0 (slider from 0 to 1, step 1)
exposantma = 1 (slider from -5 to 5, step 0.1)
exposantmb = 1 (slider from -5 to 5, step 0.1)
ma_exp: ma^(exposantma)
coeff1 = 1 (slider from -100 to 100, step 0.1)
coeff2 = 1 (slider from -100 to 100, step 0.1)
Mestici: M
VoirpointsMn = 1 (slider from 0 to 1, step 1)
limiterouge = 2.7 (slider from -5 to 10, step 0.1)
limitevert = 3 (slider from -5 to 10, step 0.1)
limitebleu = 4.6 (slider from -5 to 10, step 0.1)
voirsegments = 0 (slider from 0 to 1, step 1)
voircercle = 0 (slider from 0 to 1, step 1)
voirdroites = 1 (slider from 0 to 1, step 1)
voirpolygone = 0 (slider from 0 to 1, step 1)
coeff_limite = 0.3 (slider from -5 to 5, step 0.1)
addR = 0.08 (slider from -1 to 1, step 0.001)
addV = 0.06 (slider from -1 to 1, step 0.001)
addB = 0.06 (slider from -1 to 1, step 0.001)
Zbleu: (q1 - p1) / (p2 - p3) / Bcoeff
Zvert: (q3 - p3) / (p1 - p4) / Vcoeff
Zrouge: (q2 - p2) / (p3 - p4) / Rcoeff
texte1: "Rouge : " + Zrouge + "  Vert : " + Zvert + "   Bleu : " + Zbleu + ""
ang4 = Angle(A_2, B_2, A_1)
voirpoints = 1 (slider from 0 to 1, step 1)
voirangles = 0 (slider from 0 to 1, step 1)
q4, c_{10}, c_{11}, cad2_3, c_{12} = Polygon(C, C_4, cad2, C_1)