A = (-12, 0)
B = (-6, 0)
C = (-10, 4)
D = (-12, 4)
a = Segment(D, C)
b = Segment(C, B)
c = Segment(B, A)
d = Segment(A, D)
M = Point(d)
e = OrthogonalLine(M, d)
N = Intersect(e, b)
f = OrthogonalLine(N, c)
P = Intersect(f, c)
poly1, e_1, n, p, a_1 = Polygon(M, N, P, A)
poly2, b_1, c_1, e_2 = Polygon(C, M, B)
g = Distance(A, M)
E: (g, poly1)
F: (g, poly2)
loc1 = Locus(E, M)
loc2 = Locus(F, M)