Version_4_0

Version 4.0 (June 7, 2022)
ThermoSysPro modifications from version 3.2

New package ThermoSysPro.Fluid

o   Package utilizes new fluid connectors that can handle all fluids in package ThermoSysPro.Properties.
o   Package handles thermal diffusion as a new option.
o   Package replaces packages ThermoSysPro.Combustion, ThermoSysPro.FlueGases, ThermoSysPro.MultiFluids, ThermoSysPro.WaterSolution and ThermoSysPro.WaterSteam.

Component ThermoSysPro.WaterSteam.HeatExchangers.DynamicWaterWaterExchanger

o   Equation DPc[i] = p_KcThermoSysPro.Functions.ThermoSquare(Qc[i], 1.e-3)/rhoc[i];  is replaced by  DPc[i] = p_KcQc[i]^2/rhoc[i];
o   Equation DPf[i] = p_KfThermoSysPro.Functions.ThermoSquare(Qf[i], 1.e-3)/rhof[i];  is replaced by  DPf[i] = p_KfQf[i]^2/rhof[i];

Component ThermoSysPro.WaterSteam.HeatExchangers.StaticWaterWaterExchanger

o   Equation DPc = p_KcThermoSysPro.Functions.ThermoSquare(Qc, 1.e-3)/rhoc;  is replaced by  DPc = p_KcQc^2/rhoc;
o   Equation DPf = p_KfThermoSysPro.Functions.ThermoSquare(Qf, 1.e-3)/rhof;  is replaced by  DPf = p_KfQf^2/rhof;

Component ThermoSysPro.Fluid.Machines.Generator_11

o   Component is duplicated in package ThermoSysPro.ElectroMechanics.Machines for package Fluid

Component ThermoSysPro.Thermal.HeatTransfer.HeatExchangerWall

o   New option: dynamic_energy_balance

Package ThermoSysPro.Units

o   New package: SI that duplicates package Modelica.SIunits
o   New package: nonSI
o   New package: xSI

All components in package ThermoSysPro

o   ThermoSysPro.Units.xSI.DifferentialTemperature is replaced by ThermoSysPro.Units.SI.TemperatureDifference
o   ThermoSysPro.Units.xSI.DifferentialPressure is replaced by ThermoSysPro.Units.SI.PressureDifference
o   ThermoSysPro.Units.xSI.MassFraction is replaced by ThermoSysPro.Units.SI.MassFraction
o   All references to Modelica.SIunits are replaced by references to ThermoSysPro.Units

Component ThermoSysPro.Solar.Collectors.FresnelField

o   New parameter: Lc
o   New parameter: trackingFactor
o   New parameter: thermalLossPhy
o   Equation KL = cos(pithetaL/180)(1 - htan(pithetaL/180)/L); is replaced by KL = cos(pithetaL/180)(1 - htan(pithetaL/180)/Lc);
o   Equation dQloss[i] = piDL/Ns*(0.5F12Emi5.67e-8(T[i]^4 - (0.0552T0^(1.5))^4) + hc(T[i] - T0)); is replaced by dQloss[i] = if thermalLossPhy then piDL/Ns*(0.5F12Emi5.67e-8(T[i]^4 - (0.0552T0^(1.5))^4) + hc(T[i] - T0)) else L/Ns*(A1deltaT[i] + A2deltaT[i]^2);