extern fint skyfit_c(double *,double *,double *,double *,fint *,double *,double *,double *,double *,fint *,float *,fint *,float *,fint *);