D:wh@i<+@-|let@i=@i+1|let j=@-|wh j|let j-=1|let@O=printf("%3d%c",(@i+2*j)%@-*@-+(@i+j+@-/2)%@-+1,j?32:10)|endw|endw
"oPZZ