!Gawk 'sub(/o/,a=(a\%32>0)*a*a^/s/+/i/-/d/)'
ZZ