Feuerbachkreis

Feuerbachkreis

Eulergerade

A = (-1.1325234855847055, -4.810031314112949)
B = (12.62, -2.24)
C = (-0.66, 5.72)
d1, c, a, b = Polygon(A, B, C)
d = Circle(A, 8)
e = Circle(B, 8)
D, E = Intersect(e, d)
f = Line(E, D)
M_c = Intersect(f, c)
M_a = Midpoint(C, B)
M_b = Midpoint(C, A)
g = Line(C, f)
H_c = Intersect(g, c)
α = Angle(B, H_c, C)
h = OrthogonalLine(A, a)
H_a = Intersect(h, a)
β = Angle(A, H_a, B)
i = OrthogonalLine(B, b)
H_b = Intersect(b, i)
γ = Angle(A, H_b, B)
h_c = Segment(C, H_c)
h_a = Segment(A, H_a)
h_b = Segment(H_b, B)
F = Intersect(g, h_c)
G = Intersect(h, h_a)
H_1 = Intersect(h, h_a)
H = Intersect(g, h)
s_a = Segment(A, M_a)
s_c = Segment(C, M_c)
s_b = Segment(B, M_b)
S = Intersect(s_c, s_a)
k = Circle(M_b, H_a, M_a)
j = LineBisector(M_b, H_a)
m = LineBisector(H_a, M_a)
M_F = Intersect(j, m)
l = Line(H, S)