1 files changed, 12 insertions, 0 deletions
diff --git a/172/CH6/EX6.4/ex4.sce b/172/CH6/EX6.4/ex4.sce
new file mode 100755
index 000000000..f149c0a87
--- /dev/null
+++ b/172/CH6/EX6.4/ex4.sce
@@ -0,0 +1,12 @@
+//example 4
+//determining quality of steam
+clear
+clc
+hi=2850.1 //initial specific heat enthalpy for steam in kJ/kg
+Vi=50 //initial velocity of steam in m/s
+Ve=600 //final velocity of steam in m/s
+he=hi+Vi^2/(2*1000)-Ve^2/(2*1000) //final specific heat enthalpy for steam in kJ/kg
+hf=467.1 //at final state in kJ/kg
+hfg=2226.5 //at final state in kJ/kg
+xe=(he-hf)/hfg //quality of steam in final state
+printf(" \n hence, the quality is xe=%.3f. \n",xe)
+\ No newline at end of file