diff options
| author | Magnus Markling <magnus@markling.com> | 2025-05-10 16:50:00 +0200 |
|---|---|---|
| committer | Magnus Markling <magnus@markling.com> | 2025-05-10 20:56:14 +0200 |
| commit | ec50e9ceb9af3bf2cd60c8abd7d1694f61a6a47a (patch) | |
| tree | feaad7d19d2e7557f61d07472a90f8cb9b1a208c | |
| parent | f81c10b758026a2c4964f2604c3c13ea38af75ba (diff) | |
| download | perlweeklychallenge-club-ec50e9ceb9af3bf2cd60c8abd7d1694f61a6a47a.tar.gz perlweeklychallenge-club-ec50e9ceb9af3bf2cd60c8abd7d1694f61a6a47a.tar.bz2 perlweeklychallenge-club-ec50e9ceb9af3bf2cd60c8abd7d1694f61a6a47a.zip | |
Solve 320
| -rw-r--r-- | challenge-320/memark/uiua/ch-1.ua | 11 | ||||
| -rw-r--r-- | challenge-320/memark/uiua/ch-2.ua | 11 |
2 files changed, 22 insertions, 0 deletions
diff --git a/challenge-320/memark/uiua/ch-1.ua b/challenge-320/memark/uiua/ch-1.ua new file mode 100644 index 0000000000..3627335fd4 --- /dev/null +++ b/challenge-320/memark/uiua/ch-1.ua @@ -0,0 +1,11 @@ +# https://theweeklychallenge.org/blog/perl-weekly-challenge-320/#TASK1 + +# Uiua 0.16.0-dev.2 + +MaximumCount ← ↥∩/+⊃><0 + +┌─╴🧪 + ⍤. =3 MaximumCount [¯3 ¯2 ¯1 1 2 3] + ⍤. =2 MaximumCount [¯2 ¯1 0 0 1] + ⍤. =4 MaximumCount [1 2 3 4] +└─╴ diff --git a/challenge-320/memark/uiua/ch-2.ua b/challenge-320/memark/uiua/ch-2.ua new file mode 100644 index 0000000000..8e8652a3ea --- /dev/null +++ b/challenge-320/memark/uiua/ch-2.ua @@ -0,0 +1,11 @@ +# https://theweeklychallenge.org/blog/perl-weekly-challenge-320/#TASK2 + +# Uiua 0.16.0-dev.2 + +SumDifference ← ⌵-∩/+⊃(∘|≡⋕/$"__") + +┌─╴🧪 + ⍤. =18 SumDifference [1 23 4 5] + ⍤. =0 SumDifference [1 2 3 4 5] + ⍤. =27 SumDifference [1 2 34] +└─╴ |