Data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · cb5bb5e222
commit cb5bb5e222
parent 7387c8f97b
199093 changed files with 3378972 additions and 0 deletions
--- a/Task/Fractal-tree/Quackery/fractal-tree.quackery
+++ b/Task/Fractal-tree/Quackery/fractal-tree.quackery
@ -0,0 +1,27 @@
+[ $ "turtleduck.qky" loadfile ] now!
+
+[ [ 1 1
+    30 times
+       [ tuck + ]
+   swap join ] constant
+   do ]                  is phi  (       --> n/d )
+
+[ 2dup 5 1 v< iff
+    2drop done
+  2dup 5 1 v/
+  proper 2drop wide
+  2dup walk
+  1 5 turn
+  2dup phi v/
+  2dup recurse
+  -2 5 turn
+  recurse
+  1 5 turn
+  -v fly ]               is tree ( n/d -->     )
+
+turtle
+20 frames
+-1 4 turn
+-450 1 fly
+500 1 tree
+1 frames