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