2016 Update
This commit is contained in:
parent
948b86eafa
commit
dcf5d15da3
7965 changed files with 139854 additions and 31002 deletions
|
|
@ -1,4 +1,4 @@
|
|||
sub stoogesort( @L is rw, $i = 0, $j = @L.end ) {
|
||||
sub stoogesort( @L, $i = 0, $j = @L.end ) {
|
||||
@L[$j,$i] = @L[$i,$j] if @L[$i] > @L[$j];
|
||||
|
||||
my $interval = $j - $i;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue