EI RAJA-ARVOA KOHDASSA x = 1

G = Point(xAxis)
E = Point(xAxis)
F = Intersect(xAxis, yAxis)
A = Point(Ray[E, G])
B = Point(Ray[E, F])
a = OrthogonalLine(B, xAxis)
b = OrthogonalLine(A, xAxis)
f = Function(-x^(2.0) + 3.0, -Infinity, 1.0)
C = Intersect(f, a)
g = Function(-1.0 / 3.0 * x + 4.0 / 3.0, 1.0, Infinity)
D = Intersect(g, b)
c = Ray(E, F)
d = Ray(E, G)
e = OrthogonalLine(C, yAxis)
h = OrthogonalLine(D, yAxis)
H = Intersect(e, yAxis)
I = Intersect(h, yAxis)
i = Vector(C, H)
j = Vector(D, I)
k = Segment(B, C)
l = Segment(A, D)
J = Point(f)
K = Point(g)