M_PI               45 src/number.c   #ifndef M_PI
M_PI              302 src/number.c           a = (Scm_Sign(z) < 0)? M_PI : 0.0;
M_PI             1579 src/number.c           double theta = dy * M_PI;
M_PI               15 src/stdlib.c   #ifndef M_PI
M_PI              803 src/stdlib.c     SCM_RESULT = Scm_MakeComplex(log(-Scm_GetDouble(x)), M_PI);
M_PI              889 src/stdlib.c     SCM_RESULT = Scm_MakeComplex(M_PI/2.0, -log(x + sqrt(x*x-1.0)));
M_PI              891 src/stdlib.c     SCM_RESULT = Scm_MakeComplex(-M_PI/2.0, -log(-x - sqrt(x*x-1.0)));
M_PI              917 src/stdlib.c     SCM_RESULT = Scm_MakeComplex(M_PI, log(-x - sqrt(x*x-1.0)));