Sort an integer array: Difference between revisions

Add Mercury version.
(Added Befunge counting sort)
(Add Mercury version.)
Line 455:
<lang maxscript>arr = #(5, 4, 3, 2, 1)
arr = sort arr</lang>
 
=={{header|Mercury}}==
<lang>
:- module sort_int_list.
:- interface.
:- import_module io.
 
:- pred main(io::di, uo::uo) is det.
 
:- implementation.
:- import_module list.
 
main(!IO) :-
Nums = [2, 4, 0, 3, 1, 2],
list.sort(Nums, Sorted),
io.write(Sorted, !IO),
io.nl(!IO).
</lang>
 
 
=={{header|Modula-3}}==
Anonymous user