näytä vektorit

f(x) = 1 / x
t = 4.5 (slider from 0 to 10, step 0.1)
C: (t, 1 / t)
P = Point(f)
Q = Point(f)
a = Line(P, Q)
b = OrthogonalLine(P, xAxis)
c = OrthogonalLine(Q, xAxis)
A = Intersect(xAxis, yAxis)
B = Intersect(b, xAxis)
D = Intersect(c, xAxis)
E = Intersect(a, xAxis)
u = Vector(A, B)
v = Vector(A, D)
w = Vector(A, E)
F = (4.66, -5.14)
F' = Translate(F, u)
z = Vector(F, F')
F'' = Translate(F', v)
d = Vector(F', F'')
G = Point(yAxis)
e = Vector(A, G)
F''' = Translate(F'', e)
g = Vector(F'', F''')
F'_1 = Translate(F, g)
h = Vector(F, F'_1)
H = Translate(F'_1, w)
i = Vector(F'_1, H)
j = false