--- MITgcm/pkg/diagnostics/diagnostics_sum_levels.F 2010/01/11 19:42:32 1.1 +++ MITgcm/pkg/diagnostics/diagnostics_sum_levels.F 2010/01/13 01:20:38 1.2 @@ -1,4 +1,4 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/diagnostics/diagnostics_sum_levels.F,v 1.1 2010/01/11 19:42:32 jmc Exp $ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/diagnostics/diagnostics_sum_levels.F,v 1.2 2010/01/13 01:20:38 jmc Exp $ C $Name: $ #include "DIAG_OPTIONS.h" @@ -177,8 +177,8 @@ ELSE tmpFac = drF(kLev) ENDIF - DO j = 1-OLy,sNy+OLy - DO i = 1-OLx,sNx+OLx + DO j = 2-OLy,sNy+OLy + DO i = 2-OLx,sNx+OLx hFacLoc = MIN( & hFacW( i, j, kLev,bi,bj), & hFacW( i,j-1,kLev,bi,bj),