increasing :: Ord a => [a] -> Bool
insert :: Ord a => a -> Tree a -> Tree a contains :: Ord a => ...
inorder :: Tree a -> [a]
instance Show a => Show (Tree a)
instance Ord a => Ord (List a)