| File |
Line number |
Procedure |
Code |
|
./pkg/aim/phy_shtorh.F |
28 |
SHTORH |
INTEGER IMODE, NGP |
|
./pkg/aim/phy_shtorh.F |
6 |
SHTORH |
SUBROUTINE SHTORH (IMODE,NGP,TA,PS,SIG,QA,RH,QSAT,myThid) |
|
./pkg/aim/phy_shtorh.F |
77 |
SHTORH |
IF (IMODE.GT.0) THEN |
|
./pkg/aim/phy_shtorh.F |
85 |
SHTORH |
ELSE IF (IMODE.LT.0) THEN |
|
./pkg/aim/phy_radiat.F |
372 |
RADLW |
SUBROUTINE RADLW (IMODE,TA,TS,ST4S, |
|
./pkg/aim/phy_radiat.F |
413 |
RADLW |
INTEGER IMODE |
|
./pkg/aim/phy_radiat.F |
529 |
RADLW |
IF (IMODE.LE.1) THEN |
|
./pkg/aim_v23/phy_shtorh.F |
102 |
SHTORH |
IF (IMODE.GT.0) THEN |
|
./pkg/aim_v23/phy_shtorh.F |
110 |
SHTORH |
ELSE IF (IMODE.LT.0) THEN |
|
./pkg/aim_v23/phy_shtorh.F |
29 |
SHTORH |
INTEGER IMODE, NGP |
|
./pkg/aim_v23/phy_shtorh.F |
60 |
SHTORH |
IF (IMODE.EQ.2) THEN |
|
./pkg/aim_v23/phy_shtorh.F |
6 |
SHTORH |
SUBROUTINE SHTORH (IMODE,NGP,TA,PS,SIG,QA,RH,QSAT,myThid) |
|
./pkg/aim_v23/phy_radiat.F |
414 |
RADLW |
SUBROUTINE RADLW (IMODE,TA,TS,ST4S, |
|
./pkg/aim_v23/phy_radiat.F |
463 |
RADLW |
INTEGER IMODE |
|
./pkg/aim_v23/phy_radiat.F |
489 |
RADLW |
IF (IMODE.EQ.1) GO TO 410 |
|
./pkg/aim_v23/phy_radiat.F |
575 |
RADLW |
IF (IMODE.EQ.-1) RETURN |