N=2<<int(input())
R=range(N//2)
M=[[[i%2,[[1,1,1,0],[0,1,0,0],[0,0,1,0],[0,1,1,1]][i%4][j%4]][i//4==j//4]for j in R]for i in R]
for i in R:
	for j in R:
		c=M[i][j]
		M[i][j]=c+[j,[[0,1,2,3],[2,3,0,1],[2,3,0,1],[0,1,2,3]][i%4][j%4]][i//4==j//4]*2+(i//2)*N
if N<5:M=[[-1]]
for m in M:print(*m)