papert―logo in your browser
examples:
koch snowflake
,
hilbert curve
,
spiral
share this program:
link to it
html:
bbcode:
reset to fork :size :n ifelse :n = 0 [] [ LEFT 30 FW :size fork (:size/2) (:n - 1) PENUP BW :size PENDOWN RIGHT 60 FW :size fork (:size/2) (:n - 1) PENUP BW :size PENDOWN LEFT 30 ] end fork 40 6
Your browser doesn't support canvas tags. Please upgrade to a recent version of Firefox or Opera.
<
>
