De la sécante à la tangente
Author: V. MAILLE
Date: 11/01/2007

fini

vb = 1
f(x) = x^(2) + x - 1
A = Point(f)
co2: f'(x(A))
b = Tangent(A, f)
B = Point(f)
a = Line(B, A)
d = If(vb ≟ 0, b, a)
C = Point(d)
c = Circle(C, 1)
D = Intersect(c, d, 2)
co1: (y(C) - y(D)) / (x(C) - x(D))
co = If(vb ≟ 1, co1, co2)
T1: "Coefficient directeur : " + co