simp
case nil
α : Type u
α✝ : Type u_1
le : α✝ → α✝ → Bool
m : α✝
a : BinTree α✝
ha : IsSearchTree le a
hba : le m a.val = true
h : IsMinTree le m []
⊢ IsMinTree le m ([] ++ [a])
case nil
α : Type u
α✝ : Type u_1
le : α✝ → α✝ → Bool
m : α✝
a : BinTree α✝
ha : IsSearchTree le a
hba : le m a.val = true
h : IsMinTree le m []
⊢ IsMinTree le m [a]