!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | standard | ! Environment related: |
||
integer, | intent(in) | :: | nlayer | ! Environment related: |
||
real(kind=r64), | intent(in) | :: | tout | |||
real(kind=r64), | intent(in) | :: | tind | |||
real(kind=r64), | intent(inout), | dimension(MaxGap) | :: | gap | ||
real(kind=r64), | intent(inout), | dimension(maxlay) | :: | thick | ||
real(kind=r64), | intent(inout), | dimension(maxlay) | :: | scon | ||
real(kind=r64), | intent(in), | dimension(maxlay2) | :: | emis | ||
real(kind=r64), | intent(in) | :: | totsol | |||
real(kind=r64), | intent(in) | :: | tilt | |||
real(kind=r64), | intent(in) | :: | dir | |||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | asol | ! Gaps: |
|
real(kind=r64), | intent(in), | dimension(maxlay1) | :: | presure | ||
integer, | intent(in), | dimension(maxlay1, maxgas) | :: | iprop | ||
real(kind=r64), | intent(in), | dimension(maxlay1, maxgas) | :: | frct | ||
integer, | intent(in), | dimension(maxlay1) | :: | nmix | ||
real(kind=r64), | intent(in), | dimension(maxgas, 3) | :: | xgcon | ||
real(kind=r64), | intent(in), | dimension(maxgas, 3) | :: | xgvis | ||
real(kind=r64), | intent(in), | dimension(maxgas, 3) | :: | xgcp | ||
real(kind=r64), | intent(in), | dimension(maxgas) | :: | xwght | !! INPUTS/OUTPUTS: |
|
real(kind=r64), | intent(out), | dimension(maxlay2) | :: | theta | ! Gaps: |
|
real(kind=r64), | intent(out) | :: | ufactor | |||
real(kind=r64), | intent(out) | :: | hcin | ! Layers: |
||
real(kind=r64), | intent(inout) | :: | hin | ! OUTPUTS: ! Overall: |
||
real(kind=r64), | intent(inout) | :: | hout | ! OUTPUTS: ! Overall: |
||
real(kind=r64), | intent(out) | :: | shgc | |||
integer, | intent(out) | :: | nperr | |||
character(len=*), | intent(inout) | :: | ErrorMessage | |||
integer, | intent(in), | dimension(2) | :: | ibc | ! Layers: |
|
real(kind=r64), | intent(out), | dimension(maxlay) | :: | hg | ||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | hr | ||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | hs | ||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | Ra | !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
|
real(kind=r64), | intent(out), | dimension(maxlay) | :: | Nu | !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | nlayer | |||
real(kind=r64), | intent(in) | :: | tout | |||
real(kind=r64), | intent(in) | :: | tind | |||
real(kind=r64), | intent(in), | dimension(maxlay2) | :: | emis | ||
real(kind=r64), | intent(in), | dimension(MaxGap) | :: | gap | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | thick | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | scon | ||
real(kind=r64), | intent(in) | :: | tilt | |||
integer, | intent(in), | dimension(maxlay1, maxgas) | :: | iprop | ||
real(kind=r64), | intent(in), | dimension(maxlay1,maxgas) | :: | frct | ||
real(kind=r64), | intent(in), | dimension(maxgas, 3) | :: | xgcon | ||
real(kind=r64), | intent(in), | dimension(maxgas, 3) | :: | xgvis | ||
real(kind=r64), | intent(in), | dimension(maxgas, 3) | :: | xgcp | ||
real(kind=r64), | intent(in), | dimension(maxgas) | :: | xwght | ||
real(kind=r64), | intent(in), | dimension(maxlay1) | :: | presure | ||
integer, | intent(in), | dimension(maxlay1) | :: | nmix | ||
real(kind=r64), | intent(out), | dimension(maxlay2) | :: | theta | ||
integer, | intent(in) | :: | standard | |||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | hg | ||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | hr | ||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | hs | ||
real(kind=r64), | intent(inout) | :: | hin | |||
real(kind=r64), | intent(in) | :: | hout | |||
real(kind=r64), | intent(out) | :: | hcin | |||
integer, | intent(in), | dimension(2) | :: | ibc | ||
real(kind=r64), | intent(out), | dimension(maxlay3) | :: | rs | ||
real(kind=r64), | intent(out) | :: | ufactor | |||
real(kind=r64), | dimension(maxlay) | :: | Ra | |||
real(kind=r64), | dimension(maxlay) | :: | Nu | |||
integer, | intent(out) | :: | nperr | |||
character(len=*), | intent(inout) | :: | ErrorMessage |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | x1 | |||
real(kind=r64), | intent(in) | :: | x2 | |||
real(kind=r64), | intent(in) | :: | y1 | |||
real(kind=r64), | intent(in) | :: | y2 | |||
real(kind=r64), | intent(in) | :: | x | |||
real(kind=r64), | intent(out) | :: | y |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | dir | |||
real(kind=r64), | intent(in) | :: | totsol | |||
real(kind=r64), | intent(in) | :: | rtot | |||
real(kind=r64), | intent(in), | dimension(maxlay3) | :: | rs | ||
integer, | intent(in) | :: | nlayer | |||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | absol | ||
real(kind=r64), | intent(out) | :: | sf | |||
integer, | intent(in) | :: | standard | |||
integer, | intent(out) | :: | nperr | |||
character(len=*), | intent(inout) | :: | ErrorMessage |