#seq -8 8 >o;(echo a\ b\ c;cross o o)|tsvproc -o c '$c=max(9-abs($a)-abs($b),0)'|tail +2|tr -d '\n'|perl -pe's/0/ /g;s/.{17}/$&\n/g' #seq -8 8 >o;(echo a\ b\ c;cross o o)|tsvproc -o c '$c=max(9-abs($a)-abs($b),0)'|tail +2|perl -ne'chomp;s/0/ /;print$_,!($.%17)&&"\n"' seq -8 8 >o;(echo a\ b\ c;cross o o)|tsvproc -o c '$c=max(9-abs($a)-abs($b),0)'|tail +2|perl -ne'chomp;s/0/ /;print$_,$.%17==0&&"\n"'