P(x) = (x - 6)^(2)
A = Point(xAxis)
a = OrthogonalLine(A, xAxis)
B = Intersect(P, a)
b = OrthogonalLine(B, yAxis)
C = Intersect(c, b)
d = OrthogonalLine(C, b)
D = Intersect(xAxis, d)
E = Intersect(P, d)
e = OrthogonalLine(E, d)
F = Intersect(e, c)
f = OrthogonalLine(F, e)
G = Intersect(xAxis, f)
h = Mirror(g, c)
H, I, J, K = Intersect(g, h)
f1(x) = P(P(x))
L, M, N, O = Intersect(f1, c)
i = Line(L, K)
Q = Intersect(i, xAxis)
j = Line(N, H)
R = Intersect(xAxis, j)