ll@n;
wt(n*2-3);
rep(i,n-1){
	wt(i+1,i+2,i*2+1);
}
rep(i,n-2){
	wt(2,i+3,i*2+4);
}
rep(j,2,n+1){
	wtN(j-1);
	rep(k,1,j){
		wtN(" ",k);
	}
	wt("");
}
rep(i,2,n+1){
	rep(j,i+1,n+1){
		wtN(j-2);
		rrep(k,i-2){
			wtN(" ",k+2);
		}
		wtN(" ",n+i-2);
		rep(k,i+1,j){
			wtN(" ",k);
		}
		wt("");
	}
}