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-082
/
richard-park
/
apl
/
CommonFactors.aplf
blob: 36f226d2a6f15f9905df8061e03130c6eb627ae9 (
plain
)
1
CommonFactors
←
{
⍺
∩
⍥
{
⍸
0
=
⍵
|
⍨
⍳
¯1
+
⍵
}
⍵
}
