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

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

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

revision 1.24 by adcroft, Fri Mar 24 18:31:31 2000 UTC revision 1.25 by adcroft, Fri Mar 24 19:06:14 2000 UTC
# Line 110  C--   Normalise RHS Line 110  C--   Normalise RHS
110         ENDDO         ENDDO
111        ENDDO        ENDDO
112  #ifdef LETS_MAKE_JAM  #ifdef LETS_MAKE_JAM
113        _GLOBAL_MAX_R8( rhsMax, myThid )  C     _GLOBAL_MAX_R8( rhsMax, myThid )
114  C     rhsMax=1.        rhsMax=1.
115  #else  #else
116        _GLOBAL_MAX_R8( rhsMax, myThid )        _GLOBAL_MAX_R8( rhsMax, myThid )
117  #endif  #endif
Legend:
Removed from v.1.24  
changed lines
  Added in v.1.25
  ViewVC Help
Powered by ViewVC 1.1.22