summaryrefslogtreecommitdiff
path: root/3831/CH16/EX16.5/Ex16_5.sce
blob: 4f5044cec9dda28d39a582a2fe44f1a292a2bcc5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
// Example 16_5
clc;funcprot(0);
// Given data
T=-20.0+273.15;// K
p=0.500;// atm
M=0.850;// The Mach number
k=1.40;// The specific heat ratio
R=286;// J/kg.K
g_c=1;// The gravitational constant

// Solution
V=M*sqrt(k*g_c*R*T);// m/s
T_os=T*(1+(((k-1)*M^2)/2));// K
T_os=T_os-273.15;// °C
p_os=p*(1+(((k-1)*M^2)/2))^(k/(k-1));// atm
p_os=p_os*1.013*10^2;// kPa
printf("\nThe aircraft’s velocity,V=%3.0f m/s \nThe isentropic stagnation temperature,T_os=%2.1f°C \nThe isentropic stagnation pressure,p_os=%2.1f KPa",V,T_os,p_os);