T=[-1:0.01:1]

scf(0)
clf()
plot2d(T,f(T),2) // courbe bleue


X=linspace(-1,1,6)
R=lagrangef(X,f,T)

plot2d(T,R,3) // courbe verte


X=linspace(-1,1,11)
R=lagrangef(X,f,T)

plot2d(T,R,5) // courbe rouge

scf(1)
clf()

X=linspace(-1,1,21)
R=lagrangef(X,f,T)

plot2d(T,R)

scf(2)
clf()

plot2d(T,f(T),2) // courbe bleue


X=racineTchebichev(6)
R=lagrangef(X,f,T)

plot2d(T,R,3) // courbe verte

X=racineTchebichev(11)
R=lagrangef(X,f,T)

plot2d(T,R,5) // courbe rouge

X=racineTchebichev(21)
R=lagrangef(X,f,T)

plot2d(T,R,6) // courbe violette
