read a&&(eval b={a..h}{1..8}'
set 18#{$a,$b}{/,%}18
c[(($1-$3)*($2-_))**2^4]+=$b\ 
';echo $c)&&. *