Dati necessari per calcolare i polinomi di Lagrange
x(i), y(i), i=1,N (file DATI.DAT)
Il calcolo una volta determinati i polinomi va fatto 
sul vettore dei nodi
xx(j), j=1,M  (letti dal file NODI.DAT)
questo calcolo va memorizzato sul vettore
yy(j), j=1,M
Tutto il calcolo di Lagrange va inserito in un unica 
subroutine

lagrange(x,y,n,xx,yy,m)

ovviamente dobbiamo leggere i dati dall'esterno
(usando una subroutine come getdata)

Impostiamo una subroutine di transformazione per 
ottenere i dati nel formato adatto alla grafica:

setvalues(x,y,n,xx,yy,m,xvalues,yvalues,nvalues, 
mvalues)