A = (6, 0)
C = (0, 0.18)
AC = Segment(A, C)
O = Midpoint(C, A)
c = Circle(O, C)
E = Rotate(C, 270*°, O)
F = Rotate(C, 90*°, O)
CABCD, AB, BC, CD, AD = Polygon(A, E, C, F)
B = Point(c)
D = Mirror(B, O)
rAECF, AE, CE, CF, AF = Polygon(A, B, C, D)
p = OrthogonalLine(B, AC)
H = Intersect(p, AC)
EH = Segment(B, H)
BO = Segment(E, O)