From 12dd93a4a9defb89724f216bb360689ff3fd1b9e Mon Sep 17 00:00:00 2001
From: Scimon Proctor <simon.proctor@gmail.com>
Date: Mon, 9 Aug 2021 14:15:15 +0100
Subject: Tidying up a bit

---
 challenge-125/simon-proctor/raku/ch-1.raku | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/challenge-125/simon-proctor/raku/ch-1.raku b/challenge-125/simon-proctor/raku/ch-1.raku
index bf36282fe4..e5dc16521a 100644
--- a/challenge-125/simon-proctor/raku/ch-1.raku
+++ b/challenge-125/simon-proctor/raku/ch-1.raku
@@ -29,8 +29,9 @@ sub py-triples(UInt $N) {
     my @pairs = (@odds X, @odds).grep( -> ($m, $n) { $m > $n } );
     
     for @pairs -> ( $m, $n ) {
-        if ( $N ~~ $m * $n || $N ~~ ($m²-$n²)/2 || $N ~~ ($m² + $n²)/2 ) {
-            push @out, $ = ( ($m * $n), ( ($m²-$n²)/2), ( ($m² + $n²)/2 ) );
+        my $pos = (  ($m * $n), ( ($m²-$n²)/2), ( ($m² + $n²)/2 ) );
+        if ( $N ~~ $pos.any ) {
+            push @out, $pos;
         }
     }
     
-- 
cgit