diff options
author | Matthias Schiffer <matthias@gamezock.de> | 2010-03-09 03:49:15 +0100 |
---|---|---|
committer | Matthias Schiffer <matthias@gamezock.de> | 2010-03-09 03:49:15 +0100 |
commit | 7327695ca3d9aee5da1d0bc98572d877dd8c8546 (patch) | |
tree | e733714968ae0a041f76b213ffe31cca70ada6fb /src/Level.hs | |
parent | 2bb85618366681c7c97f8b36cc85a18c45beb924 (diff) | |
download | htanks-7327695ca3d9aee5da1d0bc98572d877dd8c8546.tar htanks-7327695ca3d9aee5da1d0bc98572d877dd8c8546.zip |
Moved source files to src directory
Diffstat (limited to 'src/Level.hs')
-rw-r--r-- | src/Level.hs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/src/Level.hs b/src/Level.hs new file mode 100644 index 0000000..c99a4b5 --- /dev/null +++ b/src/Level.hs @@ -0,0 +1,18 @@ +module Level ( Level(..) + , testLevel + ) where + +import Data.List + +data Level = Level + { levelWidth :: !Int + , levelHeight :: !Int + } deriving (Show) + + + +testLevel :: Level +testLevel = Level + { levelWidth = 10 + , levelHeight = 10 + }
\ No newline at end of file |