Ex(-1:nx+2,-1;ny+2,-1:nz+2) do k=1,nz do j=1,ny,do