| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/com_radvar.h |
28 |
NO PROCEDURE |
_RL STRATC(NGP), FLUX(NGP,NBAND) |
|
./pkg/aim_v23/phy_driver.F |
250 |
PHY_DRIVER |
O TAU2, STRATC, |
|
./pkg/aim_v23/phy_driver.F |
280 |
PHY_DRIVER |
& OZUPP, STRATC, TAU2, FLUX, ST4A, |
|
./pkg/aim_v23/phy_driver.F |
378 |
PHY_DRIVER |
& OZUPP, STRATC, TAU2, FLUX, ST4A, |
|
./pkg/aim_v23/phy_driver.F |
397 |
PHY_DRIVER |
O TAU2, STRATC, |
|
./pkg/aim_v23/phy_driver.F |
412 |
PHY_DRIVER |
& OZUPP, STRATC, TAU2, FLUX, ST4A, |
|
./pkg/aim_v23/phy_driver.F |
419 |
PHY_DRIVER |
& OZUPP, STRATC, TAU2, FLUX, ST4A, |
|
./pkg/aim_v23/phy_radiat.F |
160 |
RADSW |
O TAU2, STRATC, |
|
./pkg/aim_v23/phy_radiat.F |
206 |
RADSW |
_RL TAU2(NGP,NLEV,NBAND),STRATC(NGP) |
|
./pkg/aim_v23/phy_radiat.F |
371 |
RADSW |
STRATC(J)=STRATZ(J)*PSA(J) |
|
./pkg/aim_v23/phy_radiat.F |
510 |
RADLW |
I OZUPP, STRATC, TAU2, |
|
./pkg/aim_v23/phy_radiat.F |
555 |
RADLW |
_RL OZUPP(NGP), STRATC(NGP) |
|
./pkg/aim_v23/phy_radiat.F |
610 |
RADLW |
FSFC(J) = STRATC(J) |
|
./pkg/aim_v23/phy_radiat.F |
611 |
RADLW |
DFABS(J,1)=-STRATC(J) |