A = (-3, 2)
B = (3, 1)
C = (1, 3)
polígono1, c, a, b = Polygon(A, B, C)

Tool: Bisectrices Interiores (command BisectricesInteriores)
Triángulo
Input: polígono1
Output: e, g, i

A = (-1.74, 0.6)
B = (2.2600000000000002, 4.7)
C = (4.82, 0.04)
polígono1, c, a, b = Polygon(A, B, C)
d, e = AngularBisector(b, a)
f, g = AngularBisector(c, a)
h, i = AngularBisector(c, b)

Tool: Incentro
Triángulo
Input: polígono1
Output: I

A = (-2.82, 1.44)
B = (0.58, 4.84)
C = (2.24, 1.54)
polígono1, c, a, b = Polygon(A, B, C)
d_1, e_1 = AngularBisector(b, a)
h, i = AngularBisector(c, b)
I = Intersect(e_1, i)

Tool: Inscrita (circunferencia) (command Inscrita)
Triángulo
Input: polígono1
Output: e

A = (-2.82, 1.44)
B = (0.62, 4.2)
C = (2.24, 1.54)
polígono1, c, a, b = Polygon(A, B, C)
d_1, e_1 = AngularBisector(b, a)
h, i = AngularBisector(c, b)
I = Intersect(e_1, i)
d = OrthogonalLine(I, a)
D = Intersect(d, a)
e = Circle(I, D)

Tool: Interior (triángulo) (command Interior)
Triángulo
Input: polígono1
Output: polígono2

A = (-2.82, 1.44)
B = (0.62, 4.2)
C = (2.24, 1.54)
polígono1, c, a, b = Polygon(A, B, C)
d_1, e_1 = AngularBisector(b, a)
h, i = AngularBisector(c, b)
I = Intersect(e_1, i)
d = OrthogonalLine(I, a)
D = Intersect(d, a)
e = Circle(I, D)
E = Intersect(e, c, 1)
F = Intersect(e, b, 1)
polígono2, f, e_2, d_2 = Polygon(E, D, F)