Go to the source code of this file.
|
INTERFACE SUBROUTINE | RRTM_GASABS1A_140GP (KLEV, P_ATR1, P_OD, P_TF1, P_COLDRY, P_WX,&&P_TAUAERL, P_FAC00, P_FAC01, P_FAC10, P_FAC11, P_FORFAC, K_JP, K_JT, K_JT1, P_ONEMINUS,&&P_COLH2O, P_COLCO2, P_COLO3, P_COLN2O, P_COLCH4, P_COLO2, P_CO2MULT,&&K_LAYTROP, K_LAYSWTCH, K_LAYLOW, P_SELFFAC, P_SELFFRAC, K_INDSELF, PFRAC) USE PARKIND1 |
|
INTERFACE SUBROUTINE JPRB USE JPXSEC | INTEGER (KIND=JPIM) |
|
INTERFACE SUBROUTINE RRTM_GASABS1A_140GP |
( |
KLEV |
, |
|
|
P_ATR1 |
, |
|
|
P_OD |
, |
|
|
P_TF1 |
, |
|
|
P_COLDRY |
, |
|
|
P_WX |
, |
|
|
&& |
P_TAUAERL, |
|
|
P_FAC00 |
, |
|
|
P_FAC01 |
, |
|
|
P_FAC10 |
, |
|
|
P_FAC11 |
, |
|
|
P_FORFAC |
, |
|
|
K_JP |
, |
|
|
K_JT |
, |
|
|
K_JT1 |
, |
|
|
P_ONEMINUS |
, |
|
|
&& |
P_COLH2O, |
|
|
P_COLCO2 |
, |
|
|
P_COLO3 |
, |
|
|
P_COLN2O |
, |
|
|
P_COLCH4 |
, |
|
|
P_COLO2 |
, |
|
|
P_CO2MULT |
, |
|
|
&& |
K_LAYTROP, |
|
|
K_LAYSWTCH |
, |
|
|
K_LAYLOW |
, |
|
|
P_SELFFAC |
, |
|
|
P_SELFFRAC |
, |
|
|
K_INDSELF |
, |
|
|
PFRAC |
|
|
) |
| |
INTERFACE SUBROUTINE JPRB USE JPBAND |
INTERFACE SUBROUTINE JPRB USE JPGPT |
INTERFACE SUBROUTINE JPRB USE ONLY |
INTERFACE SUBROUTINE JPRB USE PARRRTM |