extern void pgsch_c(float *);