x

R

y

A = (-1.46, 0.045)
B = (4.22, 0.045)
C = (1.54, 1.12)
D = (1.52, 6.32)
f = Line(C, D)
E = Midpoint(D, C)
g = OrthogonalLine(E, f)
F = Point(g)
h = OrthogonalLine(F, g)
G = Point(h)
i = Segment(E, G)
j = Segment(G, F)
k = Segment(F, E)