M_PI               53 rand.c         #ifndef M_PI
M_PI              349 rand.c           return cos(2.0*M_PI*a) * sqrt(-2.0*log(b));
M_PI              375 rand.c           return tan (M_PI * (rand_uniopen()-0.5));