module Bee ( Beehive (..) ) where data Beehive = Beehive { hiveWorkers :: Int , hiveOwner :: String }