我将在GHCI中键入什么来测试此代码

Question

我是haskell的新手，在维基百科上遇到了一些代码

data Tree a = Tip | Node a (Tree a) (Tree a) deriving (Show,Eq)

height Tip = 0
height (Node _ xl xr) = 1 + max (height xl) (height xr)

来源：http://www.csse.monash.edu.au/~lloyd/tildeFP/Haskell/1998/Tree/

我想知道一旦我从文件中运行代码，我需要输入GHCI来测试这段代码

Answer 1

您可以尝试以下操作。如果您问题中的代码位于“Main.hs”文件中，那么请执行

$ ghci Main.hs
>> height Tip
0
>> height (Node "a" Tip Tip)
1
>> height (Node "a" Tip (Node "b" Tip Tip))
2

＆安培; C。