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

import Control.Functor.Alternative (Alternative)

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