From c845b8be319a1bad3bb8fc47e14de4e7f637408c Mon Sep 17 00:00:00 2001 From: Mohammad Sajid Anwar Date: Sun, 14 Jul 2024 23:33:40 +0100 Subject: - Re-grouped contributions by Conor Hoekstra. --- challenge-272/conor-hoekstra/bqn/ch-1.bqn | 10 ++++++++++ challenge-272/conor-hoekstra/bqn/ch-2.bqn | 17 +++++++++++++++++ challenge-272/conor-hoekstra/ch-1.bqn | 10 ---------- challenge-272/conor-hoekstra/ch-2.bqn | 17 ----------------- challenge-273/conor-hoekstra/bqn/ch-1.bqn | 14 ++++++++++++++ challenge-273/conor-hoekstra/bqn/ch-2.bqn | 7 +++++++ challenge-273/conor-hoekstra/ch-1.bqn | 14 -------------- challenge-273/conor-hoekstra/ch-2.bqn | 7 ------- challenge-274/conor-hoekstra/bqn/ch-1.bqn | 12 ++++++++++++ challenge-274/conor-hoekstra/bqn/ch-2.bqn | 11 +++++++++++ challenge-274/conor-hoekstra/ch-1.bqn | 12 ------------ challenge-274/conor-hoekstra/ch-2.bqn | 11 ----------- challenge-275/conor-hoekstra/bqn/ch-1.bqn | 12 ++++++++++++ challenge-275/conor-hoekstra/bqn/ch-2.bqn | 12 ++++++++++++ challenge-275/conor-hoekstra/ch-1.bqn | 12 ------------ challenge-275/conor-hoekstra/ch-2.bqn | 12 ------------ challenge-276/conor-hoekstra/bqn/ch-1.bqn | 11 +++++++++++ challenge-276/conor-hoekstra/bqn/ch-2.bqn | 9 +++++++++ challenge-276/conor-hoekstra/ch-1.bqn | 11 ----------- challenge-276/conor-hoekstra/ch-2.bqn | 9 --------- challenge-277/conor-hoekstra/bqn/ch-1.bqn | 9 +++++++++ challenge-277/conor-hoekstra/bqn/ch-2.bqn | 10 ++++++++++ challenge-277/conor-hoekstra/ch-1.bqn | 9 --------- challenge-277/conor-hoekstra/ch-2.bqn | 10 ---------- 24 files changed, 134 insertions(+), 134 deletions(-) create mode 100644 challenge-272/conor-hoekstra/bqn/ch-1.bqn create mode 100644 challenge-272/conor-hoekstra/bqn/ch-2.bqn delete mode 100644 challenge-272/conor-hoekstra/ch-1.bqn delete mode 100644 challenge-272/conor-hoekstra/ch-2.bqn create mode 100644 challenge-273/conor-hoekstra/bqn/ch-1.bqn create mode 100644 challenge-273/conor-hoekstra/bqn/ch-2.bqn delete mode 100644 challenge-273/conor-hoekstra/ch-1.bqn delete mode 100644 challenge-273/conor-hoekstra/ch-2.bqn create mode 100644 challenge-274/conor-hoekstra/bqn/ch-1.bqn create mode 100644 challenge-274/conor-hoekstra/bqn/ch-2.bqn delete mode 100644 challenge-274/conor-hoekstra/ch-1.bqn delete mode 100644 challenge-274/conor-hoekstra/ch-2.bqn create mode 100644 challenge-275/conor-hoekstra/bqn/ch-1.bqn create mode 100644 challenge-275/conor-hoekstra/bqn/ch-2.bqn delete mode 100644 challenge-275/conor-hoekstra/ch-1.bqn delete mode 100644 challenge-275/conor-hoekstra/ch-2.bqn create mode 100644 challenge-276/conor-hoekstra/bqn/ch-1.bqn create mode 100644 challenge-276/conor-hoekstra/bqn/ch-2.bqn delete mode 100644 challenge-276/conor-hoekstra/ch-1.bqn delete mode 100644 challenge-276/conor-hoekstra/ch-2.bqn create mode 100644 challenge-277/conor-hoekstra/bqn/ch-1.bqn create mode 100644 challenge-277/conor-hoekstra/bqn/ch-2.bqn delete mode 100644 challenge-277/conor-hoekstra/ch-1.bqn delete mode 100644 challenge-277/conor-hoekstra/ch-2.bqn diff --git a/challenge-272/conor-hoekstra/bqn/ch-1.bqn b/challenge-272/conor-hoekstra/bqn/ch-1.bqn new file mode 100644 index 0000000000..e30ce8f758 --- /dev/null +++ b/challenge-272/conor-hoekstra/bqn/ch-1.bqn @@ -0,0 +1,10 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/272-1.bqn + +Join ← {(≠𝕨)↓∾𝕨⊸∾¨𝕩} +Split ← (¬-˜⊢×·+`»⊸>)∘≠⊔⊢ +DefangIp ← "[.]" Join '.' Split ⊢ + +# Tests +DefangIp "1.1.1.1" # "1[.]1[.]1[.]1" +DefangIp "255.101.1.0" # "255[.]101[.]1[.]0" diff --git a/challenge-272/conor-hoekstra/bqn/ch-2.bqn b/challenge-272/conor-hoekstra/bqn/ch-2.bqn new file mode 100644 index 0000000000..67079f6d43 --- /dev/null +++ b/challenge-272/conor-hoekstra/bqn/ch-2.bqn @@ -0,0 +1,17 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/272-2.bqn + +# Solution 1 (Explicit) +ScoreOfString ← {+´|-´˘2↕'a'-˜𝕩} + +# Solution 2 (Tacit) +ScoreOfString ← +´·|·-´˘2↕-⟜'a' + +# Solution 3 (More Functions) +Ord ← -⟜'a' +Deltas ← -´˘2↕⊢ +ScoreOfString ← +´·|·Deltas Ord + +ScoreOfString "hello" # 13 +ScoreOfString "perl" # 30 +ScoreOfString "raku" # 37 diff --git a/challenge-272/conor-hoekstra/ch-1.bqn b/challenge-272/conor-hoekstra/ch-1.bqn deleted file mode 100644 index e30ce8f758..0000000000 --- a/challenge-272/conor-hoekstra/ch-1.bqn +++ /dev/null @@ -1,10 +0,0 @@ -# For up to date code: -# https://github.com/codereport/bqn-code/blob/main/pwc/272-1.bqn - -Join ← {(≠𝕨)↓∾𝕨⊸∾¨𝕩} -Split ← (¬-˜⊢×·+`»⊸>)∘≠⊔⊢ -DefangIp ← "[.]" Join '.' Split ⊢ - -# Tests -DefangIp "1.1.1.1" # "1[.]1[.]1[.]1" -DefangIp "255.101.1.0" # "255[.]101[.]1[.]0" diff --git a/challenge-272/conor-hoekstra/ch-2.bqn b/challenge-272/conor-hoekstra/ch-2.bqn deleted file mode 100644 index 67079f6d43..0000000000 --- a/challenge-272/conor-hoekstra/ch-2.bqn +++ /dev/null @@ -1,17 +0,0 @@ -# For up to date code: -# https://github.com/codereport/bqn-code/blob/main/pwc/272-2.bqn - -# Solution 1 (Explicit) -ScoreOfString ← {+´|-´˘2↕'a'-˜𝕩} - -# Solution 2 (Tacit) -ScoreOfString ← +´·|·-´˘2↕-⟜'a' - -# Solution 3 (More Functions) -Ord ← -⟜'a' -Deltas ← -´˘2↕⊢ -ScoreOfString ← +´·|·Deltas Ord - -ScoreOfString "hello" # 13 -ScoreOfString "perl" # 30 -ScoreOfString "raku" # 37 diff --git a/challenge-273/conor-hoekstra/bqn/ch-1.bqn b/challenge-273/conor-hoekstra/bqn/ch-1.bqn new file mode 100644 index 0000000000..01c89548c5 --- /dev/null +++ b/challenge-273/conor-hoekstra/bqn/ch-1.bqn @@ -0,0 +1,14 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/273-1.bqn + +⟨Round⟩ ⇐ •Import "../lib/math.bqn" + +Percentage ← (Round 100×+´÷≠)= + +# Tests +•Show "perl" Percentage 'e' # 25 +•Show "java" Percentage 'a' # 50 +•Show "python" Percentage 'm' # 0 +•Show "ada" Percentage 'a' # 67 +•Show "ballerina" Percentage 'l' # 22 +•Show "analitik" Percentage 'k' # 13 diff --git a/challenge-273/conor-hoekstra/bqn/ch-2.bqn b/challenge-273/conor-hoekstra/bqn/ch-2.bqn new file mode 100644 index 0000000000..d6b62b46a1 --- /dev/null +++ b/challenge-273/conor-hoekstra/bqn/ch-2.bqn @@ -0,0 +1,7 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/273-2.bqn + +BAfterA ← (⌈´∧⌈`⊸≡)'b'=⊢ + +# Tests +•Show BAfterA ¨ "aabb"‿"abab"‿"aaa"‿"bbb" # ⟨ 1 0 0 1 ⟩ diff --git a/challenge-273/conor-hoekstra/ch-1.bqn b/challenge-273/conor-hoekstra/ch-1.bqn deleted file mode 100644 index 01c89548c5..0000000000 --- a/challenge-273/conor-hoekstra/ch-1.bqn +++ /dev/null @@ -1,14 +0,0 @@ -# For up to date code: -# https://github.com/codereport/bqn-code/blob/main/pwc/273-1.bqn - -⟨Round⟩ ⇐ •Import "../lib/math.bqn" - -Percentage ← (Round 100×+´÷≠)= - -# Tests -•Show "perl" Percentage 'e' # 25 -•Show "java" Percentage 'a' # 50 -•Show "python" Percentage 'm' # 0 -•Show "ada" Percentage 'a' # 67 -•Show "ballerina" Percentage 'l' # 22 -•Show "analitik" Percentage 'k' # 13 diff --git a/challenge-273/conor-hoekstra/ch-2.bqn b/challenge-273/conor-hoekstra/ch-2.bqn deleted file mode 100644 index d6b62b46a1..0000000000 --- a/challenge-273/conor-hoekstra/ch-2.bqn +++ /dev/null @@ -1,7 +0,0 @@ -# For up to date code: -# https://github.com/codereport/bqn-code/blob/main/pwc/273-2.bqn - -BAfterA ← (⌈´∧⌈`⊸≡)'b'=⊢ - -# Tests -•Show BAfterA ¨ "aabb"‿"abab"‿"aaa"‿"bbb" # ⟨ 1 0 0 1 ⟩ diff --git a/challenge-274/conor-hoekstra/bqn/ch-1.bqn b/challenge-274/conor-hoekstra/bqn/ch-1.bqn new file mode 100644 index 0000000000..4413090ff6 --- /dev/null +++ b/challenge-274/conor-hoekstra/bqn/ch-1.bqn @@ -0,0 +1,12 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/274-1.bqn + +⟨IsVowel, Words, Unwords⟩ ⇐ •Import "../lib/string.bqn" + +Rot ← { IsVowel ⊑ 𝕩 ? 𝕩 ; 1⌽𝕩 } +GoatLatin ← Unwords · (Rot¨ ∾¨ (('m'∾"a"/˜⊢)¨2+↕∘≠)) · Words ⊢ + +# Tests +•Show GoatLatin "I love Perl" # "Imaa ovelmaaa erlPmaaaa" +•Show GoatLatin "Perl and Raku are friends" # "erlPmaa andmaaa akuRmaaaa aremaaaaa riendsfmaaaaaa" +•Show GoatLatin "The Weekly Challenge" # "heTmaa eeklyWmaaa hallengeCmaaaa" diff --git a/challenge-274/conor-hoekstra/bqn/ch-2.bqn b/challenge-274/conor-hoekstra/bqn/ch-2.bqn new file mode 100644 index 0000000000..3843447e1b --- /dev/null +++ b/challenge-274/conor-hoekstra/bqn/ch-2.bqn @@ -0,0 +1,11 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/274-2.bqn + +WaitForBus ← { + t ← ⟨¯1‿0⟩∾∧∾{ e‿s‿d ← 𝕩 ⋄ (⋈⟜(d⊸+))¨s+e×↕⌈100÷e }¨𝕩 + 60⊸>⊸/∾{⟨⟨a,b⟩,⟨c,d⟩,⟨e,f⟩⟩ ← 𝕩 ⋄ {f⊸/∾{⟨⟨a,b⟩,⟨c,d⟩,⟨e,f⟩⟩ ← 𝕩 ⋄ {f∧0<⊢)|∘-)_Tri + +# Tests +•Show StrongPairs ⟨1, 2, 3, 4, 5⟩ # 4 +•Show StrongPairs ⟨5, 7, 1, 7⟩ # 1 (technically my soluiton outputs 2) diff --git a/challenge-277/conor-hoekstra/ch-1.bqn b/challenge-277/conor-hoekstra/ch-1.bqn deleted file mode 100644 index a2df74238b..0000000000 --- a/challenge-277/conor-hoekstra/ch-1.bqn +++ /dev/null @@ -1,9 +0,0 @@ -# For up to date code: -# https://github.com/codereport/bqn-code/blob/main/pwc/277-1.bqn - -CountCommon ← +´·⥊≡⌜○((1=≠¨)⊸/⊐⊸⊔) - -# Tests -•Show ⟨"Perl", "is", "my", "friend"⟩ CountCommon ⟨"Perl", "and", "Raku", "are", "friend"⟩ # 2 -•Show ⟨"Perl", "and", "Python", "are", "very", "similar"⟩ CountCommon ⟨"Python", "is", "top", "in", "guest", "languages"⟩ # 1 -•Show ⟨"Perl", "is", "imperative", "Lisp", "is", "functional"⟩ CountCommon ⟨"Crystal", "is", "similar", "to", "Ruby"⟩ # 0 diff --git a/challenge-277/conor-hoekstra/ch-2.bqn b/challenge-277/conor-hoekstra/ch-2.bqn deleted file mode 100644 index 7b36e7df29..0000000000 --- a/challenge-277/conor-hoekstra/ch-2.bqn +++ /dev/null @@ -1,10 +0,0 @@ -# For up to date code: -# https://github.com/codereport/bqn-code/blob/main/pwc/277-2.bqn - -⟨_Tri⟩ ⇐ •Import "../lib/modifiers.bqn" - -StrongPairs ← +´·∾(⌊(>∧0<⊢)|∘-)_Tri - -# Tests -•Show StrongPairs ⟨1, 2, 3, 4, 5⟩ # 4 -•Show StrongPairs ⟨5, 7, 1, 7⟩ # 1 (technically my soluiton outputs 2) -- cgit