Add file (broken commit, mid block refactor)

src/Dodge/Default/Block.hs

@@ -0,0 +1,18 @@
+module Dodge.Default.Block where
+import Dodge.Data
+import Dodge.Block.Debris
+import LensHelp
+
+defaultBlock :: Block
+defaultBlock = Block
+    { _blID = 0
+    , _blWallIDs = mempty
+    , _blHP = 1000
+    , _blShadows = []
+    , _blFootprint = []
+    , _blPos       = 0
+    , _blDraw      = const mempty
+    , _blDeath      = makeBlockDebris
+    }
+
+defaultDirtBlock = defaultBlock & blHP .~ 50