| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=r64), | private, | parameter | :: | RadiansToDeg | = | 180.d0/Pi | |
| real(kind=r64), | private, | parameter | :: | PAtmSeaLevel | = | 101325.d0 | |
| integer, | private, | parameter | :: | hipRHO | = | 1 | |
| integer, | private, | parameter | :: | hipTAU | = | 2 | |
| real(kind=r64), | private, | parameter | :: | SMALL_ERROR | = | 0.000001d0 | |
| integer, | private, | parameter | :: | gtySEALED | = | 1 | |
| integer, | private, | parameter | :: | gtyOPENin | = | 2 | |
| integer, | private, | parameter | :: | gtyOPENout | = | 3 | |
| integer, | private, | parameter | :: | lscNONE | = | 0 | |
| integer, | private, | parameter | :: | lscVBPROF | = | 1 | |
| integer, | private, | parameter | :: | lscVBNOBM | = | 2 | |
| integer, | private, | parameter | :: | hipRHO_BT0 | = | 1 | |
| integer, | private, | parameter | :: | hipTAU_BT0 | = | 2 | |
| integer, | private, | parameter | :: | hipTAU_BB0 | = | 3 | |
| integer, | private, | parameter | :: | hipDIM | = | 3 | |
| real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:,:,:) | :: | CFSDiffAbsTrans | |||
| logical, | private, | ALLOCATABLE, DIMENSION(:) | :: | EQLDiffPropFlag |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | P | |||
| character(len=*), | intent(in) | :: | WHAT |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | EXTERNAL | :: | F | |||
| integer, | intent(in) | :: | F_Opt | |||
| real(kind=r64), | intent(in) | :: | F_P(hipDIM) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | THETA | |||
| integer, | intent(in) | :: | OPT | |||
| real(kind=r64), | intent(in) | :: | P(hipDIM) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | THETA | |||
| integer, | intent(in) | :: | OPT | |||
| real(kind=r64), | intent(in) | :: | P(hipDIM) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | D | |||
| real(kind=r64), | intent(in) | :: | S |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | OPENNESS |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | THETA | |||
| integer, | intent(in) | :: | OPT | |||
| real(kind=r64), | intent(in) | :: | P(hipDIM) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | C |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(in) | :: | FS | |||
| real(kind=r64), | intent(in) | :: | TIN | |||
| real(kind=r64), | intent(in) | :: | TOUT | |||
| real(kind=r64), | intent(in) | :: | HCIN | |||
| real(kind=r64), | intent(in) | :: | HCOUT | |||
| real(kind=r64), | intent(in) | :: | TRMOUT | |||
| real(kind=r64), | intent(in) | :: | TRMIN | |||
| real(kind=r64), | intent(in) | :: | ISOL | |||
| real(kind=r64), | intent(in) | :: | SOURCE(FS%NL+1) | |||
| real(kind=r64), | intent(in) | :: | TOL | |||
| real(kind=r64), | intent(out) | :: | QOCF(FS%NL) | |||
| real(kind=r64), | intent(out) | :: | QOCFRoom | |||
| real(kind=r64), | intent(out) | :: | T(FS%NL) | |||
| real(kind=r64), | intent(out) | :: | Q(0:) | |||
| real(kind=r64), | intent(out) | :: | JF(FS%NL+1) | |||
| real(kind=r64), | intent(out) | :: | JB(0:FS%NL) | |||
| real(kind=r64), | intent(out) | :: | HC(0:FS%NL) | |||
| real(kind=r64), | intent(out) | :: | UCG | |||
| real(kind=r64), | intent(out) | :: | SHGC | |||
| logical, | intent(in), | optional | :: | HCInFlag |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | TM | |||
| real(kind=r64), | intent(in) | :: | T | |||
| real(kind=r64), | intent(in) | :: | DT | |||
| real(kind=r64), | intent(in) | :: | AK | |||
| real(kind=r64), | intent(in) | :: | BK | |||
| real(kind=r64), | intent(in) | :: | CK | |||
| real(kind=r64), | intent(in) | :: | ACP | |||
| real(kind=r64), | intent(in) | :: | BCP | |||
| real(kind=r64), | intent(in) | :: | CCP | |||
| real(kind=r64), | intent(in) | :: | AVISC | |||
| real(kind=r64), | intent(in) | :: | BVISC | |||
| real(kind=r64), | intent(in) | :: | CVISC | |||
| real(kind=r64), | intent(in) | :: | RHOGAS |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | RA |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSGAP), | intent(in) | :: | G | |||
| real(kind=r64), | intent(in) | :: | T1 | |||
| real(kind=r64), | intent(in) | :: | T2 |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | T1 | |||
| real(kind=r64), | intent(in) | :: | T2 | |||
| real(kind=r64), | intent(in) | :: | E1 | |||
| real(kind=r64), | intent(in) | :: | E2 |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | L | |||
| real(kind=r64), | intent(in) | :: | TG | |||
| real(kind=r64), | intent(in) | :: | TI |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | b | |||
| real(kind=r64), | intent(in) | :: | L | |||
| real(kind=r64), | intent(in) | :: | Ts | |||
| real(kind=r64), | intent(in) | :: | Tamb | |||
| real(kind=r64), | intent(in) | :: | hc_in | |||
| integer, | intent(in) | :: | scheme |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLayer), | intent(in) | :: | L |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(in) | :: | FS | |||
| real(kind=r64), | intent(in) | :: | TOUT | |||
| real(kind=r64), | intent(in) | :: | HCOUT | |||
| real(kind=r64), | intent(in) | :: | TIN | |||
| real(kind=r64), | intent(in) | :: | HCIN | |||
| real(kind=r64), | intent(out) | :: | U |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | THETA | |||
| real(kind=r64), | intent(out) | :: | RAT_1MR | |||
| real(kind=r64), | intent(out) | :: | RAT_TAU |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | THETA | |||
| integer, | intent(in) | :: | OPT | |||
| real(kind=r64), | intent(in) | :: | P(hipDIM) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSLWP), | intent(inout) | :: | LLWP |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSSWP), | intent(inout) | :: | LSWP | |||
| real(kind=r64), | intent(in), | optional | :: | THETA |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSLWP), | intent(out) | :: | LLWP |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSSWP), | intent(inout) | :: | LSWP | |||
| real(kind=r64), | intent(in), | optional | :: | THETA |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSLWP), | intent(inout) | :: | LLWP |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSSWP), | intent(inout) | :: | LSWP | |||
| real(kind=r64), | intent(in), | optional | :: | OHM_V_RAD | ||
| real(kind=r64), | intent(in), | optional | :: | OHM_H_RAD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSLWP), | intent(inout) | :: | LLWP |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSSWP), | intent(inout) | :: | LSWP | |||
| real(kind=r64), | intent(in), | optional | :: | OMEGA |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(inout) | :: | L | |||
| real(kind=r64), | intent(in) | :: | OMEGA_DEG |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| real(kind=r64), | intent(in) | :: | OMEGA_DEG |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(inout) | :: | L | |||
| real(kind=r64), | intent(in) | :: | THETA | |||
| real(kind=r64), | intent(in) | :: | OMEGA_V | |||
| real(kind=r64), | intent(in) | :: | OMEGA_H |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSFILLGAS), | intent(in) | :: | FG | |||
| real(kind=r64), | intent(in) | :: | P | |||
| real(kind=r64), | intent(in) | :: | T |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(in) | :: | FS |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(in) | :: | FS |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(in) | :: | FS |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(in) | :: | FS |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | a | |||
| real(kind=r64), | intent(in) | :: | b | |||
| real(kind=r64), | intent(in) | :: | tolF | |||
| real(kind=r64), | optional | :: | tolAbs |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | J | |||
| real(kind=r64), | intent(in) | :: | Emiss |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ConstrNum |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ConstrNum |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | Height | |||
| real(kind=r64), | intent(in) | :: | TSurfIn | |||
| real(kind=r64), | intent(in) | :: | TAirIn |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ConstrNum |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(in) | :: | FS | |||
| real(kind=r64), | intent(out) | :: | UNFRC |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(inout) | :: | FS | |||
| real(kind=r64), | intent(out) | :: | SHGCSummer | |||
| real(kind=r64), | intent(out) | :: | TransNormal |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(inout) | :: | FS | |||
| integer, | intent(in) | :: | DiffBeamFlag | |||
| real(kind=r64), | intent(out) | :: | Abs1(CFSMAXNL+1,2) | |||
| real(kind=r64), | intent(in) | :: | IncA | |||
| real(kind=r64), | intent(in) | :: | VProfA | |||
| real(kind=r64), | intent(in) | :: | HProfA |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | SurfNum | |||
| real(kind=r64), | intent(in) | :: | HcOut | |||
| real(kind=r64), | intent(inout) | :: | SurfInsideTemp | |||
| real(kind=r64), | intent(inout) | :: | SurfOutsideTemp | |||
| real(kind=r64), | intent(inout) | :: | SurfOutsideEmiss | |||
| integer, | intent(in) | :: | CalcCondition |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | OPENNESS | |||
| real(kind=r64), | intent(in) | :: | EPSLW0 | |||
| real(kind=r64), | intent(in) | :: | TAULW0 | |||
| real(kind=r64), | intent(out) | :: | EPSLW | |||
| real(kind=r64), | intent(out) | :: | TAULW |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | RHO_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BB0 | |||
| real(kind=r64), | intent(out) | :: | RHO_DD | |||
| real(kind=r64), | intent(out) | :: | TAU_DD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | xTHETA | |||
| real(kind=r64), | intent(in) | :: | RHO_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BB0 | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB | |||
| real(kind=r64), | intent(out) | :: | TAU_BD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | RHO_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BB0 | |||
| real(kind=r64), | intent(out) | :: | RHO_DD | |||
| real(kind=r64), | intent(out) | :: | TAU_DD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | xTHETA | |||
| real(kind=r64), | intent(in) | :: | RHO_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BB0 | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB | |||
| real(kind=r64), | intent(out) | :: | TAU_BD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | RHO_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BB0 | |||
| real(kind=r64), | intent(out) | :: | RHO_DD | |||
| real(kind=r64), | intent(out) | :: | TAU_DD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | xTHETA | |||
| real(kind=r64), | intent(in) | :: | RHO_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAU_BB0 | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB | |||
| real(kind=r64), | intent(out) | :: | TAU_BD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OPENNESS_FABRIC | |||
| real(kind=r64), | intent(in) | :: | EPSLWF0_FABRIC | |||
| real(kind=r64), | intent(in) | :: | EPSLWB0_FABRIC | |||
| real(kind=r64), | intent(in) | :: | TAULW0_FABRIC | |||
| real(kind=r64), | intent(out) | :: | EPSLWF_PD | |||
| real(kind=r64), | intent(out) | :: | TAULW_PD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | RHOFF_DD | |||
| real(kind=r64), | intent(in) | :: | RHOBF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUF_DD | |||
| real(kind=r64), | intent(out) | :: | RHOFDD | |||
| real(kind=r64), | intent(out) | :: | TAUFDD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OHM_V_RAD | |||
| real(kind=r64), | intent(in) | :: | OHM_H_RAD | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB0 | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD0 | |||
| real(kind=r64), | intent(in) | :: | RHOFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUFF_DD | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT0 | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB0 | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD0 | |||
| real(kind=r64), | intent(in) | :: | RHOBF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUBF_DD | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB | |||
| real(kind=r64), | intent(out) | :: | TAU_BD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OMEGA_H | |||
| real(kind=r64), | intent(in) | :: | DE | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_DD | |||
| real(kind=r64), | intent(in) | :: | RHOFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUBF_DD | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OMEGA_H | |||
| real(kind=r64), | intent(in) | :: | DE | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_DD | |||
| real(kind=r64), | intent(in) | :: | RHOFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUBF_DD | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OMEGA_H | |||
| real(kind=r64), | intent(in) | :: | DE | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_DD | |||
| real(kind=r64), | intent(in) | :: | RHOFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUBF_DD | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OMEGA_H | |||
| real(kind=r64), | intent(in) | :: | DE | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_DD | |||
| real(kind=r64), | intent(in) | :: | RHOFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUBF_DD | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OMEGA_H | |||
| real(kind=r64), | intent(in) | :: | DE | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_DD | |||
| real(kind=r64), | intent(in) | :: | RHOFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUBF_DD | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OMEGA_H | |||
| real(kind=r64), | intent(in) | :: | DE | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PARL | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PARL | |||
| real(kind=r64), | intent(in) | :: | RHOFF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUFF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_BT_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BB_PERP | |||
| real(kind=r64), | intent(in) | :: | TAUBF_BD_PERP | |||
| real(kind=r64), | intent(in) | :: | RHOBF_DD | |||
| real(kind=r64), | intent(in) | :: | RHOFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUFF_DD | |||
| real(kind=r64), | intent(in) | :: | TAUBF_DD | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | PHI | |||
| real(kind=r64), | intent(in) | :: | RHODFS_SLAT | |||
| real(kind=r64), | intent(in) | :: | RHOUFS_SLAT | |||
| real(kind=r64), | intent(in) | :: | TAU_SLAT | |||
| real(kind=r64), | intent(out) | :: | RHOFVB | |||
| real(kind=r64), | intent(out) | :: | TAUVB |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | SL_WR | |||
| real(kind=r64), | intent(in) | :: | PHIx | |||
| real(kind=r64), | intent(in) | :: | OMEGAx | |||
| real(kind=r64), | intent(in) | :: | RHODFS_SLAT | |||
| real(kind=r64), | intent(in) | :: | RHOUFS_SLAT | |||
| real(kind=r64), | intent(in) | :: | TAU_SLAT | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BB | |||
| real(kind=r64), | intent(out) | :: | TAU_BD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OMEGA | |||
| real(kind=r64), | intent(in) | :: | DE | |||
| real(kind=r64), | intent(in) | :: | PHI | |||
| real(kind=r64), | intent(in) | :: | RHODFS_SLAT | |||
| real(kind=r64), | intent(in) | :: | RHOUFS_SLAT | |||
| real(kind=r64), | intent(in) | :: | TAU_SLAT | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | S | |||
| real(kind=r64), | intent(in) | :: | W | |||
| real(kind=r64), | intent(in) | :: | OMEGA | |||
| real(kind=r64), | intent(in) | :: | DE | |||
| real(kind=r64), | intent(in) | :: | PHI | |||
| real(kind=r64), | intent(in) | :: | RHODFS_SLAT | |||
| real(kind=r64), | intent(in) | :: | RHOUFS_SLAT | |||
| real(kind=r64), | intent(in) | :: | TAU_SLAT | |||
| real(kind=r64), | intent(out) | :: | RHO_BD | |||
| real(kind=r64), | intent(out) | :: | TAU_BD |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | N | |||
| real(kind=r64), | intent(inout) | :: | A(:,:) | |||
| real(kind=r64), | intent(out) | :: | XSOL(:) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | Tg | |||
| real(kind=r64), | intent(in) | :: | Td | |||
| real(kind=r64), | intent(in) | :: | Tm | |||
| real(kind=r64), | intent(in) | :: | rhog | |||
| real(kind=r64), | intent(in) | :: | rhodf | |||
| real(kind=r64), | intent(in) | :: | rhodb | |||
| real(kind=r64), | intent(in) | :: | taud | |||
| real(kind=r64), | intent(in) | :: | rhom | |||
| real(kind=r64), | intent(out) | :: | hr_gm | |||
| real(kind=r64), | intent(out) | :: | hr_gd | |||
| real(kind=r64), | intent(out) | :: | hr_md |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | rhog | |||
| real(kind=r64), | intent(in) | :: | rhodf | |||
| real(kind=r64), | intent(in) | :: | rhodb | |||
| real(kind=r64), | intent(in) | :: | taud | |||
| real(kind=r64), | intent(in) | :: | rhom | |||
| real(kind=r64), | intent(out) | :: | A(20,22) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | breal | |||
| real(kind=r64), | intent(in) | :: | Ts | |||
| real(kind=r64), | intent(in) | :: | Tg | |||
| real(kind=r64), | intent(out) | :: | hsg | |||
| integer, | intent(in) | :: | scheme |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in) | :: | b | |||
| real(kind=r64), | intent(in) | :: | L | |||
| real(kind=r64), | intent(in) | :: | Tg | |||
| real(kind=r64), | intent(in) | :: | Tamb | |||
| real(kind=r64), | intent(in) | :: | hc_in | |||
| real(kind=r64), | intent(out) | :: | hgamb | |||
| integer, | intent(in) | :: | scheme |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | NL | |||
| type(CFSSWP), | intent(in) | :: | LSWP_ON(:) | |||
| type(CFSSWP), | intent(in) | :: | SWP_ROOM | |||
| real(kind=r64), | intent(in) | :: | IBEAM | |||
| real(kind=r64), | intent(in) | :: | IDIFF | |||
| real(kind=r64), | intent(in) | :: | ILIGHTS | |||
| real(kind=r64), | intent(out) | :: | SOURCE(NL+1) | |||
| real(kind=r64), | intent(out), | optional | :: | SourceBD(NL+1) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | NL | |||
| real(kind=r64), | intent(in) | :: | RHOF(:) | |||
| real(kind=r64), | intent(in) | :: | RHOB(:) | |||
| real(kind=r64), | intent(in) | :: | TAUF(:) | |||
| real(kind=r64), | intent(in) | :: | TAUB(:) | |||
| real(kind=r64), | intent(in) | :: | RHO_room | |||
| real(kind=r64), | intent(in) | :: | ISOL | |||
| real(kind=r64), | intent(out) | :: | QPLUS(0:) | |||
| real(kind=r64), | intent(out) | :: | QMINUS(0:) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(out) | :: | X(:) | |||
| real(kind=r64), | intent(in) | :: | AP(:) | |||
| real(kind=r64), | intent(in) | :: | AE(:) | |||
| real(kind=r64), | intent(in) | :: | AW(:) | |||
| real(kind=r64), | intent(in) | :: | BP(:) | |||
| integer, | intent(in) | :: | N |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(out) | :: | X(:) | |||
| real(kind=r64), | intent(in) | :: | AP(:) | |||
| real(kind=r64), | intent(in) | :: | AE(:) | |||
| real(kind=r64), | intent(in) | :: | AW(:) | |||
| real(kind=r64), | intent(in) | :: | BP(:) | |||
| integer, | intent(in) | :: | N |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64) | :: | X(:) | ||||
| real(kind=r64), | intent(inout) | :: | AP(:) | |||
| real(kind=r64), | intent(in) | :: | AE(:) | |||
| real(kind=r64), | intent(in) | :: | AW(:) | |||
| real(kind=r64), | intent(in) | :: | BP(:) | |||
| integer | :: | N |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| real(kind=r64), | intent(in) | :: | THETA | |||
| real(kind=r64), | intent(in) | :: | OMEGA_V | |||
| real(kind=r64), | intent(in) | :: | OMEGA_H | |||
| type(CFSSWP), | intent(out) | :: | LSWP_ON |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSSWP), | intent(inout) | :: | SWP | |||
| real(kind=r64), | intent(in) | :: | OMEGA |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSSWP), | intent(inout) | :: | SWP | |||
| real(kind=r64), | intent(in) | :: | RAT_1MR | |||
| real(kind=r64), | intent(in) | :: | RAT_TAU |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(out) | :: | RAT_1MRDiff | |||
| real(kind=r64), | intent(out) | :: | RAT_TAUDiff |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSSWP), | intent(inout) | :: | SWP |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSSWP), | intent(inout) | :: | SWP |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(inout) | :: | L |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSGAP), | intent(inout) | :: | G | |||
| integer, | intent(in) | :: | GType | |||
| real(kind=r64), | intent(inout) | :: | TAS | |||
| real(kind=r64), | intent(in), | optional | :: | xTMan | ||
| real(kind=r64), | intent(in), | optional | :: | xPMan |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSGAP), | intent(inout) | :: | G | |||
| type(CFSLAYER), | intent(in) | :: | L |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(inout) | :: | Layer |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSLAYER), | intent(in) | :: | L | |||
| type(CFSSWP), | intent(inout) | :: | SWP |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(CFSTY), | intent(inout) | :: | FS |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | SurfNum | |||
| integer, | intent(in) | :: | BeamDIffFlag | |||
| real(kind=r64), | intent(out) | :: | CFSAbs(CFSMAXNL+1,2) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ConstrNum |