压水堆核电厂二回路热力系统课程设计(6)

U2=w2*nm*nge; %高压缸实际发电量

if abs(W2-U2)/W2<0.001 %根据任务书要求其误差小于0.1%时迭代终止，输出结果 H=(X*Hfwo(4)+(Ghes(1)+Ghes(2)+Gsrh1+Gsrh2)*Hw(6)+Gsdea*Hho+Hfw*Gslp*(xz1-xhz)/xhz)/Gfw;

break

else

end

end

end

Qr=(Ds*(Hfh-Hg)+Gd*(Hps-Hg))/n1;

Nepp=Ne/Qr;

Gshp=Gt+Ghes(1)+Ghes(2)+Gsrh1;

disp('核电厂效率')

Nepp

disp('反应堆热功率 MW')

Qr

disp('蒸汽发生器总蒸汽产量 kg/s')

Ds

disp('汽轮机高压缸耗气量 kg/s')

Gshp

disp('汽轮机低压缸耗气量 kg/s')

Gslp

disp('第一级再热器耗气量 kg/s')

Gsrh1

disp('第二级再热器耗气量 kg/s')

Gsrh2

disp('除氧器耗气量 kg/s')

Gsdea

disp('给水泵汽轮机耗气量 kg/s')

Gsfwp

disp('给水泵给水量 kg/s')

Gfw

disp('给水泵扬程 MPa')

Hfwp

disp('第1级高压给水加热器抽汽量kg/s')

Ghes(1)

disp('第2级高压给水加热器抽汽量kg/s')

Ghes(2)

disp('第1级低压给水加热器抽汽量kg/s')

Gles(1)

disp('第2级高压给水加热器抽汽量kg/s')

Gles(2)

disp('第3级高压给水加热器抽汽量kg/s')

Gles(3)