summaryrefslogtreecommitdiff
path: root/172/CH17/EX17.3/ex3.sce
diff options
context:
space:
mode:
Diffstat (limited to '172/CH17/EX17.3/ex3.sce')
-rwxr-xr-x172/CH17/EX17.3/ex3.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/172/CH17/EX17.3/ex3.sce b/172/CH17/EX17.3/ex3.sce
new file mode 100755
index 000000000..c55647364
--- /dev/null
+++ b/172/CH17/EX17.3/ex3.sce
@@ -0,0 +1,18 @@
+//ques3
+//determining the thrust acting on a control surface
+clear
+clc
+//i-inlet
+//e-exit
+//using momentum equation on control surface in x direction
+me=20.4;//mass exiting in kg
+mi=20;//mass entering in kg
+ve=450;//exit velocity in m/s
+vi=100;//exit velocity in m/s
+Pi=95;//Pressure at inlet in kPa
+Pe=125;//Pressure at exit in kPa
+Po=100;//surrounding pressure in kPa
+Ai=0.2;//inlet area in m^2
+Ae=0.1;//exit area in m^2
+Rx=(me*ve-mi*vi)/1000-(Pi-Po)*Ai+(Pe-Po)*Ae;//thrust in x direction in kN
+printf('Thrust acting in x direction = %.2f kN',Rx); \ No newline at end of file