BEGIN{RS=RSRS}{n=(NF/2)^.5 for(i=0;i<n;i++){for(j=0;j++<n;printf"%d"(n>j?" ":a),s)for(s=k=0;k<n;)s+=$(n+j+k++*n*2)*$(2*i*n+k) print""}$0=a}1
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page