diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /172/CH17/EX17.7/ex7.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '172/CH17/EX17.7/ex7.sce')
| -rwxr-xr-x | 172/CH17/EX17.7/ex7.sce | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/172/CH17/EX17.7/ex7.sce b/172/CH17/EX17.7/ex7.sce new file mode 100755 index 000000000..37ad710db --- /dev/null +++ b/172/CH17/EX17.7/ex7.sce @@ -0,0 +1,31 @@ +//ques7
+//determining exit properties in a control volume
+clear
+clc
+Po=1000;//stagnation pressure in kPa
+To=360;//stagnation temperature in K
+
+//when diverging section acting as nozzle
+Pe1=0.0939*Po;//exit pressure of air in kPa
+Te1=0.5089*To;//exit temperature in K
+k=1.4;//constant
+R=0.287;//gas constant for air
+ce=sqrt(k*R*Te1*1000);//velocity of sound in exit section in m/s
+Me=2.197;//mach number from table
+ve1=Me*ce;//velocity of air at exit section in m/s
+disp(" When diverging section act as a nozzle :-");
+printf('Exit pressure = %.1f kPa \n',Pe1);
+printf('Exit Temperature = %.1f K \n',Te1);
+printf('Exit velocity = %.1f m/s \n',ve1);
+
+//when diverging section act as diffuser
+Me=0.308;
+Pe2=0.0936*Po;//exit pressure of air in kPa
+Te2=0.9812*To;//exit temperature in K
+ce=sqrt(k*R*Te2*1000);//velocity of sound in exit section in m/s
+ve2=Me*ce;
+disp(" When diverging section act as a diffuser :-");
+printf('Exit pressure = %.1f kPa \n',Pe2);
+printf('Exit Temperature = %.1f K \n',Te2);
+printf('Exit velocity = %.1f m/s \n',ve2);
+
|