d6
/
modal
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Improved init for sierpinski

This commit is contained in:
Devine Lu Linvega 2024-04-21 18:06:08 -07:00
parent 0be295a237
commit 150d0ff032
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
examples/sierpinski.modal
View File

@ -9,7 +9,7 @@
<> (Tri (?x > (?y ?z))) (Tri (?x (?y > ?z))) <> (Tri (?x > (?y ?z))) (Tri (?x (?y > ?z)))
<> (?x (?y > (?z ?n))) (. (?y (?z > ?n))) <> (?x (?y > (?z ?n))) (. (?y (?z > ?n)))
<> ((?x > ())) (< ()) <> ((?x > ())) (< ())
<> (Tri < (* ?^)) (?(?: ?:) (*?^)) <> (Tri < (* ?^)) (?(?: ?:) (*?^ \n))
<> ((?x < ?y)) (< (?x ?y)) <> ((?x < ?y)) (< (?x ?y))
?(?-) (Print) ?(?-) (Print)
@ -18,4 +18,4 @@
<> (Tri.dup ?x ?^) (Tri.join ?x ?^) <> (Tri.dup ?x ?^) (Tri.join ?x ?^)
<> (Tri < ?x) (Tri.dup (. ?x) (?x \n)) <> (Tri < ?x) (Tri.dup (. ?x) (?x \n))
Tri < (. (. (. (. (. (. (. (. (. (. (. (. (. (. (. (* (. (. (. (. (. (. (. (. (. (. (. (. (. (. (. ()))))))))))))))))))))))))))))))) ?(?* (Tri < (?*))) ...............*...............