extern void pgqcf_c(fint *);