/[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.165 by jmc, Sat Aug 3 01:38:17 2013 UTC revision 1.166 by m_bates, Sun Sep 15 14:28:31 2013 UTC
# Line 116  C      |-- CALC_GRAD_PHI_SURF Line 116  C      |-- CALC_GRAD_PHI_SURF
116  C      |  C      |
117  C      |-- CALC_VISCOSITY  C      |-- CALC_VISCOSITY
118  C      |  C      |
119    C      |-- CALC_EDDY_STRESS
120    C      |
121  C      |-- CALC_PHI_HYD  C      |-- CALC_PHI_HYD
122  C      |  C      |
123  C      |-- MOM_FLUXFORM  C      |-- MOM_FLUXFORM
# Line 419  C     (copied) to a narrow strip outside Line 421  C     (copied) to a narrow strip outside
421          ENDIF          ENDIF
422  #endif /* ALLOW_OBCS */  #endif /* ALLOW_OBCS */
423    
424    #ifdef ALLOW_EDDYPSI
425            CALL CALC_EDDY_STRESS(bi,bj,myThid)
426    #endif
427    
428  C--     Start of dynamics loop  C--     Start of dynamics loop
429          DO k=1,Nr          DO k=1,Nr
430    
Legend:
Removed from v.1.165  
changed lines
  Added in v.1.166
  ViewVC Help
Powered by ViewVC 1.1.22