From 140dc927e7e233215e703a9d44903ffb1c15e689 Mon Sep 17 00:00:00 2001 From: Simon Proctor Date: Mon, 6 Apr 2020 11:51:14 +0100 Subject: Minor spacing fix --- challenge-055/simon-proctor/raku/ch-2.p6 | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/challenge-055/simon-proctor/raku/ch-2.p6 b/challenge-055/simon-proctor/raku/ch-2.p6 index 086bdfa95d..e5689859a6 100644 --- a/challenge-055/simon-proctor/raku/ch-2.p6 +++ b/challenge-055/simon-proctor/raku/ch-2.p6 @@ -29,11 +29,11 @@ sub unique-perms ( @input ) { } } -multi sub is-wave( 'lte', Int $a, Int $b where { $a <= $b } ) { True } -multi sub is-wave( 'lte', Int $a, Int $b where { $a > $b } ) { False } -multi sub is-wave( 'gte', Int $a, Int $b where { $a >= $b } ) { True } -multi sub is-wave( 'gte', Int $a, Int $b where { $a < $b } ) { False } -multi sub is-wave( 'gte', Int $a, Int $b where { $b > $a }, *@ ) { False } -multi sub is-wave( 'lte', Int $a, Int $b where { $a > $b }, *@ ) { False } +multi sub is-wave( 'lte', Int $a, Int $b where { $a <= $b } ) { True } +multi sub is-wave( 'lte', Int $a, Int $b where { $a > $b } ) { False } +multi sub is-wave( 'gte', Int $a, Int $b where { $a >= $b } ) { True } +multi sub is-wave( 'gte', Int $a, Int $b where { $a < $b } ) { False } +multi sub is-wave( 'gte', Int $a, Int $b where { $b > $a }, *@ ) { False } +multi sub is-wave( 'lte', Int $a, Int $b where { $a > $b }, *@ ) { False } multi sub is-wave( 'gte', Int $a, Int $b where { $a >= $b }, $c, *@r ) { True && is-wave( 'lte', $b, $c, |@r ); } multi sub is-wave( 'lte', Int $a, Int $b where { $a <= $b }, $c, *@r ) { True && is-wave( 'gte', $b, $c, |@r ); } -- cgit