Comando CurvaTriangular

CurvaTriangular[ <Punto M>, <Punto N>, <Punto Ñ>, <Ecuación en A, B, C> ]

Crea un polinomio implícito cuya ecuación en coordenadas baricéntricas con respecto a los puntos dados (M, N, Ñ) está dada por el cuarto parámetro; las coordenadas baricéntricas referidas a A, B y C.

Ejemplo: Si los puntos son M, N, Ñ...
CurvaTriangular[M, N, Ñ, (A-B)*(B-C)*(C-A)=0] establece una curva cúbica constituida por las medianas del tríangulo MNÑ

Nota: Los puntos de entrada podrían llamarse A, B o C (en lugar de M, N. Ñ o la terna que fuese) pero en tal caso no sería posible emplear, por ejemplo, x(A) en la ecuación, porque A debe interpretarse como la coordenada baricéntrica.

Ejemplos: Dado el triángulo MNÑ...

CurvaTriangular[M, N, Ñ, A*C=1/8] crea una hipérbola tal que su tangente desde M o desde N, divide al triángulo MNÑ en dos partes equivalentes (de igual àrea).
CurvaTriangular[M, N, Ñ, A² + B² + C² - 2B C - 2C A - 2A B = 0] crea su inelipse de Steiner^{elipse inscripta de Steiner, tangente a cada lado en sus respectivos puntos medios}
CurvaTriangular[M, N, Ñ, B C + C A + A B = 0], crea la circun-elipse de Steiner^{elipse que lo circunscribe}.