Как сделать этот код хвостовым рекурсивным?

Question

Предположим, у меня есть эта функция, в псевдокоде, что обратный список:

def function reverse(list) : 
if (empty(list)) 
    return empty_list; 
else 
    return append( 
     reverse(list(2, lenght) , 
       list(1))); 

Этот код не является хвостовой рекурсией; Как я могу сделать это хвостом-рекурсивным?

Answer 1

См: Tail Call

F# Для

let map f l = 
    let rec loop acc = function 
     | [] -> List.rev acc 
     | x::xs -> loop (f x::acc) xs 
    loop [] l 

Для reversing a string