-- Problem 60
-- hbalTreeNodes
-- Construct height-balanced binary trees with a given number of nodes
hbalTreeNodes :: a -> Int -> [Tree a]
hbalTreeNodes x n = concatMap filterTrees [minHeight .. maxHeight] where