void csort(CHAR_INT,long,long,long,long);
void csortp(CHAR_INT,long,long,long,long,long[]);
float sranu(void);