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

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

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

revision 1.3 by edhill, Fri Oct 31 20:35:32 2003 UTC revision 1.5 by jmc, Fri Dec 3 15:39:11 2004 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2  C $Name$  C $Name$
3    
 #include "PACKAGES_CONFIG.h"  
4  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
5    
6  CBOP  CBOP
# Line 25  C     == Global variables === Line 24  C     == Global variables ===
24  #include "SIZE.h"  #include "SIZE.h"
25  #include "EEPARAMS.h"  #include "EEPARAMS.h"
26  #include "PARAMS.h"  #include "PARAMS.h"
 #include "GAD.h"  
27  #include "GRID.h"  #include "GRID.h"
28  #include "SURFACE.h"  #include "SURFACE.h"
29    
# Line 51  C     ab15, ab05 :: Adams bashforth extr Line 49  C     ab15, ab05 :: Adams bashforth extr
49  CEOP  CEOP
50    
51  C     Adams-Bashforth timestepping weights  C     Adams-Bashforth timestepping weights
52        IF (myIter .EQ. 0) THEN        IF ( myIter.EQ.0 .OR.
53         &    (myIter.EQ.1 .AND. staggerTimeStep) ) THEN
54         ab15=1.0         ab15=1.0
55         ab05=0.0         ab05=0.0
56        ELSE        ELSE
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22