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

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

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

revision 1.163 by heimbach, Tue Oct 28 01:39:48 2008 UTC revision 1.164 by jmc, Sun Jan 4 01:00:19 2009 UTC
# Line 776  C--   Do "blocking" sends and receives f Line 776  C--   Do "blocking" sends and receives f
776  C--   Calculate float trajectories  C--   Calculate float trajectories
777        IF (useFLT) THEN        IF (useFLT) THEN
778          CALL TIMER_START('FLOATS            [FORWARD_STEP]',myThid)          CALL TIMER_START('FLOATS            [FORWARD_STEP]',myThid)
779          CALL FLT_MAIN(myIter,myTime, myThid)          CALL FLT_MAIN( myTime, myIter, myThid )
780          CALL TIMER_STOP ('FLOATS            [FORWARD_STEP]',myThid)          CALL TIMER_STOP ('FLOATS            [FORWARD_STEP]',myThid)
781        ENDIF        ENDIF
782  #endif  #endif
Legend:
Removed from v.1.163  
changed lines
  Added in v.1.164
  ViewVC Help
Powered by ViewVC 1.1.22