什么是弱头标准型(WHNF) ?Head Normal form (HNF)和Normal form (NF)是什么意思?

Real World Haskell声明:

我们熟悉的seq函数将表达式求值为 呼叫头标准型(简称HNF)。它一旦到达就会停止 最外层的构造函数(“head”)。这与正常情况不同 形式(NF),其中表达式被完全求值。 您还会听到Haskell程序员提到弱头正常 表单(WHNF)。对于正规数据,弱头正规形式与 头部正常形式。这种差异只出现在函数中,也是如此 这里涉及到我们的深奥。

我读了一些资源和定义(Haskell维基和Haskell邮件列表和免费字典),但我不明白。谁能举个例子或者给出一个外行的定义?

我猜它会类似于:

WHNF = thunk : thunk

HNF = 0 : thunk 

NF = 0 : 1 : 2 : 3 : []

seq和($!)如何与WHNF和HNF相关?

更新

我还是很困惑。我知道有些答案说忽略HNF。从各种定义来看,WHNF和HNF中的常规数据似乎没有区别。然而,当涉及到函数时,似乎确实有区别。如果没有区别,为什么seq是必要的foldl'?

另一个混淆点来自Haskell Wiki,它声明seq简化为WHNF,并且不会对下面的示例执行任何操作。然后他们说他们必须使用seq来强制求值。这不是强迫它去HNF吗?

Common newbie stack overflowing code: myAverage = uncurry (/) . foldl' (\(acc, len) x -> (acc+x, len+1)) (0,0) People who understand seq and weak head normal form (whnf) can immediately understand what goes wrong here. (acc+x, len+1) is already in whnf, so the seq (in the definition of foldl'), which reduces a value to whnf, does nothing to this. This code will build up thunks just like the original foldl example, they'll just be inside a tuple. The solution is just to force the components of the tuple, e.g. myAverage = uncurry (/) . foldl' (\(acc, len) x -> acc `seq` len `seq` (acc+x, len+1)) (0,0)

-Haskell Wiki在Stackoverflow上


当前回答

在图约简的实现中,对HNF的惰性求值迫使您处理lambda演算的名称捕获问题,而对WHNF的惰性求值则可以避免这个问题。

Simon Peyton Jones的《函数式编程语言的实现》第11章对此进行了解释。

其他回答

我知道这是一个老问题,但这里有一个明确的WHNF, HNF和NF的数学定义。在纯lambda演算中:

如果一个项的形式是这样的,那么它就是NF λx1。λ x2. ...λ xn. (x t1 t2…tm) 其中x是一个变量,t1, t2,…, tm在NF中。 一个术语是HNF,如果它的形式是 λx1。λ x2. ...λ xn. (x e1 e2…em) 其中x是一个变量,e1, e2,…, em是任意的术语。 在WHNF中,如果一个项是任意项e的λ项xe,或者它是这样的形式 X e1 e2…新兴市场 其中x是一个变量,e1, e2,…, em是任意的术语。


现在考虑一种具有构造函数a,b,c…集合na, nb, nc…,这意味着无论何时t1, t2,…, tm在NF中,那么术语a t1 t2…Tm,其中m = na是一个redex,可以计算。例如,Haskell中的加法构造函数+具有arity 2,因为它只在给出两个标准形式的参数时才计算值(在本例中,整数本身可以被视为null构造函数)。

A term is in NF if it is of the form λ x1. λ x2. ... λ xn. (x t1 t2 ... tm) where x is either a variable or a constructor of arity n with m < n, and t1, t2, ..., tm are in NF. A term is in HNF if it is of the form λ x1. λ x2. ... λ xn. (x e1 e2 ... em) where x is either a variable or a constructor of arity n, and e1, e2, ... em are arbitrary terms so long as the first n arguments are not all in NF. A term is in WHNF if it is either a lambda term λ x. e for any term e or if it is of the form x e1 e2 ... em where x is either a variable or a constructor of arity n, and e1, e2, ... em are arbitrary terms so long as the first n arguments are not all in NF.


特别地,NF中的任何项都在HNF中,HNF中的任何项都在WHNF中,但不是相反的。

头部正常形式意味着没有头部redex

(λx (y(λ。y + x) b)) b

简化为:R,代表redex(是的,它里面还有另一个redex,但这是不相关的)。这是一个头部redex,因为它是最左边的redex(唯一的redex),在它之前没有lambda项(变量或lambda表达式(应用或抽象)),只有0到n个抽象者(如果R是一个redex (λx. a)B, R的抽象者是λx),在这种情况下是0。

因为有一个头部索引,它不在HNF中,因此也不在NF中,因为有一个索引。

WHNF意味着它是一个lambda抽象或在HNF中。上述内容不在HNF中,也不是lambda抽象,而是一个应用程序,因此不在WHNF中。

λx.((λy.y+x)b)b在WHNF中

它是λ抽象,但不是在HNF中因为有一个头部λx。Rb

还原到λx.((b+x)b)。没有redex,所以是正常形式。

考虑λx.(λy.zyx)b),化简为λx。R,所以不在HNF中。λx.(k(λy.zyx)b)化简为λx。因此它是在HNF中,而不是在NF中。

所有的NF均为HNF和WHNF。所有HNF均为WHNF。

WHNF不希望对lambdas的主体进行计算,因此

WHNF = \a -> thunk
HNF = \a -> a + c

seq希望它的第一个参数在WHNF中,因此

let a = \b c d e -> (\f -> b + c + d + e + f) b
    b = a 2
in seq b (b 5)

计算结果为

\d e -> (\f -> 2 + 5 + d + e + f) 2

而不是,什么会使用HNF

\d e -> 2 + 5 + d + e + 2

http://foldoc.org/Weak+Head+Normal+Form上给出了一个很好的例子解释,头部范式甚至简化了函数抽象中的表达式位,而“弱”头部范式则止步于函数抽象。

从源头看,如果你有:

\ x -> ((\ y -> y+x) 2)

这是弱头部正常形式,但不是头部正常形式……因为可能的应用程序被卡在一个还不能求值的函数中。

实际的头部标准形式将难以有效地实现。这需要在函数内部进行操作。因此,弱头标准形式的优点是,您仍然可以将函数作为不透明类型来实现,因此它与编译语言和优化更加兼容。

基本上,假设你有某种坦克t。

现在,如果我们想求t的WHNF次方或NHF次方,它们除了函数外都是一样的,我们会发现我们会得到这样的东西

T1: t2,其中T1和t2是坦克。在这种情况下,t1将是你的0(或者更确切地说,在没有额外开箱的情况下,向0点击)

Seq和$!核定WHNF。请注意,

f $! x = seq x (f x)