blob: 73b8513f947eea90b21e969369bcba587a56907b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
// Example 4_2
clc;funcprot(0);
// Given data
E_fuel=15000;// Btu/min
E_exhaust=500;// Btu/min
W_1=200;// hp
W_2=50;// hp
E_thl=180000;// Top heat loss in Btu/h
E_Bhl=54000;// Bottom heat loss in Btu/h
// Solution
Q=-E_thl-E_Bhl;// The net heat transfer into the system in Btu/h
W=W_1+W_2;// The net work rate out of the system in hp
E_massflow=E_fuel-E_exhaust;// The net mass flow of energy into the system in Btu/min
E_T=(Q/60)-(W*42.4)+E_massflow;// The total energy transport rate in Btu/min
printf('\nThe total energy transport rate,E_T=%1.2f Btu/min',E_T);
|
