]> gitweb.factorcode.org Git - factor.git/blobdiff - unmaintained/adsoda/solution2/solution2.factor
Fix comments to be ! not #!.
[factor.git] / unmaintained / adsoda / solution2 / solution2.factor
index 85bfb14d81bfc8109f343671611c38f187e643c3..9b75e0573f8d0fcf6cd8238f274053cddee91be1 100644 (file)
@@ -40,7 +40,7 @@ SYMBOL: matrix
     over [ find-from drop ] dip length or ; inline
 
 : first-col ( row# -- n )
-    #! First non-zero column
+    ! First non-zero column
     0 swap nth-row [ zero? not ] skip ;
 
 : clear-scale ( col# pivot-row i-row -- n )