Losange
Author: Léo

A = (4.663972431687849, 6.659524738058116)
B = (19.379203056901787, 8.560930942439697)
a = Segment(A, B)
C = Midpoint(a)
b = OrthogonalLine(C, a)
c = Circle(C, A)
D, E = Intersect(c, b)
poly1, a_1, e, b_1, d = Polygon(A, E, B, D)
α = Angle(A, E, B)
β = Angle(E, B, D)
γ = Angle(D, A, E)
δ = Angle(B, D, A)
distanceAE = Distance(A, E)
TexteAE: Name[A] + (Name[E]) + " \, = \, " + distanceAE
distanceEB = Distance(E, B)
TexteEB: Name[E] + (Name[B]) + " \, = \, " + distanceEB
distanceBD = Distance(B, D)
TexteBD: Name[B] + (Name[D]) + " \, = \, " + distanceBD
distanceDA = Distance(D, A)
TexteDA: Name[D] + (Name[A]) + " \, = \, " + distanceDA