From 8995b698044182b2226c9260878e4faf20f0a7cb Mon Sep 17 00:00:00 2001 From: Fredrik Robertsen Date: Sun, 21 Sep 2025 02:31:58 +0200 Subject: [PATCH] solve 62 in uiua (1 minute) --- 62/main.ua | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 62/main.ua diff --git a/62/main.ua b/62/main.ua new file mode 100644 index 0000000..c5c06ee --- /dev/null +++ b/62/main.ua @@ -0,0 +1,8 @@ +# project euler 62 +# [all cube permutations smaller than cube] ? cube +Chain ← ▽⤚≡⌟(≍⍆⊥10)⊙(⍆⊥10)⊸( + ▽⤚≡(≤⧻⊥10) ⊙(⧻⊥10)⊸⍜°ⁿ₃(⇡⌈) +) + +⍢+₁(<4⧻Chainⁿ3) 1 +⊢Chainⁿ3