Hipèrbola: dado un punto y las dos asíntotas

Mostrar la construcción

Recta de Pascal

f = true
A = (-0.12, -1.16)
B = (8.839784921102584, 5.215844526043329)
h_1 = Line(A, B)
C = (-0.06912905419529934, 5.608884848482941)
D = (7.485979366032808, -0.7015958840197305)
h_2 = Line(C, D)
P = (4.887546123237592, -0.04652867995370922)
O = Intersect(h_1, h_2)
P' = Mirror(P, O)
b = Line(P, h_2)
c = Line(P', h_1)
d = Line(P, h_1)
e = Line(P', h_2)
F = Intersect(e, d)
G = Midpoint(P', F)
δ = Line(P, G)
H = Intersect(b, c)
g = Line(H, G)
h = Line(P', g)
P_1 = Intersect(δ, h)
P'_1 = Mirror(P_1, O)
a = Line(P, P')
J = Midpoint(G, F)
i = Line(P, J)
j = Line(H, i)
K = Intersect(h_2, j)
k = Line(K, P')
P_2 = Intersect(i, k)
p = Conic(P', P_1, P_2, P, P'_1)

Tool: Hiperbola Punto Dos Asintotas (command HiperbolaPuntoDosAsintotas)
Dar un punto y las dos asíntotas
Input: P, h_1, h_2
Output: p, P', P'_1, P_1, P_2

E = Intersect(h_1, h_2)
P' = Mirror(P, E)
b = Line(P, h_2)
c = Line(P', h_1)
d = Line(P, h_1)
e = Line(P', h_2)
F = Intersect(e, d)
G = Midpoint(P', F)
f = Line(P, G)
H = Intersect(b, c)
g = Line(H, G)
h = Line(P', g)
P_1 = Intersect(f, h)
P'_1 = Mirror(P_1, E)
J = Midpoint(G, F)
i = Line(P, J)
j = Line(H, i)
K = Intersect(h_2, j)
k = Line(K, P')
P_2 = Intersect(i, k)
p = Conic(P', P_1, P_2, P, P'_1)