A = Intersect(xAxis, yAxis)
B = Point(xAxis)
C = Point(xAxis)
f = Ray(A, B)
g = Ray(A, C)
D = Point(g)
E = Point(f)
h = OrthogonalLine(D, g)
i = OrthogonalLine(E, f)
F = Intersect(c, h)
G = Intersect(c, i)
j = Segment(F, G)
H = Intersect(yAxis, j)
Tulemus: y(H)
k = Segment(G, E)
l = Segment(F, D)
Tegur1: (-x(F))
Tegur2: x(G)
tekst1: "" + (LaTeX[Tegur1]) + "·" + (LaTeX[Tegur2]) + "=" + (LaTeX[Tulemus]) + ""
Export_1 = (-2.664209074380164, 9.251015173553728)
Export_2 = (3.426700016528929, -0.49443937190082016)
O = (0, 0)
a = Segment(H, O)
tekst2: "Lõigu \space  OH \space pikkus=" + (LaTeX[a]) + ""