[Haskell-beginners] Implementing a Local Propagation Network