From bba60b90426a2c65a08576bc95684d5f1e750bc3 Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Mon, 7 Mar 2022 11:12:20 +0100 Subject: Solve problems 72 and 73 --- problem72.ijs | 1 + problem73.ijs | 2 ++ 2 files changed, 3 insertions(+) create mode 100644 problem72.ijs create mode 100644 problem73.ijs diff --git a/problem72.ijs b/problem72.ijs new file mode 100644 index 0000000..dc6db58 --- /dev/null +++ b/problem72.ijs @@ -0,0 +1 @@ +problem72 =: <:+/(-~:)&.q:>:i.1e6 \ No newline at end of file diff --git a/problem73.ijs b/problem73.ijs new file mode 100644 index 0000000..5c2c64d --- /dev/null +++ b/problem73.ijs @@ -0,0 +1,2 @@ +problem73 =. #(#~(1%3)&<*.(1%2)&>) ~.;{{y%~({.+i.@>:@-~/)<.y%3 2}} each >:i.12000x +NB. Runs for about 30 minutes :) -- cgit v1.2.3