diff options
| author | Conor Hoekstra <codereport@outlook.com> | 2025-05-05 14:33:23 -0400 |
|---|---|---|
| committer | Conor Hoekstra <codereport@outlook.com> | 2025-05-05 14:33:23 -0400 |
| commit | e045de93cbdb8a395684a39124c7250f7a15190b (patch) | |
| tree | dca7e509c61170fda7314b484adbd350f07a3c66 | |
| parent | 4865a9cce3c19c5a1def20017a083f17ef9a0809 (diff) | |
| download | perlweeklychallenge-club-e045de93cbdb8a395684a39124c7250f7a15190b.tar.gz perlweeklychallenge-club-e045de93cbdb8a395684a39124c7250f7a15190b.tar.bz2 perlweeklychallenge-club-e045de93cbdb8a395684a39124c7250f7a15190b.zip | |
:sparkles: Week 320 in BQN
| -rw-r--r-- | challenge-320/conor-hoekstra/ch-1.bqn | 15 | ||||
| -rw-r--r-- | challenge-320/conor-hoekstra/ch-2.bqn | 13 |
2 files changed, 28 insertions, 0 deletions
diff --git a/challenge-320/conor-hoekstra/ch-1.bqn b/challenge-320/conor-hoekstra/ch-1.bqn new file mode 100644 index 0000000000..332ee5a755 --- /dev/null +++ b/challenge-320/conor-hoekstra/ch-1.bqn @@ -0,0 +1,15 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/320-1.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" + +MaximumCount ← 0⊸<⌈○(+´)0⊸> +MaximumCount2 ← 0⊸(<⌈○(+´)>) + +# Tests +u.UnitTest (MaximumCount (¯3‿¯2‿¯1‿1‿2‿3)) ≡ 3 +u.UnitTest (MaximumCount (¯2‿¯1‿0‿0‿1)) ≡ 2 +u.UnitTest (MaximumCount (1‿2‿3‿4)) ≡ 4 +u.UnitTest (MaximumCount2 (¯3‿¯2‿¯1‿1‿2‿3)) ≡ 3 +u.UnitTest (MaximumCount2 (¯2‿¯1‿0‿0‿1)) ≡ 2 +u.UnitTest (MaximumCount2 (1‿2‿3‿4)) ≡ 4 diff --git a/challenge-320/conor-hoekstra/ch-2.bqn b/challenge-320/conor-hoekstra/ch-2.bqn new file mode 100644 index 0000000000..11290d5d5c --- /dev/null +++ b/challenge-320/conor-hoekstra/ch-2.bqn @@ -0,0 +1,13 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/320-2.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" +fn ⇐ •Import "/home/cph/bqn-code/lib/fun.bqn" +b ⇐ •Import "/home/cph/bqn-code/lib/binary.bqn" + +SumDifference ← |(+´·∾b.Digits¨)-+´ + +# Tests +u.UnitTest (SumDifference (1‿23‿4‿5)) ≡ 18 +u.UnitTest (SumDifference (1‿2‿3‿4‿5)) ≡ 0 +u.UnitTest (SumDifference (1‿2‿34)) ≡ 27 |