mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-14 15:29:31 -06:00
14 lines
228 B
Plaintext
14 lines
228 B
Plaintext
concrete NQueensAscii of NQueens = NatAscii ** {
|
|
|
|
lincat S, Matrix, Vec = Str ;
|
|
ListNat, Sat = {} ;
|
|
|
|
lin nqueens _ m = m ;
|
|
|
|
lin nilV _ _ = "" ;
|
|
consV _ j k _ _ v = j ++ "X" ++ k ++ ";" ++ v ;
|
|
|
|
matrix _ v = v ;
|
|
|
|
}
|