Recta de Euler

A = (0.36, -2.28)
B = (6.928203230275509, -2)
a = Segment(A, B)
C = (5.196152422706632, 3)
b = Segment(B, C)
c = Segment(C, A)
d = OrthogonalLine(C, a)
e = OrthogonalLine(A, b)
H = Intersect(d, e)
f = LineBisector(a)
g = LineBisector(b)
O = Intersect(f, g)
D = Midpoint(a)
E = Midpoint(b)
h = Segment(C, D)
i = Segment(E, A)
G = Intersect(i, h)
j = Line(H, O)