Mostar la construcción

$\textbf{v}$

o = true
A = (-1.24, -1.46)
B = (5.7, 4.14)
h = Line(A, B)
C = (-3.320826576913705, 3.341840005080356)
D = (-1.3274744737824715, 2.426826703922601)
v = Vector(C, D)
P_1 = (6.358258359982489, -0.12639979678575633)
P_2 = (4.7429517983098535, 5.110319862830365)
a = Line(P_1, h)
b = Line(P_1, v)
k = Line(P_2, h)
l = Line(P_2, v)
L = Intersect(a, l)
J = Intersect(b, k)
q = Line(J, L)
O = Intersect(h, q)
r = Line(O, v)
s, K, Q, R, S = HiperbolaPuntoDosAsintotas(P_1, h, r)

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)

Tool: Hiperbola hIPP (command HiperbolahIPP)
Dar dos puntos, una asíntota y la dirección de la otra
Input: P_1, P_2, h, v
Output: s

$\textbf{v}$

a = Line(P_1, h)
b = Line(P_1, v)
k = Line(P_2, h)
l = Line(P_2, v)
L = Intersect(a, l)
J = Intersect(b, k)
q = Line(J, L)
O = Intersect(h, q)
r = Line(O, v)
s, K, Q, R, S = HiperbolaPuntoDosAsintotas(P_1, h, r)