erlang学习（怎么看怎么像是递归调用）

-module(tut6).%%这个程序用于取最大值,加入输出监听函数更容易理解一些
-export([list_max/1]).
list_max([Head|Rest]) ->
    list_max(Rest, Head).

 

list_max([], Res) ->
    Res;

list_max([Head|Rest], Result_so_far) when Head > Result_so_far ->
    io:format("Head=~w~n",[Head]),
    list_max(Rest, Head);

list_max([Head|Rest], Result_so_far) ->
    io:format("Rest=~w~n",[Rest]),
    list_max(Rest, Result_so_far).