/[MITgcm]/MITgcm/model/src/update_masks_etc.F
ViewVC logotype

Diff of /MITgcm/model/src/update_masks_etc.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.3 by jmc, Tue Apr 28 18:01:15 2009 UTC revision 1.4 by jmc, Tue Mar 16 00:08:27 2010 UTC
# Line 160  Cml      ENDDO Line 160  Cml      ENDDO
160  C     CALL PLOT_FIELD_XYRS( tmpfld,  C     CALL PLOT_FIELD_XYRS( tmpfld,
161  C    &         'Model Depths K Index' , 1, myThid )  C    &         'Model Depths K Index' , 1, myThid )
162  CML I assume that R_low is not changed anywhere else in the code  CML I assume that R_low is not changed anywhere else in the code
163  CML and since it is not changed in this routine, we don't need to  CML and since it is not changed in this routine, we do not need to
164  CML print it again.  CML print it again.
165  CML      CALL PLOT_FIELD_XYRS(R_low,  CML      CALL PLOT_FIELD_XYRS(R_low,
166  CML     &         'Model R_low (ini_masks_etc)', 1, myThid)  CML     &         'Model R_low (ini_masks_etc)', 1, myThid)
# Line 282  Cml   The masks should stay constant, so Line 282  Cml   The masks should stay constant, so
282  Cml   implicitly implying that no cell that is wet in the begin will ever dry  Cml   implicitly implying that no cell that is wet in the begin will ever dry
283  Cml   up! This is a strong constraint and should be implementent as a hard  Cml   up! This is a strong constraint and should be implementent as a hard
284  Cml   inequality contraint when performing optimization (m1qn3 cannot do that)  Cml   inequality contraint when performing optimization (m1qn3 cannot do that)
285  Cml   Also, I am assuming here that the new hFac's never become zero during  Cml   Also, I am assuming here that the new hFac(s) never become zero during
286  Cml   optimization!  Cml   optimization!
287        DO bj = myByLo(myThid), myByHi(myThid)        DO bj = myByLo(myThid), myByHi(myThid)
288         DO bi = myBxLo(myThid), myBxHi(myThid)         DO bi = myBxLo(myThid), myBxHi(myThid)
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22