Haskell で2分探索木

プログラミングの基礎 第17章 「再帰的なデータ構造」の二分探索木をHaskell でやってみました。 import Test.HUnit data Tree_d = Empty | Leaf Int | Node (Tree_d, Int, Tree_d) deriving (Eq,Show) insertTree :: Tree_d -> Int -> Tree_d -- 空の木だっ…