| File |
Line number |
Procedure |
Code |
|
./pkg/sphere/sphere.F |
403 |
SHC4ZONE |
REAL DEG2RAD, CE, CO, SE, SO |
|
./pkg/sphere/sphere.F |
440 |
SHC4ZONE |
SE = HS(J)+HN(JP) |
|
./pkg/sphere/sphere.F |
448 |
SHC4ZONE |
SHC(K-M) = SHC(K-M) + P(I1) * SE |
|
./pkg/sphere/sphere.F |
458 |
SHC4ZONE |
SHC(K-M) = SHC(K-M) + P(I) * SE |
|
./pkg/aim_v23/phy_convmf.F |
124 |
CONVMF |
dSEdp(J,K)=(SE(J,K+1)-SE(J,K))*factP |
|
./pkg/aim_v23/phy_convmf.F |
50 |
CONVMF |
_RL PSA(NGP), SE(NGP,NLEV), QA(NGP,NLEV), QSAT(NGP,NLEV) |
|
./pkg/aim_v23/phy_convmf.F |
6 |
CONVMF |
SUBROUTINE CONVMF (PSA,dpFac,SE,QA,QSAT, |
|
./pkg/aim_v23/phy_driver.F |
142 |
PHY_DRIVER |
O TG1, QG1, SE, VsurfSq, PSG, dpFac, kGround, |
|
./pkg/aim_v23/phy_driver.F |
179 |
PHY_DRIVER |
CALL CONVMF (PSG,dpFac,SE,QG1,QSAT, |
|
./pkg/aim_v23/phy_driver.F |
203 |
PHY_DRIVER |
I PSG, dpFac, SE, ICLTOP, |
|
./pkg/aim_v23/phy_driver.F |
292 |
PHY_DRIVER |
I PSG, TG1, QG1, RH(1,1,myThid), SE, VsurfSq, |
|
./pkg/aim_v23/phy_driver.F |
439 |
PHY_DRIVER |
CALL VDIFSC (dpFac, SE, RH(1,1,myThid), QG1, QSAT, |
|
./pkg/aim_v23/phy_driver.F |
97 |
PHY_DRIVER |
_RL SE (NGP,NLEV) |
|
./pkg/aim_v23/phy_vdifsc.F |
122 |
VDIFSC |
dSEdp(J,K)=(SE(J,K+1)-SE(J,K))*factP |
|
./pkg/aim_v23/phy_vdifsc.F |
194 |
VDIFSC |
& +SEGRAD*CP*DeltaPI(K)*(SE(J,K+1)+SE(J,K))*0.5 _d 0 |
|
./pkg/aim_v23/phy_vdifsc.F |
56 |
VDIFSC |
_RL SE(NGP,NLEV), RH(NGP,NLEV), QA(NGP,NLEV), QSAT(NGP,NLEV) |
|
./pkg/aim_v23/phy_vdifsc.F |
6 |
VDIFSC |
SUBROUTINE VDIFSC (dpFac,SE,RH,QA,QSAT, |