是否有一种习惯的方式来在Erlang中订购函数子句？

-module(my_module).
-export([sort_functions/0]).

sort_functions() ->
    sort_functions([], []).

sort_functions([], Result) ->
    Result;
sort_functions([{Type1, Args1} | Rest], Result) ->
    sort_functions(Rest, insert({Type1, Args1}, Result)).

insert({Type, Args}, []) ->
    [{Type, Args}];
insert({Type, Args}, [{Type, Args1} | Rest]) when length(Args)< length(Args1) ->
    [{Type, Args} | [{Type, Args1} | Rest]];
insert({Type, Args}, [{Type, Args1} | Rest]) ->
    [{Type, Args1} | insert({Type, Args}, Rest)];
insert({Type, Args}, [{Type1, Args1} | Rest]) when Type< Type1 ->
    [{Type, Args} | [{Type1, Args1} | Rest]];
insert({Type, Args}, [{Type1, Args1} | Rest]) ->
    [{Type1, Args1} | insert({Type, Args}, Rest)].