module Scientist.Control
  ( Control(..)
  ) where

newtype Control a = Control
  { Control a -> a
unControl :: a
  }