*

: e .3 ;
: x x .5 - ; : y .e- ;
: x x 7 * cos ; : y y 3 * sin ;
: lines >r .9 e * + r> * dup
floor - e < ;
: net >r x r@ lines y r@ lines
x y + r@ lines
x y - r> lines or ;
t 9 / sin 5 * 2 + net

Based on: lines - 陳昕亞


comments powered by Disqus