even simpler version of NQueens

2010-03-24 21:04:37 +00:00
parent ab3127b5dd
commit 69535e2b6b
4 changed files with 5 additions and 11 deletions
--- a/examples/nqueens/NQueensAscii.gf
+++ b/examples/nqueens/NQueensAscii.gf
@@ -4,7 +4,7 @@ lincat Matrix, Vec = Str ;
       Constr, Sat = {} ;

 lin nilV _ _ = "" ;
-    consV _ _ f _ l _ v = f ++ "X" ++ l ++ "\n" ++ v ;
+    consV _ j k _ _ v = j ++ "X" ++ k ++ "\n" ++ v ;

    matrix _ v = v ;