void lindst(double,long,char*,long,int,int);