*

: q .0 - 5 * dup 5 mod * ;
x q y q + t cos - 5 mod
dup .5 ** .2

comments powered by Disqus