Calcul d'angles
Author: Daniel Mentrard

AH es la altura desde A.

BP es la bisectriz del ángulo B.

Indica en el deslizador el valor del ángulo de color rojo.

h = 1 (slider from -5 to 5, step 0.1)
Zoom = 1 (slider from 1 to 5, step 0.1)
A_1 = (2.833111033043888, 1.6862711504453)
c = Circle(A_1, Zoom)
B_1 = Point(c)
B' = Mirror(B_1, A_1)
b = 1 (slider from -5 to 5, step 0.1)
d: round(random() * 60.0 + 50.0 + 0.0 * b)
B'_1 = Rotate(B_1, d°, A_1)
poly1, b', b_1, b'_1 = Polygon(B_1, B'_1, B')
C = (2.7970345949055906, 1.9171603545304028)
e = Circle(C, Zoom)
D = Point(e)
g: round(random() * 10.0 + 50.0 + 0.0 * h)
f: round(random() * 50.0 + 80.0 + 0.0 * b)
D' = Rotate(D, g°, C)
D'' = Rotate(D', f°, C)
i = Segment(C, D)
D''_1 = Mirror(D', i)
poly2, d''_1, d', d'' = Polygon(D', D'', D''_1)
E = (2.724881718628996, 1.7836775334187027)
k = Circle(E, Zoom)
F = Point(k)
j = Segment(F, E)
l = OrthogonalLine(E, j)
m: round(random() * 10.0 + 20.0 + 0.0 * h)
F' = Rotate(F, -(m)°, E)
F'' = Mirror(F', l)
G, H_1 = Intersect(k, l)
poly3, g_1, f'', f' = Polygon(F'', F', G)
α = Angle(D'', D', D''_1)
β = Angle(D''_1, D'', D')
p = Circle(D''_1, Zoom / 3.0)
I = Intersect(p, d'')
J = Intersect(p, d')
q = CircleSector(D''_1, I, J)
K = (2.789819307277931, 1.6970940818867892)
u = Vector(A_1, K)
B'_2 = Translate(B_1, u)
A = Translate(B'_1, u)
B'' = Translate(B', u)
poly1', b'', b'_2, l_1 = Polygon(B'_2, A, B'')
γ = Angle(B', B'_1, B_1)
δ = Angle(B_1, B', B'_1)
ε = Angle(B'_1, B_1, B')
ζ = Angle(G, F', F'')
η = Angle(F'', G, F')
θ = Angle(B'', A, B'_2)
a = OrthogonalLine(A, l_1)
H = Intersect(l_1, a)
ι = Angle(B'_2, H, A)
n = Segment(A, H)
κ = Angle(B'_2, B'', A)
λ = Angle(H, A, B'_2)
N = (2.6924129243045285, 1.621333561796365)
r = Circle(N, Zoom)
O = Point(r)
o = 1 (slider from -5 to 5, step 0.1)
s: round(random() * 50.0 + 80.0 + 0.0 * b)
ss: round(random() * 50.0 + 60.0 + 0.0 * o)
O' = Rotate(O, ss°, N)
t = 1 (slider from -5 to 5, step 0.1)
tt: round(random() * 40.0 + 80.0 + 0.0 * t)
B = Rotate(O', tt°, N)
poly4, o'', o', o_1 = Polygon(O', O, B)
μ = Angle(O', O, B)
ν = Angle(B, O', O)
c_1 = AngularBisector(O', B, O)
P = Intersect(c_1, o'')
ξ = Angle(P, B, O')
d_1 = Segment(B, P)
v = 1 (slider from 1 to 5, step 1)
w = NaN (slider from 0 to 180, step 0.5)
ρ = Angle(D', D''_1, D'')
σ = 0 rad (slider from 0 to 3.141592653589793, step 0.008726646259971648)
Rep1 = If(σ < ρ + 0.0050 * 180.0° / 3.141592653589793 ∧ σ > ρ - 0.0050 * 180.0° / 3.141592653589793, 1.0, 0.0)
aa = 0 rad (slider from 0 to 3.141592653589793, step 0.008726646259971648)
Rep2 = If(aa < ε + 0.0050 * 180.0° / 3.141592653589793 ∧ aa > ε - 0.0050 * 180.0° / 3.141592653589793, 1.0, 0.0)
bb = 0 rad (slider from 0 to 3.141592653589793, step 0.008726646259971648)
Rep3 = If(bb < η + 0.0050 * 180.0° / 3.141592653589793 ∧ bb > η - 0.0050 * 180.0° / 3.141592653589793, 1.0, 0.0)
cc = 0 rad (slider from 0 to 3.141592653589793, step 0.008726646259971648)
Rep4 = If(cc < λ + 0.0050 * 180.0° / 3.141592653589793 ∧ cc > λ - 0.0050 * 180.0° / 3.141592653589793, 1.0, 0.0)
dd = 0 rad (slider from 0 to 3.141592653589793, step 0.008726646259971648)
Rep5 = If(dd < ξ + 0.0050 * 180.0° / 3.141592653589793 ∧ dd > ξ - 0.0050 * 180.0° / 3.141592653589793, 1.0, 0.0)
texte4: "Pregunta n°" + v