Real World Haskell Chapter3 続き
昨日よくわからないと言っていた練習問題の続き.
rightとleftを区別する方法がわからないので,無視.
--Tree2.hs data Tree a = Node a (Maybe(Tree a)) (Maybe(Tree a)) deriving (Show) simpleTree = Just (Node "parent" (Just (Node "left leaf" Nothing Nothing)) (Just (Node "right leaf" Nothing Nothing)))