From 3fb3f1d8dbdf3b5dfeaf05d0a7890c584592f8c2 Mon Sep 17 00:00:00 2001 From: Conor Hoekstra Date: Thu, 7 Oct 2021 11:30:37 -0400 Subject: Week 133 --- challenge-133/conor-hoekstra/ch-1.apl | 5 +++++ challenge-133/conor-hoekstra/ch-1.bqn | 5 +++++ challenge-133/conor-hoekstra/ch-1.hs | 5 +++++ challenge-133/conor-hoekstra/ch-1.ijs | 5 +++++ 4 files changed, 20 insertions(+) create mode 100644 challenge-133/conor-hoekstra/ch-1.apl create mode 100644 challenge-133/conor-hoekstra/ch-1.bqn create mode 100644 challenge-133/conor-hoekstra/ch-1.hs create mode 100644 challenge-133/conor-hoekstra/ch-1.ijs diff --git a/challenge-133/conor-hoekstra/ch-1.apl b/challenge-133/conor-hoekstra/ch-1.apl new file mode 100644 index 0000000000..ccc837947e --- /dev/null +++ b/challenge-133/conor-hoekstra/ch-1.apl @@ -0,0 +1,5 @@ + +solution ← ⌊*∘.5 + +⍝ Tests +solution 10 27 85 101 ⍝ 3 5 9 10 diff --git a/challenge-133/conor-hoekstra/ch-1.bqn b/challenge-133/conor-hoekstra/ch-1.bqn new file mode 100644 index 0000000000..9c992417d5 --- /dev/null +++ b/challenge-133/conor-hoekstra/ch-1.bqn @@ -0,0 +1,5 @@ + +Solution ← ⌊√ + +# Tests +Solution 10‿27‿85‿101 # ⟨ 3 5 9 10 ⟩ diff --git a/challenge-133/conor-hoekstra/ch-1.hs b/challenge-133/conor-hoekstra/ch-1.hs new file mode 100644 index 0000000000..de6354a4b1 --- /dev/null +++ b/challenge-133/conor-hoekstra/ch-1.hs @@ -0,0 +1,5 @@ + +solution = floor . sqrt + +-- Tests +map solution [10,27,85,101] -- [3,5,9,10] diff --git a/challenge-133/conor-hoekstra/ch-1.ijs b/challenge-133/conor-hoekstra/ch-1.ijs new file mode 100644 index 0000000000..f2c98ba909 --- /dev/null +++ b/challenge-133/conor-hoekstra/ch-1.ijs @@ -0,0 +1,5 @@ + +solution =. <.&%: + +NB. Tests +solution 10 27 85 101 NB. 3 5 9 10 -- cgit