void ran0(void);
float sranu(void);
void sranua(float[],long);