Affichage angles

Rapport des deux masses : MT/MS

gam = 0.25
H = (0, 0)
MT = 0.42000099999999996 (slider from 1.0E-6 to 2, step 0.001)
G: (MT / (1 + MT), 0)
MS: 1 + MT
P = (0.4153180043113702, 0.7201058428361392)
θ = Angle(P, G, H)
r = Segment(G, P)
T2': r^(3) / (MS + MT)
rg = Distance(G, P)
ro = Distance(H, P)
T = (1, 0)
α = Angle(T, H, P)
d = Distance(T, P)
β = Angle(P, T, H)
a = Segment(H, P)
b = Segment(P, T)
fhy: ((-gam) * sin(α) / ro^(2) / MS)
fhx: ((-gam) * cos(α) / ro^(2) / MS)
PH: (x(P) + fhx, y(P) + fhy)
F_H = Vector(P, PH)
ftx: ((gam * MT / MS) * cos(β) / d^(2))
fty: (((-gam) * MT / MS) * sin(β) / d^(2))
PT: (x(P) + ftx, y(P) + fty)
F_T = Vector(P, PT)
T': sqrt(r^(3) / ((MS + MT) / MS))
fcy: ((gam * r) * sin(θ))
fcx: (((-gam) * r) * cos(θ))
PC: (x(P) + fcx, y(P) + fcy)
F_C = Vector(P, PC)
frx: fhx + ftx + fcx
fry: fhy + fty + fcy
PR: (x(P) + frx, y(P) + fry)
F_R = Vector(P, PR)
texte1: "Force résultante : " + (sqrt(frx^(2) + fry^(2))) + "
    a=HP : " + a + "         alpha : " + α + "
    b=TP : " + b + "         beta  : " + β + "
    r=GP : " + r
γ = Angle(H, P, T)
e = false