{-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE DeriveGeneric #-} module Dodge.Data.Material where data Material = Wood | Dirt | Stone | Glass | Metal | Crystal deriving (Eq,Ord,Show,Bounded,Enum)