Remove unused constraint (#114)

Author: rintcius

CHANGELOG.md

@@ -9,6 +9,7 @@ Breaking changes:
 New features:
 
 Bugfixes:
+- Removed unused constraint from `Ord1` instance (#114)
 
 Other improvements:
 

src/Control/Monad/Free.purs

@@ -59,7 +59,7 @@ instance ordFree :: (Functor f, Ord1 f, Ord a) => Ord (Free f a) where
     _, Left _ -> GT
     Right a, Right b -> compare a b
 
-instance ord1Free :: (Functor f, Ord1 f, Ord a) => Ord1 (Free f) where
+instance ord1Free :: (Functor f, Ord1 f) => Ord1 (Free f) where
   compare1 = compare
 
 instance freeFunctor :: Functor (Free f) where