P_1 = (4.34, 4.46)
P_2 = (7.14, 1)
P_3 = (3.42, -0.36)
P_4 = (-1, 3.98)
polígono1, p_3, p_1, p_2 = Polygon(P_1, P_2, P_3)
a = Line(P_1, P_2)
b = Line(P_2, P_3)
c = OrthogonalLine(P_1, b)
d = OrthogonalLine(P_3, a)
P = Intersect(c, d)
e = Conic(P_1, P_2, P_3, P_4, P)

Tool: Hiperbola Rectangular Cuatro Puntos (command HiperbolaRectangularCuatroPuntos)
Dar cuatro puntos
Input: P_1, P_2, P_3, P_4
Output: e, P

a = Line(P_1, P_2)
b = Line(P_2, P_3)
c = OrthogonalLine(P_1, b)
d = OrthogonalLine(P_3, a)
P = Intersect(c, d)
e = Conic(P_1, P_2, P_3, P_4, P)