blob: 46a79b548ad450738c60c72d5765c9f1cc431dd4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
clc
clear
//input data
To1=473 //Total stagnation temperature at inlet in K
To2=673 //Stagnation exit temperation in K
M1=0.5 //Mach number at entry
//calculation
t1=0.6914 //Stagnation temperature ratio at critical state from gas tables (Rayleigh,k=1.4,M1)
p1=1.7778 //Static pressure ratio at critical state from gas tables (Rayleigh,k=1.4,M1)
t2=(To2/To1)*t1 //Stagnation temperature ratio at exit
M2=0.867 //Mach number at exit from gas tables (Rayleigh,t2,k=1.4)
p2=1.16 //Static pressure ratio at exit from gas tables (Rayleigh,k=1.4,M2)
p=p2/p1 //ratio of static pressures at oulet and inlet
PL=(1-p)*100 //pressure loss in %
//output
printf('(A)Mach number is %3.3f\n (B)Percentage drop in pressure is %3.1f percent',M2,PL)
|