diff options
| author | Mohammad Sajid Anwar <Mohammad.Anwar@yahoo.com> | 2025-05-06 15:30:54 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2025-05-06 15:30:54 +0100 |
| commit | e98c19acbe0cc6e9eab03fc3aa05cc43909cd417 (patch) | |
| tree | 288cc67f20db73dd546ed862fada053fa5ef83ec /challenge-320 | |
| parent | 473b677c285cd071f7ee78f833f65640f692ac66 (diff) | |
| parent | b0c350bed0296043cb98ba9ec78bca41e13e3e26 (diff) | |
| download | perlweeklychallenge-club-e98c19acbe0cc6e9eab03fc3aa05cc43909cd417.tar.gz perlweeklychallenge-club-e98c19acbe0cc6e9eab03fc3aa05cc43909cd417.tar.bz2 perlweeklychallenge-club-e98c19acbe0cc6e9eab03fc3aa05cc43909cd417.zip | |
Merge pull request #11981 from codereport/master
Week 320 in BQN
Diffstat (limited to 'challenge-320')
| -rw-r--r-- | challenge-320/conor-hoekstra/ch-1.bqn | 15 | ||||
| -rw-r--r-- | challenge-320/conor-hoekstra/ch-2.bqn | 12 |
2 files changed, 27 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..20d234a4ba --- /dev/null +++ b/challenge-320/conor-hoekstra/ch-2.bqn @@ -0,0 +1,12 @@ +# 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" +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 |