extern void pghist_c(fint *,float *,float *,float *,fint *,fint *);