remove euler from scheme/math

svn: r9290

collects/mzlib/math.ss

@@ -1,6 +1,6 @@
 
 (module math scheme/base
   (require scheme/math)
-  (provide (except-out (all-from-out scheme/math)
-                       euler)
-           (rename-out [euler e])))
+  (provide (all-from-out scheme/math)
+           e)
+  (define e (exp 1.0)))

collects/mzlib/scribblings/math.scrbl

@@ -1,9 +1,11 @@
 #lang scribble/doc
 @(require "common.ss"
-          (for-label mzlib/math
-                     (only-in scheme/math euler)))
+          (for-label mzlib/math))
 
 @mzlib[#:mode title math]
 
-Re-exports @schememodname[scheme/math], except that @scheme[euler] is
-renamed on export to @scheme[e].
+Re-exports @schememodname[scheme/math], and also exports @scheme[e].
+
+@defthing[e real?]{
+
+An approximation to Euler's constant: @number->string[(exp 1)].}

collects/scheme/math.ss

@@ -4,16 +4,13 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 #lang scheme/base
-(provide euler
-         pi
+(provide pi
          sqr
          sgn conjugate
          sinh cosh)
 
 (define (sqr z) (* z z))
 
-;; circular constants and aliases
-(define euler (exp 1.0))
 (define pi (atan 0 -1))
 
 ;; sgn function

collects/scribblings/reference/numbers.scrbl

@@ -813,10 +813,6 @@ is little-endian.}
 
 @note-lib[scheme/math]
 
-@defthing[euler real?]{
-
-An approximation to Euler's constant: @number->string[euler].}
-
 @defthing[pi real]{
 
 An approximation to the ratio of a circle's circumference to its