E = (-1, 2)
Z_1 = (0, 0)
Z_2 = (3, 0)
a = Segment(E, Z_1)
b = OrthogonalLine(Z_1, a)
c = Circle(Z_1, E)
P = Intersect(c, b, 2)
d = Segment(P, Z_2)
e = Circle(Z_2, P)
f = OrthogonalLine(Z_2, d)
Q = Intersect(e, f, 2)
g = Segment(E, Q)
S = Midpoint(E, Q)
h = Segment(Z_1, P)
i = Segment(Z_2, Q)