Symbol Description Uses
recip_Rcol Inverse of cell center column thickness (1/r_unit) 50



File Line number Procedure Code
./model/inc/GRID.h 420 NO PROCEDURE
     &  recip_Rcol,
./model/inc/GRID.h 457 NO PROCEDURE
      _RS recip_Rcol     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/calc_grad_phi_hyd.F 171 CALC_GRAD_PHI_HYD
     &                *(1. _d 0 + rC(k)*recip_Rcol(i,j,bi,bj))
./model/src/calc_r_star.F 108 CALC_R_STAR
     &      *recip_Rcol(i,j,bi,bj)
./model/src/cg3d.F 194 CG3D
     &              *recip_Rcol(i,j,bi,bj)*recip_Rcol(i,j,bi,bj)
./model/src/cg3d.F 376 CG3D
     &              *recip_Rcol(i,j,bi,bj)*recip_Rcol(i,j,bi,bj)
./model/src/cg3d_ex0.F 187 CG3D_EX0
     &              *recip_Rcol(i,j,bi,bj)*recip_Rcol(i,j,bi,bj)
./model/src/cg3d_ex0.F 360 CG3D_EX0
     &              *recip_Rcol(i,j,bi,bj)*recip_Rcol(i,j,bi,bj)
./model/src/ini_masks_etc.F 237 INI_MASKS_ETC
           recip_Rcol(i,j,bi,bj) = 0.
./model/src/ini_masks_etc.F 239 INI_MASKS_ETC
           recip_Rcol(i,j,bi,bj) = 1. _d 0 / tmpVar1(i,j)
./model/src/ini_nh_fields.F 116 INI_NH_FIELDS
     &                           *recip_Rcol(i,j,bi,bj)
./model/src/ini_sigma_hfac.F 89 INI_SIGMA_HFAC
             recip_Rcol(i,j,bi,bj) = 1. _d 0 / tmpFld(i,j)
./model/src/ini_sigma_hfac.F 94 INI_SIGMA_HFAC
             recip_Rcol(i,j,bi,bj) = 0. _d 0
./model/src/integr_continuity.F 244 INTEGR_CONTINUITY
     &                     *recip_Rcol(i,j,bi,bj)
./verification/hs94.128x64x5/code/external_forcing.F 127 EXTERNAL_FORCING_V
         recip_P0g=MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.128x64x5/code/external_forcing.F 203 EXTERNAL_FORCING_T
     &       (termP*recip_Rcol(i,j,bi,bj)-sigma_b)/(1. _d 0-sigma_b) )
./verification/hs94.128x64x5/code/external_forcing.F 59 EXTERNAL_FORCING_U
         recip_P0g=MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.1x64x5/code/apply_forcing.F 168 APPLY_FORCING_V
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.1x64x5/code/apply_forcing.F 268 APPLY_FORCING_T
     &                    *recip_Rcol(i,j,bi,bj)
./verification/hs94.1x64x5/code/apply_forcing.F 75 APPLY_FORCING_U
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.1x64x5/code_ad/apply_forcing.F 168 APPLY_FORCING_V
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.1x64x5/code_ad/apply_forcing.F 268 APPLY_FORCING_T
     &                    *recip_Rcol(i,j,bi,bj)
./verification/hs94.1x64x5/code_ad/apply_forcing.F 75 APPLY_FORCING_U
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.1x64x5/code_oad/apply_forcing.F 168 APPLY_FORCING_V
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.1x64x5/code_oad/apply_forcing.F 268 APPLY_FORCING_T
     &                    *recip_Rcol(i,j,bi,bj)
./verification/hs94.1x64x5/code_oad/apply_forcing.F 75 APPLY_FORCING_U
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.cs-32x32x5/code/apply_forcing.F 168 APPLY_FORCING_V
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.cs-32x32x5/code/apply_forcing.F 268 APPLY_FORCING_T
     &                    *recip_Rcol(i,j,bi,bj)
./verification/hs94.cs-32x32x5/code/apply_forcing.F 75 APPLY_FORCING_U
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 168 APPLY_FORCING_V
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 268 APPLY_FORCING_T
     &                    *recip_Rcol(i,j,bi,bj)
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 75 APPLY_FORCING_U
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./model/src/update_masks_etc.F 192 UPDATE_MASKS_ETC
           recip_Rcol(i,j,bi,bj) = 0.
./model/src/update_masks_etc.F 194 UPDATE_MASKS_ETC
           recip_Rcol(i,j,bi,bj) = 1. _d 0 / tmpfld(i,j,bi,bj)