summaryrefslogtreecommitdiff
path: root/3511/CH9/EX9.10/Ex9_10.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3511/CH9/EX9.10/Ex9_10.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3511/CH9/EX9.10/Ex9_10.sce')
-rw-r--r--3511/CH9/EX9.10/Ex9_10.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3511/CH9/EX9.10/Ex9_10.sce b/3511/CH9/EX9.10/Ex9_10.sce
new file mode 100644
index 000000000..0465b841b
--- /dev/null
+++ b/3511/CH9/EX9.10/Ex9_10.sce
@@ -0,0 +1,22 @@
+clc;
+u=250; // Mean blade speed in m/s
+rp=1.3; // Pressure ratio
+ca=200; // Axial velocity in m/s
+p01=1; // Inlet pressure in bar
+T01=300; // Inlet temperature in kelvin
+R1=0.5; // Degree of reaction
+Cp=1.005; // Specific heat in KJ/kg K
+r=1.4; // Specific heat ratio
+R=287; // Characteristic gas constant in J/kg K
+
+Del_T=(rp^((r-1)/r)-1)*T01;
+//tan_beta1+tan_beta2=(R*2*u/ca);
+//tan_beta1-tan_beta2=(Del_T*Cp*10^3/(u*ca));
+A=[1 1;1 -1]; B=[(R1*2*u/ca) ;(Del_T*Cp*10^3/(u*ca))];
+tan_beta=A\B;
+beta_1=atand (tan_beta(1));
+beta_2=atand (tan_beta(2));
+alpha_1=beta_2; alpha_2=beta_1;
+
+disp ("degree",beta_2,"beta2 = ","degree",beta_1,"beta1 = ");
+disp ("degree",alpha_2,"alpha2 = ","degree",alpha_1,"alpha1 = ");