Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | NetworkNumOfLinks | = | 0 | ||
integer, | public | :: | NetworkNumOfNodes | = | 0 | ||
integer, | private, | parameter | :: | NrInt | = | 20 | |
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | AFECTL | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | AFLOW2 | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | AFLOW | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | PS | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | PW | |||
real(kind=r64), | private | :: | PB | = | 0.0d0 | ||
integer, | private | :: | LIST | = | 0 | ||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | RHOZ | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | SQRTDZ | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | VISCZ | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | SUMAF | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | TZ | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | WZ | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | PZ | |||
integer, | private, | ALLOCATABLE, DIMENSION(:) | :: | ID | |||
integer, | private, | ALLOCATABLE, DIMENSION(:) | :: | IK | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | AD | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | AU | |||
integer, | private, | ALLOCATABLE, DIMENSION(:) | :: | newIK | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | newAU | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | SUMF | |||
integer, | private | :: | Unit11 | = | 0 | ||
integer, | private | :: | Unit21 | = | 0 | ||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | DpProf | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | RhoProfF | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | RhoProfT | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:,:) | :: | DpL |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | Pz0 | |||
real(kind=r64), | intent(in) | :: | Rho0 | |||
real(kind=r64), | intent(in) | :: | beta | |||
real(kind=r64), | intent(in) | :: | z0 | |||
real(kind=r64), | intent(in) | :: | z | |||
real(kind=r64), | intent(in) | :: | g |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(inout) | :: | IK(NetworkNumOfNodes+1) | |||
real(kind=r64), | intent(inout) | :: | AD(NetworkNumOfNodes) | |||
real(kind=r64), | intent(inout) | :: | AU(IK(NetworkNumOfNodes+1)) | |||
integer, | intent(inout) | :: | ITER |
!! Check array of DP. DpL is used for multizone air flow calculation only !! and is not for forced air calculation
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NNZE | |||
integer, | intent(in) | :: | LFLAG |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | JA | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(inout) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(inout) | :: | Coef | |||
real(kind=r64), | intent(in) | :: | Expn | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(inout) | :: | AU(IK(NetworkNumOfNodes+1)) | |||
real(kind=r64), | intent(inout) | :: | AD(NetworkNumOfNodes) | |||
real(kind=r64), | intent(inout) | :: | AL(IK(NetworkNumOfNodes+1)-1) | |||
integer, | intent(in) | :: | IK(NetworkNumOfNodes+1) | |||
integer, | intent(in) | :: | NEQ | |||
integer, | intent(in) | :: | NSYM |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | AU(IK(NetworkNumOfNodes+1)) | |||
real(kind=r64), | intent(in) | :: | AD(NetworkNumOfNodes) | |||
real(kind=r64), | intent(in) | :: | AL(IK(NetworkNumOfNodes+1)-1) | |||
real(kind=r64), | intent(inout) | :: | B(NetworkNumOfNodes) | |||
integer, | intent(in) | :: | IK(NetworkNumOfNodes+1) | |||
integer, | intent(in) | :: | NEQ | |||
integer, | intent(in) | :: | NSYM |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | X(4) | |||
integer, | intent(in) | :: | LM(2) | |||
integer, | intent(in) | :: | IK(NetworkNumOfNodes+1) | |||
real(kind=r64), | intent(inout) | :: | AU(IK(NetworkNumOfNodes+1)) | |||
real(kind=r64), | intent(inout) | :: | AD(NetworkNumOfNodes) | |||
integer, | intent(in) | :: | FLAG |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | S | |||
real(kind=r64), | intent(in) | :: | V(*) | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | UOUT |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | S | |||
real(kind=r64), | intent(in) | :: | V(*) | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | UOUT |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | J | |||
integer, | intent(in) | :: | LFLAG | |||
real(kind=r64), | intent(in) | :: | PDROP | |||
integer, | intent(in) | :: | IL | |||
integer, | intent(in) | :: | N | |||
integer, | intent(in) | :: | M | |||
real(kind=r64), | intent(out) | :: | F(2) | |||
real(kind=r64), | intent(out) | :: | DF(2) | |||
integer, | intent(out) | :: | NF |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | IL | |||
integer, | intent(in) | :: | Pprof | |||
real(kind=r64), | intent(in) | :: | G | |||
real(kind=r64), | intent(in) | :: | DpF(2) | |||
real(kind=r64), | intent(in) | :: | DpT(2) | |||
real(kind=r64), | intent(in) | :: | BetaF(2) | |||
real(kind=r64), | intent(in) | :: | BetaT(2) | |||
real(kind=r64), | intent(in) | :: | RhoStF(2) | |||
real(kind=r64), | intent(in) | :: | RhoStT(2) | |||
integer, | intent(in) | :: | From | |||
integer, | intent(in) | :: | To | |||
real(kind=r64), | intent(in) | :: | ActLh | |||
real(kind=r64), | intent(in) | :: | OwnHeightFactor |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | g | |||
real(kind=r64), | intent(inout) | :: | Rho | |||
real(kind=r64), | intent(in) | :: | Z | |||
real(kind=r64), | intent(inout) | :: | T | |||
real(kind=r64), | intent(inout) | :: | X | |||
real(kind=r64), | intent(out) | :: | Dp | |||
integer, | intent(in) | :: | zone | |||
real(kind=r64), | intent(in) | :: | Pz | |||
real(kind=r64), | intent(in) | :: | Pbz | |||
real(kind=r64), | intent(out) | :: | RhoDr |