From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 494/CH8/EX8.13/8_13.sce | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100755 494/CH8/EX8.13/8_13.sce

(limited to '494/CH8/EX8.13')

diff --git a/494/CH8/EX8.13/8_13.sce b/494/CH8/EX8.13/8_13.sce
new file mode 100755
index 000000000..3d49c216e
--- /dev/null
+++ b/494/CH8/EX8.13/8_13.sce
@@ -0,0 +1,12 @@
+//All the quantities are expressed in SI units
+
+p1 = 4.66e4;                                //ambient pressure
+M = 8;                                      //mach number
+
+//from Appendix B, for M = 8
+p0_2 = 82.87*p1;                            //total pressure downstream of the shock
+
+//since the flow is isentropic downstream of the shock, total pressure is conserved
+ps_atm = p0_2/101300;                       //pressure at the stagnation point
+
+printf("\nRESULTS\n---------\nThe pressure at the nose is:\n        p_s = %2.1f atm\n",ps_atm)
\ No newline at end of file
-- 
cgit