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 |