1 files changed, 30 insertions, 0 deletions
diff --git a/647/CH7/EX7.10/Example7_10.sce b/647/CH7/EX7.10/Example7_10.sce
new file mode 100755
index 000000000..386fb15bd
--- /dev/null
+++ b/647/CH7/EX7.10/Example7_10.sce
@@ -0,0 +1,30 @@
+clear;
+clc;
+
+// Example: 7.10
+// Page: 280
+
+printf("Example: 7.10 - Page: 280\n\n");
+
+// Solution
+
+//*****Data******//
+P1 = 800;// [kPa]
+T1 = 773;// [K]
+H1 = 3480;// [kJ/kg]
+P2 = 100;// [kPa]
+T2 = 573;// [K]
+H2 = 3074;// [kJ/kg]
+//***************//
+
+// Solution (a)
+// Velocity of the fluid exiting the nozzle:
+// U2 = sqrt(U1^2 + 2*(H1 - H2))
+// Neglecting initial velocity:
+U2 = sqrt(2*(H1 - H2)*1000);// [m/s]
+printf("(a) Final Velocity is %.2f m/s\n",U2);
+
+// Solution (b)
+U1 = 40;// [m/s]
+U2 = sqrt((U1^2 + 2*(H1 - H2))*1000);// [m/s]
+printf("(b) Final Velocity is %.2f m/s\n",U2);
+\ No newline at end of file