t3-game-0.1.0: src/T3/Game/Types.hs

{-# LANGUAGE DeriveFunctor #-}
module T3.Game.Types
  ( Win(..)
  , Lose(..)
  ) where

import Prelude

newtype Win a = Win a
  deriving (Functor, Show)

newtype Lose a = Lose a
  deriving (Functor, Show)