summaryrefslogtreecommitdiff
path: root/src/Plant.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Plant.hs')
-rw-r--r--src/Plant.hs27
1 files changed, 27 insertions, 0 deletions
diff --git a/src/Plant.hs b/src/Plant.hs
new file mode 100644
index 0000000..04e35e7
--- /dev/null
+++ b/src/Plant.hs
@@ -0,0 +1,27 @@
+module Plant
+ ( GrowthStage (..)
+ , PlantType (..)
+ , Plant (..)
+ , Seed (..)
+ ) where
+
+data GrowthStage =
+ SSeed
+ | SSapling
+ | SGrown
+
+data PlantType =
+ TFlower
+ | TCrop
+ | TTree
+
+data Plant = Plant
+ { plantName :: String
+ , plantType :: PlantType
+ , plantStage :: GrowthStage
+ }
+
+data Seed = Seed
+ { seedName :: String
+ , seedType :: PlantType }
+