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