如何避免两次使用相同参数调用相同的函数？

Question

我有一段这样的代码

if (result-of-a-func-call) > 0
    then (result-of-a-func-call)
    else -2

有没有办法避免第二次调用相同的函数(使用相同的参数)？在命令式语言中,我们可以做类似的事情

if((result=func-call())>0)
    result
else
    -2

Answer 1

您可以使用let或执行此操作where:

f x =
    let y = g x
    in if y > 0 then y else -2

要么

f x = if y > 0 then y else -2
    where y = g x

这里两者之间存在细微差别,要记住的最大区别是where可以用来定义在函数调用之间不会改变的值,编译器只会定义一次值,而let每个都会定义一个本地值.调用函数的时间,例如

f x = g x
    where g y = y * y + 1

与

f x =
    let g y = y * y + 1
    in g x

在第一个示例中,g仅定义一次,因为它不依赖于任何f参数(x),而在第二个示例g中,每次f调用时都重新定义.有理由希望这两种方法都超出了这个答案的范围.