--- MITgcm/model/src/update_masks_etc.F 2010/05/09 22:40:03 1.5 +++ MITgcm/model/src/update_masks_etc.F 2011/06/08 01:21:14 1.6 @@ -1,4 +1,4 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/update_masks_etc.F,v 1.5 2010/05/09 22:40:03 jmc Exp $ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/update_masks_etc.F,v 1.6 2011/06/08 01:21:14 jmc Exp $ C $Name: $ #include "CPP_OPTIONS.h" @@ -157,7 +157,7 @@ Cml ENDDO Cml ENDDO - IF ( debugLevel.GE.debLevB ) THEN + IF ( debugLevel.GE.debLevC ) THEN _BARRIER CALL PLOT_FIELD_XYRS( R_low, & 'Model R_low (update_masks_etc)', 1, myThid ) @@ -270,7 +270,7 @@ CALL WRITE_FLD_XYZ_RS( 'hFacW.',suff,hFacW,optimcycle,myThid) CALL WRITE_FLD_XYZ_RS( 'hFacS.',suff,hFacS,optimcycle,myThid) - IF ( debugLevel.GE.debLevB ) THEN + IF ( debugLevel.GE.debLevC ) THEN _BARRIER C-- Write to monitor file (standard output) CALL PLOT_FIELD_XYZRS( hFacC,'hFacC (update_masks_etc)',