File |
Line number |
Procedure |
Code |
./pkg/aim/aim_read_physparms.F |
121 |
AIM_READ_PHYSPARMS |
& ABSSW, ABSLW, ABWSW, ABWLW, ABCSW, ABCLW, |
./pkg/aim/aim_read_physparms.F |
219 |
AIM_READ_PHYSPARMS |
CALL WRITE_0D_R8( ABSLW, INDEX_NONE,'AIM_RAD: ABSLW =', |
./pkg/aim/com_radcon.h |
19 |
NO PROCEDURE |
COMMON /RADCON/ ABSSW, ABSLW, ABWSW, ABWLW, |
./pkg/aim/com_radcon.h |
22 |
NO PROCEDURE |
_RL ABSSW, ABSLW, ABWSW, ABWLW |
./pkg/aim/phy_radiat.F |
299 |
RADSW |
TAU(J,1)=EXP(-ABSLW*PSA(J)*DSIG(1)) |
./pkg/aim/phy_radiat.F |
305 |
RADSW |
TAU(J,K)=EXP(-(ABSLW+ABWLW*QA(J,K) |
./pkg/aim/phy_radiat.F |
360 |
RADSW |
& EXP(-(ABSLW+ABWLW*QA(J,NLEVxy(J,myThid)))*PSA(J) |
./pkg/aim/phy_inphys.F |
137 |
INPHYS |
ABSLW = 1.40 _d 0 |