A = (-6.533333333333333, -1.6777777777777778)
B = (3.6, -3.2555555555555555)
a = Segment(A, B)
C = Rotate(B, 59.99999999999999°, A)
α = Angle(B, A, C)
b = Line(A, C)
D = Point(b)
c = Segment(A, D)
d = Segment(D, B)
E = Midpoint(D, B)
F = Midpoint(A, B)
e = OrthogonalLine(F, a)
f = OrthogonalLine(E, d)
circumcentre = Intersect(f, e)
g = OrthogonalLine(D, a)
h = OrthogonalLine(A, d)
Ortocentre = Intersect(h, g)
i = Line(D, F)
j = Line(A, E)
G = Intersect(j, i)
k = AngularBisector(B, A, D)
l = AngularBisector(A, D, B)
H = Intersect(k, l)
m = Line(Ortocentre, circumcentre)