From 6d98a6bc86199a6db6fea8e0cb771510806234b2 Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Fri, 17 Sep 2021 21:11:34 +0200 Subject: Problem 43 --- problem43.ijs | 5 +++++ 1 file changed, 5 insertions(+) create mode 100644 problem43.ijs diff --git a/problem43.ijs b/problem43.ijs new file mode 100644 index 0000000..fad5f13 --- /dev/null +++ b/problem43.ijs @@ -0,0 +1,5 @@ +nums =: (i.!10)A.i.10 +primes =: p:i.7 +subnums =: verb : '10&#."1}.3,\y' +good =: verb : '*./0=primes|subnums y' +problem43 =: +/10&#."1 (I. good"1 nums) { nums -- cgit v1.2.3