vnorm rename

[factor.git] / extra / jamshred / oint / oint.factor

diff --git a/extra/jamshred/oint/oint.factor b/extra/jamshred/oint/oint.factor
index 9b92c7b27451480ca28643138883c9e3bcb393f8..63bc29d9f560a0a5707513e8ed31b1f57c3a4fbb 100644 (file)
--- a/extra/jamshred/oint/oint.factor
+++ b/extra/jamshred/oint/oint.factor
@@ -78,11 +78,11 @@ PRIVATE>
     [ location>> ] bi@ swap v- ;
 
 : distance ( oint oint -- distance )
-    distance-vector norm ;
+    distance-vector l2-norm ;
 
 : scalar-projection ( v1 v2 -- n )
     ! the scalar projection of v1 onto v2
-    [ vdot ] [ norm ] bi / ;
+    [ vdot ] [ l2-norm ] bi / ;
 
 : proj-perp ( u v -- w )
     dupd proj v- ;