C

B

A

DC(P)

DC(X_{1113})

DC(X_{1114})

N = (5.59878, 3.354)
M = (7.86, -1.24)
L = (-0.72, -0.76)
X_4 = TriangleCenter(L, M, N, 4)
X_2 = TriangleCenter(L, M, N, 2)
e = Line(X_2, X_4)
polígono1, c, a, b = Polygon(L, M, N)
d = Circle(L, M, N)
P = Point(e)
polígono2, D, E, F = TrianguloCeviano(L, M, N, P)
G = DCPCeviano(L, M, N, P)
X_6 = TriangleCenter(L, M, N, 6)
B' = Mirror(M, X_6)
C' = Mirror(N, X_6)
f = Conic(L, M, N, B', C')
g = TriangleCurve(L, M, N, A^(2) * B^(2) * (-a^(4) * c^(4) + b^(4) * c^(4) + a^(2) * c^(6) - b^(2) * c^(6)) + A * B^(2) * (a^(6) * c^(2) - a^(4) * b^(2) * c^(2) + a^(2) * b^(2) * c^(4) - a^(2) * c^(6)) * C + A^(2) * B * (a^(2) * b^(4) * c^(2) - b^(6) * c^(2) - a^(2) * b^(2) * c^(4) + b^(2) * c^(6)) * C + A * B * (-a^(6) * b^(2) + a^(2) * b^(6) + a^(4) * b^(2) * c^(2) - a^(2) * b^(4) * c^(2)) * C^(2) + B^(2) * (a^(6) * b^(2) - a^(4) * b^(4) - a^(6) * c^(2) + a^(4) * c^(4)) * C^(2) + A^(2) * (a^(4) * b^(4) - a^(2) * b^(6) + b^(6) * c^(2) - b^(4) * c^(4)) * C^(2) = 0)
X_{1113} = TriangleCenter(L, M, N, 1113)
X_{1114} = TriangleCenter(L, M, N, 1114)
DCX1113 = DCPCeviano(L, M, N, X_{1113})
DCX1114 = DCPCeviano(L, M, N, X_{1114})
D' = TrianguloDual(L, M, N, D, E, F)
E' = TrianguloDual(L, M, N, E, F, D)
F' = TrianguloDual(L, M, N, F, E, D)
polígono3, f', d', e' = Polygon(D', E', F')

Tool: Triangulo Dual (command TrianguloDual)
Dar ABC y DEF, determina el vértice D' del triangulo dual D'E'F' de DEF
Input: A, B, C, D, E, F
Output: D'

polígono2, f, d, e = Polygon(D, E, F)
g = Line(A, d)
h = AngularBisector(B, A, C)
g' = Mirror(g, h)
k = Circle(A, B, C)
O = Center(k)
i = OrthogonalLine(O, g')
D' = Mirror(A, i)

Tool: Tripolo
Dados tres puntos y una recta, determina el tripolo de la recta respecto al triángulo de vértices los tres puntos.
Input: A, B, C, m
Output: U

n = Line(A, C)
p = Line(C, B)
K = Intersect(n, m)
N = Intersect(m, p)
A_1 = Midpoint(C, B)
c_1 = Circle(A_1, B)
a_1 = Polar(N, c_1)
R = Intersect(a_1, p)
r = Line(A, R)
S = Midpoint(A, C)
s = Circle(S, A)
t = Polar(K, s)
T = Intersect(n, t)
b_1 = Line(T, B)
U = Intersect(r, b_1)

Tool: DCPCeviano
Dar ABC y P, determina DC(P)
Input: A, B, C, P
Output: DCP

DC(P)

d_2 = Line(B, C)
e = Line(C, A)
f = Line(A, B)
g = Line(P, A)
h = Line(P, B)
i = Line(P, C)
D = Intersect(g, d_2)
E = Intersect(e, h)
F = Intersect(i, f)
E' = TrianguloDual(A, B, C, E, F, D)
F' = TrianguloDual(A, B, C, F, D, E)
l = Line(B, E')
B' = Intersect(e, l)
m = Line(C, F')
C' = Intersect(f, m)
d = Line(B', C')
DCP = Tripolo(A, B, C, d)

Tool: Triangulo Ceviano (command TrianguloCeviano)
Dar ABC y P
Input: A, B, C, P
Output: polígono2, A', B', C'

d = Line(B, C)
e = Line(C, A)
f = Line(A, B)
g = Line(A, P)
h = Line(B, P)
i = Line(C, P)
A' = Intersect(d, g)
B' = Intersect(e, h)
C' = Intersect(f, i)
polígono2, f_1, d_1, e_1 = Polygon(A', B', C')