(clean 'Talks)

тут у нас круче:

main = do
 f <- findFlooder
 i <- getFsPosts f
 let result = clean i
 show result

clean psts =
 map Pliusomiot.destroy psts

:)

сначала надо

import qualified Pliusomiot

Так круче
короче и с анонимной функцией 8)

let _ = 
  let flooder = Forum.find_flooder () in
  let posts = Forum.find_posts flooder in
  List.map (fun x -> Forum.show x; Pliusomiot.destroy x) posts
;;

mli приблизительно такой:
Forum.fund_flooder: unit -> forum_user
Forum.find_posts: forum_user -> post list
Forum.show: post -> unit
Pliusomiot.destroy: post -> unit

А-а ошибку пропустил - функция clean должна быть типа (обрати внимание на монаду IO):

clean :: (Show a) => [Post] -> IO a

посему круче будет так:

main = findFlooder >>= getFsPosts >>= mapM Pliusomiot.destroy >>= show

В Haskell лямбда-выражения непосредственно редко употребляются.