Erlang获取列表中的最大值以及列表反转

1. 获取一个列表中的最大值，代码如下：

%%%-------------------------------------------------------------------
%%% @author Administrator
%%% @copyright (C) 2019, <COMPANY>
%%% @doc
%%%
%%% @end
%%% Created : 08. 一月 2019 上午 10:55
%%%-------------------------------------------------------------------
-module(helloworld).
-author("Administrator").

%% API
-export([start/0]).
%%-export([format_temps/1]).
start() ->
  io:format("The result is : ~p   ~n", [list_max([1,2,3,4,5,7,4,3,2,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 ->
  list_max(Rest, Head);
list_max([Head|Rest], Result_so_far) ->
  list_max(Rest, Result_so_far).

运行结果：

2. 列表反转：

%%%-------------------------------------------------------------------
%%% @author Administrator
%%% @copyright (C) 2019, <COMPANY>
%%% @doc
%%%
%%% @end
%%% Created : 08. 一月 2019 上午 10:55
%%%-------------------------------------------------------------------
-module(helloworld).
-author("Administrator").

%% API
-export([start/0]).
%%-export([format_temps/1]).
start() ->
  io:format("The result is : ~p   ~n", [reverse([1,2,3,4,5,7])]).

reverse(List) ->
  reverse(List, []).
reverse([Head|Rest], Reversed_List) ->
  reverse(Rest, [Head|Reversed_List]);
reverse([], Reversed_List) ->
  Reversed_List.

运行结果：