Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=*), | private, | parameter | :: | Blank | = | ' ' | |
integer, | private, | parameter | :: | Linear | = | 1 | |
integer, | private, | parameter | :: | BiLinear | = | 2 | |
integer, | private, | parameter | :: | Quadratic | = | 3 | |
integer, | private, | parameter | :: | BiQuadratic | = | 4 | |
integer, | private, | parameter | :: | Cubic | = | 5 | |
integer, | private, | parameter | :: | QuadraticLinear | = | 6 | |
integer, | private, | parameter | :: | Bicubic | = | 7 | |
integer, | private, | parameter | :: | TriQuadratic | = | 8 | |
integer, | private, | parameter | :: | Exponent | = | 9 | |
integer, | private, | parameter | :: | Quartic | = | 10 | |
integer, | private, | parameter | :: | FuncPressDrop | = | 11 | |
integer, | private, | parameter | :: | MultiVariableLookup | = | 12 | |
integer, | private, | parameter | :: | FanPressureRise | = | 13 | |
integer, | private, | parameter | :: | ExponentialSkewNormal | = | 14 | |
integer, | private, | parameter | :: | Sigmoid | = | 15 | |
integer, | private, | parameter | :: | RectangularHyperbola1 | = | 16 | |
integer, | private, | parameter | :: | RectangularHyperbola2 | = | 17 | |
integer, | private, | parameter | :: | ExponentialDecay | = | 18 | |
integer, | private, | parameter | :: | DoubleExponentialDecay | = | 19 | |
integer, | private, | parameter | :: | QuadLinear | = | 20 | |
integer, | private, | parameter | :: | LINEARINTERPOLATIONOFTABLE | = | 1 | |
integer, | private, | parameter | :: | LAGRANGEINTERPOLATIONLINEAREXTRAPOLATION | = | 2 | |
integer, | private, | parameter | :: | EVALUATECURVETOLIMITS | = | 3 | |
integer, | private, | parameter | :: | SINGLELINEINDEPENDENTVARIABLEWITHMATRIX | = | 1 | |
integer, | private, | parameter | :: | ASCENDING | = | 1 | |
integer, | private, | parameter | :: | DESCENDING | = | 2 | |
integer, | private, | parameter | :: | NumAllCurveTypes | = | 21 | |
integer, | public, | parameter | :: | CurveType_Linear | = | 1 | |
integer, | public, | parameter | :: | CurveType_Quadratic | = | 2 | |
integer, | public, | parameter | :: | CurveType_Cubic | = | 3 | |
integer, | public, | parameter | :: | CurveType_Quartic | = | 4 | |
integer, | public, | parameter | :: | CurveType_Exponent | = | 5 | |
integer, | public, | parameter | :: | CurveType_BiCubic | = | 6 | |
integer, | public, | parameter | :: | CurveType_BiQuadratic | = | 7 | |
integer, | public, | parameter | :: | CurveType_QuadraticLinear | = | 8 | |
integer, | public, | parameter | :: | CurveType_TriQuadratic | = | 9 | |
integer, | public, | parameter | :: | CurveType_FuncPressDrop | = | 10 | |
integer, | public, | parameter | :: | CurveType_TableOneIV | = | 11 | |
integer, | public, | parameter | :: | CurveType_TableTwoIV | = | 12 | |
integer, | public, | parameter | :: | CurveType_TableMultiIV | = | 13 | |
integer, | public, | parameter | :: | CurveType_FanPressureRise | = | 14 | |
integer, | public, | parameter | :: | CurveType_ExponentialSkewNormal | = | 15 | |
integer, | public, | parameter | :: | CurveType_Sigmoid | = | 16 | |
integer, | public, | parameter | :: | CurveType_RectangularHyperbola1 | = | 17 | |
integer, | public, | parameter | :: | CurveType_RectangularHyperbola2 | = | 18 | |
integer, | public, | parameter | :: | CurveType_ExponentialDecay | = | 19 | |
integer, | public, | parameter | :: | CurveType_DoubleExponentialDecay | = | 20 | |
integer, | public, | parameter | :: | CurveType_QuadLinear | = | 21 | |
character(len=*), | public, | parameter, DIMENSION(NumAllCurveTypes) | :: | cCurveTypes | = | (/'Curve:Linear ', 'Curve:Quadratic ', 'Curve:Cubic ', 'Curve:Quartic ', 'Curve:Exponent ', 'Curve:BiCubic ', 'Curve:BiQuadratic ', 'Curve:QuadraitcLinear ', 'Curve:TriQuadratic ', 'Curve:Functional:PressureDrop ', 'Table:OneIndependentVariable ', 'Table:TwoIndependentVariables ', 'Table:MultiVariableLookup ', 'Curve:FanPressureRise ', 'Curve:ExponentialSkewNormal ', 'Curve:Sigmoid ', 'Curve:RectangularHyperbola1 ', 'Curve:RectangularHyperbola2 ', 'Curve:ExponentialDecay ', 'Curve:DoubleExponentialDecay ', 'Curve:QuadLinear '/) | |
type(PerfomanceCurveData), | public, | ALLOCATABLE, DIMENSION(:) | :: | PerfCurve | |||
type(PerfCurveTableDataStruct), | private, | DIMENSION(:), ALLOCATABLE | :: | PerfCurveTableData | |||
type(TableDataStruct), | private, | DIMENSION(:), ALLOCATABLE | :: | TableData | |||
type(TableDataStruct), | private, | DIMENSION(:), ALLOCATABLE | :: | TempTableData | |||
type(TableDataStruct), | private, | DIMENSION(:), ALLOCATABLE | :: | Temp2TableData | |||
type(TableLookupData), | private, | DIMENSION(:), ALLOCATABLE | :: | TableLookup | |||
integer, | public | :: | NumCurves | ||||
logical, | private | :: | GetCurvesInputFlag | = | .true. |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r64), | public | :: | CoeffA0 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA1 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA2 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA3 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA4 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA5 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA6 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA7 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA8 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA9 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA10 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA11 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA12 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA13 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA14 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA15 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA16 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA17 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA18 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA19 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA20 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA21 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA22 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA23 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA24 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA25 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CoeffA26 | = | 0.0D0 |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r64), | public | :: | NormalPoint | = | 1.0D0 | ||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X1 | |||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X2 | |||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | Y |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X1 | |||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X2 | |||
real(kind=r64), | public, | DIMENSION(:,:), ALLOCATABLE | :: | Y |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=MaxNameLength), | public | :: | Name | = | Blank | ||
integer, | public | :: | ObjectType | = | 0 | ||
integer, | public | :: | CurveType | = | 0 | ||
integer, | public | :: | InterpolationType | = | 0 | ||
integer, | public | :: | DataFormat | = | 0 | ||
integer, | public | :: | TableIndex | = | 0 | ||
integer, | public | :: | TableVariables | = | 0 | ||
integer, | public | :: | NumIVLowErrorIndex | = | 0 | ||
integer, | public | :: | NumIVHighErrorIndex | = | 0 | ||
integer, | public | :: | X1SortOrder | = | 1 | ||
integer, | public | :: | X2SortOrder | = | 1 | ||
real(kind=r64), | public | :: | Coeff1 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff2 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff3 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff4 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff5 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff6 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff7 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff8 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff9 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Coeff10 | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var1Max | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var1Min | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var2Max | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var2Min | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var3Max | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var3Min | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var4Max | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var4Min | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var5Max | = | 0.0D0 | ||
real(kind=r64), | public | :: | Var5Min | = | 0.0D0 | ||
real(kind=r64), | public | :: | CurveMin | = | 0.0D0 | ||
real(kind=r64), | public | :: | CurveMax | = | 0.0D0 | ||
logical, | public | :: | CurveMinPresent | = | .FALSE. | ||
logical, | public | :: | CurveMaxPresent | = | .FALSE. | ||
type(TriQuadraticCurveDataStruct), | public, | DIMENSION(:), ALLOCATABLE | :: | Tri2ndOrder | |||
logical, | public | :: | EMSOverrideOn | = | .FALSE. | ||
real(kind=r64), | public | :: | EMSOverrideCurveValue | = | 0.0D0 | ||
real(kind=r64), | public | :: | CurveOutput | = | 0.0D0 | ||
real(kind=r64), | public | :: | CurveInput1 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CurveInput2 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CurveInput3 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CurveInput4 | = | 0.0D0 | ||
real(kind=r64), | public | :: | CurveInput5 | = | 0.0D0 |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | NumIndependentVars | = | 0 | ||
integer, | public | :: | InterpolationOrder | = | 0 | ||
integer, | public | :: | NumX1Vars | = | 0 | ||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X1Var | |||
integer, | public | :: | NumX2Vars | = | 0 | ||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X2Var | |||
integer, | public | :: | NumX3Vars | = | 0 | ||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X3Var | |||
integer, | public | :: | NumX4Vars | = | 0 | ||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X4Var | |||
integer, | public | :: | NumX5Vars | = | 0 | ||
real(kind=r64), | public, | DIMENSION(:), ALLOCATABLE | :: | X5Var | |||
real(kind=r64), | public, | DIMENSION(:,:,:,:,:), ALLOCATABLE | :: | TableLookupZData |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex | |||
real(kind=r64), | intent(in) | :: | Var1 | |||
real(kind=r64), | intent(in), | optional | :: | Var2 | ||
real(kind=r64), | intent(in), | optional | :: | Var3 | ||
real(kind=r64), | intent(in), | optional | :: | Var4 | ||
real(kind=r64), | intent(in), | optional | :: | Var5 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64) | :: | XX | ||||
real(kind=r64) | :: | YY | ||||
real(kind=r64), | DIMENSION(:) | :: | X | |||
real(kind=r64), | DIMENSION(:) | :: | Y | |||
real(kind=r64), | DIMENSION(:,:) | :: | Z | |||
integer | :: | NX | ||||
integer | :: | NY | ||||
integer | :: | M | ||||
integer | :: | IEXTX | ||||
integer | :: | IEXTY |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex | |||
real(kind=r64), | intent(in) | :: | Var1 | |||
real(kind=r64), | intent(in), | optional | :: | Var2 | ||
real(kind=r64), | intent(in), | optional | :: | Var3 | ||
real(kind=r64), | intent(in), | optional | :: | Var4 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex | |||
real(kind=r64), | intent(in) | :: | Var1 | |||
real(kind=r64), | intent(in), | optional | :: | Var2 | ||
real(kind=r64), | intent(in), | optional | :: | Var3 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex | |||
real(kind=r64), | intent(in) | :: | Var1 | |||
real(kind=r64), | intent(in), | optional | :: | Var2 | ||
real(kind=r64), | intent(in), | optional | :: | Var3 | ||
real(kind=r64), | intent(in), | optional | :: | Var4 | ||
real(kind=r64), | intent(in), | optional | :: | Var5 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=MaxNameLength), | intent(in) | :: | InInputType |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=MaxNameLength), | intent(in) | :: | InOutputType |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | CurveName |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | alph | |||
logical, | intent(inout) | :: | errFlag | |||
character(len=*), | intent(in) | :: | ObjName |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | PressureCurveIndex | |||
real(kind=r64), | intent(in) | :: | MassFlow | |||
real(kind=r64), | intent(in) | :: | Density | |||
real(kind=r64), | intent(in) | :: | Viscosity |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | ReynoldsNumber | |||
real(kind=r64), | intent(in) | :: | RoughnessRatio |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveNum | |||
character(len=MaxNameLength) | :: | CurrentModuleObject | ||||
logical, | intent(in) | :: | ReadFromFile | |||
character(len=MaxNameLength) | :: | FileName | ||||
character(len=MaxNameLength), | DIMENSION(:) | :: | Alphas | |||
real(kind=r64), | DIMENSION(:) | :: | Numbers | |||
integer, | intent(in) | :: | NumNumbers | |||
logical, | intent(inout) | :: | ErrorsFound |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer | :: | CurveNum | ||||
character(len=MaxNameLength) | :: | TableType | ||||
character(len=MaxNameLength) | :: | CurveName | ||||
real(kind=R64), | DIMENSION(:) | :: | RawDataX | |||
real(kind=R64), | DIMENSION(:) | :: | RawDataY | |||
real(kind=R64), | optional | DIMENSION(:) | :: | RawDataX2 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | DataPoint | |||
real(kind=r64), | DIMENSION(:) | :: | FunctionArray | |||
real(kind=r64), | DIMENSION(:) | :: | Ordinate | |||
integer, | intent(in) | :: | ISPT | |||
integer, | intent(in) | :: | IEPT | |||
real(kind=r64), | intent(out) | :: | ALAG |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex | |||
real(kind=r64), | intent(out) | :: | Var1Min | |||
real(kind=r64), | intent(out) | :: | Var1Max | |||
real(kind=r64), | intent(out), | optional | :: | Var2Min | ||
real(kind=r64), | intent(out), | optional | :: | Var2Max | ||
real(kind=r64), | intent(out), | optional | :: | Var3Min | ||
real(kind=r64), | intent(out), | optional | :: | Var3Max |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | CurveIndex | |||
logical, | intent(inout) | :: | ErrorsFound | |||
real(kind=r64), | intent(in), | optional | :: | CurveMin | ||
real(kind=r64), | intent(in), | optional | :: | CurveMax |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | PressureCurveName | |||
integer, | intent(inout) | :: | PressureCurveType | |||
integer, | intent(inout) | :: | PressureCurveIndex |