Symbol Description Uses
atm_Po standard reference pressure 51


File Line number Procedure Code
./model/inc/PARAMS.h 909 NO PROCEDURE 
     &            atm_Cp, atm_Rd, atm_kappa, atm_Rq, atm_Po,
./model/inc/PARAMS.h 912 NO PROCEDURE 
      _RL atm_Po, atm_Cp, atm_Rd, atm_kappa, atm_Rq
./model/src/calc_grad_phi_hyd.F 210 CALC_GRAD_PHI_HYD 
        conv_theta2T = (rC(k)/atm_Po)**atm_kappa
./model/src/calc_grad_phi_hyd.F 98 CALC_GRAD_PHI_HYD 
           factPI=atm_Cp*( ((etaH(i,j,bi,bj)+rC(k))/atm_Po)**atm_kappa
./model/src/calc_grad_phi_hyd.F 99 CALC_GRAD_PHI_HYD 
     &                    -(                 rC(k) /atm_Po)**atm_kappa
./model/src/calc_phi_hyd.F 390 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 391 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 393 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rC(k-1)/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 394 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )*half
./model/src/calc_phi_hyd.F 397 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 398 CALC_PHI_HYD 
     &                   -((rF(k+1)/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 400 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 401 CALC_PHI_HYD 
     &                   -((rC(k+1)/atm_Po)**atm_kappa) )*half
./model/src/calc_phi_hyd.F 423 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 424 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 425 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 426 CALC_PHI_HYD 
     &                   -((rF(k+1)/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 456 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 457 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 459 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rC(k-1)/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 460 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )*half
./model/src/calc_phi_hyd.F 463 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 464 CALC_PHI_HYD 
     &                   -((rF(k+1)/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 466 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 467 CALC_PHI_HYD 
     &                   -((rC(k+1)/atm_Po)**atm_kappa) )*half
./model/src/config_summary.F 211 CONFIG_SUMMARY 
      CALL WRITE_0D_RL( atm_Po, INDEX_NONE, 'atm_Po =',
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F 141 INI_LINEAR_PHISURF 
              dPIdp = (atm_Cp*atm_kappa/atm_Po)*
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F 142 INI_LINEAR_PHISURF 
     &         (Ro_surf(I,J,bi,bj)/atm_Po)**(atm_kappa-1. _d 0)
./model/src/ini_linear_phisurf.F 202 INI_LINEAR_PHISURF 
              dPIdp = (atm_Cp*atm_kappa/atm_Po)*
./model/src/ini_linear_phisurf.F 203 INI_LINEAR_PHISURF 
     &         (Ro_surf(I,J,bi,bj)/atm_Po)**(atm_kappa-1. _d 0)
./model/src/ini_p_ground.F 133 INI_P_GROUND 
        pLevHvR(1)= Ro_SeaLevel/atm_Po
./model/src/ini_p_ground.F 215 INI_P_GROUND 
             Pfld(i,j,bi,bj) = psNorm*atm_Po
./model/src/ini_p_ground.F 328 INI_P_GROUND 
            psNorm = Po_surf/atm_Po
./model/src/ini_parms.F 172 INI_PARMS 
     & atm_Cp, atm_Rd, atm_Rq, atm_Po,
./model/src/set_defaults.F 230 SET_DEFAULTS 
      atm_Po =  1. _d 5
./model/src/set_ref_state.F 184 SET_REF_STATE 
          conv_theta2T = (rF(k)/atm_Po)**atm_kappa
./model/src/set_ref_state.F 187 SET_REF_STATE 
          ddPI=atm_Cp*( ((rC(k-1)/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 188 SET_REF_STATE 
     &                 -((rC( k )/atm_Po)**atm_kappa) )
./model/src/set_ref_state.F 207 SET_REF_STATE 
            conv_theta2T  = (rF(k)/atm_Po)**atm_kappa
./model/src/set_ref_state.F 223 SET_REF_STATE 
          ddPI=atm_Cp*( ((rHalf( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 224 SET_REF_STATE 
     &                 -((rHalf(k+1)/atm_Po)**atm_kappa) )
./model/src/set_ref_state.F 232 SET_REF_STATE 
          ddPI=atm_Cp*( ((rF(k)/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 233 SET_REF_STATE 
     &                 -((rC(k)/atm_Po)**atm_kappa) )
./model/src/set_ref_state.F 236 SET_REF_STATE 
          ddPI=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 237 SET_REF_STATE 
     &                 -((rC(k+1)/atm_Po)**atm_kappa) )
./model/src/set_ref_state.F 243 SET_REF_STATE 
          ddPI=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 244 SET_REF_STATE 
     &                 -((rF(k+1)/atm_Po)**atm_kappa) )
./pkg/aim_v23/aim_initialise.F 58 AIM_INITIALISE 
      pGround = atm_Po
./pkg/aim_v23/aim_initialise.F 90 AIM_INITIALISE 
          tmpPgrnd = MIN( tmpPgrnd, atm_Po )
./pkg/aim_v23/aim_initialise.F 98 AIM_INITIALISE 
           truncSurfP(i,j,bi,bj) = ( tmpVar/atm_Po )**atm_kappa
./pkg/aim_v23/phy_inphys.F 64 INPHYS 
      P0 = atm_Po