--- /dev/null
+diff --git a/src/ParseLib2.hs b/src/ParseLib2.hs
+index 730e4be..a7406fa 100644
+--- a/src/ParseLib2.hs
++++ b/src/ParseLib2.hs
+@@ -34,2 +34,3 @@ module ParseLib2
+ import Data.Char
++import Control.Applicative hiding ( many )
+ import Control.Monad
+@@ -49,2 +50,6 @@ instance Functor Parser where
+
++instance Applicative Parser where
++ pure = return
++ (<*>) = ap -- defined in Control.Monad
++
+ instance Monad Parser where
+@@ -58,2 +63,6 @@ instance Monad Parser where
+
++instance Alternative Parser where
++ (<|>) = mplus
++ empty = mzero
++
+ instance MonadPlus Parser where