*

: k 0.5 - ;
: s k dup * ;
: dist x s y s + sqrt ;

1 dist cir cir 300 * t 5 * - sin x k y k atan2 dist 15 * sin 1 * + t + 20 * sin 2 * *

comments powered by Disqus