Sorting algorithms/Gnome sort: Difference between revisions
→{{header|Phix}}
m (→{{header|Sidef}}: minor code simplifications) |
|||
Line 1,837:
}
}</lang>
=={{header|Phix}}==
Copy of [[Sorting_algorithms/Gnome_sort#Euphoria|Euphoria]]
<lang Phix>function gnomeSort(sequence s)
integer i = 1, j = 2
while i<length(s) do
if s[i]<=s[i+1] then
i = j
j += 1
else
{s[i],s[i+1]} = {s[i+1],s[i]}
i -= 1
if i = 0 then
i = j
j += 1
end if
end if
end while
return s
end function
?gnomeSort(shuffle(tagset(10)))</lang>
=={{header|PHP}}==
| |||