wk 101..125, 185

69 files changed, 261 insertions, 0 deletions

diff --git a/challenge-101/aecepoglu/README.md b/challenge-101/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-101/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-101/aecepoglu/bqn/ch-1.bqn b/challenge-101/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..fc2d2accd8
--- /dev/null
+++ b/challenge-101/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,18 @@
+# TASK 1
+SpiralPack←{𝕊a:
+n←⌽a
+Dims←(⌊∘√)⊸(⊣⋈÷˜)∘≠
+d←Dims n
+ss←(⊢∾-)⟨0‿1,1‿0⟩
+Rot←{i‿s‿m‿o:⟨i+´ss⊏˜4|s+1‿2, 4|s+1, m, o⟩}
+Fit←{i‿·‿·‿·: ∨´i≥d?Rot 𝕩;
+     i‿·‿·‿o: i⊑o  ?Rot 𝕩;
+              𝕩          }
+Put←{𝕨𝕊i‿s‿m‿o:i‿s∾𝕨‿1{𝕨⌾(i⊸⊑)𝕩}¨m‿o}
+
+F←{𝕨𝕊⟨·,s,·,·⟩:•Show Fit •Show (s⊑ss)‿0‿0‿0+ 𝕨Put 𝕩}
+⌽2⊑⟨0‿0,0,(0⥊˜d),(0⥊˜d)⟩ F´ n
+}
+SpiralPack 1‿2‿3‿4
+SpiralPack 1‿2‿3‿4‿5‿6
+SpiralPack 1+↕12
diff --git a/challenge-102/aecepoglu/README.md b/challenge-102/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-102/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-102/aecepoglu/bqn/ch-2.bqn b/challenge-102/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..79907cc551
--- /dev/null
+++ b/challenge-102/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,8 @@
+# TASK 2 - hash counting string
+F←{"@":"@";
+   𝕊𝕩:¬∨´"@@"⍷𝕩?𝕩;
+   i‿s←(⊢⋈•Repr)2+⊑⌽/"@@"(≠∘⊢↑⍷)𝕩
+   is←((⊢-1˙)⊸∾)⍟(1-˜≠s) ⟨2-˜i⟩
+   s⌾(is⊸⊏)𝕩
+  }
+⌽˘⍉{F⍟(⌊n÷2) '@'⥊˜n←𝕩}¨⊸≍↕20
diff --git a/challenge-103/aecepoglu/README.md b/challenge-103/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-103/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-103/aecepoglu/bqn/ch-1.bqn b/challenge-103/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..56226b9cfd
--- /dev/null
+++ b/challenge-103/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,4 @@
+# TASK 1
+anm←' '((⊢-˜¬×+`)∘=⊔⊢)"rat ox tiger rabbit dragon snake horse goat monkey rooster dog pig"
+elm←2¨⊸/' '((⊢-˜¬×+`)∘=⊔⊢)"wood fire earth metal water"
+elm‿anm(⊣⊑˜≠⊸|)¨(2017-1924)
diff --git a/challenge-103/aecepoglu/bqn/ch-2.bqn b/challenge-103/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..c57057148c
--- /dev/null
+++ b/challenge-103/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,4 @@
+# TASK 2
+t0←0 #assume this is t0
+d←10 •rand.Deal 50 # durations
+(+`d)⊑∘⍋(+´d)|191812-t0
diff --git a/challenge-104/aecepoglu/README.md b/challenge-104/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-104/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-104/aecepoglu/bqn/ch-1.bqn b/challenge-104/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..f3e688a04b
--- /dev/null
+++ b/challenge-104/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,2 @@
+# TASK 1
+0‿1({𝕨∾+´𝕨⊏˜∊⊸/𝕩(-⋈⊢)⌊𝕩÷2})˜´⌽2↓ ↕50
diff --git a/challenge-105/aecepoglu/README.md b/challenge-105/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-105/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-105/aecepoglu/bqn/ch-1.bqn b/challenge-105/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..c2c5311c84
--- /dev/null
+++ b/challenge-105/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,3 @@
+# part 1
+≠intps←5⋆˜1+↕100
+⌊⌾(1000⊸×) {((𝕩⋆(1-n))×a÷n)+𝕩×(-⟜1÷⊢)n}⍟3 x0←intps⊑∘⍋ ⊑a‿n←248832‿5
diff --git a/challenge-105/aecepoglu/bqn/ch-2.bqn b/challenge-105/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..166df4c468
--- /dev/null
+++ b/challenge-105/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,11 @@
+# part 2
+#   (X), (X), bo-b (Y)
+#   Bonana-fanna fo-f (Y)
+#   Fee fi mo-m (Y)
+#   (X)!
+# x: name, y: name w/out 1st letter if consonant, don't repeat [b,f,m]
+F←(=⟜⊑⊑(⊣(∾⋈⊢)1⊸↓∘⊢))
+x←"billy"
+•Out¨⟨x∾", "∾x∾", bo-"∾'b'F x   # verse 1
+      "bonana-fanna fo-"∾'f'F x # verse 2
+      "Fee fi mo-"∾'m'F x⟩      # verse 3
diff --git a/challenge-106/aecepoglu/README.md b/challenge-106/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-106/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-106/aecepoglu/bqn/ch-1.bqn b/challenge-106/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..6d506c67d8
--- /dev/null
+++ b/challenge-106/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,3 @@
+# Task 1 - max gap
+(⌈´·-´˘2↕∨)∘(⊢↑˜2⌈≠) ⟨2, 9, 3, 5⟩
+(⌈´·-´˘2↕∨)∘(⊢↑˜2⌈≠) ⟨5⟩
diff --git a/challenge-106/aecepoglu/bqn/ch-2.bqn b/challenge-106/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..2bb872c676
--- /dev/null
+++ b/challenge-106/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,14 @@
+# Task 2 - decimal string
+
+# Calls 𝕨𝔽𝕩 until 𝔽 is called with the same 𝔾𝕩
+# returns ⟨𝕩_historical..⟩⋈𝕩_final
+_MmRpt_←{f w _𝕣_ x g:h←⟨⟩⋄h⋈({w F 𝕩⊣h∾↩𝕩}○⊢) •_while_ {∧´h≢¨<G𝕩} x}
+
+F←{d0 𝕊 n0:
+   h‿a←{{d𝕊n‿f:(n×10)(|˜⋈f∾⌊∘÷)d}} d0 _MmRpt_ n0‿⟨⟩ {⊑}
+   norep‿rep←'0'+(1⊑a)⊔˜∨`(⊑a)=(0=2|↕∘≠)⊸/h
+   rep2←(0<≠)◶⟨⊢,'('∾⊢∾')'˙⟩ (∧`'0'≠⌽)⊸/rep
+   "0."∾norep∾rep2}
+   
+7 F 1 # 1÷7
+66 F 5 # 1÷7
diff --git a/challenge-107/aecepoglu/README.md b/challenge-107/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-107/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-108/aecepoglu/README.md b/challenge-108/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-108/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-109/aecepoglu/README.md b/challenge-109/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-109/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-109/aecepoglu/bqn/ch-1.bqn b/challenge-109/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..badf45e8a5
--- /dev/null
+++ b/challenge-109/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,2 @@
+# TASK 1
+(+´2+·/0=2⊸↓∘↕|⊢)¨1+↕20
diff --git a/challenge-109/aecepoglu/bqn/ch-2.bqn b/challenge-109/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..0611eb9dca
--- /dev/null
+++ b/challenge-109/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,8 @@
+# TASK 2
+# abcdefg
+# ab bcd def fg
+Perm←{𝕊0:0‿0⥊0; # permutation table with 𝕩 columns
+      >⟨⟨0⟩⟩{n𝕊a:⥊(1+a){𝕨⌾(𝕩⊸/)n⥊0}⌜<˘¬=⌜˜↕n}´⌽1(⊣↓+)↕𝕩}
+      
+bs←<˘"ab"‿"bcd"‿"def"‿"fg"(∨´∘=⌜)"abcdefg"
+{1=+´∊bs+´∘/¨<𝕩}˘⊸/ 1+Perm 7
diff --git a/challenge-110/aecepoglu/README.md b/challenge-110/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-110/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-110/aecepoglu/bqn/ch-1.bqn b/challenge-110/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..81c95c8eab
--- /dev/null
+++ b/challenge-110/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,12 @@
+# VALID: +nn  nn3nn6n8n0
+# VALID: (nn) nn3nn6n8n0
+# VALID: n2n4 nn3nn6n8n0
+F←(∧´1="0:"⍋⊢)∘({'+'‿a‿b:a‿b;'('‿a‿b‿')':a‿b;𝕩}∘⊑∾1⊸⊑)' '⊸((¬-˜⊢×·+`»>⊢)∘≠⊔⊢)
+F¨"+12  1234567890"‿"(12) 1234567890"‿"1234 1234567890"
+d←⟨"0044 1148820341",
+"+44 1148820341",
+"44-11-4882-0341",
+"(44) 1148820341",
+"00 1148820341",⟩
+d
+(F⎊0)¨⊸/d
diff --git a/challenge-110/aecepoglu/bqn/ch-2.bqn b/challenge-110/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..479583464d
--- /dev/null
+++ b/challenge-110/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,2 @@
+path←"pwc-110.csv"
+path •FLines ({𝕨∾','∾𝕩}´)¨⍉>','((⊢-˜¬×+`)∘=⊔⊢)¨•FLines path
diff --git a/challenge-111/aecepoglu/README.md b/challenge-111/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-111/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-111/aecepoglu/bqn/ch-1.bqn b/challenge-111/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..58336e9f93
--- /dev/null
+++ b/challenge-111/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,4 @@
+# TASK 1
+n←10
+m←[1‿2‿5,6‿7‿9,11‿12‿13]
+n(⊣=⊢⊑˜0⌈⊑∘⍋˜-1˙)m⊏˜ n⊑∘(1-˜⍋˜)⊑˘m
diff --git a/challenge-111/aecepoglu/bqn/ch-2.bqn b/challenge-111/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..0a74ce31e4
--- /dev/null
+++ b/challenge-111/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,2 @@
+# TASK 2
+(⌈´⊸=≠¨)⊸/(∧´·≤´˘2↕⊢)¨⊸/"A["⊸((32×1=⊢)∘⍋+⊢)¨•FLines"/usr/share/dict/american-english"
diff --git a/challenge-112/aecepoglu/README.md b/challenge-112/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-112/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-112/aecepoglu/bqn/ch-1.bqn b/challenge-112/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..fb611a475a
--- /dev/null
+++ b/challenge-112/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,5 @@
+# TASK 1 - canonical path
+F←{∾'/'⊸∾¨⟨⟩{𝕨𝕊f‿x:•Show 𝕨‿𝕩⋄𝕨F ⋈x}˜´⌽s⋈˜¨f←⟨∾,¯1↓⊣⟩⊏˜".."⊸≡¨s←'/'((¬-˜⊢×·+`»>⊢)∘≠⊔⊢)𝕩}
+F "/a/"
+F "/a/b//c/"
+F "/a//b/c/../../d"
diff --git a/challenge-112/aecepoglu/bqn/ch-2.bqn b/challenge-112/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..34a7d866ac
--- /dev/null
+++ b/challenge-112/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,2 @@
+# TASK 2 - climb stairs
+{+´∊(∧`𝕩⊸≠)⊸/¨(∨´¨𝕩⊸=)⊸/+`¨1+⥊↕2⥊˜𝕩}4
diff --git a/challenge-113/aecepoglu/README.md b/challenge-113/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-113/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-113/aecepoglu/bqn/ch-1.bqn b/challenge-113/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..4fefd615b6
--- /dev/null
+++ b/challenge-113/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,3 @@
+# TASK 1 - represent integer
+_dc←{⌽𝕗|⌊∘÷⟜𝕗⍟(↕1+·⌊𝕗⋆⁼1⌈⊢)}                             # digits in base
+{∨´7=∾10 _dc ¨↕𝕩} 25
diff --git a/challenge-113/aecepoglu/bqn/ch-2.bqn b/challenge-113/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..6f0ee14fb1
--- /dev/null
+++ b/challenge-113/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,6 @@
+# TASK 2 - recreate binary tree
+# we would (could) represent a tree in array form and do this rather easily
+# but to show the task some respect, we'll build our tree using arrays of len 3
+t←⟨1,⟨2, ⟨4, ⟨⟩, ⟨7, ⟨⟩, ⟨⟩⟩⟩, ⟨⟩⟩, ⟨3, ⟨5, ⟨⟩, ⟨⟩⟩, ⟨6, ⟨⟩, ⟨⟩⟩⟩⟩
+a←{𝕊⟨⟩:⟨⟩; 𝕊 h‿l‿r: h∾´𝕊¨l‿r} t
+{{𝕩(+´≠/⊢)a}} {𝕨𝕊⟨⟩:⟨⟩;𝕨𝕊 h‿l‿r: (𝕎h)‿(𝕨𝕊l)‿(𝕨𝕊r)}t
diff --git a/challenge-114/aecepoglu/README.md b/challenge-114/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-114/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-114/aecepoglu/bqn/ch-1.bqn b/challenge-114/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..170b4cc2bd
--- /dev/null
+++ b/challenge-114/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,7 @@
+# TASK 1
+Pevn←{(⊢∾⌽)¨(0⊸=)⊸(⥊<∘⊣+¨·↕10¨-⊣)↕ 𝕩} 
+Podd←{(⊣∾·⌽¯1↓⊢)¨(0⊸=)⊸(⥊<∘⊣+¨·↕10¨-⊣)↕ 𝕩}
+Pdrm←{(⊣+10×⊢)´∘⌽¨(⌊⊸=)◶(Podd⌈)‿Pevn 𝕩÷2}
+Pevn‿Podd {𝕎𝕩}¨
+
+n(⊑∘⍋˜⊑⊢)∾Pdrm¨0‿1+⌈10⋆⁼⊢ n←1234
diff --git a/challenge-114/aecepoglu/bqn/ch-2.bqn b/challenge-114/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..8c38a0ff35
--- /dev/null
+++ b/challenge-114/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,3 @@
+# TASK 2
+Bn←{1⊑¨(<𝕩‿0)⊑⊸(|˜⋈⌊∘÷)`⌽2⋆↕1+⌈2⋆⁼𝕩}
+{b←Bn 𝕩 ⋄ (⊣+2×⊢)´∘⌽b(+´⊸⊑(⊑∘⍋⊑⊣)<∘⊣)(+´¨)⊸⊔⥊↕2¨b} 12
diff --git a/challenge-115/aecepoglu/README.md b/challenge-115/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-115/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-115/aecepoglu/bqn/ch-1.bqn b/challenge-115/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..9d6c2f990a
--- /dev/null
+++ b/challenge-115/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,2 @@
+# TASK 1
+∧´∨˝(≠´¨↕∘≢)⊸∧(⊑⊸=⟜(¯1⊸⊑))⌜˜⟨"ade", "cbd", "fgh"⟩
diff --git a/challenge-115/aecepoglu/bqn/ch-2.bqn b/challenge-115/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..3be447d378
--- /dev/null
+++ b/challenge-115/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,4 @@
+# TASK 2
+{𝕩(⊢∾˜·∨(⊢≤»)∘=/⊣)⌊´(0<≠)◶(𝕩⊸!)‿⊢(0=2⊸|)⊸/ 𝕩}1‿0‿0‿2‿6
+{𝕩(⊢∾˜·∨(⊢≤»)∘=/⊣)⌊´(0<≠)◶(𝕩⊸!)‿⊢(0=2⊸|)⊸/ 𝕩}1‿0‿2‿6
+{𝕩(⊢∾˜·∨(⊢≤»)∘=/⊣)⌊´(0<≠)◶(𝕩⊸!)‿⊢(0=2⊸|)⊸/ 𝕩}1‿1‿3‿5
diff --git a/challenge-116/aecepoglu/README.md b/challenge-116/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-116/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-116/aecepoglu/bqn/ch-1.bqn b/challenge-116/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..e27ce8f389
--- /dev/null
+++ b/challenge-116/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,5 @@
+# TASK 1
+_digi←{⌽𝕗|⌊∘÷⟜𝕗⍟(↕1+·⌊𝕗⋆⁼1⌈⊢)}
+F←{n←10 _Digi 𝕩
+ Chk←(1<≠)∧{∧´⥊1=|-´˘2↕(⊣+10×⊢)´∘⌽¨𝕩}∧(∧´0≠⊑¨)
+ Chk¨⊸/(n⊔˜0∾+`)¨⥊↕2⥊˜1-˜≠n }
diff --git a/challenge-116/aecepoglu/bqn/ch-2.bqn b/challenge-116/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..a4fdf86a6f
--- /dev/null
+++ b/challenge-116/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,3 @@
+# TASK 2
+_digi←{⌽𝕗|⌊∘÷⟜𝕗⍟(↕1+·⌊𝕗⋆⁼1⌈⊢)}
+{n←10 _Digi 𝕩 ⋄ (ט1+↕+´n)⊑∘∊˜(+´×˜n)} 52
diff --git a/challenge-117/aecepoglu/README.md b/challenge-117/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-117/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-117/aecepoglu/bqn/ch-1.bqn b/challenge-117/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..0a35eba418
--- /dev/null
+++ b/challenge-117/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,16 @@
+dat←⟨"11, Line Eleven",
+     "1, Line one",
+     "9, Line Nine",
+     "13, Line Thirteen",
+     "2, Line two",
+     "6, Line Six",
+