Symbol Description Uses
atm_Po standard reference pressure 76


File Line number Procedure Code
./model/inc/PARAMS.h 943 NO PROCEDURE 
     &            atm_Cp, atm_Rd, atm_kappa, atm_Rq, atm_Po,
./model/inc/PARAMS.h 946 NO PROCEDURE 
      _RL atm_Po, atm_Cp, atm_Rd, atm_kappa, atm_Rq
./model/src/apply_forcing.F 531 APPLY_FORCING_T 
          tmpFac = (atm_Po/rC(k))**atm_kappa
./model/src/apply_forcing.F 558 APPLY_FORCING_T 
        tmpFac = (atm_Po/rC(k))**atm_kappa
./model/src/apply_forcing.F 571 APPLY_FORCING_T 
          delPI = atm_Cp*( (rC(km)/atm_Po)**atm_kappa
./model/src/apply_forcing.F 572 APPLY_FORCING_T 
     &                   - (rC(kc)/atm_Po)**atm_kappa )
./model/src/apply_forcing.F 583 APPLY_FORCING_T 
          delPI = atm_Cp*( (rC(kc)/atm_Po)**atm_kappa
./model/src/apply_forcing.F 584 APPLY_FORCING_T 
     &                   - (rC(kp)/atm_Po)**atm_kappa )
./model/src/calc_grad_phi_hyd.F 215 CALC_GRAD_PHI_HYD 
        factorP = (rC(k)/atm_Po)**atm_kappa
./model/src/calc_grad_phi_hyd.F 221 CALC_GRAD_PHI_HYD 
        factorP = halfRL*atm_Cp*(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 478 CALC_PHI_HYD 
     &           )/atm_Po )**atm_kappa
./model/src/calc_phi_hyd.F 482 CALC_PHI_HYD 
     &           )/atm_Po )**atm_kappa
./model/src/calc_phi_hyd.F 486 CALC_PHI_HYD 
     &           )/atm_Po )**atm_kappa
./model/src/calc_phi_hyd.F 507 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 508 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 510 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rC(k-1)/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 511 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )*halfRL
./model/src/calc_phi_hyd.F 514 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 515 CALC_PHI_HYD 
     &                   -((rF(k+1)/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 517 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 518 CALC_PHI_HYD 
     &                   -((rC(k+1)/atm_Po)**atm_kappa) )*halfRL
./model/src/calc_phi_hyd.F 540 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 541 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 542 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 543 CALC_PHI_HYD 
     &                   -((rF(k+1)/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 573 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 574 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 576 CALC_PHI_HYD 
           ddPIm=atm_Cp*( ((rC(k-1)/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 577 CALC_PHI_HYD 
     &                   -((rC( k )/atm_Po)**atm_kappa) )*halfRL
./model/src/calc_phi_hyd.F 580 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 581 CALC_PHI_HYD 
     &                   -((rF(k+1)/atm_Po)**atm_kappa) )
./model/src/calc_phi_hyd.F 583 CALC_PHI_HYD 
           ddPIp=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/calc_phi_hyd.F 584 CALC_PHI_HYD 
     &                   -((rC(k+1)/atm_Po)**atm_kappa) )*halfRL
./model/src/config_summary.F 277 CONFIG_SUMMARY 
       CALL WRITE_0D_RL( atm_Po, INDEX_NONE, 'atm_Po =  ',
./model/src/external_forcing.F 418 EXTERNAL_FORCING_T 
          tmpFac = (atm_Po/rC(kLev))**atm_kappa
./model/src/external_forcing.F 445 EXTERNAL_FORCING_T 
        tmpFac = (atm_Po/rC(kLev))**atm_kappa
./model/src/external_forcing.F 458 EXTERNAL_FORCING_T 
          delPI = atm_Cp*( (rC(km)/atm_Po)**atm_kappa
./model/src/external_forcing.F 459 EXTERNAL_FORCING_T 
     &                   - (rC(kc)/atm_Po)**atm_kappa )
./model/src/external_forcing.F 470 EXTERNAL_FORCING_T 
          delPI = atm_Cp*( (rC(kc)/atm_Po)**atm_kappa
./model/src/external_forcing.F 471 EXTERNAL_FORCING_T 
     &                   - (rC(kp)/atm_Po)**atm_kappa )
./model/src/ini_linear_phisurf.F 155 INI_LINEAR_PHISURF 
              dPIdp = (atm_Rd/atm_Po)*
./model/src/ini_linear_phisurf.F 156 INI_LINEAR_PHISURF 
     &         (Ro_surf(i,j,bi,bj)/atm_Po)**(atm_kappa-1. _d 0)
./model/src/ini_linear_phisurf.F 171 INI_LINEAR_PHISURF 
              dPIdp = (atm_Rd/atm_Po)*
./model/src/ini_linear_phisurf.F 172 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 190 INI_PARMS 
     & HeatCapacity_Cp, celsius2K, atm_Cp, atm_Rd, atm_Rq, atm_Po,
./verification/rotating_tank/code/apply_forcing.F 548 APPLY_FORCING_T 
          tmpFac = (atm_Po/rC(k))**atm_kappa
./verification/rotating_tank/code/apply_forcing.F 575 APPLY_FORCING_T 
        tmpFac = (atm_Po/rC(k))**atm_kappa
./verification/rotating_tank/code/apply_forcing.F 588 APPLY_FORCING_T 
          delPI = atm_Cp*( (rC(km)/atm_Po)**atm_kappa
./verification/rotating_tank/code/apply_forcing.F 589 APPLY_FORCING_T 
     &                   - (rC(kc)/atm_Po)**atm_kappa )
./verification/rotating_tank/code/apply_forcing.F 600 APPLY_FORCING_T 
          delPI = atm_Cp*( (rC(kc)/atm_Po)**atm_kappa
./verification/rotating_tank/code/apply_forcing.F 601 APPLY_FORCING_T 
     &                   - (rC(kp)/atm_Po)**atm_kappa )
./model/src/set_defaults.F 264 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 234 SET_REF_STATE 
          ddPI=atm_Cp*( ((rHalf( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 235 SET_REF_STATE 
     &                 -((rHalf(k+1)/atm_Po)**atm_kappa) )
./model/src/set_ref_state.F 243 SET_REF_STATE 
          ddPI=atm_Cp*( ((rF(k)/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 244 SET_REF_STATE 
     &                 -((rC(k)/atm_Po)**atm_kappa) )
./model/src/set_ref_state.F 247 SET_REF_STATE 
          ddPI=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 248 SET_REF_STATE 
     &                 -((rC(k+1)/atm_Po)**atm_kappa) )
./model/src/set_ref_state.F 254 SET_REF_STATE 
          ddPI=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 255 SET_REF_STATE 
     &                 -((rF(k+1)/atm_Po)**atm_kappa) )
./pkg/aim_v23/aim_aim2dyn.F 106 AIM_AIM2DYN 
       conv_T2theta = (atm_Po/rC(k))**atm_kappa
./pkg/aim_v23/aim_dyn2aim.F 163 AIM_DYN2AIM 
       conv_theta2T = (rC(k)/atm_Po)**atm_kappa
./pkg/aim_v23/aim_dyn2aim.F 99 AIM_DYN2AIM 
         PSA(I2) = Ro_surf(i,j,bi,bj)/atm_Po
./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