From 8cf3331eb90adec5bf0305578a76f331dfcafa1c Mon Sep 17 00:00:00 2001
From: Mohammad S Anwar <mohammad.anwar@yahoo.com>
Date: Fri, 22 Oct 2021 00:28:11 +0100
Subject: - Added guest contributions by Conor Hoekstra.

---
 challenge-135/conor-hoekstra/apl/ch-1.apl | 12 ++++++++++++
 challenge-135/conor-hoekstra/bqn/ch-1.bqn | 10 ++++++++++
 challenge-135/conor-hoekstra/ch-01.apl    | 12 ------------
 challenge-135/conor-hoekstra/ch-01.bqn    | 10 ----------
 4 files changed, 22 insertions(+), 22 deletions(-)
 create mode 100644 challenge-135/conor-hoekstra/apl/ch-1.apl
 create mode 100644 challenge-135/conor-hoekstra/bqn/ch-1.bqn
 delete mode 100644 challenge-135/conor-hoekstra/ch-01.apl
 delete mode 100644 challenge-135/conor-hoekstra/ch-01.bqn

diff --git a/challenge-135/conor-hoekstra/apl/ch-1.apl b/challenge-135/conor-hoekstra/apl/ch-1.apl
new file mode 100644
index 0000000000..533de97ab0
--- /dev/null
+++ b/challenge-135/conor-hoekstra/apl/ch-1.apl
@@ -0,0 +1,12 @@
+middleThreeDigits ← {
+   s ← ⍕|⍵
+   0=2|≢s : 'Even # of digits' ⋄
+   3>≢s   : 'Too short'        ⋄
+   (3↑(2÷⍨¯3+≢)↓⊢)s
+}
+
+⍝ Tests
+middleThreeDigits 1234567 ⍝ 345
+middleThreeDigits ¯123    ⍝ 123
+middleThreeDigits 1       ⍝ Too short
+middleThreeDigits 10      ⍝ Even # of digits
diff --git a/challenge-135/conor-hoekstra/bqn/ch-1.bqn b/challenge-135/conor-hoekstra/bqn/ch-1.bqn
new file mode 100644
index 0000000000..c93246ea4a
--- /dev/null
+++ b/challenge-135/conor-hoekstra/bqn/ch-1.bqn
@@ -0,0 +1,10 @@
+MiddleThreeDigits ← {
+   0=2|≠•Fmt|𝕩 ? "Even # of digits" ;
+   3>≠•Fmt|𝕩   ? "Too short"        ;
+   (3↑(2÷˜¯3+≠)↓⊢)•Fmt|𝕩
+}
+
+MiddleThreeDigits 1234567 # "345"
+MiddleThreeDigits ¯123    # "123"
+MiddleThreeDigits 1       # "Too short"
+MiddleThreeDigits 10      # "Even # of digits"
diff --git a/challenge-135/conor-hoekstra/ch-01.apl b/challenge-135/conor-hoekstra/ch-01.apl
deleted file mode 100644
index 533de97ab0..0000000000
--- a/challenge-135/conor-hoekstra/ch-01.apl
+++ /dev/null
@@ -1,12 +0,0 @@
-middleThreeDigits ← {
-   s ← ⍕|⍵
-   0=2|≢s : 'Even # of digits' ⋄
-   3>≢s   : 'Too short'        ⋄
-   (3↑(2÷⍨¯3+≢)↓⊢)s
-}
-
-⍝ Tests
-middleThreeDigits 1234567 ⍝ 345
-middleThreeDigits ¯123    ⍝ 123
-middleThreeDigits 1       ⍝ Too short
-middleThreeDigits 10      ⍝ Even # of digits
diff --git a/challenge-135/conor-hoekstra/ch-01.bqn b/challenge-135/conor-hoekstra/ch-01.bqn
deleted file mode 100644
index c93246ea4a..0000000000
--- a/challenge-135/conor-hoekstra/ch-01.bqn
+++ /dev/null
@@ -1,10 +0,0 @@
-MiddleThreeDigits ← {
-   0=2|≠•Fmt|𝕩 ? "Even # of digits" ;
-   3>≠•Fmt|𝕩   ? "Too short"        ;
-   (3↑(2÷˜¯3+≠)↓⊢)•Fmt|𝕩
-}
-
-MiddleThreeDigits 1234567 # "345"
-MiddleThreeDigits ¯123    # "123"
-MiddleThreeDigits 1       # "Too short"
-MiddleThreeDigits 10      # "Even # of digits"
-- 
cgit