{-# Language PatternGuards #-}
module Blub
   ( blub
   , foo
   , bar
   ) where
import Control.Monad
-- | Some Haddock doc
--   One line more
f :: Int -> Int
f = (+ 3)

g :: Int -> Int
g =
   where