repositories
/
mc1516pa.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
30e9465e163abfc5518b5736db1da3ffbe9ac1db
[mc1516pa.git]
/
code
/
Sokoban.dcl
1
definition module Sokoban
2
3
:: SokobanPuzzle = {
4
width :: Int,
5
height :: Int,
6
data :: [[SokobanTile]]}
7
:: SokobanTile = Wall | Free | Box | Target
8
9
parse :: String *World -> (SokobanPuzzle, *World)