[Haskell-cafe] simulation in the haskell way