*

: sq dup * ;
: d sq swap sq + sqrt ;
: s push - swap pop - 4dup d
push atan2 0.01 * pop +
300 * sin ;
.8 .4 x y s
t sin abs t cos abs x y s + dup dup

Based on: Untitled Redux Redux Redux - Anonymous


comments powered by Disqus