| File |
Line number |
Procedure |
Code |
|
./model/src/calc_ivdc.F |
52 |
CALC_IVDC |
& (rhokm1(i,j)-rhokp1(i,j))*rkSign*gravitySign.GT.0. ) THEN |
|
./model/src/ini_parms.F |
1167 |
INI_PARMS |
gravitySign = -1. _d 0 |
|
./model/src/ini_parms.F |
1169 |
INI_PARMS |
gravitySign = 1. _d 0 |
|
./model/src/ini_parms.F |
150 |
INI_PARMS |
& gravitySign, nh_Am2, |
|
./model/src/ini_parms.F |
273 |
INI_PARMS |
gravitySign = UNSET_RL |
|
./model/src/ini_parms.F |
630 |
INI_PARMS |
IF ( gravitySign .NE. UNSET_RL ) THEN |
|
./model/src/convective_adjustment.F |
95 |
CONVECTIVE_ADJUSTMENT |
IF ( rkSign*gravitySign .GT. 0. ) THEN |
|
./model/src/convective_weights.F |
61 |
CONVECTIVE_WEIGHTS |
& .AND. (rhokm1(i,j)-rhok(i,j))*rkSign*gravitySign .GT. 0. |
|
./model/src/convective_adjustment_ini.F |
100 |
CONVECTIVE_ADJUSTMENT_INI |
IF ( rkSign*gravitySign .GT. 0. ) THEN |
|
./pkg/mom_common/mom_v_metric_nh.F |
60 |
MOM_V_METRIC_NH |
& )*recip_horiVertRatio*gravitySign |
|
./pkg/mom_common/mom_v_coriolis_nh.F |
61 |
MOM_V_CORIOLIS_NH |
& *gravitySign*recip_horiVertRatio |
|
./pkg/mom_common/mom_w_metric_nh.F |
54 |
MOM_W_METRIC_NH |
& -gravitySign*recip_rSphere*( |
|
./pkg/mom_common/mom_u_coriolis_nh.F |
61 |
MOM_U_CORIOLIS_NH |
& *gravitySign*recip_horiVertRatio |
|
./pkg/mom_common/mom_quasihydrostatic.F |
54 |
MOM_QUASIHYDROSTATIC |
scalingFactor=rhoConst*gravitySign*recip_gravity |
|
./pkg/mom_common/mom_w_coriolis_nh.F |
56 |
MOM_W_CORIOLIS_NH |
& -gravitySign*fCoriCos(i,j,bi,bj)* |
|
./pkg/mom_common/mom_u_metric_nh.F |
60 |
MOM_U_METRIC_NH |
& )*recip_horiVertRatio*gravitySign |
|
./model/inc/GRID.h |
381 |
NO PROCEDURE |
& gravitySign, rkSign, globalArea, |
|
./model/inc/GRID.h |
403 |
NO PROCEDURE |
_RL gravitySign |