From f7af716e7efeb0a1ba5067749c21a9498c4f48c3 Mon Sep 17 00:00:00 2001
From: fredrikr79 <fredrikrobertsen7@gmail.com>
Date: Sat, 4 Oct 2025 03:21:52 +0200
Subject: [PATCH] solve 33 in uiua (fast)

---
 33/main.ua | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 33/main.ua

diff --git a/33/main.ua b/33/main.ua
new file mode 100644
index 0000000..d7aab4a
--- /dev/null
+++ b/33/main.ua
@@ -0,0 +1,10 @@
+# Experimental!
+# project euler 33
+/÷⍉ ⧅>2 +1⇡9    # single digit fractions
+⧅>2 +10⇡90      # combinations 10-100
+▽⤚(˜∊/÷⍉)       # fractions that simplify
+▽⊸≡/(=3⧻◴⊂∩⊥₁₀) # fractions that cancel
+Magic ← =⊙÷◡(/÷⊡⊣⊚¬⊙⍉⊙⊟:↻⊙:/↥◡(∩⌟=⊸↻1)∩⊥₁₀)
+▽⊸≡/Magic
+▽⊸≡/(¬↥∩/↥∩=₀∩⊥₁₀) # non-trivial
+⊢÷⊸/∨ /×           # reduce the fraction