aboutsummaryrefslogtreecommitdiff
path: root/challenge-332/hvukman/k/332_p2.k
blob: f79f13aaedf3c125c5b9968e3d9ea36c3874040c (plain)
1
2
3
4
/ check if element of vector is divisible by 2
odd: {0=2!+/x=inp}
/ looking for character x in word inp; inp is set as global variable
{inp::x ; $[0=(+/{odd x}'x);"true";"false" ]}'("weekly";"perl";"challenge")