/[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.174 by jmc, Fri Aug 15 20:41:50 2014 UTC revision 1.175 by jmc, Tue Sep 9 22:32:09 2014 UTC
# Line 577  C--     end of dynamics k loop (1:Nr) Line 577  C--     end of dynamics k loop (1:Nr)
577    
578  C--     Implicit Vertical advection & viscosity  C--     Implicit Vertical advection & viscosity
579  #if (defined (INCLUDE_IMPLVERTADV_CODE) && \  #if (defined (INCLUDE_IMPLVERTADV_CODE) && \
580       defined (ALLOW_MOM_COMMON) && !(defined ALLOW_AUTODIFF_TAMC))       defined (ALLOW_MOM_COMMON) && !(defined ALLOW_AUTODIFF))
581          IF ( momImplVertAdv ) THEN          IF ( momImplVertAdv ) THEN
582            CALL MOM_U_IMPLICIT_R( kappaRU,            CALL MOM_U_IMPLICIT_R( kappaRU,
583       I                           bi, bj, myTime, myIter, myThid )       I                           bi, bj, myTime, myIter, myThid )
Legend:
Removed from v.1.174  
changed lines
  Added in v.1.175
  ViewVC Help
Powered by ViewVC 1.1.22