\begin{array}{} Pendenza \; m_t \; della \; tangente \; t \ m_t=\lim_{ h \to 0 }m_s=3 \end{array} 

Dalla secante alla tangente

f(x) = x^(3)
x_B = 1.5 (slider from 1 to 1.5, step 0.01)
A: (1, f(1))
B: (x_B, f(x_B))
s = Line(A, B)
Δx: x(B) - x(A)
Δy: f(x(B)) - f(x(A))
m = If(Δx ≠ 0, Δy / Δx)
a = OrthogonalLine(A, xAxis)
b = OrthogonalLine(B, yAxis)
e = OrthogonalLine(B, xAxis)
d = OrthogonalLine(B, xAxis)
g = OrthogonalLine(A, d)
C = Intersect(d, g)
h = Segment(B, C)
i = Segment(C, A)
D = Midpoint(B, C)
testo1: "" + (LaTeX[Δy]) + ""
E = Midpoint(A, C)
testo2: "" + Δx + ""
t = Tangent(A, f)
testo3: "\begin{array}{} Pendenza \; m_s \; della \; secante \; s \\m_s= \frac{" + (LaTeX[Δy]) + "}{" + (LaTeX[Δx]) + "}=" + (LaTeX[m]) + " \end{array} "