Symbol Description Uses
gravitySign indicates the direction of gravity relative to R direction 23



File Line number Procedure Code
./pkg/mom_common/mom_quasihydrostatic.F 57 MOM_QUASIHYDROSTATIC
      scalingFactor=rhoConst*gravitySign*recip_gravity
./pkg/mom_common/mom_u_coriolis_nh.F 63 MOM_U_CORIOLIS_NH
     &        )*gravitySign
./pkg/mom_common/mom_u_metric_nh.F 61 MOM_U_METRIC_NH
     &          )*gravitySign
./pkg/mom_common/mom_v_coriolis_nh.F 63 MOM_V_CORIOLIS_NH
     &        )*gravitySign
./pkg/mom_common/mom_v_metric_nh.F 61 MOM_V_METRIC_NH
     &          )*gravitySign
./pkg/mom_common/mom_w_coriolis_nh.F 56 MOM_W_CORIOLIS_NH
     &      -gravitySign*fCoriCos(i,j,bi,bj)*
./pkg/mom_common/mom_w_metric_nh.F 53 MOM_W_METRIC_NH
           wMetricTerms(i,j) = -gravitySign*wUnit2rVel(k)
./model/src/calc_ivdc.F 52 CALC_IVDC
     &        (rhokm1(i,j)-rhokp1(i,j))*rkSign*gravitySign.GT.0. ) THEN
./model/src/config_summary.F 619 CONFIG_SUMMARY
      CALL WRITE_0D_RL( gravitySign, INDEX_NONE,'gravitySign =',
./model/src/convective_adjustment.F 107 CONVECTIVE_ADJUSTMENT
         IF ( rkSign*gravitySign .GT. 0. ) THEN
./model/src/convective_adjustment_ini.F 107 CONVECTIVE_ADJUSTMENT_INI
         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/ini_parms.F 140 INI_PARMS
      _RL zonal_filt_lat, gravitySign
./model/src/ini_parms.F 155 INI_PARMS
     & gravitySign, nh_Am2,
./model/src/ini_parms.F 294 INI_PARMS
      gravitySign     = UNSET_RL
./model/src/ini_parms.F 655 INI_PARMS
      IF ( gravitySign .NE. UNSET_RL ) THEN
./model/src/ini_vertical_grid.F 57 INI_VERTICAL_GRID
      gravitySign  = -1. _d 0
./model/src/ini_vertical_grid.F 59 INI_VERTICAL_GRID
         gravitySign = 1. _d 0
./model/src/set_ref_state.F 260 SET_REF_STATE
          phiRef(2*k)   = gravitySign*gravity*(rC(k) - Ro_SeaLevel)
./model/src/set_ref_state.F 261 SET_REF_STATE
          phiRef(2*k+1) = gravitySign*gravity*(rF(k+1)-Ro_SeaLevel)
./pkg/down_slope/dwnslp_init_fixed.F 73 DWNSLP_INIT_FIXED
        IF ( gravitySign.GT.0. ) THEN
./model/inc/GRID.h 317 NO PROCEDURE
     &  gravitySign, rkSign, globalArea
./model/inc/GRID.h 330 NO PROCEDURE
      _RL gravitySign