V10/vol2/Faces/doug/how

x new[yclamp(x+$1/8),yclamp(y-$1/4)]=$1
x new[yclamp(x+$1/4),yclamp(y-$1/4)]=$1
x new=$1[xclamp((x*x)/X + 95), yclamp((y*y)/Y + 25)]