coefficient_directeur_courbe

La  courbe de la fonction f et la droite (T_M) tangente à cette courbe 

en un point M de cette courbe

$ M $

f(x) = 0.25 * (x^(3) / 3 + x^(2) / 2 - 6 * x)
a = -3.47 (slider from -6 to 5, step 0.01)
M: (a, f(a))
b = Tangent(M, f)
a_1 = Slope(b)
c: f(a)
A: (a, 0)
d = Segment(A, M)
texte4: "équation de la tangente : " + b + ""
B = Point(Circle[M, 1])
e = Segment(M, B)
g: f(a) - a * Slope[b]
C = Intersect(xAxis, yAxis)
h = Segment(C, A)
k = Circle(M, 1)
D, E = Intersect(k, b)
F, G, H = Intersect(f, xAxis)
texte2: "Abscisse  du point M = x = " + a + ""
texte3: "Ordonnée du point  M  = f(x) = " + c + ""
texte1: "Pente de la tangente en ce point  M = f'(x) = " + a_1 + ""