Dalla secante alla tangente

1

1+h

1+3h

(1+h)³

1+h

1+h

1³

f(x)=x^{3}

f(x) = x^(3)
P: (1, f(1))
t = Tangent(P, f)
a = OrthogonalLine(P, xAxis)
A = Intersect(a, xAxis)
b = Segment(P, A)
h = 0.71 (slider from 0.01 to 0.8, step 0.05)
Q: (1 + h, f(1 + h))
c = OrthogonalLine(Q, xAxis)
B = Intersect(c, xAxis)
T = Intersect(t, c)
d = Segment(T, B)
e = Line(B, xAxis)
g = Line(P, e)
R = Intersect(g, d)
j = Segment(Q, T)
k = Line(Q, e)
E = Intersect(yAxis, k)
l = Segment(E, Q)
m = Ray(P, R)
n = Line(T, e)
C = Intersect(f, n, 1)
D = Intersect(yAxis, n)
p = Ray(D, C)
q = Ray(E, Q)
s = Segment(D, T)
b_1 = Segment(E, Q)
c_1 = Segment(Q, B)
i = OrthogonalLine(P, yAxis)
F = Intersect(i, yAxis)
r = Segment(F, P)