extern void pgsfs_c(fint *);