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

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

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

revision 1.113 by jmc, Fri Jan 28 01:00:13 2005 UTC revision 1.114 by jmc, Wed Apr 6 18:29:53 2005 UTC
# Line 160  C                      index into fVerTe Line 160  C                      index into fVerTe
160        INTEGER i, j        INTEGER i, j
161        INTEGER k, km1, kp1, kup, kDown        INTEGER k, km1, kp1, kup, kDown
162    
       LOGICAL  DIFFERENT_MULTIPLE  
       EXTERNAL DIFFERENT_MULTIPLE  
   
163  #ifdef ALLOW_DIAGNOSTICS  #ifdef ALLOW_DIAGNOSTICS
164        _RL tmpFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)        _RL tmpFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
165        LOGICAL  DIAGNOSTICS_IS_ON        LOGICAL  DIAGNOSTICS_IS_ON
Legend:
Removed from v.1.113  
changed lines
  Added in v.1.114
  ViewVC Help
Powered by ViewVC 1.1.22