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