B = (0.4666666666666667, -0.5666666666666667)
C = (13.533333333333333, -0.5666666666666667)
a = Segment(B, C)
A_1 = Midpoint(B, C)
c = Circle(A_1, C)
A = Point(c)
P_1, a_1, b, c_1 = Polygon(B, C, A)
M = Point(a_1)
d = OrthogonalLine(M, c_1)
e = OrthogonalLine(M, b)
P = Intersect(c_1, d)
Q = Intersect(b, e)
f = Segment(P, M)
g = Segment(M, Q)
h = Segment(P, Q)