0 5
x .5 - abs 20 ** y .5 - abs 20 ** + .05 **
dup -rot
/
t dup floor - pi * 2 *
+ sin abs
over 9 * abs 4 ** **
swap .1 max .1 - * 5 * 1 min
.9