From aad709e4da2f75079bad1eaa93e3bb80ac17d9d0 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 30 Oct 2001 16:42:18 +0000
Subject: [PATCH] .

original commit: a21dc8fdc9921651dd0114cc3fb609e457a60c01
---
 collects/mzlib/math.ss | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/collects/mzlib/math.ss b/collects/mzlib/math.ss
index f8c9935..cc903ba 100644
--- a/collects/mzlib/math.ss
+++ b/collects/mzlib/math.ss
@@ -6,11 +6,11 @@
 (module math mzscheme
   (provide e 
 	  pi 
-	  square
+	  sqr
 	  sgn conjugate
 	  sinh cosh)
 
-  (define (square z) (* z z))
+  (define (sqr z) (* z z))
   
   ;; circular constants and aliases
   (define e (exp 1.0))