75 |
C-- COMMON /GAD_PARM_L/ Logical parameters for GAD pkg routines |
C-- COMMON /GAD_PARM_L/ Logical parameters for GAD pkg routines |
76 |
C tempMultiDimAdvec :: set to T if using multi-dim advection for Temp |
C tempMultiDimAdvec :: set to T if using multi-dim advection for Temp |
77 |
C saltMultiDimAdvec :: set to T if using multi-dim advection for Salt |
C saltMultiDimAdvec :: set to T if using multi-dim advection for Salt |
78 |
C tempAdamsBashforth :: set to T if using Adams-Bashforth stepping for Temp |
C AdamsBashforthGt :: apply Adams-Bashforth extrapolation on T tendency (=Gt) |
79 |
C saltAdamsBashforth :: set to T if using Adams-Bashforth stepping for Salt |
C AdamsBashforthGs :: apply Adams-Bashforth extrapolation on S tendency (=Gs) |
80 |
|
C AdamsBashforth_T :: apply Adams-Bashforth extrapolation on Pot.Temp. |
81 |
|
C AdamsBashforth_S :: apply Adams-Bashforth extrapolation on Salinity |
82 |
|
C tempStartAB :: start this run (or restart) without previous gT/Temp |
83 |
|
C saltStartAB :: start this run (or restart) without previous gS/Salt |
84 |
LOGICAL tempMultiDimAdvec |
LOGICAL tempMultiDimAdvec |
85 |
LOGICAL saltMultiDimAdvec |
LOGICAL saltMultiDimAdvec |
86 |
LOGICAL tempAdamsBashforth |
LOGICAL AdamsBashforthGt |
87 |
LOGICAL saltAdamsBashforth |
LOGICAL AdamsBashforthGs |
88 |
|
LOGICAL AdamsBashforth_T |
89 |
|
LOGICAL AdamsBashforth_S |
90 |
|
LOGICAL tempStartAB |
91 |
|
LOGICAL saltStartAB |
92 |
COMMON /GAD_PARM_L/ |
COMMON /GAD_PARM_L/ |
93 |
& tempMultiDimAdvec , saltMultiDimAdvec , |
& tempMultiDimAdvec, saltMultiDimAdvec, |
94 |
& tempAdamsBashforth, saltAdamsBashforth |
& AdamsBashforthGt, AdamsBashforthGs, |
95 |
|
& AdamsBashforth_T, AdamsBashforth_S, |
96 |
|
& tempStartAB, saltStartAB |
97 |
|
|
98 |
CEH3 ;;; Local Variables: *** |
CEH3 ;;; Local Variables: *** |
99 |
CEH3 ;;; mode:fortran *** |
CEH3 ;;; mode:fortran *** |