extern fint lsqfit_c(float *,fint *,float *,float *,fint *,float *,float *,fint *,fint *,float *,fint *,float *,fint *);