Symbol Description Uses
ddPI 15



File Line number Procedure Code
./pkg/monitor/mon_surfcor.F 127 MON_SURFCOR
            ddPI=atm_cp*( (rC(K-1)/atm_po)**atm_kappa
./pkg/monitor/mon_surfcor.F 132 MON_SURFCOR
     &         - ddPI*rA(i,j,bi,bj)*wVel(i,j,k,bi,bj)
./pkg/monitor/mon_surfcor.F 57 MON_SURFCOR
      _RL tmpVal, ddPI
./model/src/set_ref_state.F 256 SET_REF_STATE
          ddPI=atm_Cp*( ((rC(k-1)/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 259 SET_REF_STATE
     &               * ddPI*recip_drC(k)
./model/src/set_ref_state.F 303 SET_REF_STATE
          ddPI=atm_Cp*( ((rHalf( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 305 SET_REF_STATE
          phiRef(k+1) = phiRef(k)+ddPI*tLoc(ks)
./model/src/set_ref_state.F 312 SET_REF_STATE
          ddPI=atm_Cp*( ((rF(k)/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 314 SET_REF_STATE
          phiRef(2*k)   = phiRef(1) + ddPI*tLoc(k)
./model/src/set_ref_state.F 316 SET_REF_STATE
          ddPI=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 318 SET_REF_STATE
          phiRef(2*k+1) = phiRef(2*k) + ddPI*0.5*tLoc(k)
./model/src/set_ref_state.F 320 SET_REF_STATE
     &                  + ddPI*0.5*(tLoc(k)+tLoc(k+1))
./model/src/set_ref_state.F 323 SET_REF_STATE
          ddPI=atm_Cp*( ((rC( k )/atm_Po)**atm_kappa)
./model/src/set_ref_state.F 325 SET_REF_STATE
          phiRef(2*k+1) = phiRef(2*k) + ddPI*tLoc(k)
./model/src/set_ref_state.F 45 SET_REF_STATE
      _RL ddPI, conv_theta2T, thetaLoc