extern void rellun_c(fint *);