aboutsummaryrefslogtreecommitdiff
path: root/challenge-333
diff options
context:
space:
mode:
authorMohammad Sajid Anwar <mohammad.anwar@yahoo.com>2025-08-11 00:39:43 +0100
committerMohammad Sajid Anwar <mohammad.anwar@yahoo.com>2025-08-11 00:39:43 +0100
commit7fbf2940bdf3e382ee2b75811a0c3ca90876f2a3 (patch)
tree9fa9f4e1e56dc2357ec3aced068d8fd7d99ba2a0 /challenge-333
parent4852c4e9f6e224a03e6c33fec4e38997394dca8b (diff)
downloadperlweeklychallenge-club-7fbf2940bdf3e382ee2b75811a0c3ca90876f2a3.tar.gz
perlweeklychallenge-club-7fbf2940bdf3e382ee2b75811a0c3ca90876f2a3.tar.bz2
perlweeklychallenge-club-7fbf2940bdf3e382ee2b75811a0c3ca90876f2a3.zip
- Added solutions by Humberto Massa.
Diffstat (limited to 'challenge-333')
-rw-r--r--challenge-333/massa/raku/ch-1.raku1
-rw-r--r--challenge-333/massa/raku/ch-2.raku1
2 files changed, 2 insertions, 0 deletions
diff --git a/challenge-333/massa/raku/ch-1.raku b/challenge-333/massa/raku/ch-1.raku
new file mode 100644
index 0000000000..6eef294918
--- /dev/null
+++ b/challenge-333/massa/raku/ch-1.raku
@@ -0,0 +1 @@
+(.[1][0]-.[0][0])*(.[2][1]-.[1][1]) == (.[2][0]-.[1][0])*(.[1][1]-.[0][1])
diff --git a/challenge-333/massa/raku/ch-2.raku b/challenge-333/massa/raku/ch-2.raku
new file mode 100644
index 0000000000..0652309576
--- /dev/null
+++ b/challenge-333/massa/raku/ch-2.raku
@@ -0,0 +1 @@
+.map({ $_ ?? $_ !! slip $_, $_ })[^.elems]