fix nested functor composition

src/Applicative.hs

@@ -33,4 +33,3 @@ liftAA2 = liftA2 . liftA2
 
 (<<*>>) :: (Applicative f, Applicative g)  => f (g (a -> b)) -> f (g a) -> f (g b)
 (<<*>>) = liftA2 (<*>)
-

src/Functor.hs

@@ -23,6 +23,7 @@ import Data.Functor (
   )
 
 import Data.Function (flip)
+import Data.Function ((.))
 
 infixl 4 $>