a: -x^3 - x y + 2x + y^2 = 3
a: y^(2) = x^(3) + (x * y) - (2 * x) + 3
P = Point(a)
b: x(P)
c: ((x^(2) * 6) * x(P)) - (y^(2) * 2) - (4 * x(P)) + 18 + ((2 * x) * y) + ((2 * x) * (y(P) - 4)) + ((2 * y) * (x(P) - (2 * y(P)))) = 0
A = (0.043695052011500354, -1.3728322592249527)
f = Line(P, A)
C = Intersect(c, f, 1)
B, D, E = Intersect(a, f)
F = (3.905186941864494, 1.6675492524763764)
g = Segment(P, F)
h = Segment(F, C)
G = Point(g)
i = Segment(E, G)
H = Intersect(h, i)
j = Segment(P, H)
k = Segment(C, G)
l = Segment(D, F)
d: 6x^3 - 24x^2 y - 48x^2 + 24x y^2 - 2x y + 220x + 2y^2 = 14
d: -14 + (220 * x) - (48 * x^(2)) + (6 * x^(3)) - ((2 * x) * y) - ((24 * x^(2)) * y) + (2 * y^(2)) + ((24 * x) * y^(2)) = 0