Incomplete implementations of flowers challenge in Haskell