hilfe, haskell

[angieray]

hallo,

ich habe einen problem und wäre sehr dankbar wenn jemand mir weiter helfen wuerde....

ich muss einen Program schreiben, der einen gelesenen zeile mit einer gegebener zeile vergleichen kann... aber es geht einfach nicht,Woran kann das liegen.

Danke sehr

lese ::  IO String 

lese  =  getLine 


gebe :: (String, String) -> String -> IO Bool 

gebe (a,n) = do  m <- lese 

                 vergleiche m a 



vergleiche m a  =  (m == a) [/PHP]

aber ich bekomme immer disen fehler

[PHP]ERROR "deneme.hs":5 - Type error in final generator
*** Term : vergleiche m a
*** Type : Bool
*** Does not match : IO a