Symbol Description Uses
rHalf 14



File Line number Procedure Code
./model/src/ini_p_ground.F 105 INI_P_GROUND
          ddPI=atm_Cp*( ((rHalf( K )/atm_Po)**atm_kappa)
./model/src/ini_p_ground.F 106 INI_P_GROUND
     &                 -((rHalf(K+1)/atm_Po)**atm_kappa) ) 
./model/src/ini_p_ground.F 145 INI_P_GROUND
     &    '  K=',K*0.5,'  ;  r=',rHalf(K),'  ;  phiRef/g=', phiRef(K)
./model/src/ini_p_ground.F 162 INI_P_GROUND
           Po_surf = rHalf(Ks) + (rHalf(Ks+1)-rHalf(Ks))*
./model/src/ini_p_ground.F 328 INI_P_GROUND
     &        *(Pfld(i,j,bi,bj)-rC(ks))/(rHalf(2*ks-1)-rHalf(2*ks))
./model/src/ini_p_ground.F 332 INI_P_GROUND
     &        *(Pfld(i,j,bi,bj)-rC(ks))/(rHalf(2*ks+1)-rHalf(2*ks))
./model/src/ini_p_ground.F 64 INI_P_GROUND
      _RL phiRef(2*Nr+1), rHalf(2*Nr+1)
./model/src/ini_p_ground.F 89 INI_P_GROUND
        rHalf(2*K-1) = rF(K)
./model/src/ini_p_ground.F 90 INI_P_GROUND
        rHalf(2*K)   = rC(K)
./model/src/ini_p_ground.F 92 INI_P_GROUND
       rHalf(2*Nr+1) = rF(Nr+1)