blob: b8a9efb1a81c26f7df00b1283ee2a082fcc6a9d2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
// Implementation of example 6.1
// Basic and Applied Thermodynamics by P.K.Nag
clc
clear
// T1 & T2 are source & sink temperatures respectively
// n is efficiency of engine & W is work done
t1=800
t2=30
T1=t1+273; // K
T2=t2+273 // K
W=1 // kW
Nmax=1-(T2/T1);
Q1=W/Nmax;
Q2=Q1-W;
printf("least rate of heat rejection = %.3f kW",Q2);
// end
|
