Pattern Maching IO variables in haskell