summaryrefslogtreecommitdiff
path: root/3831/CH6/EX6.3/Ex6_3.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3831/CH6/EX6.3/Ex6_3.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3831/CH6/EX6.3/Ex6_3.sce')
-rw-r--r--3831/CH6/EX6.3/Ex6_3.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/3831/CH6/EX6.3/Ex6_3.sce b/3831/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..b0ddc7201
--- /dev/null
+++ b/3831/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,18 @@
+// Example 6_3
+clc;funcprot(0);
+// Given data
+p_1=2.00;// MPa
+p_2=0.100;// MPa
+T_2=150;// °C
+h_1=2776.4;// kJ/kg
+h_2=2776.4;// kJ/kg
+
+// Calculation
+h_f1=908.8;// kJ/kg
+h_fg1=1890.7;// kJ/kg
+h_g1=2799.5;// kJ/kg
+x_1=(h_1-h_f1)/h_fg1;// The quality of steam
+x_1=x_1*100;// The quality of steam in %
+T_1=212.4;// °C
+mu_J=(T_1-T_2)/(p_1-p_2);// °C/MPa
+printf("\nThe quality of the wet steam in the pipe,x=%2.1f percentage \nJoule-Thomson coefficient,mu_J=%2.1f°C/MPa",x_1,mu_J);