 0: rob
 1: pjw
 2: new=($pjw<128)?Z-$pjw:$pjw[X-x,y]
 3: new=($rob+$pjw)/2
 4: 1: def newy() { return clamp(4*y/3-75); }
    2: x { global int R, L, yy; R = X/3; L = 2*X/3; }
    3: x new=(x<R)?$rob[x,yy=newy()]:(x>L)?2*$pjw/3:3*((x-R)*2*$pjw/3+(L-x)*$rob[x,yy])/X
 5: new=($rob < $pjw) ? ($rob*$pjw)/Z : $pjw>>1
 6: new=($rob > 100) ? $rob : $pjw
 7: new=$rob[x+(64-((x&15)-8)*((x&15)-8))/8, y]
 8: new=$2[x+(64-($1&15)**2)/8, y+(64-(($1>>4)&15)**2)/8]
 9: new=$rob[x+1,y+1]+(Z-$rob)
10: get rob; x { xy_slicer(); }
11: get rob; x { smooth(4); edges(); }
