冷凝器设计_冷凝器的设计

冷凝器设计由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“冷凝器的设计”。

空气调节用制冷技术

一、计算题目

已知制冷量为60kW的R22制冷系统，蒸发温度t0=2℃；冷却水进口温度t132C；传热管采用紫铜肋管，f384W/(mK)，d013.124mm，di11.11mm，肋片外径df15.8mm，肋片厚度t0.232mm，00.368mm，平均肋片厚度f0.3mm，肋片节距e1.025mm；试设计一台卧式壳管冷凝器。

二．计算流程框图

三、计算源程序

#include #include #define pi 3.141592653 //确定值 double

p0=60000,t0=2,t1=32,xf=384，d0=13.124e-3,di=11.11e-3,df=15.8e-3，st=0.232e-3,s0=0.368e-3,sf=0.3e-3，e=1.025e-3,cp=4.2, f=1000;

//假设值 double tw=5,//制冷量 //蒸发温度 //冷却水进口温度 //肋管导热系数 //肋管外径 //肋管内径 //肋片外径 //肋片顶部厚度 //肋片底部厚度 //肋片平均厚度 //肋片节距 //水的质量热容 //水密度

//假设的进出口温差 tk=t1+10,//一般tk-t1=7~14,取10 g=1.22, //由t0与tk查图4-15得

q0=1000,//假设的热流密度

v=2.5,//管内水流速度

n=2，//流程数

b=1430+11*(t1+t1+tw),//水的物性系数

//由tk查物性表

x1=0.062,//冷凝液的导热系数，f1=1243，//冷凝液的密度

r1=128.58e3, //制冷剂的比潜热

u1=0.239e-3，//冷凝液的动力黏度

b1=x1*x1*x1*f1*f1*9.8*r1/u1，//制冷剂的物性系数

Rfou=0.000086;//污垢热阻

void main(){

//1.计算肋管特性参数

double

Ap=(pi*d0*(e-s0)+pi*df*st)/e, //肋管水平部分面积

Af=pi*(df*df-d0*d0)/2/e, //肋管垂直部分面积

Ai=pi*di,//肋管表面积

A=Ap+Af,//肋管总表面积 t=A/Ai，//肋化系数 He=pi*(df*df-d0*d0)/4/df, //肋片当量高度 A1=pi*(d0+di)/2;

//基管平均表面积

//2.确定冷却水出口温度t2 double t2=t1+tw;//3.求冷凝器热负荷 double pk=g*p0;//4.计算平均传热温差

double tm=(t2-t1)/log((tk-t1)/(tk-t2));//5.求冷却水的流量

double Mw=pk/(cp*tw*1000);//6.计算热流密度 double q1,i=1,m;for(;i>0.05;q0=q1){ //概算传热面积

double Ac0=pk/q0;//每流程肋管数

m=Mw/(pi*di*di*f*v/4);m=ceil(m);//管束总长 double L=Ac0/(A*m);

//肋管有效长度 double l=L/n;//肋管总根数 double N=n*m;//水侧换热系数

double aw=b*pow(v,0.8)/pow(di,0.2);//水平光管外冷凝换热系数，公式4-1 double ac=0.65*pow(b1/q0/d0,1/3.0);//公式4-4 double

m1=sqrt(2*ac/xf/sf), l1=(df-d0)/2*(1+0.805*log(df/d0)/log(10));//肋片效率

double nf=tanh(m1*l1)/(m1*l1);//肋片修正系数

double ef=(1.3*pow(nf,0.75)*Af/A*pow(d0/He,0.25)+Ap/A);//水平肋管外冷凝换热系数 double acf=ef*ac;//水平肋管束外冷凝换热系数 double acfz=pow(0.6*sqrt(N),-1/6.0)*acf;//传热系数

double Kc=1/(1/acfz+0.001*A/A1/xf+(Rfou+1/aw)*A/Ai);

//实际热流密度

q1=Kc*tm;

i=(q1-q0)/q1;

if(i

double Ac=pk/q1;//8.肋管有效长度

double l1=Ac/(A*m*n);cout

四、程序运行结果