| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=r64), | intent(in), | dimension(maxlay2) | :: | theta | ||
| real(kind=r64), | intent(in), | dimension(MaxGap) | :: | gap | ||
| real(kind=r64), | intent(inout), | dimension(maxlay1) | :: | hgas | ||
| real(kind=r64), | intent(inout), | dimension(maxlay1) | :: | hcgas | ||
| real(kind=r64), | intent(inout), | dimension(maxlay1) | :: | hrgas | ||
| real(kind=r64), | intent(in), | dimension(maxlay1, maxgas) | :: | frct | ||
| integer, | intent(in), | dimension(maxlay1, maxgas) | :: | iprop | ||
| real(kind=r64), | intent(in), | dimension(maxlay1) | :: | pressure | ||
| integer, | intent(in), | dimension(maxlay1) | :: | nmix | ||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | xwght | ||
| 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 | ||
| integer, | intent(in) | :: | nlayer | |||
| real(kind=r64), | intent(in) | :: | width | |||
| real(kind=r64), | intent(in) | :: | height | |||
| real(kind=r64), | intent(in) | :: | angle | |||
| real(kind=r64), | intent(in) | :: | Tout | |||
| real(kind=r64), | intent(in) | :: | Tin | |||
| 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(maxlay1) | :: | vvent | ||
| real(kind=r64), | intent(in), | dimension(maxlay1) | :: | tvent | ||
| integer, | intent(in), | dimension(maxlay) | :: | LayerType | ||
| real(kind=r64), | intent(inout), | dimension(maxlay1) | :: | Tgaps | ||
| real(kind=r64), | intent(out), | dimension(maxlay1) | :: | qv | ||
| integer, | intent(inout) | :: | nperr | |||
| character(len=*), | intent(inout) | :: | ErrorMessage | |||
| real(kind=r64), | intent(out), | dimension(maxlay1) | :: | vfreevent |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in), | dimension(maxgas) | :: | iprop | ||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | frct | ||
| real(kind=r64), | intent(in) | :: | press | |||
| integer, | intent(in) | :: | nmix | |||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | xwght | ||
| 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) | :: | s | |||
| real(kind=r64), | intent(in) | :: | H | |||
| real(kind=r64), | intent(in) | :: | hc | |||
| real(kind=r64), | intent(in) | :: | forcedspeed | |||
| real(kind=r64), | intent(in) | :: | Tinlet | |||
| real(kind=r64), | intent(out) | :: | Toutlet | |||
| real(kind=r64), | intent(in) | :: | Tav | |||
| real(kind=r64), | intent(out) | :: | hcv | |||
| real(kind=r64), | intent(out) | :: | qv | |||
| integer, | intent(inout) | :: | nperr | |||
| character(len=*), | intent(inout) | :: | ErrorMessage |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in), | dimension(maxgas) | :: | iprop1 | ||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | frct1 | ||
| real(kind=r64), | intent(in) | :: | press1 | |||
| integer, | intent(in) | :: | nmix1 | |||
| integer, | intent(in), | dimension(maxgas) | :: | iprop2 | ||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | frct2 | ||
| real(kind=r64), | intent(in) | :: | press2 | |||
| integer, | intent(in) | :: | nmix2 | |||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | xwght | ||
| 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(inout) | :: | Atop | |||
| real(kind=r64), | intent(inout) | :: | Abot | |||
| real(kind=r64), | intent(in) | :: | Al | |||
| real(kind=r64), | intent(in) | :: | Ar | |||
| real(kind=r64), | intent(in) | :: | Ah | |||
| real(kind=r64), | intent(in) | :: | s1 | |||
| real(kind=r64), | intent(in) | :: | s2 | |||
| real(kind=r64), | intent(in) | :: | H | |||
| real(kind=r64), | intent(in) | :: | L | |||
| real(kind=r64), | intent(in) | :: | angle | |||
| real(kind=r64), | intent(in) | :: | hc1 | |||
| real(kind=r64), | intent(in) | :: | hc2 | |||
| real(kind=r64), | intent(out) | :: | speed1 | |||
| real(kind=r64), | intent(out) | :: | speed2 | |||
| real(kind=r64), | intent(inout) | :: | Tgap1 | |||
| real(kind=r64), | intent(inout) | :: | Tgap2 | |||
| real(kind=r64), | intent(in) | :: | Tav1 | |||
| real(kind=r64), | intent(in) | :: | Tav2 | |||
| real(kind=r64), | intent(out) | :: | hcv1 | |||
| real(kind=r64), | intent(out) | :: | hcv2 | |||
| real(kind=r64), | intent(out) | :: | qv1 | |||
| real(kind=r64), | intent(out) | :: | qv2 | |||
| integer, | intent(inout) | :: | nperr | |||
| character(len=*), | intent(inout) | :: | ErrorMessage |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in), | dimension(maxgas) | :: | iprop1 | ||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | frct1 | ||
| real(kind=r64), | intent(in) | :: | press1 | |||
| integer, | intent(in) | :: | nmix1 | |||
| integer, | intent(in), | dimension(maxgas) | :: | iprop2 | ||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | frct2 | ||
| real(kind=r64), | intent(in) | :: | press2 | |||
| integer, | intent(in) | :: | nmix2 | |||
| real(kind=r64), | intent(in), | dimension(maxgas) | :: | xwght | ||
| 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(inout) | :: | Atop | |||
| real(kind=r64), | intent(inout) | :: | Abot | |||
| real(kind=r64), | intent(in) | :: | Al | |||
| real(kind=r64), | intent(in) | :: | Ar | |||
| real(kind=r64), | intent(inout) | :: | Ah | |||
| real(kind=r64), | intent(in) | :: | s | |||
| real(kind=r64), | intent(in) | :: | H | |||
| real(kind=r64), | intent(in) | :: | L | |||
| real(kind=r64), | intent(in) | :: | angle | |||
| real(kind=r64) | :: | forcedspeed | ||||
| real(kind=r64), | intent(in) | :: | hc | |||
| real(kind=r64), | intent(in) | :: | Tenv | |||
| real(kind=r64), | intent(in) | :: | Tav | |||
| real(kind=r64), | intent(inout) | :: | Tgap | |||
| real(kind=r64), | intent(out) | :: | hcv | |||
| real(kind=r64), | intent(out) | :: | qv | |||
| integer, | intent(inout) | :: | nperr | |||
| character(len=*), | intent(inout) | :: | ErrorMessage | |||
| real(kind=r64), | intent(out) | :: | speed |