On peut déplacer A B C 
Déplacer M pour voir les différentes courbes suivant les 
régions du plan
n est variable sur le cercle en pointillés

B.Gibert
Dessin de (Lk) sans calcul 
(Lk) passant par M

(aireOaObOc)/(aireABC)=

A = (2.952236146333852, 5.647082316082477)
B = (-1.4735521729364456, -8.255099816213633)
C = (14.719626265805466, -8.09889552259233)
poly1, c, a, b = Polygon(A, B, C)
d = Circle(A, B, C)
e = OrthogonalLine(A, a)
f = OrthogonalLine(B, b)
H = Intersect(f, e)
E = Intersect(e, f)
F = Intersect(e, f)
g = LineBisector(a)
h = LineBisector(b)
O = Intersect(g, h)
M = (21.33227469577403, -3.933447692690873)
i = AngularBisector(B, A, C)
j = AngularBisector(A, B, C)
M'_1 = Mirror(M, i)
M' = Mirror(M, j)
k' = Line(A, M'_1)
l = Line(B, M')
N = Intersect(k', l)
p = Circle(O, N)
n = Point(p)
m'_1 = Mirror(n, i)
m' = Mirror(n, j)
n_1 = Line(A, m'_1)
q = Line(B, m')
m = Intersect(n_1, q)
lieu1 = Locus(m, n)
r = Segment(n, m'_1)
s = Segment(n, m')
t = Line(A, C)
a_1 = Line(A, B)
b_1 = Line(B, C)
c_1 = LineBisector(M, C)
d_1 = LineBisector(M, A)
Ob = Intersect(c_1, d_1)
e_1 = LineBisector(M, C)
f_1 = LineBisector(M, B)
Oa = Intersect(e_1, f_1)
g_1 = LineBisector(M, A)
h_1 = LineBisector(M, B)
Oc = Intersect(g_1, h_1)
poly2, oc, oa, ob = Polygon(Oa, Ob, Oc)
k: poly2 / poly1
texte4: k + ""