T_0L=-40
T_k1=0
Q_0L=50
{T_kH=35}
T_h=5
U_L=0.8
U_H=0.8
T_1=T_0L
P_1=pressure(CarbonDioxide,T=T_1,x=1)
H_1=enthalpy(CarbonDioxide,T=T_1,x=1)
S_1=entropy(YHx=1)
T_4=T_k1
P_4=pressure(CarbonDioxide,T=T_k1,x=0)
H_4=enthalpy(CarbonDioxide,T=T_k1,x=0)
S_4=entropy(CarbonDioxide,T=T_k1,x=0)
V_4=volume(CarbonDioxide,T=T_k1,x=0)
S_2=S_1
P_2=P_4
T_2=temperature(CarbonDioxide,s=S_1,P=P_4)
H_2=enthalpy(CarbonDioxide,s=S_1,P=P_4)
V_2=volume(CarbonDioxide,s=S_1,P=P_4)
P_5=P_1
H_5=H_4
T_5=temperature(CarbonDioxide,H=H_4,P=P_1)
S_5=entropy(CarbonDioxide,H=H_4,P=P_1)
V_5=volume(CarbonDioxide,H=H_4,P=P_1)
m_L=Q_0L/(h_1-h_5)
Q_KL=Q_0L*(h_2-h_4)/(h_1-h_5)
W_L=m_L*(h_2-h_1)/U_L
COP_L=Q_0L/W_L
m_H=Q_kL/(h_6-h_10)
W_H=m_H*(h_7-h_6)/U_H
COP_H=Q_kL/W_H
W=W_H+W_L
COP=Q_0L/W
T_6=T_4-T_h
P_6=pressure(R404A,T=T_6,x=1)
H_6=enthalpy(R404A,T=T_6,x=1)
S_6=entropy(R404A,T=T_6,x=1)
V_6=volume(R404A,T=T_6,x=1)
T_9=T_kH
P_9=pressure(R404A,T=T_kH,x=0)
H_9=enthalpy(R404A,T=T_kH,x=0)
S_9=entropy(R404A,T=T_kH,x=0)
V_9=volume(R404A,T=T_kH,x=0)
S_7=S_6
P_7=P_9
T_7=temperature(R404A,s=S_6,P=P_9)
H_7=enthalpy(R404A,s=S_6,P=P_9)
V_7=volume(R404A,s=S_6,P=P_9)
P_10=P_6
H_10=H_9
T_10=temperature(R404A,H=H_9,P=P_6)
S_10=entropy(R404A,H=H_9,P=P_6)
V_10=volume(R404A,H=H_9,P=P_6)
T_k1=0
Q_0L=50
{T_kH=35}
T_h=5
U_L=0.8
U_H=0.8
T_1=T_0L
P_1=pressure(CarbonDioxide,T=T_1,x=1)
H_1=enthalpy(CarbonDioxide,T=T_1,x=1)
S_1=entropy(YHx=1)
T_4=T_k1
P_4=pressure(CarbonDioxide,T=T_k1,x=0)
H_4=enthalpy(CarbonDioxide,T=T_k1,x=0)
S_4=entropy(CarbonDioxide,T=T_k1,x=0)
V_4=volume(CarbonDioxide,T=T_k1,x=0)
S_2=S_1
P_2=P_4
T_2=temperature(CarbonDioxide,s=S_1,P=P_4)
H_2=enthalpy(CarbonDioxide,s=S_1,P=P_4)
V_2=volume(CarbonDioxide,s=S_1,P=P_4)
P_5=P_1
H_5=H_4
T_5=temperature(CarbonDioxide,H=H_4,P=P_1)
S_5=entropy(CarbonDioxide,H=H_4,P=P_1)
V_5=volume(CarbonDioxide,H=H_4,P=P_1)
m_L=Q_0L/(h_1-h_5)
Q_KL=Q_0L*(h_2-h_4)/(h_1-h_5)
W_L=m_L*(h_2-h_1)/U_L
COP_L=Q_0L/W_L
m_H=Q_kL/(h_6-h_10)
W_H=m_H*(h_7-h_6)/U_H
COP_H=Q_kL/W_H
W=W_H+W_L
COP=Q_0L/W
T_6=T_4-T_h
P_6=pressure(R404A,T=T_6,x=1)
H_6=enthalpy(R404A,T=T_6,x=1)
S_6=entropy(R404A,T=T_6,x=1)
V_6=volume(R404A,T=T_6,x=1)
T_9=T_kH
P_9=pressure(R404A,T=T_kH,x=0)
H_9=enthalpy(R404A,T=T_kH,x=0)
S_9=entropy(R404A,T=T_kH,x=0)
V_9=volume(R404A,T=T_kH,x=0)
S_7=S_6
P_7=P_9
T_7=temperature(R404A,s=S_6,P=P_9)
H_7=enthalpy(R404A,s=S_6,P=P_9)
V_7=volume(R404A,s=S_6,P=P_9)
P_10=P_6
H_10=H_9
T_10=temperature(R404A,H=H_9,P=P_6)
S_10=entropy(R404A,H=H_9,P=P_6)
V_10=volume(R404A,H=H_9,P=P_6)