flock modeling to learn haskell