extern void cnvrtd_c(fint *,double *,double *,fint *);