使用此代码:
-- Store a person's name, age, and favourite Thing.
data Person = Person String Int Thing
deriving Show
brent :: Person
brent = Person "Brent" 31 SealingWax
stan :: Person
stan = Person "Stan" 94 Cabbage
getAge :: Person -> Int
getAge (Person _ a _) = a
访问stan使用年龄:
getAge stan
打印: 94
定义stan不需要括号。
但是getAge Person "a" 1 Cabbage
会导致错误:
<interactive>:60:8:
Couldn't match expected type `Person'
with actual type `String -> Int -> Thing -> Person'
Probable cause: `Person' is applied to too few arguments
In the first argument of `getAge', namely `Person'
In the expression: getAge Person "a" 1 Cabbage
我需要使用括号:
*Main> getAge (Person "a" 1 Cabbage)
1
为什么在这种情况下需要括号?但是,定义stan = Person "Stan" 94 Cabbage
时不需要括号?
答案 0 :(得分:5)
getAge Person "a" 1 Cabbage
被解析为
(((getAge Person) "a") 1) Cabbage
即。这必须是接受Person
- 构造函数和另外三个参数的函数,而不是接受单个Person
- 值的函数。< / p>
为什么done this way?嗯,它使多参数功能更好。例如,Person
本身就是一个函数,带有三个参数(数据类型的字段)。如果Haskell不是一个一个地提供参数,你还需要写Person ("Brent", 31, Sealingwax)
。
Haskell使用的解析规则实际上比大多数其他语言简单得多,并且它们非常自然地允许部分应用程序,这非常有用。例如,
GHCI&GT;地图(人“布伦特”31)[卷心菜,SealingWax]
[人“布伦特”31白菜,人“布伦特”31 SealingWax]