首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > 其他开发语言 >

一个Haskell的有关问题

2013-06-25 
求助一个Haskell的问题我学haskell才学了几天, ,所以不会弄这个问题。。。就是给一个树, 要求按照从左到右的

求助一个Haskell的问题
我学haskell才学了几天, ,   所以不会弄这个问题。。。

就是给一个树, 要求按照从左到右的顺序排列
比如这个图,  结果应该是这样子的, order l=[6,3,9,2,5,8,4]

求助大家, 这个应该怎么写啊

一个Haskell的有关问题 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

热点排行