! INPUTS:
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | nlayer | |||
integer, | intent(in) | :: | iwd | |||
real(kind=r64), | intent(in) | :: | tout | |||
real(kind=r64), | intent(in) | :: | tind | |||
real(kind=r64), | intent(in) | :: | trmin | |||
real(kind=r64), | intent(in) | :: | wso | |||
real(kind=r64), | intent(in) | :: | wsi | |||
real(kind=r64), | intent(in) | :: | dir | |||
real(kind=r64), | intent(in) | :: | outir | |||
integer, | intent(in) | :: | isky | |||
real(kind=r64), | intent(in) | :: | tsky | |||
real(kind=r64), | intent(in) | :: | esky | |||
real(kind=r64), | intent(in) | :: | fclr | |||
real(kind=r64), | intent(in) | :: | VacuumPressure | |||
real(kind=r64), | intent(in) | :: | VacuumMaxGapThickness | |||
integer, | intent(in) | :: | CalcDeflection | |||
real(kind=r64), | intent(in) | :: | Pa | |||
real(kind=r64), | intent(in) | :: | Pini | |||
real(kind=r64), | intent(in) | :: | Tini | |||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | gap | ||
real(kind=r64), | intent(in), | dimension(MaxGap) | :: | GapDef | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | thick | ||
real(kind=r64), | intent(in) | :: | scon(maxlay) | |||
real(kind=r64), | intent(in) | :: | YoungsMod(maxlay) | |||
real(kind=r64), | intent(in) | :: | PoissonsRat(maxlay) | |||
real(kind=r64), | intent(in), | dimension(maxlay2) | :: | tir | ! Venetians: |
|
real(kind=r64), | intent(in), | dimension(maxlay2) | :: | emis | ! Venetians: |
|
real(kind=r64), | intent(in) | :: | totsol | |||
real(kind=r64), | intent(in) | :: | tilt | |||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | asol | ||
real(kind=r64), | intent(in) | :: | height | |||
real(kind=r64), | intent(in) | :: | heightt | |||
real(kind=r64), | intent(in) | :: | width | |||
real(kind=r64), | intent(in), | dimension(maxlay1) | :: | presure | ||
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(maxgas) | :: | gama | ||
integer, | intent(in), | dimension(maxlay1) | :: | nmix | ||
integer, | intent(in), | dimension(maxlay) | :: | SupportPillar | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | PillarSpacing | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | PillarRadius | !! INPUTS/OUTPUTS: |
|
real(kind=r64), | intent(inout) | :: | hin | |||
real(kind=r64), | intent(inout) | :: | hout | |||
integer, | intent(in), | dimension(2) | :: | ibc | ! Layers: |
|
real(kind=r64), | intent(in), | dimension(maxlay) | :: | Atop | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | Abot | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | Al | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | Ar | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | Ah | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatThick | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatWidth | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatAngle | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatCond | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatSpacing | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatCurve | ||
real(kind=r64), | intent(in), | dimension(maxlay1) | :: | vvent | ! Laminates: |
|
real(kind=r64), | intent(in), | dimension(maxlay1) | :: | tvent | ! Laminates: |
|
integer, | intent(in), | dimension(maxlay) | :: | LayerType | ||
integer, | intent(in), | dimension(maxlay) | :: | nslice | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | LaminateA | ! Gaps: |
|
real(kind=r64), | intent(in), | dimension(maxlay) | :: | LaminateB | ! Gaps: |
|
real(kind=r64), | intent(in), | dimension(maxlay) | :: | sumsol | ! Gaps: |
|
integer, | intent(in) | :: | standard | |||
integer, | intent(in) | :: | ThermalMod | |||
real(kind=r64), | intent(in) | :: | SDScalar | |||
character(len=*), | intent(inout) | :: | ErrorMessage | ! Environment related: |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | nperr |
re-initialize iteration parameters: Vectors:
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(inout) | :: | trmin | |||
integer, | intent(in) | :: | isky | |||
real(kind=r64), | intent(in) | :: | outir | ! Layers: |
||
real(kind=r64), | intent(in) | :: | tsky | |||
real(kind=r64), | intent(inout) | :: | esky | |||
real(kind=r64), | intent(in) | :: | fclr | |||
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) | :: | tir | ! Venetians: |
|
real(kind=r64), | intent(in), | dimension(maxlay2) | :: | emis | ! Venetians: |
|
real(kind=r64), | intent(in) | :: | tilt | |||
real(kind=r64), | intent(inout) | :: | hin | ! OUTPUTS: |
||
real(kind=r64), | intent(inout) | :: | hout | ! OUTPUTS: |
||
integer, | intent(in), | dimension(2) | :: | ibc | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatThick | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatWidth | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatAngle | ||
real(kind=r64), | intent(in), | dimension(maxlay) | :: | SlatCond | ||
integer, | intent(in), | dimension(maxlay) | :: | LayerType | ||
integer, | intent(in) | :: | ThermalMod | ! Environment related: |
||
real(kind=r64), | intent(in) | :: | SDScalar | !! INPUTS/OUTPUTS: |
||
real(kind=r64), | intent(out) | :: | ShadeEmisRatioOut | |||
real(kind=r64), | intent(out) | :: | ShadeEmisRatioIn | |||
real(kind=r64), | intent(out) | :: | ShadeHcRatioOut | |||
real(kind=r64), | intent(out) | :: | ShadeHcRatioIn | |||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | Keff | ||
real(kind=r64), | intent(out), | dimension(MaxGap) | :: | ShadeGapKeffConv | ||
real(kind=r64), | intent(out) | :: | sc | |||
real(kind=r64), | intent(out) | :: | shgc | |||
real(kind=r64), | intent(out) | :: | ufactor | |||
real(kind=r64), | intent(out) | :: | flux | |||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | LaminateAU | ||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | sumsolU | ||
real(kind=r64), | intent(out), | dimension(maxlay) | :: | sol0 | ||
real(kind=r64), | intent(out) | :: | hint | |||
real(kind=r64), | intent(out) | :: | houtt | |||
real(kind=r64), | intent(out) | :: | trmout | |||
real(kind=r64), | intent(out) | :: | ebsky | |||
real(kind=r64), | intent(out) | :: | ebroom | |||
real(kind=r64), | intent(out) | :: | Gout | |||
real(kind=r64), | intent(out) | :: | Gin | |||
real(kind=r64), | intent(out), | dimension(maxlay2) | :: | rir | ||
real(kind=r64), | intent(out), | dimension(maxlay1) | :: | vfreevent | ||
integer, | intent(out) | :: | nperr | |||
character(len=*), | intent(inout) | :: | ErrorMessage |