| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_u_metric_nh.F |
47 |
MOM_U_METRIC_NH |
_RL wVelBottomOverride |
|
./pkg/mom_common/mom_u_metric_nh.F |
51 |
MOM_U_METRIC_NH |
wVelBottomOverride=1. |
|
./pkg/mom_common/mom_u_metric_nh.F |
52 |
MOM_U_METRIC_NH |
IF (k.EQ.Nr) wVelBottomOverride=0. |
|
./pkg/mom_common/mom_u_metric_nh.F |
58 |
MOM_U_METRIC_NH |
& *rVel2wUnit(kp1)*wVelBottomOverride |
|
./pkg/mom_common/mom_v_metric_nh.F |
47 |
MOM_V_METRIC_NH |
_RL wVelBottomOverride |
|
./pkg/mom_common/mom_v_metric_nh.F |
51 |
MOM_V_METRIC_NH |
wVelBottomOverride=1. |
|
./pkg/mom_common/mom_v_metric_nh.F |
52 |
MOM_V_METRIC_NH |
IF (k.EQ.Nr) wVelBottomOverride=0. |
|
./pkg/mom_common/mom_v_metric_nh.F |
58 |
MOM_V_METRIC_NH |
& *rVel2wUnit(kp1)*wVelBottomOverride |