From ab61158096c4e18f74afa9cb7e6d34678422149a Mon Sep 17 00:00:00 2001 From: Conor Hoekstra Date: Mon, 26 May 2025 21:36:29 -0400 Subject: :sparkles: Week 323 in BQN --- challenge-323/conor-hoekstra/ch-1.bqn | 11 +++++++++++ challenge-323/conor-hoekstra/ch-2.bqn | 21 +++++++++++++++++++++ 2 files changed, 32 insertions(+) create mode 100644 challenge-323/conor-hoekstra/ch-1.bqn create mode 100644 challenge-323/conor-hoekstra/ch-2.bqn diff --git a/challenge-323/conor-hoekstra/ch-1.bqn b/challenge-323/conor-hoekstra/ch-1.bqn new file mode 100644 index 0000000000..92b237f6e6 --- /dev/null +++ b/challenge-323/conor-hoekstra/ch-1.bqn @@ -0,0 +1,11 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/323-1.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" + +IncrementDecrement ← +´·-˝"+-"=⌜⊑∘∧¨ + +# Tests +u.UnitTest (IncrementDecrement ⟨"--x", "x++", "x++"⟩) ≡ 1 +u.UnitTest (IncrementDecrement ⟨"x++", "++x", "x++"⟩) ≡ 3 +u.UnitTest (IncrementDecrement ⟨"x++", "++x", "--x", "x--"⟩) ≡ 0 diff --git a/challenge-323/conor-hoekstra/ch-2.bqn b/challenge-323/conor-hoekstra/ch-2.bqn new file mode 100644 index 0000000000..ce480bc8b6 --- /dev/null +++ b/challenge-323/conor-hoekstra/ch-2.bqn @@ -0,0 +1,21 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/323-2.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" +fn ⇐ •Import "/home/cph/bqn-code/lib/fun.bqn" + +TaxAmount ← { + b ← fn.Deltas 0∾𝕨⌊⊑¨𝕩 # brackets + t ← 100÷˜⊢´¨𝕩 # tax rates + +´b×t +} + +TaxAmount2 ← +´(100÷˜⊢´¨)∘⊢×(fn.Deltas 0∾⌊⟜⊑¨) + +# Tests +u.UnitTest (10 TaxAmount ⟨3‿50, 7‿10, 12‿25⟩) ≡ 2.65 +u.UnitTest ( 2 TaxAmount ⟨1‿0, 4‿25, 5‿50⟩) ≡ 0.25 +u.UnitTest ( 0 TaxAmount ⟨2‿50⟩) ≡ 0 +u.UnitTest (10 TaxAmount2 ⟨3‿50, 7‿10, 12‿25⟩) ≡ 2.65 +u.UnitTest ( 2 TaxAmount2 ⟨1‿0, 4‿25, 5‿50⟩) ≡ 0.25 +u.UnitTest ( 0 TaxAmount2 ⟨2‿50⟩) ≡ 0 -- cgit