import Control.Applicative
import Control.Monad

import Data.String
import Data.Char
import Data.List
import Data.Monoid
import Control.Monad.IO.Class

:set prompt "λ: "
:set -fno-warn-unused-imports

:def hoogle \s -> return $ ":! hoogle --count=15 \"" ++ s ++ "\""