diff options
| -rwxr-xr-x | challenge-196/steve-g-lynn/raku/ch-2.p6 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-196/steve-g-lynn/raku/ch-2.p6 b/challenge-196/steve-g-lynn/raku/ch-2.p6 index 9c6a14f2c5..2fadb00f71 100755 --- a/challenge-196/steve-g-lynn/raku/ch-2.p6 +++ b/challenge-196/steve-g-lynn/raku/ch-2.p6 @@ -7,7 +7,7 @@ say &range-list((0,1,2,4,5,6,8,9)); #([0,2],[4,6],[8,9]) sub range-list( @array) { my @arry=@array.sort({$^a <=> $^b}).unique; #-- just in case ... - @arry=@arry.unshift(-Inf).push(-Inf); + @arry.unshift(-Inf).push(-Inf); &print-edges( @arry[(1 .. @arry-2).grep({(@arry[$_]-@arry[$_-1]==1) || (@arry[$_+1]-@arry[$_]==1)})] ); } |