module Control.Functor.Exclusive (Exclusive (..)) where

import Control.Functor.Alternative (Alternative)

class Alternative t => Exclusive t where
        exclusive :: t a