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

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

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

revision 1.2 by adcroft, Tue May 29 14:01:37 2001 UTC revision 1.3 by adcroft, Tue Jul 31 15:01:33 2001 UTC
# Line 31  C     == Local variables == Line 31  C     == Local variables ==
31        _RL ab15,ab05        _RL ab15,ab05
32    
33  C     Adams-Bashforth timestepping weights  C     Adams-Bashforth timestepping weights
34        ab15 = 1.+ tauAB        IF (myIter .EQ. 0) THEN
35        ab05 = -tauAB         ab15=1.0
36           ab05=0.0
37          ELSE
38           ab15=1.+tauAB
39           ab05=-tauAB
40          ENDIF
41    
42  C     Step forward temperature  C     Step forward temperature
43        DO j=jMin,jMax        DO j=jMin,jMax
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22