Hyper for the win

1 files changed, 1 insertions, 10 deletions

diff --git a/challenge-125/simon-proctor/raku/ch-1.raku b/challenge-125/simon-proctor/raku/ch-1.raku
index e5dc16521a..5caf5d2c2d 100644
--- a/challenge-125/simon-proctor/raku/ch-1.raku
+++ b/challenge-125/simon-proctor/raku/ch-1.raku
@@ -26,15 +26,6 @@ sub py-triples(UInt $N) {
     
     my @odds = (1,*+2...* >= $N).cache;
 
-    my @pairs = (@odds X, @odds).grep( -> ($m, $n) { $m > $n } );
-    
-    for @pairs -> ( $m, $n ) {
-        my $pos = (  ($m * $n), ( ($m²-$n²)/2), ( ($m² + $n²)/2 ) );
-        if ( $N ~~ $pos.any ) {
-            push @out, $pos;
-        }
-    }
-    
-    return @out;
+    return (@odds X, @odds).hyper.grep( -> ($m, $n) { $m > $n } ).map( -> ( $m, $n ) { (  ($m * $n), ( ($m²-$n²)/2), ( ($m² + $n²)/2 ) ) } ).grep( -> $pos { $N ~~ $pos.any; } );
 }