Resolve ku-fpg#11. Rename run to unwrapNT and nat to makeNT

and move them into `Transforrmation` class

src/Control/Natural.hs

@@ -24,8 +24,8 @@ module Control.Natural
     -- * Type Synonym for a Natural Transformation
   , type (~>)
     -- * Conversion functions between the newtype and the synonym
-  , run
-  , nat
+  , applyNT
+  , makeNT
     -- * Class for Natural Transformations
   , Transformation(..)
   ) where
@@ -76,12 +76,12 @@ class Transformation f g t | t -> f g where
 instance Transformation f g (f :~> g) where
     Nat f # g = f g
 
--- | 'run' is the nonfix version of @#@. It is used to break natural
+-- | 'applyNT' is the nonfix version of @#@. It is used to break natural
 --   transformation wrappers, including ':~>'.
-run :: Transformation f g t => t -> (forall a . f a -> g a)
-run = (#)
+applyNT :: Transformation f g t => t -> (forall a . f a -> g a)
+applyNT = (#)
 
--- | 'nat' builds our natural transformation abstraction out of
+-- | 'makeNT' builds our natural transformation abstraction out of
 --    a natural transformation function.
-nat :: (forall a . f a -> g a) -> f :~> g
-nat = Nat
+makeNT :: (forall a . f a -> g a) -> f :~> g
+makeNT = Nat