Refactor doors

2022-07-24 20:36:27 +01:00
parent 2c1bc67a51
commit d6a94ec4bc
25 changed files with 186 additions and 135 deletions
@@ -0,0 +1,9 @@
+--{-# LANGUAGE TemplateHaskell #-}
+{-# LANGUAGE StrictData #-}
+module Dodge.Data.MountedObject
+    where
+data MountedObject
+    = MountedLS Int
+    | MountedProp Int
+  deriving (Eq,Ord,Show,Read)
+