extern void rankra_c(float *,fint *,fint *);