From 9fb8e975e76df4953281525f1af7a8ee5d7fa66f Mon Sep 17 00:00:00 2001 From: Conor Hoekstra Date: Mon, 3 Feb 2025 10:45:20 -0500 Subject: :sparkles: BQN solutions --- challenge-307/conor-hoekstra/ch-1.bqn | 11 +++++++++++ challenge-307/conor-hoekstra/ch-2.bqn | 11 +++++++++++ 2 files changed, 22 insertions(+) create mode 100644 challenge-307/conor-hoekstra/ch-1.bqn create mode 100644 challenge-307/conor-hoekstra/ch-2.bqn diff --git a/challenge-307/conor-hoekstra/ch-1.bqn b/challenge-307/conor-hoekstra/ch-1.bqn new file mode 100644 index 0000000000..fbb53fbe43 --- /dev/null +++ b/challenge-307/conor-hoekstra/ch-1.bqn @@ -0,0 +1,11 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/307-1.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" + +CheckOrder ← /≠⟜∧ + +# Tests +u.UnitTest (CheckOrder ⟨5, 2, 4, 3, 1⟩) ≡ ⟨0, 2, 3, 4⟩ +u.UnitTest (CheckOrder ⟨1, 2, 1, 1, 3⟩) ≡ ⟨1, 3⟩ +u.UnitTest (CheckOrder ⟨3, 1, 3, 2, 3⟩) ≡ ⟨0, 1, 3⟩ diff --git a/challenge-307/conor-hoekstra/ch-2.bqn b/challenge-307/conor-hoekstra/ch-2.bqn new file mode 100644 index 0000000000..ab66a80922 --- /dev/null +++ b/challenge-307/conor-hoekstra/ch-2.bqn @@ -0,0 +1,11 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/307-2.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" +fn ⇐ •Import "/home/cph/bqn-code/lib/fun.bqn" + +FindAnagrams ← 1+·+´·≢¨fn._AdjMap∧¨ + +# Tests +u.UnitTest (FindAnagrams ⟨"acca", "dog", "god", "perl", "repl"⟩) ≡ 3 +u.UnitTest (FindAnagrams ⟨"abba", "baba", "aabb", "ab", "ab"⟩) ≡ 2 -- cgit