From 061e09dfcd612ddb9be4ad3f5e36c46d73d03a39 Mon Sep 17 00:00:00 2001 From: Simon Proctor Date: Tue, 7 Apr 2020 09:10:10 +0100 Subject: Ooops.... had mine starting <= not >= fixed --- challenge-055/simon-proctor/raku/ch-2.p6 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-055/simon-proctor/raku/ch-2.p6 b/challenge-055/simon-proctor/raku/ch-2.p6 index e5689859a6..aee75ea167 100644 --- a/challenge-055/simon-proctor/raku/ch-2.p6 +++ b/challenge-055/simon-proctor/raku/ch-2.p6 @@ -13,7 +13,7 @@ multi sub MAIN( *@ ) is hidden-from-USAGE { say "Please give a list of 2 or more #| Given a list of integers return all the wave sorted lists multi sub MAIN( *@input where { $_.elems >= 2 && $_.all ~~ Int } ) { - .say for unique-perms( @input ).race.grep( -> @l { is-wave( 'lte', |@l ) } ); + .say for unique-perms( @input ).race.grep( -> @l { is-wave( 'gte', |@l ) } ); } sub unique-perms ( @input ) { -- cgit