blob: 714a0776e782c0a97ae936d1222661bd1b4e2784 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
// Exa 3.7
clc;
clear;
close;
// Given data
W = 89.947;// in kJ
T1 = 240;// in degree C
T1=T1+273;// in K
T2 = 115;// in degree C
T2=T2+273;// in K
C_v = W/(T1-T2);// in kJ/kg-K
disp(C_v,"The value of Cv in kJ/kg-K is");
V1 = 1;// in m^3 (assumed)
V2 = 2*V1;// in m^3
// (T1/T2) = (V2/V1)^(Gamma - 1)
Gamma=log10(T1/T2)/log10(V2/V1)+1;
Gamma = 1.4;
C_p = Gamma * C_v;// in kJ/kg-K
disp(C_p,"The value Cp in kJ/kg-K is");
|
