Symbol Description Uses
rStarFacC = dr/dr* = ratio of r-thickness / r*-thickness = h^n / H 35



File Line number Procedure Code
./model/inc/SURFACE.h 79 NO PROCEDURE
     &     rStarFacC, rStarFacW, rStarFacS,
./model/inc/SURFACE.h 82 NO PROCEDURE
      _RL  rStarFacC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/calc_grad_phi_hyd.F 105 CALC_GRAD_PHI_HYD
     &                  *(rStarFacC(i,j,bi,bj)**atm_kappa - factPI)
./model/src/calc_grad_phi_hyd.F 195 CALC_GRAD_PHI_HYD
     &             *(rStarFacC(i,j,bi,bj)-rStarFacC(i-1,j,bi,bj))
./model/src/calc_grad_phi_hyd.F 203 CALC_GRAD_PHI_HYD
     &             *(rStarFacC(i,j,bi,bj)-rStarFacC(i,j-1,bi,bj))
./model/src/calc_grad_phi_hyd.F 215 CALC_GRAD_PHI_HYD
     &             *(rStarFacC(i,j,bi,bj)-rStarFacC(i-1,j,bi,bj))
./model/src/calc_grad_phi_hyd.F 223 CALC_GRAD_PHI_HYD
     &             *(rStarFacC(i,j,bi,bj)-rStarFacC(i,j-1,bi,bj))
./model/src/calc_grad_phi_hyd.F 78 CALC_GRAD_PHI_HYD
          varLoc(i,j) = phiHydC(i,j)*rStarFacC(i,j,bi,bj)**atm_kappa
./model/src/calc_grad_phi_hyd.F 85 CALC_GRAD_PHI_HYD
          varLoc(i,j) = phiHydC(i,j)*rStarFacC(i,j,bi,bj)
./model/src/calc_r_star.F 131 CALC_R_STAR
          IF ( rStarFacC(i,j,bi,bj).LT.hFacInf ) THEN
./model/src/calc_r_star.F 146 CALC_R_STAR
          IF ( rStarFacC(i,j,bi,bj).GT.hFacSup ) THEN
./model/src/calc_r_star.F 185 CALC_R_STAR
     &     rStarFacC(iic,jjc,bi,bj),
./model/src/calc_r_star.F 201 CALC_R_STAR
     &    rStarFacC(iic2,jjc2,bi,bj),
./model/src/calc_r_star.F 210 CALC_R_STAR
       _EXCH_XY_RL( rStarFacC, myThid )
./model/src/calc_r_star.F 229 CALC_R_STAR
          IF (kSurfC(1-i,1-j,bi,bj).GT.Nr) rStarFacC(1-i,1-j,bi,bj)= 1.
./model/src/calc_r_star.F 230 CALC_R_STAR
          IF (kSurfC(ii, 1-j,bi,bj).GT.Nr) rStarFacC(ii, 1-j,bi,bj)= 1.
./model/src/calc_r_star.F 231 CALC_R_STAR
          IF (kSurfC(1-i,jj, bi,bj).GT.Nr) rStarFacC(1-i,jj, bi,bj)= 1.
./model/src/calc_r_star.F 232 CALC_R_STAR
          IF (kSurfC(ii, jj, bi,bj).GT.Nr) rStarFacC(ii, jj, bi,bj)= 1.
./model/src/calc_r_star.F 251 CALC_R_STAR
           rStarDhCDt(i,j,bi,bj)=(rStarFacC(i,j,bi,bj)
./model/src/calc_r_star.F 257 CALC_R_STAR
           rStarExpC(i,j,bi,bj) = rStarFacC(i,j,bi,bj)
./model/src/calc_r_star.F 76 CALC_R_STAR
            rStarExpC(i,j,bi,bj) = rStarFacC(i,j,bi,bj)
./model/src/calc_r_star.F 86 CALC_R_STAR
           rStarFacC(i,j,bi,bj) =
./model/src/calc_r_star.F 90 CALC_R_STAR
           rStarFacC(i,j,bi,bj) = 1.
./pkg/ocn_compon_interf/ocn_store_my_data.F 72 OCN_STORE_MY_DATA
     &          h0FacC(i,j,1,bi,bj)*rStarFacC(i,j,bi,bj)*drF(1)
./model/src/diags_phi_rlow.F 140 DIAGS_PHI_RLOW
     &                          *rStarFacC(i,j,bi,bj)
./pkg/thsice/thsice_main.F 117 THSICE_MAIN
     &                                  *rStarFacC(i,j,bi,bj)
./model/src/ini_nlfs_vars.F 69 INI_NLFS_VARS
            rStarFacC(i,j,bi,bj) = 1.
./model/src/update_r_star.F 80 UPDATE_R_STAR
     U                    rStarFacC, rStarFacW, rStarFacS,
./model/src/update_r_star.F 91 UPDATE_R_STAR
     &                          *rStarFacC(i,j,bi,bj)
./pkg/aim_v23/aim_dyn2aim.F 112 AIM_DYN2AIM
           dpFac(I2,Katm) = h0FacC(i,j,k,bi,bj)*rStarFacC(i,j,bi,bj)
./pkg/atm2d/get_ocnvars.F 85 GET_OCNVARS
     &          h0FacC(i,j,1,1,1)*rStarFacC(i,j,1,1)*drF(1)