index
:
github/perlweeklychallenge-club.git
master
Unnamed repository; edit this file 'description' to name the repository.
about
summary
refs
log
tree
commit
diff
log msg
author
committer
range
path:
root
/
challenge-143
/
conor-hoekstra
/
apl
/
ch-2.apl
blob: 2c5bcceda9c006ebf7f84e0ee39f45d87c35c04f (
plain
)
1
2
3
4
solution
←
{
1
∊
2
-
/
(
⍵
∘
÷+⊢
)
∪
⍵
∨⍳⌊
⍵
*
.5
}
⍝ Tests
solution
¨
36
12
6
⍝ 1 1 0