A:=Array new:1056.#[],'

	'with:'abcdefghi'do:[:v :c|I:=A indexOf:Z.
0to:v*v- 1 do:[:j|A at:j\\v+I+(j//v*33)put:' ',{c},(j\\v+I\\33>0or:['
'])]].A do:[:x|x display]