RosettaCodeData/Task/Sort-an-integer-array/Forth/sort-an-integer-array.fth

create test-data 2 , 4 , 3 , 1 , 2 ,
test-data 5 cell-sort