((^n(dotimes(i n)(format #t(if(< 0 i(- n 1))#`"~*~,(- n i)@a
""~v,,,'Za
")n'Z)))(read))