: ' 12 * 6 - ;
0
x ' abs y ' abs + dup >r
1 mod .5 - abs .07 <
dup
t
r> ceil dup 2 mod 2 * 1 - *
/ 1 mod
pi * 2 *
x ' y ' atan2 - sin .7 > *
+ 2 / 1.3 ** dup .2 ** .2 +