1 files changed, 20 insertions, 0 deletions
diff --git a/3821/CH10/EX10.15/Example10_15.sce b/3821/CH10/EX10.15/Example10_15.sce
new file mode 100644
index 000000000..eaf537449
--- /dev/null
+++ b/3821/CH10/EX10.15/Example10_15.sce
@@ -0,0 +1,20 @@
+/////////Chapter 10 Properties Of Steam
+///Example 15 Page No:197
+///Find Enthalpy of wet steam
+///Input data
+clc;
+clear;
+P=15;          ///Absolute pressure in bar
+///From steam table (pressure basis at 15 bar)
+h=1950;       //In KJ/Kg
+ts=198.3;     //In degreee celsius
+hf=844.7;     //In KJ/Kg
+hfg=1945.2;   //In KJ/Kg
+hg=2789.9;    //In KJ/Kg
+
+///Calculation
+x=((h-hf)/hfg);  ///Enthalpy of wet steam
+
+///Output
+printf('Enthalpy of wet steam=%f \n ',x);
+