partial model PartialElectric "Base class for test model of chiller electric EIR" package Medium1 = Buildings.Media.Water "Medium model"; package Medium2 = Buildings.Media.Water "Medium model"; parameter Modelica.SIunits.Power P_nominal "Nominal compressor power (at y=1)"; parameter Modelica.SIunits.TemperatureDifference dTEva_nominal=10 "Temperature difference evaporator inlet-outlet"; parameter Modelica.SIunits.TemperatureDifference dTCon_nominal=10 "Temperature difference condenser outlet-inlet"; parameter Real COPc_nominal = 3 "Chiller COP"; parameter Modelica.SIunits.MassFlowRate mEva_flow_nominal "Nominal mass flow rate at evaporator"; parameter Modelica.SIunits.MassFlowRate mCon_flow_nominal "Nominal mass flow rate at condenser"; Buildings.Fluid.Sources.MassFlowSource_T sou1( redeclare package Medium = Medium1, use_T_in=true, m_flow=mCon_flow_nominal, T=298.15); Buildings.Fluid.Sources.MassFlowSource_T sou2( redeclare package Medium = Medium2, use_T_in=true, m_flow=mEva_flow_nominal, T=291.15); Buildings.Fluid.Sources.FixedBoundary sin1( redeclare package Medium = Medium1, nPorts=1); Buildings.Fluid.Sources.FixedBoundary sin2( redeclare package Medium = Medium2, nPorts=1); Modelica.Blocks.Sources.Ramp TSet( duration=3600, startTime=3*3600, offset=273.15 + 10, height=8) "Set point for leaving chilled water temperature"; Modelica.Blocks.Sources.Ramp TCon_in( height=10, offset=273.15 + 20, duration=3600, startTime=2*3600) "Condenser inlet temperature"; Modelica.Blocks.Sources.Ramp TEva_in( offset=273.15 + 15, height=5, startTime=3600, duration=3600) "Evaporator inlet temperature"; Modelica.Blocks.Sources.Pulse pulse(period=3600/2); Modelica.Blocks.Logical.GreaterThreshold greaterThreshold(threshold=0.5); Buildings.Fluid.FixedResistances.FixedResistanceDpM res1( redeclare package Medium = Medium1, m_flow_nominal=mCon_flow_nominal, dp_nominal=6000) "Flow resistance"; Buildings.Fluid.FixedResistances.FixedResistanceDpM res2( dp_nominal=6000, redeclare package Medium = Medium2, m_flow_nominal=mEva_flow_nominal) "Flow resistance"; equation connect(TCon_in.y, sou1.T_in); connect(TEva_in.y, sou2.T_in); connect(greaterThreshold.u, pulse.y); connect(res1.port_b, sin1.ports[1]); connect(res2.port_b, sin2.ports[1]); end PartialElectric;