constructor
α : Type u
le : α → α → Bool
a b : BinTree α
ha : IsBinTree a
hb : IsBinTree b
hab : a.rank = b.rank
⊢ IsBinTree (combine le a b)
case a
α : Type u
le : α → α → Bool
a b : BinTree α
ha : IsBinTree a
hb : IsBinTree b
hab : a.rank = b.rank
⊢ IsRankedTree 1 (combine le a b).rank (nodes (combine le a b).children)