求助一个Haskell的问题
我学haskell才学了几天, , 所以不会弄这个问题。。。
就是给一个树, 要求按照从左到右的顺序排列
比如这个图, 结果应该是这样子的, order l=[6,3,9,2,5,8,4]
求助大家, 这个应该怎么写啊
haskell
[解决办法]
data Tree a = Empty
[解决办法]
Node a (Tree a) (Tree a)
deriving (Show, Eq)
tree = Node 2
(Node 3
(Node 6 Empty Empty)
(Node 9 Empty Empty))
(Node 8
(Node 5 Empty Empty)
(Node 4 Empty Empty))
in_order :: Tree a -> [a]
in_order Empty = []
in_order (Node val left right) =
in_order left ++ [val] ++ in_order right
main :: IO ()
main = putStrLn . show . in_order $ tree