extern void pgsbci_c(fint *);