c = 3 (slider from -10 to 10, step 0.1)
b = 5 (slider from -10 to 10, step 0.1)
a = 1 (slider from -5 to 5, step 0.1)
num(x) = a x² + b x + c
e = 2 (slider from -10 to 10, step 0.1)
d = 0 (slider from -5 to 5, step 0.1)
g = 1 (slider from -10 to 10, step 0.1)
den(x) = d x² + e x + g
f(x) = num(x) / den(x)
A, A_1 = Root(den)
h = OrthogonalLine(A, xAxis)
i = OrthogonalLine(A_1, xAxis)