最佳中间温度确定

《最佳中间温度确定》由会员分享，可在线阅读，更多相关《最佳中间温度确定（2页珍藏版）》请在装配图网上搜索。

1、clcclear allt0=-33+273.15;tk=31.5+273.15;t1=t0+5;%蒸发器出口温度tr=t0+30;%蒸汽回热后温度p0=refpropm(P,T,t0,Q,1,R125,R143a,0.5,0.5);pk=refpropm(P,T,tk,Q,1,R125,R143a,0.5,0.5);pm=(p0*pk)”0.5;tm=refpropm(T,P,pm,Q,1,R125,R143a,0.5,0.5);i=1;for ta=tm-5:0.1:tm+10pm=refpropm(P,T,ta,Q,1,R125,R143a,0.5,0.5);h11=refpropm(H

2、,T,tr,P,p0,R125,R143a,0.5,0.5);h1=refpropm(H,T,t1,P,p0,R125,R143a,0.5,0.5);h41=refpropm(H,T,ta+6,P,pk,R125,R143a,0.5,0.5);h4=h41-(h11-h1);q0=h1-h4;qmd=388516/q0;h3=refpropm(H,P,pm,Q,1,R125,R143a,0.5,0.5);h9=refpropm(H,T,tk,Q,0,R125,R143a,0.5,0.5);qmg=qmd*(h3-h41)/(h3-h9);s11=refpropm(S,P,p0,H,h11,R1

3、25,R143a,0.5,0.5);s2=s11;h2=refpropm(H,P,pm,S,s2,R125,R143a,0.5,0.5);h6=qmd*(h2-h3)/qmg+h3;s6=refpropm(S,P,pm,H,h6,R125,R143a,0.5,0.5);s7=s6;h7=refpropm(H,P,pk,S,s7,R125,R143a,0.5,0.5);a=(h3-h41)/(h3-h9)*(h7-h6)+h2-h11;epr(i)=(h1-h4)/a;t(i)=ta-273.15;i=i+1;endplot(t,epr,b)title(制冷系数随中间温度变化示意图);xlabel(中间温度 tm/(circC);ylabel(制冷系数epsilon);2卿IIIIrZ.985-fi06