generalize the nqueens function in NQueens.gf

This commit is contained in:
krasimir
2010-10-13 17:53:44 +00:00
parent 95713b9489
commit 82214f0be5
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 ;