Afficher les aires

b = 6 (slider from 1 to 12, step 0.1)
a = 11 (slider from 1 to 12, step 0.1)
A = (-4, 0)
B: (-1.0 * 1.0 * 1.0 * 1.0 * 1.0 * 1.0 * 1.0 * 1.0 * 4.0 + a, 0.0)
a_2 = Line(A, B)
b_3 = OrthogonalLine(A, a_2)
D: (-1.0 * 1.0 * 1.0 * 1.0 * 4.0, b)
c = Line(D, a_2)
d = Line(B, b_3)
C = Intersect(c, d)
poly1, a_1, b_1, c_1, d_1 = Polygon(A, B, C, D)
e = Ray(D, C)
f = Circle(C, B)
M = Intersect(f, e, 2.0)
O = Midpoint(D, M)
g = Circle(O, D)
h = Ray(C, B)
N = Intersect(g, h, 1.0)
k = Circle(C, N)
F = Intersect(k, c_1)
I = Midpoint(F, N)
p = Circle(I, F)
E = Mirror(C, I)
Texte1: "Aire ABCD =" + poly1 + ""
n = true
poly2, c_2, n_1, e_1, f_1 = Polygon(C, N, E, F)
texte1: "Aire CNEF =" + poly2 + ""
poly3, n_2, o, c_3 = Polygon(O, C, N)