{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE Arrows #-}
{-# LANGUAGE RankNTypes #-}
{-# LANGUAGE TypeSynonymInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE GADTs #-}
module
    Control.Arrow.Machine
      (
        -- * Modules
        module Control.Arrow.Machine.Event, 
        module Control.Arrow.Machine.Utils,
        module Control.Arrow.Machine.Plan,
        module Control.Arrow.Machine.Running,
        module Control.Arrow.Machine.ArrowUtil,

        -- * The transducer arrow
        ProcessA(), 
        fit
       )
where

import Control.Arrow.Machine.Event
import Control.Arrow.Machine.Utils
import Control.Arrow.Machine.Plan
import Control.Arrow.Machine.Running
import Control.Arrow.Machine.ArrowUtil


import Control.Arrow.Machine.Types