9 |
C \bv |
C \bv |
10 |
C *==========================================================* |
C *==========================================================* |
11 |
C | GAD_SOM_VARS.h |
C | GAD_SOM_VARS.h |
12 |
C | o Additional state variables for non-hydrostatic model |
C | o state variables for 2nd Order-Moment Advection |
13 |
C *==========================================================* |
C *==========================================================* |
14 |
C | In N-H mode, wVel becomes a prognostic variable: need |
C | Storage needed for Temperature and Salinity when using |
15 |
C | to hold two levels of time tendency for w (for AB-2) |
C | 2nd Order-Moment (SOM) Advection |
16 |
C *==========================================================* |
C *==========================================================* |
17 |
C \ev |
C \ev |
18 |
CEOP |
CEOP |
19 |
|
|
20 |
#ifdef GAD_ALLOW_SOM_ADVECT |
#ifdef GAD_ALLOW_TS_SOM_ADV |
21 |
C-- COMMON /GAD_SOM_VARS_R/ REAL, state variables for 2nd Order-Moment Advection |
C-- COMMON /GAD_SOM_VARS_R/ REAL, state variables for 2nd Order-Moment Advection |
22 |
C moments are stored in this order (3-D case): 1rst Order moments (3:x,y,z) |
C moments are stored in this order (3-D case): 1rst Order moments (3:x,y,z) |
23 |
C and 2nd Order moments (6:xx,yy,zz,xy,xz,yz). |
C and 2nd Order moments (6:xx,yy,zz,xy,xz,yz). |
30 |
_RL som_T(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,nSOM) |
_RL som_T(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,nSOM) |
31 |
_RL som_S(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,nSOM) |
_RL som_S(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,nSOM) |
32 |
|
|
33 |
#endif /* GAD_ALLOW_SOM_ADVECT */ |
#endif /* GAD_ALLOW_TS_SOM_ADV */ |