O = Intersect(xAxis, yAxis)
B = Point(xAxis)
C = Point(xAxis)
f = Ray(O, C)
g = Ray(O, B)
D = Point(g)
E = Point(f)
h: y = x^(2)
i = OrthogonalLine(D, g)
j = OrthogonalLine(E, f)
F = Intersect(h, i, 1)
G = Intersect(h, j, 1)
k = Segment(F, G)
l = Segment(F, D)
m = Segment(G, E)
H = Intersect(k, yAxis)
n = Segment(O, H)
Tegur1: (-x(D))
Tegur2: x(E)
Tulemus: y(H)
tekst1: "" + (LaTeX[Tegur1]) + "·" + (LaTeX[Tegur2]) + "=" + (LaTeX[Tulemus]) + "\\
Lõigu  \; OH \; pikkus \; on \; " + (LaTeX[Tulemus]) + ""