sqrt              293 src/number.c           m = sqrt(r*r+i*i);
sqrt              706 src/number.c           double a = sqrt(r*r+i*i);
sqrt              889 src/stdlib.c     SCM_RESULT = Scm_MakeComplex(M_PI/2.0, -log(x + sqrt(x*x-1.0)));
sqrt              891 src/stdlib.c     SCM_RESULT = Scm_MakeComplex(-M_PI/2.0, -log(-x - sqrt(x*x-1.0)));
sqrt              915 src/stdlib.c     SCM_RESULT = Scm_MakeComplex(0, log(x + sqrt(x*x-1.0)));
sqrt              917 src/stdlib.c     SCM_RESULT = Scm_MakeComplex(M_PI, log(-x - sqrt(x*x-1.0)));
sqrt             1034 src/stdlib.c   if (x < 0) SCM_RETURN(Scm_MakeComplex(0.0, sqrt(-x)));
sqrt             1035 src/stdlib.c     else        SCM_RETURN(Scm_MakeFlonum(sqrt(x)));