程序代写代做代考 module BinomialHeapDef where

module BinomialHeapDef where

data BinomialTree a = Node Int a [BinomialTree a]
deriving (Eq, Show)
— Fields: rank, priority, list of child subtrees