Pre-Master assignment in Haskell Blue-Green Tree