Date: 29 Aprile 2013

A = Point(xAxis)
f(x) = (-x^(3))
a = OrthogonalLine(A, xAxis)
d = Circle(A, 0.05)
B = Intersect(c, a)
C = Intersect(f, a)
g = Tangent(B, c)
h = Tangent(C, f)
D = Intersect(h, g)
luogo1 = Locus(D, A)