# Make a reduced Latin square out of each line of input { str = toupper($0) len = length(str) for (i = 1; i <= len; i++) let[i - 1] = substr(str, i, 1) for (j in let) for (k in let) printf (k < len - 1) ? "%s " : "%s\n", let[(k + j) % len] }