Déplacer le point G à la souris

A = Intersect(xAxis, yAxis)
D = Point(xAxis)
a = Segment(A, D)
E = (6, 4)
b = Segment(D, E)
C = (0, 4)
c = Segment(E, C)
d = Segment(C, A)
G = Point(c)
e = OrthogonalLine(G, a)
F = Intersect(e, a)
poly1, a_1, f, g, c_1 = Polygon(A, F, G, C)
poly2, f_1, d_1, e_1, g_1 = Polygon(F, D, E, G)
texte1: "aire(AFGC) = " + poly1 + ""
texte2: "aire(FDEG) = " + poly2 + ""
distanceGE = Distance(G, E)
Midpoint(G, E)
texte4: "x = GE = " + e_1 + ""