[Haskell-cafe] elementary Maybe Monad problem .. sigh

[Galchin, Vasili]

data Bozo =
    Bozo {
      id :: Int
    }

bonzo :: Maybe Bozo -> IO ()
bonzo   maybe_bozo = do
   if maybe_bozo == (Just (Bozo  x))
      then
         return ()
      else
         return ()
~

I want "x" to be a pattern that matches "id" .... ??

Kind regards, Vasili
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.haskell.org/pipermail/haskell-cafe/attachments/20080501/27fc2e83/attachment.htm