概述
clc;
clear;
D=4;
D0 = 0.012;
qm = 0.06;
I = 380;
G = 810;
Tfi = 323;
Ta = 285;
V = 4.2;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
if D>70
D=70;
else
D=D;
end
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
M = 0.85;%透过率τ
N = 0.9; %吸收率α
L = 2.3*10^(-3); %厚度L
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
K = M*N/(1-(1-M)*0.16)+0.27*(1-(exp(1))^(-4*L)) ; %2-8A
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
A = 5.67*10^(-8); %σ
B = 0.1; %ε_p吸热板发射率
C = 0.9; %ε_c盖板发射率
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%假设Tp
Tpp=70+273;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
hw=5.7+3.8*V; %
f=(1+0.0892*hw-0.1166*hw*B)*(1+0.07866); %
c=520*(1-0.000051*D^2); %用D表示倾斜角度β
Z = 0.43*(1-Tpp); %e=0.43(1-100?T_p )%
Ut=(1/(c/Tpp*((Tpp-Ta)/(1+f))^Z)+1/hw)^(-1)+A*(Tpp+Ta)*(Tpp^2+Ta^2)/((B+0.00591*hw)^(-1)+(1+f+0.133*B)/C-1);
%公式2-39 A=5.67*10^(-8) B=0.1 %吸热版发射功率 C= %盖板发射率
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
E= 0.04 ;% λ_(p-b),λ_(p-e)隔热层导热系数
H= 25*10^(-3) ;%L_(p-b)底部厚度
J= 25*10^(-3) ;% L_(p-e) 侧壁厚度
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ub=1/(H/E+1/(5.7+3.8*V)) ;
%2-43a
Ue=1/(J/E+1/(5.7+3.8*V)) ;
%2-43b E= 0.04 ;%隔热层导热系数 H= 25*10^(-3) ;%地步厚度 J= 25*10^(-3) ;%侧壁厚度
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ae = 0.5; %侧壁面积 A_e
At = 1.82; %采光面积 A_t
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ul=Ut+Ub+Ae/At*Ue ; %2-14A_t采光面积;A_e侧面面积;V环境风速
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
tp=70;
ta=12;
Cp=4.185*10^3 ;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ql = At*Ul*(tp-ta); %2-3 Ql
Qu = At*G*K-At*Ul*(tp-ta); %2-4 Qu
Tf = Qu/(2*Cp*qm)+Tfi ; %2-61c
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
W = 135*10^(-3); %翅片宽度 W
Di = 10*10^(-3); %内径D_i
O=1000;%水的密度
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ww =qm/((pi*Di^2/4)*O*floor(1/W)) ; %2-51
tf=Tf-273;
hi =(1430+23.3*tf^2)*Ww^0.8*Di^(-0.2); %2-50
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
W = 135*10^(-3); %翅片宽度 W
I = 380 ; %导热系数λ_p
J = 0.35*10^(-3) ; %翅片厚度 δ
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
m=sqrt(Ul/(I*J)) ; %2-49 I J
F=tanh(m*(W-D0)/2)/(m*(W-D0)/2) ; %2-48
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
a=2.5*10^(-3);%焊缝宽度
b=0.3*10^(-3);%焊缝高度
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Cb=I*a/b;
Ff = 1/Ul/(W*(1/(Ul*((W-D0)*F+D0)))+1/Cb+1/(hi*Di*pi)); %2-46
Fr = qm*Cp/(At*Ul)*(1-exp(-At*Ul*Ff/(qm*Cp))); %2-54
Tp = Tfi+(Qu/(At*Fr*Ul))*(1-Fr) ; %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%if abs(Tp-Tp')<10^(-5)I=Fr*(K-Ul*(Tfi-Ta)/G) %η=F_R [(τα)_e-U_L (T_fi-T_a)/G]elseTpp = Tp;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
if abs(Tp-Tpp)<10^(-5)
S = Fr*(K-Ul*(Tfi-Ta)/G) ;
else
while abs(Tp-Tpp)>10^(-5)
hw = 5.7+3.8*V; %
f=(1+0.0892*hw-0.1166*hw*B)*(1+0.07866); %
c=520*(1-0.000051*D^2); %用D表示倾斜角度β
Z = 0.43*(1-Tp); %e=0.43(1-100?T_p )%
Ut=(1/(c/Tp*((Tp-Ta)/(1+f))^Z)+1/hw)^(-1)+A*(Tp+Ta)*(Tp^2+Ta^2)/((B+0.00591*hw)^(-1)+(1+f+0.133*B)/C-1);
%公式2-39 A=5.67*10^(-8) B=0.1 %吸热版发射功率 C= %盖板发射率
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
E= 0.04 ;% λ_(p-b),λ_(p-e)隔热层导热系数
H= 25*10^(-3) ;%L_(p-b)底部厚度
J= 25*10^(-3) ;% L_(p-e) 侧壁厚度
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ub=1/(H/E+1/(5.7+3.8*V)) ;
%2-43a
Ue=1/(J/E+1/(5.7+3.8*V)) ;
%2-43b E= 0.04 ;%隔热层导热系数 H= 25*10^(-3) ;%地步厚度 J= 25*10^(-3) ;%侧壁厚度
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ae = 0.5; %侧壁面积 A_e
At = 1.82; %采光面积 A_t
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ul=Ut+Ub+Ae/At*Ue ; %2-14A_t采光面积;A_e侧面面积;V环境风速
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
tp=70;
ta=12;
Cp=4.185*10^3 ;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ql = At*Ul*(tp-ta); %2-3 Ql
Qu = At*G*K-At*Ul*(tp-ta); %2-4 Qu
Tf = Qu/(2*Cp*qm)+Tfi ; %2-61c
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
W = 135*10^(-3); %翅片宽度 W
Di = 10*10^(-3); %内径D_i
O=1000;%水的密度
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Ww =qm/((pi*Di^2/4)*O*floor(1/W)) ; %2-51
tf=Tf-273;
hi =(1430+23.3*tf^2)*Ww^0.8*Di^(-0.2); %2-50
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
W = 135*10^(-3); %翅片宽度 W
I = 380 ; %导热系数λ_p
J = 0.35*10^(-3) ; %翅片厚度 δ
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
m=sqrt(Ul/(I*J)) ; %2-49 I J
F=tanh(m*(W-D0)/2)/(m*(W-D0)/2) ; %2-48
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
a=2.5*10^(-3);%焊缝宽度
b=0.3*10^(-3);%焊缝高度
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Cb=I*a/b;
Ff = 1/Ul/(W*(1/(Ul*((W-D0)*F+D0)))+1/Cb+1/(hi*Di*pi)); %2-46
Fr = qm*Cp/(At*Ul)*(1-exp(-At*Ul*Ff/(qm*Cp))); %2-54
Tp = Tfi+(Qu/(At*Fr*Ul))*(1-Fr) ; %
end
end
S = Fr*(K-Ul*(Tfi-Ta)/G)
最后
以上就是负责衬衫为你收集整理的matlab怎么实现循环,matlab怎么实现直到型循环的全部内容,希望文章能够帮你解决matlab怎么实现循环,matlab怎么实现直到型循环所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错,欢迎将靠谱客网站推荐给程序员好友。
发表评论 取消回复