From 6e08a3189797e123107f7e6944f43ff5d9cab9bd Mon Sep 17 00:00:00 2001
From: Conor Hoekstra <codereport@outlook.com>
Date: Tue, 28 Dec 2021 17:11:29 -0500
Subject: Week 144 Solution in APL

---
 challenge-144/conor-hoekstra/ch-01.apl | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 challenge-144/conor-hoekstra/ch-01.apl

diff --git a/challenge-144/conor-hoekstra/ch-01.apl b/challenge-144/conor-hoekstra/ch-01.apl
new file mode 100644
index 0000000000..782d89c9ce
--- /dev/null
+++ b/challenge-144/conor-hoekstra/ch-01.apl
@@ -0,0 +1,9 @@
+factors ← ∪⍳∨⊢
+isPrime ← 2≤≢∘factors
+
+⍝ Solution
+2 17⍴{⍵/⍨((2 3∊⍨≢)∧∧/)¨(isPrime¨¯1↓factors)¨⍵} ⍳100
+
+⍝ Output
+ 4  6  9 10 14 15 21 22 25 26 33 34 35 38 39 46 49
+51 55 57 58 62 65 69 74 77 82 85 86 87 91 93 94 95
-- 
cgit