x

f(x) = -x^(-3.0)
g = 1.5 (slider from 0 to 10, step 0.1)
A: (g, -g^(-(3.0)))
O = Intersect(xAxis, yAxis)
h = Segment(A, O)
C = Mirror(A, O)
D = Rotate(C, 90.0*°, O)
B = Mirror(D, O)
Vieleck1, d, c, b, a = Polygon(D, C, B, A)
e = Segment(A, C)
i = Segment(B, D)