/[MITgcm]/MITgcm/pkg/generic_advdiff/GAD.h
ViewVC logotype

Diff of /MITgcm/pkg/generic_advdiff/GAD.h

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

revision 1.13 by jmc, Sat Oct 22 19:56:33 2005 UTC revision 1.16 by adcroft, Sat Jan 20 21:20:11 2007 UTC
# Line 52  C ENUM_DST3_FLUX_LIMIT :: 3-DST flux lim Line 52  C ENUM_DST3_FLUX_LIMIT :: 3-DST flux lim
52        INTEGER ENUM_DST3_FLUX_LIMIT        INTEGER ENUM_DST3_FLUX_LIMIT
53        PARAMETER(ENUM_DST3_FLUX_LIMIT=33)        PARAMETER(ENUM_DST3_FLUX_LIMIT=33)
54    
55    C ENUM_OS7MP :: 7th Order One Step method with Monotonicity Preserving Limiter
56          INTEGER ENUM_OS7MP
57          PARAMETER(ENUM_OS7MP=7)
58    
59    C ENUM_SOM_PRATHER :: 2nd Order-Moment Advection Scheme, Prather, 1986
60          INTEGER ENUM_SOM_PRATHER
61          PARAMETER(ENUM_SOM_PRATHER=80)
62    
63    C ENUM_SOM_LIMITER :: 2nd Order-Moment Advection Scheme, Prather Limiter
64          INTEGER ENUM_SOM_LIMITER
65          PARAMETER(ENUM_SOM_LIMITER=81)
66    
67    C nSOM :: number of 1rst & 2nd Order-Moments: 1+1 (1D), 2+3 (2D), 3+6 (3D)
68          INTEGER nSOM
69          PARAMETER( nSOM = 3+6 )
70    
71  C oneSixth :: Third/fourth order interpolation factor  C oneSixth :: Third/fourth order interpolation factor
72        _RL oneSixth        _RL oneSixth
73        PARAMETER(oneSixth=1.D0/6.D0)        PARAMETER(oneSixth=1.D0/6.D0)
# Line 73  C GAD_TR1 :: passive tracer 1 Line 89  C GAD_TR1 :: passive tracer 1
89  CEOP  CEOP
90    
91  C--   COMMON /GAD_PARM_L/ Logical parameters for GAD pkg routines  C--   COMMON /GAD_PARM_L/ Logical parameters for GAD pkg routines
92    C tempSOM_Advection :: set to T if using 2nd-Order Moment advection for Temp
93    C saltSOM_Advection :: set to T if using 2nd-Order Moment advection for Salt
94  C tempMultiDimAdvec :: set to T if using multi-dim advection for Temp  C tempMultiDimAdvec :: set to T if using multi-dim advection for Temp
95  C saltMultiDimAdvec :: set to T if using multi-dim advection for Salt  C saltMultiDimAdvec :: set to T if using multi-dim advection for Salt
96  C tempAdamsBashforth :: set to T if using Adams-Bashforth stepping for Temp  C AdamsBashforthGt  :: apply Adams-Bashforth extrapolation on T tendency (=Gt)
97  C saltAdamsBashforth :: set to T if using Adams-Bashforth stepping for Salt  C AdamsBashforthGs  :: apply Adams-Bashforth extrapolation on S tendency (=Gs)
98    C AdamsBashforth_T  :: apply Adams-Bashforth extrapolation on Pot.Temp.
99    C AdamsBashforth_S  :: apply Adams-Bashforth extrapolation on Salinity
100    C tempStartAB       :: start this run (or restart) without previous gT/Temp
101    C saltStartAB       :: start this run (or restart) without previous gS/Salt
102          LOGICAL tempSOM_Advection
103          LOGICAL saltSOM_Advection
104        LOGICAL tempMultiDimAdvec        LOGICAL tempMultiDimAdvec
105        LOGICAL saltMultiDimAdvec        LOGICAL saltMultiDimAdvec
106        LOGICAL tempAdamsBashforth        LOGICAL AdamsBashforthGt
107        LOGICAL saltAdamsBashforth        LOGICAL AdamsBashforthGs
108          LOGICAL AdamsBashforth_T
109          LOGICAL AdamsBashforth_S
110          LOGICAL tempStartAB
111          LOGICAL saltStartAB
112        COMMON /GAD_PARM_L/        COMMON /GAD_PARM_L/
113       & tempMultiDimAdvec , saltMultiDimAdvec ,       & tempSOM_Advection, saltSOM_Advection,
114       & tempAdamsBashforth, saltAdamsBashforth       & tempMultiDimAdvec, saltMultiDimAdvec,
115         & AdamsBashforthGt, AdamsBashforthGs,
116         & AdamsBashforth_T, AdamsBashforth_S,
117         & tempStartAB, saltStartAB
118    
119  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
120  CEH3 ;;; mode:fortran ***  CEH3 ;;; mode:fortran ***
Legend:
Removed from v.1.13  
changed lines
  Added in v.1.16
  ViewVC Help
Powered by ViewVC 1.1.22