/[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.126 by heimbach, Thu Dec 8 15:44:33 2005 UTC revision 1.127 by jmc, Thu Dec 15 21:09:00 2005 UTC
# Line 544  C--   Step forward W field in N-H algori Line 544  C--   Step forward W field in N-H algori
544  #endif  #endif
545           CALL TIMER_START('CALC_GW          [DYNAMICS]',myThid)           CALL TIMER_START('CALC_GW          [DYNAMICS]',myThid)
546           CALL CALC_GW( myTime, myIter, myThid )           CALL CALC_GW( myTime, myIter, myThid )
547             CALL TIMESTEP_WVEL( myTime, myIter, myThid )
548           CALL TIMER_STOP ('CALC_GW          [DYNAMICS]',myThid)           CALL TIMER_STOP ('CALC_GW          [DYNAMICS]',myThid)
549        ENDIF        ENDIF
550  #endif  #endif
Legend:
Removed from v.1.126  
changed lines
  Added in v.1.127
  ViewVC Help
Powered by ViewVC 1.1.22