void dataop(long,long,long,long*);
void exsort(void(*)(long,long,long,long*),long,long[],long,long*);
float sranu(void);