haskell pairing heap added