#define Y(a,b,n)(abs(i)in[a..a+n])&(abs(j)in[b..b+n])|
#define X(a,b,n)Y(a,b,n)Y(b,a,n)Y(b,b,n)
var i,j:comp;begin
for i:=-20to 20do for j:=-20to 20do
write(copy("[]
",1+9*ord(X(1,1,0)X(-1,3,2)X(1,7,4)X(-3,13,6)X(5,13,6)false)):2+ord(j=20))end.