Mode:
Duration:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
:- module revstring.
:- interface.
:- import_module io.
:- pred main(io::di, io::uo) is det.
:- implementation.
:- func reverse(list(T)) = list(T).
reverse([]) = [].
reverse([H|T]) = reverse(T) ++ [H].
main(!IO) :-
L = ['H','E','L','L','O'],
R = reverse(L),
io.write_string(R, !IO), io.write_string("\n", !IO).Coding works best on desktop or with an external keyboard.