[Haskell-cafe] Seeking for an extention (functional incapsulation)