core, basis, extra: Remove DOS line endings from files.

[factor.git] / extra / math / vectors / homogeneous / homogeneous.factor

diff --git a/extra/math/vectors/homogeneous/homogeneous.factor b/extra/math/vectors/homogeneous/homogeneous.factor
index b92406c469379e216c0ea46fc5b38b3b8c7ed53f..11004b6e0602da0da145f77394a7f0751efc2df6 100644 (file)
--- a/extra/math/vectors/homogeneous/homogeneous.factor
+++ b/extra/math/vectors/homogeneous/homogeneous.factor
@@ -10,14 +10,14 @@ IN: math.vectors.homogeneous
 
 : h+ ( a b -- c )
     2dup [ (homogeneous-w) ] bi@ over =
-    [ [ [ (homogeneous-xyz) ] bi@ v+ ] dip suffix ] [ 
+    [ [ [ (homogeneous-xyz) ] bi@ v+ ] dip suffix ] [
         drop
         [ [ (homogeneous-xyz) ] [ (homogeneous-w)   ] bi* v*n    ]
         [ [ (homogeneous-w)   ] [ (homogeneous-xyz) ] bi* n*v v+ ]
         [ [ (homogeneous-w)   ] [ (homogeneous-w)   ] bi* * suffix ] 2tri
     ] if ;
 
-: n*h ( n h -- nh ) 
+: n*h ( n h -- nh )
     [ (homogeneous-xyz) n*v ] [ (homogeneous-w) suffix ] bi ;
 
 : h*n ( h n -- nh )
@@ -34,4 +34,3 @@ IN: math.vectors.homogeneous
 
 : h>v ( h -- v )
     [ (homogeneous-xyz) ] [ (homogeneous-w) ] bi v/n ;
-