| 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 |
223 |
AIM_READ_PHYSPARMS |
CALL WRITE_0D_R8( ABWLW, INDEX_NONE,'AIM_RAD: ABWLW =', |
|
./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 |
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 |
140 |
INPHYS |
ABWLW = 0.55 _d 0 |