generalize the nqueens function in NQueens.gf

This commit is contained in:
krasimir
2010-10-13 17:53:44 +00:00
parent 2ab3081c07
commit 1c36f1fa8d
2 changed files with 2 additions and 2 deletions

View File

@@ -3,7 +3,7 @@ concrete NQueensAscii of NQueens = NatAscii ** {
lincat S, Matrix, Vec = Str ;
ListNat, Sat = {} ;
lin queens m = m ;
lin nqueens _ m = m ;
lin nilV _ _ = "" ;
consV _ j k _ _ v = j ++ "X" ++ k ++ ";" ++ v ;