ll a[2d3][4d3],n,t,w,y,s;{rd(n);rep(y,n,n+n)rep(x,n)rd(t),a[t][y-x]++,a[t][y+x]++,w+=y+1;rep(t,1,n+1)for(y=0,s=n;s>0;s-=a[t][y++])w-=s;wt(w);}