Жидкаяфаза (Liquid phase)

1 2 3 4 5

function VLiqTP (T, P: Double; VGuess: Double = -1): Double;

Возвращает температуру как функцию энтальпии и удельного объема.

· Input: Энтальпия [Дж/кг], удельный объем [м³/кг], необязательно догадываться о том, VGuess [м³/кг].

· Output: Температура [K].

procedure TVLiqSP (S, P: Double; var T, V: Double; TGuess: Double = -1;

VGuess:Double = -1);

Возвращает температуру и объем как функцию энтропии и давления.

· Input: Энтропия [Дж/(кг K)], давление [Па], опциональное предположение температуры, TGuess [K], опциональное предположение объема, VGuess [м³/кг].

· Output: Температура [K], удельный объем [м³/кг].

7.5 Двефазы(Two-phase)

procedure TXPH (P,H: Double; varT,X: Double; TGuess: Double = -1);

Возвращает температуру и качество, как функция давления и энтальпии.

· Input: Давление [Па], удельная Энтальпия [Дж/кг], необязательно догадываться о температуре, TGuess [K].

· Output: Температура [K], Качество [-].

procedure TXPS (P, S: Double; var T, X: Double; TGuess: Double = -1);

Возвращает температуру и качество, как функция давления и энтропии.

· Input: Давление [Па], энтропия [Дж/(кг K)], необязательно догадываться о температуре, TGuess [K].

· Output: Температура [K], Качество [-].

procedure PXTH (T,H: Double; varP,X: Double);

Возвращает давление и качество в зависимости от температуры и энтальпии.

· Input: Температура [K] Энтальпия [Дж/кг].

· Output: Давление [Па], Качество [-].

function XTP (T,P: Double): Double;

Возвращает качество в зависимости от температуры и давления.

· Input: Температура [K], давление [Pa].

· Output: Качество [-].

Примечание: Эта функция реализована только для смесей, за исключением R410B и R406A.

FunctionHPX (P,X: Double; HGuess: Double = -1): Double;

Возвращает энтальпию как функцию давления и качества.

· Input: Давление [Па], Качество [-], опциональное предположение по энтальпии, HGuess [Дж/кг].

· Output: Энтальпия [Дж/кг].

function SPX (P,X: Double; SGuess: Double = -1): Double;

Возвращает энтропию как функцию давления и качества.

· Input: Давление [Па], Качество [-], необязательно гадать на энтропии, SGuess [Дж/(кг K)].

· Output: Энтропия [Дж/(кг K)].

functionVPX (P,X: Double; VGuess: Double = -1): Double;

Возвращает определенный объем в зависимости от давления и качества.

· Input: Давление [Па], Качество [-], опциональное предположение по объему, VGuess [м³/кг].

· Output: Удельный объем [м³/кг].

7.6 Общий(General)

Функции в общей категории могут использоваться как в жидкой, так и в газовой фазе, если уравнение состояния для выбранного хладагента поддерживает жидкую фазу. Перед этими уравнениямииспользуется в жидкой фазе, затем проверьте свойство SupportLiq - когда это правда, уравнения могутбыть использовано в жидкостной фазе. Функции не могут использоваться в двухфазной области.

function TVP (V, P: Double; xLiqGas: Byte = 1;

TGuess:Double = -1): Double;

Возвращает температуру как функцию определенного объема и давления.

· Input:Удельный объем [м³/кг], давление [Па], необязательно specifyer фазы, xLiqGas [0,1], необязательно догадываться о температуре, TGuess [K].

· Output: Температура [K].

function THV (H,V: Double; xLiqGas: Byte = 1;

TGuess:Double = -1): Double;

Возвращает температуру как функцию энтальпии и удельного объема.

· Input: Энтальпия [Дж/кг], удельный объем [м³/кг], необязательно specifyer фазы, xLiqGas [0,1], необязательно догадываться о температуре, TGuess [K].

· Output: Температура [K].

function TSV (S,V: Double; xLiqGas: Byte = 1;

TGuess:Double = -1): Double;

Возвращает температуру как функции энтропии и удельного объема.

· Input: Энтропия [Дж/(кг к)], удельный объем [м³/кг], необязательно specifyer фазы, xLiqGas [0,1], необязательно догадываться о температуре, TGuess [K].

· Output: Температура [K].

function PTV (T,V: Double; xLiqGas: Byte = 1): Double;

Возвращает давление как функцию температуры и удельного объема.

· Input: Температура [K], удельный объем [м³/кг], необязательно specifyer фазы, xLiqGas [0,1].

· Output: Давление [Па].

function PHT (H,T: Double; xLiqGas: Byte = 1;

PGuess:Double = -1): Double;

Возвращает давление как функцию энтальпии и температуры.

· Input: Энтальпия [Дж/кг], температура [K], необязательно specifyer фазы, xLiqGas [0,1], необязательно догадываться о давлении, PGuess [Па].

· Output: Давление [Па].

function VTP (T,P: Double; xLiqGas: Byte = 1;

VGuess:Double = -1): Double;

Возвращает определенный объем в зависимости от температуры и давления.

· Input: Температура [K], давление [Па], необязательно specifyer фазы, xLiqGas [0,1], необязательно догадываться о том, VGuess [м³/кг].

· Output: Удельный объем [м³/кг].

function VTS (T,S: Double; xLiqGas: Byte = 1;

VGuess:Double = -1): Double;

Возвращает определенный объем в зависимости от температуры и энтропии.

· Input: Температура [K], энтропия [Дж/(кг K)], необязательно specifyer фазы, xLiqGas [0,1], необязательно догадываться о том, VGuess [м³/кг].

· Output: Удельный объем [м³/кг].

function HTV (T, V: Double; xLiqGas: Byte = 1):Double;

Возвращает энтальпию как функцию температуры и удельного объема.

· Input: Температура [K], удельный объем [м³/кг], необязательно specifyer фазы, xLiqGas [0,1].

· Output: Энтальпия [Дж/кг].

function HTP (T,P: Double; xLiqGas: Byte = 1;

VGuess:Double = -1): Double;Возвращает энтальпию как функцию температуры и давления.

· Output: Энтальпия [Дж/кг].

function STV (T, V: Double; xLiqGas: Byte = 1): Double;

Возвращает энтропию как функцию температуры и удельного объема.

· Input: температура [K], удельный объем [м³/кг], необязательно specifyer фазы, xLiqGas [0,1].

· Output: энтропия [Дж/(кг K)].

function STP (T, P: Double; xLiqGas: Byte = 1;

VGuess:Double = -1): Double;

Возвращает энтропию как функцию температуры и давления.

· Input: температура [K], давление [Па], необязательно specifyer фазы, xLiqGas [0,1], необязательно думать о том, VGuess [м³/кг].

· Output: энтропия [Дж/(кг K)].

procedure TVSP (S, P: Double; varT,V: Double; xLiqGas: Byte = 1;

TGuess:Double = -1; VGuess: Double = -1);

Возвращает температуру и удельный объем как функцию энтропии и давления.

· Input: энтропия [Дж/(кг K)], давления [Па], необязательно specifyer фазы, xLiqGas [0,1], необязательнодумать, о температуре, TGuess [K], необязательно догадываться о том, VGuess [м³/кг].

· Output: температура [K], удельный объем [м³/кг].

procedure TVHP (H,P: Double; varT,V: Double; xLiqGas: Byte = 1;

TGuess:Double = -1; VGuess: Double = -1);

Возвращает температуру и удельный объем как функцию энтальпии и давления.

· Input: Энтальпия [Дж/кг], давление [Па], необязательно specifyer фазы, xLiqGas [0,1], необязательно думаюна температуру, TGuess [K], необязательно догадываться о том, VGuess [м³/кг].

· Output: температура [K], удельный объем [м³/кг].

procedure TVHS (H,S: Double; varT,V: Double; xLiqGas: Byte = 1;

TGuess:Double = -1; VGuess: Double = -1);

Возвращает температуру и удельный объем как функцию энтропии и энтальпии.

· Input: Энтальпия [Дж/кг], энтропия [Дж/(кг K)], необязательно specifyer фазы, xLiqGas [0,1], необязательнодумать, на температуру, TGuess [K], необязательно догадываться о том, VGuess [м³/кг].

· Output: температура [K], удельный объем [м³/кг].

function DSDT (T,V: Double): Double;

Возвращает .

function DSDV (T,V: Double): Double;

Возвращает .

function DPDT (T,V: Double): Double;

Возвращает .

function DPDV (T,V: Double): Double;

Возвращает .

function DHDT (T,V: Double): Double;

Возвращает .

function DHDV (T,V: Double): Double;

Возвращает .

7.7 Разныефункции (Miscellaneous functions)

constructor Init (ARNumber: string);

Конструктор используется при выборе хладагента при создании.

constructor Create;

Конструктор, используемый, когда хладагент, который будет использоваться, не известен при создании, т. е. при программировании userinterfaces, и вы не знаете, какой хладагент будет выбран пользователем.

procedure Assign (ARef:TRefrigerant);

Копирование информации из ARef в вызов хладагента.

Образец:

Var

ARef:TRefrigerant;

BRef:TRefrigerant;

Begin

ARef:=TRefrigerant.Init('R11');

{1) BRef points to ARef - no need to create BRef first}

BRef:=ARef;

{2) BRef is an object by itself, containing the same information as ARef}

BRef:=TRefrigerant.Create;

BRef.Assign(ARef);

ARef.Free;

BRef.Free;

end;

functionGetRNumbers (StrList:TStrings): Integer;

Возвращает ISO-номера всех хладагентов в этот пакет в StrList. Возвращаемое значение функции-количество элементов в StrList. Эту функцию можно вызвать только из Delphi.

Термодинамические и Теплофизические свойства Хладагентов

Образец:

Var

ARef:TRefrigerant;

AList:TStrings;

Begin

ARef:=TRefrigerant.Create;

AList:=TStringList.Create;

ARef.GetRNumbers(AList);

ARef.Free;

AList.Free;

end;

function GetRNumbers (AStr: PChar): Integer;

Возвращает ISO-номера всех хладагентов в этот пакет в AStr. Возвращаемое значение функции-длина AStr (может быть использован для получения необходимой длины AStr, если GetRNumbers называется с AStr = nil). Эту функцию можно также вызвать из Fortran, C и C++.

Образец:

Var

ARef:TRefrigerant;

AStr:PChar;

Len: Integer;

Begin

ARef:=TRefrigerant.Create;

{PChar(nil) is necessary to specify that you want to call GetRNumbers with

aPChar argument, and not a TStrings argument}

Len:=ARef.GetRNumbers(PChar(nil));

GetMem(AStr,Len+1); {Allocate space for the terminating null character}

ARef.GetRNumbers(AStr);

ARef.Free;

FreeMem(AStr,Len+1);

end;

function GetFormulas (StrList: TStrings): Integer;

function GetFormulas (AStr: PChar): Integer;

Возвращает химические формулы всех хладоагентов в этот пакет в StrList или AStr. Увидеть GetRNumbers например.

function GetChemicalNames (StrList: TStrings): Integer;

function GetChemicalNames (AStr: PChar): Integer;

Возвращает химические названия всех хладоагентов в этот пакет в StrList или AStr. Увидеть GetRNumbers например.

function GetFullNames (StrList: TStrings): Integer;

function GetFullNames (AStr: PChar): Integer;

Возвращает “полные” имена всех хладагентов в этот пакет в StrList или AStr. Увидеть GetRNumbers например.

function GetFullNamesSorted (StrList: TStrings): Integer;

function GetFullNamesSorted (AStr: PChar): Integer;

Возвращаетотсортированный “полные” именавсеххладагентоввэтотпакетв StrList или AStr. Если вы сейчас что пункт номер 7 (которая имеет индекс 6) в StrList-Хладагент, который вы хотите использовать, вы можете выбрать хладагента путем установки SortedNumber = 7. Это может быть полезно, если вы программируете в Fortran, C или C++:

Вы получаете все хладагенты, вызывая GetFullNamesSorted(AStr:PChar). Вы кормите хладагенты в listbox. Когда пользователь выбирает элемент номер 7 в списке выберите хладагент, установив SortedNumber = 7.

См. такжеGetRNumbers.

procedure GetRNumbersByCategory (StrList: TStrings;

SearchCat:TCategorySet; BAnd: Boolean);

Возвращает ISO-номера хладагентов в категории/категории, указанные в SearchCat. Если Группа верно хладагенты (соответствующие стандарту ISO-чисел) будут возвращены в каждой указанной категории, остальные хладагенты будут возвращены в одну из указанных категорий.

Образец:

Var

ARef:TRefrigerant;

AList:TStrings;

Begin

ARef:=TRefrigerant.Create;

AList:=TStringList.Create;

{Returns all refrigerants which are both fluoronated and mixtures}

ARef.GetRNumbersByCategory(AList,[Flouronated,Mixture],True);

ARef.Free;

AList.Free;

end;