x new=Z; x new[x,yclamp(y+120-(6*r_polar(x,y))/9)]=$1; x new[x,yclamp(y+121-(6*r_polar(x,y))/9)]=$1 x new=old