Mostrar la construcción

P_1(P_1F)

P_2(P_2F)

$\Gamma_1$

$\Gamma_2$

a = false
F = (7.366927542518968, 9.304859435441847)
P_1 = (-11.128681276577417, 29.513024626676835)
P_2 = (55.6610172368262, 37.73329521294192)
A = (-78.26089106440874, 60.33903932517089)
B = (33.05527312459728, -45.839455747419734)
t = Line(A, B)
S = Mirror(F, t)
d = Circle(P_1, F)
c = Circle(P_2, F)
b = Line(P_1, P_2)
e = Ray(P_2, P_1)
f = Ray(P_1, P_2)
M = Intersect(d, f)
N = Intersect(c, e)
g = Circle(S, M, N)
u = Vector(P_1, F)
E_1 = Translate(P_2, u)
v = Vector(P_2, E_1)
h = Ray(P_2, E_1)
G = Intersect(c, h)
k = Segment(P_1, F)
l = Segment(P_2, G)
i = Line(G, F)
E = Intersect(b, i)
j = Line(E, S)
H = Center(g)
m = OrthogonalLine(H, j)
S' = Mirror(S, m)
I = Center(g)
n = Segment(P_1, I)
p = OrthogonalLine(M, n)
J = Intersect(p, j)
K = Midpoint(P_1, J)
q = Circle(K, J)
T_1, T_2 = Intersect(q, d)
r = Circle(S', S, T_1)
s = Circle(S', S, T_2)
t_1 = Segment(P_2, I)
a_1 = OrthogonalLine(N, t_1)
N_1 = Intersect(j, a_1)
R = Center(s)
T = Center(r)
b_1 = Line(R, F)
d_1 = Line(T, F)
U = Midpoint(T, F)
V = Midpoint(F, R)
W = Mirror(P_1, V)
Z = Mirror(P_2, V)
A_1 = Mirror(P_1, b_1)
e_1 = Conic(P_2, A_1, W, Z, P_1)
B_1 = Mirror(P_1, d_1)
C_1 = Mirror(P_1, U)
D_1 = Mirror(P_2, U)
f_1 = Conic(P_1, P_2, C_1, B_1, D_1)

Tool: Conjugado Isogonal (command ConjugadoIsogonal)
Dar los vértices de un triángulo y un punto
Input: A, B, C, P
Output: G

P*

polígono1, c, a, b = Polygon(A, B, C)
d = OrthogonalLine(P, b)
e = OrthogonalLine(P, a)
f = OrthogonalLine(P, c)
g = Line(A, B)
h = Line(B, C)
i = Line(C, A)
D = Intersect(g, f)
E = Intersect(d, i)
F = Intersect(h, e)
k = Line(E, F)
l = Line(F, D)
n = OrthogonalLine(B, l)
p = OrthogonalLine(C, k)
G = Intersect(n, p)