From 24dbf258fd92a11a348ca91c109c6c7b0144ac91 Mon Sep 17 00:00:00 2001
From: Devine Lu Linvega <aliceffekt@gmail.com>
Date: Fri, 8 Mar 2024 16:16:18 -0800
Subject: [PATCH] (sierpinski) Optimization

---
 projects/examples/exercises/sierpinski.tal | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/projects/examples/exercises/sierpinski.tal b/projects/examples/exercises/sierpinski.tal
index f0572d4..a79de01 100644
--- a/projects/examples/exercises/sierpinski.tal
+++ b/projects/examples/exercises/sierpinski.tal
@@ -8,9 +8,8 @@
 			#2018 DEO
 			#01 SUB DUP ?&>pad
 		&>fill ( length i -- )
-			ANDk #202a ROT ?{ SWP }
-			POP #18 DEO
-			#2018 DEO
+			ANDk #2018 DEOk SWP ROT ?{ #0a ORA }
+			SWP DEO
 			INC ADDk STHkr LTH ?&>fill
 		POP2 #0a18 DEO
 		#01 SUB INCk ?&>ver