| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/phy_radiat.F |
183 |
RADSW |
_RL ABS1, DELTAP |
|
./pkg/aim_v23/phy_radiat.F |
259 |
RADSW |
DELTAP=ZENIT(J)*DSIG(1)*dpFac(J,1) |
|
./pkg/aim_v23/phy_radiat.F |
260 |
RADSW |
TAU2(J,1,1)=EXP(-DELTAP*ABSDRY) |
|
./pkg/aim_v23/phy_radiat.F |
268 |
RADSW |
DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K) |
|
./pkg/aim_v23/phy_radiat.F |
270 |
RADSW |
TAU2(J,K,1)=EXP(-DELTAP* |
|
./pkg/aim_v23/phy_radiat.F |
273 |
RADSW |
TAU2(J,K,1)=EXP(-DELTAP* |
|
./pkg/aim_v23/phy_radiat.F |
276 |
RADSW |
TAU2(J,K,1)=EXP(-DELTAP*(ABS1+ABSWV1*QA(J,K))) |
|
./pkg/aim_v23/phy_radiat.F |
286 |
RADSW |
DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K) |
|
./pkg/aim_v23/phy_radiat.F |
287 |
RADSW |
TAU2(J,K,1)=EXP(-DELTAP*(ABS1+ABSWV1*QA(J,K))) |
|
./pkg/aim_v23/phy_radiat.F |
292 |
RADSW |
DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K) |
|
./pkg/aim_v23/phy_radiat.F |
293 |
RADSW |
TAU2(J,K,2)=EXP(-DELTAP*ABSWV2*QA(J,K)) |
|
./pkg/aim_v23/phy_radiat.F |
385 |
RADSW |
DELTAP=DSIG(1)*dpFac(J,1) |
|
./pkg/aim_v23/phy_radiat.F |
386 |
RADSW |
TAU2(J,1,1)=EXP(-DELTAP*ABLWIN) |
|
./pkg/aim_v23/phy_radiat.F |
387 |
RADSW |
TAU2(J,1,2)=EXP(-DELTAP*ABLCO2) |
|
./pkg/aim_v23/phy_radiat.F |
395 |
RADSW |
DELTAP=DSIG(K)*dpFac(J,K) |
|
./pkg/aim_v23/phy_radiat.F |
397 |
RADSW |
TAU2(J,K,1)=EXP(-DELTAP*(ABLWIN+ACLOUD(J))) |
|
./pkg/aim_v23/phy_radiat.F |
399 |
RADSW |
TAU2(J,K,1)=EXP(-DELTAP*ABLWIN) |
|
./pkg/aim_v23/phy_radiat.F |
401 |
RADSW |
TAU2(J,K,2)=EXP(-DELTAP*ABLCO2) |
|
./pkg/aim_v23/phy_radiat.F |
402 |
RADSW |
TAU2(J,K,3)=EXP(-DELTAP*ABLWV1*QA(J,K)) |
|
./pkg/aim_v23/phy_radiat.F |
403 |
RADSW |
TAU2(J,K,4)=EXP(-DELTAP*ABLWV2*QA(J,K)) |