Page 569 - Design and Operation of Heat Exchangers and their Networks

552 Appendix

tcE_in = zeros(6, 1);
tcE_out = zeros(6, 1);
dtE = zeros(6, 1);
kE = zeros(6, 1);

kE(1) =1/(1 / alpha(1) + 1 / alpha(3));
kE(2) =1/(1 / alpha(1) + 1 / alpha(3));
kE(3) =1/(1 / alpha(2) + 1 / alpha(3));
kE(4) =1/(1 / alpha(2) + 1 / alpha(4));
kE(5) =1/(1 / alpha(3) + 1 / alpha(5));
kE(6) =1/(1 / alpha(1) + 1 / alpha(6));

QE(1) = C_h(1) ∗ (th_in(1) - t_h_pinch);
QE(4) = C_c(2) ∗ (tc_out(2) - tc_in(2));
QE(3) = C_h(2) ∗ (th_in(2) - th_out(2)) - QE(4);
QE(2) = C_c(1) ∗ (t_h_pinch - dtm - tc_in(1)) - QE(3);

ChE(1) = C_h(1);
ChE(2) = C_h(1);
ChE(4) = QE(4) / (th_in(2) - th_out(2));
ChE(3) = C_h(2) - ChE(4);

CcE(1) = C_c(1);
CcE(2) = QE(2) / (t_h_pinch - dtm - tc_in(1));
CcE(3) = C_c(1) - CcE(2);
CcE(4) = C_c(2);

thE_in(1) = th_in(1);
thE_out(1) = thE_in(1) - QE(1) / ChE(1);
thE_in(2) = thE_out(1);
thE_out(2) = thE_in(2) - QE(2) / ChE(2);
thE_in(3) = th_in(2);
thE_out(3) = thE_in(3) - QE(3) / ChE(3);
thE_in(4) = th_in(2);
thE_out(4) = thE_in(4) - QE(4) / ChE(4);
tcE_in(4) = tc_in(2);
tcE_out(4) = tcE_in(4) + QE(4) / CcE(4);
tcE_in(3) = tc_in(1);
tcE_out(3) = tcE_in(3) + QE(3) / CcE(3);
tcE_in(2) = tc_in(1);