Erlang高阶函数

  对于函数式语言来说,函数也想普通的数据类型一样无处不在。函数即可以当成参数进行传递,也可以当成函数的返回值。当我第一次学习函数式编程的时候,我被这样的写法弄的头昏脑涨。下面我举例说明下(例子摘录自Learn You Some Erlang):
  假如你想对一个列表中的所有值都进行加1或减1的操作,那么不熟悉函数式编程者给出的是如下的程序:
-module(hhfuns).
-compile(export_all).
 
increment([]) -> []; 
increment([H|T]) -> [H+1|increment(T)]. 

decrement([]) -> []; 
decrement([H|T]) -> [H-1|decrement(T)].

  具体的使用方式如下:

1> c(hhfuns).
{ok, hhfuns}
2> L = [1,2,3,4,5].
[1,2,3,4,5]
3> hhfuns:increment(L).
[2,3,4,5,6]
4> hhfuns:decrement(L).
[0,1,2,3,4]

  但是熟悉函数式编程者,肯定知道处理列表有个神器叫map/2函数。这个函数接收两个参数:第一个参数是一个函数,用来作用于列表中每一项;第二个参数是待处理的列表。map函数的一种实现方式如下:

map(_, []) -> [];
map(F, [H|T]) -> [F(H)|map(F,T)].

  如果用map实现上面的功能,则需要这样:

-module(hhfuns).
-compile(export_all).
    
map(_, []) -> []; 
map(F, [H|T]) -> [F(H)|map(F,T)].
 
incr(X) -> X + 1.
decr(X) -> X - 1.

  然后在shell中,这样使用:

1> c(hhfuns).
{ok, hhfuns}
2> L = [1,2,3,4,5].
[1,2,3,4,5]
3> hhfuns:map(fun hhfuns:incr/1, L).
[2,3,4,5,6]
4> hhfuns:map(fun hhfuns:decr/1, L).
[0,1,2,3,4]

  这里我只是为了说明map的内部机理才给出一个实例,在实际应用中可直接使用lists:map/2函数。通过举这样一个例子你是不是已经意识到函数式编程中高阶函数的威力以及使用的方便。类似的高阶函数还有很多,我在这里例举下最常用的,以备不时之需。如下:

  filter/2 用来过滤列表。
  继续补齐中.....
原文地址:https://www.cnblogs.com/kiven-code/p/3804635.html