From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3831/CH5/EX5.1/Ex5_1.sce | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100644 3831/CH5/EX5.1/Ex5_1.sce

(limited to '3831/CH5/EX5.1/Ex5_1.sce')

diff --git a/3831/CH5/EX5.1/Ex5_1.sce b/3831/CH5/EX5.1/Ex5_1.sce
new file mode 100644
index 000000000..7cda0334c
--- /dev/null
+++ b/3831/CH5/EX5.1/Ex5_1.sce
@@ -0,0 +1,35 @@
+// Example 5_1
+clc;funcprot(0);
+// Given data
+V=1.00;// m^3
+m=2.00;// kg
+T_1=20.0;// °C
+T_2=95.0;// °C
+
+// Calculation
+v_1=V/m;// m^3/kg
+v_2=v_1;// m^3/kg
+// Step 7
+// From Table C.1b of Thermodynamic Tables to accompany Modern Engineering Thermodynamics, we find that
+// At 20.0°C
+v_f1=0.001002;// m^3/kg
+v_g1=57.79;// m^3/kg
+v_fg1=v_g1-v_f1;// m^3/kg
+u_f1=83.9;// kJ/kg
+u_g1=2402.9;// kJ/kg
+u_fg1=u_g1-u_f1;// kJ/kg
+// At 95.0°C
+v_f2=0.00104;// m^3/kg
+v_g2=1.982;// m^3/kg
+v_fg2=v_g2-v_f2;// m^3/kg
+u_f2=397.9;// kJ/kg
+u_g2=2500.6;// kJ/kg
+u_fg2=u_g2-u_f2;// kJ/kg
+x_1=(v_1-v_f1)/v_fg1;// The quality in the container when the contents are at 20.0°C
+x_1p=x_1*100;// %
+x_2=(v_2-v_f2)/v_fg2;// The quality in the container when the contents are at 95.0°C.
+x_2p=x_2*100;// %
+u_1=u_f1+(x_1*u_fg1);// kJ/kg
+u_2=u_f2+(x_2*u_fg2);// kJ/kg
+Q_12=m*(u_2-u_1);// kJ
+printf('\n(a)The quality in the container when the contents are at 20.0°C,x_1=%0.3f percentage \n(b)The quality in the container when the contents are at 95.0°C,x_2=%2.1f percentage \n(c)The heat transport of energy required to raise the temperature of the contents from 20.0 to 95.0°C,Q_12=%4.0f kJ/kg',x_1p,x_2p,Q_12);
-- 
cgit