1 files changed, 4 insertions, 0 deletions

diff --git a/problem46.ijs b/problem46.ijs
new file mode 100644
index 0000000..2b77fef
--- /dev/null
+++ b/problem46.ijs
@@ -0,0 +1,4 @@
+nums =: (2&|#])2}.(0&p:#])i.10000
+squares =: {{ 2^~>:i.<.%:y }}
+fails =: {{ -.+./1 p:(]-2*squares) y }}"0
+problem46 =: nums{~{.I.fails nums