extern void sortid_c(fint *,fint *);