From 5ddb166caac45e1a89f38a2e7e8bccd55bb935ae Mon Sep 17 00:00:00 2001
From: Rex Ford <Rex@Macintosh-4.local>
Date: Sat, 2 Aug 2008 13:57:17 -0400
Subject: [PATCH] renamed some defs

---
 extra/math/newtons-method/newtons-method.factor | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/extra/math/newtons-method/newtons-method.factor b/extra/math/newtons-method/newtons-method.factor
index b2778a2d85..5bf71deac8 100644
--- a/extra/math/newtons-method/newtons-method.factor
+++ b/extra/math/newtons-method/newtons-method.factor
@@ -1,4 +1,4 @@
-! Copyright © 2008 Reginald Keith Ford II
+! Copyright © 2008 Reginald Keith Ford II
 ! Newton's Method of approximating roots
 
 USING: kernel math math.derivatives ;
@@ -6,6 +6,6 @@ IN: math.newtons-method
 
 <PRIVATE
 : newton-step ( x function -- x2 ) dupd [ call ] [ derivative ] 2bi / - ;
-: newton-precision ( -- n ) 7 ;
+: newton-precision ( -- n ) 13 ;
 PRIVATE>
-: newton-method ( guess function -- x ) newton-precision [ [ newton-step ] keep ] times drop ;
+: newtons-method ( guess function -- x ) newton-precision [ [ newton-step ] keep ] times drop ;