summaryrefslogtreecommitdiff
path: root/2006/CH3/EX3.2/ex3_2.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2006/CH3/EX3.2/ex3_2.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2006/CH3/EX3.2/ex3_2.sce')
-rwxr-xr-x2006/CH3/EX3.2/ex3_2.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/2006/CH3/EX3.2/ex3_2.sce b/2006/CH3/EX3.2/ex3_2.sce
new file mode 100755
index 000000000..d33501fba
--- /dev/null
+++ b/2006/CH3/EX3.2/ex3_2.sce
@@ -0,0 +1,26 @@
+clc;
+ // (a) Ammonia 26 oC and 0.074 m^3/kg
+// From saturation table of ammonia at 26 oC
+v=0.074; // specific volume of ammonia in m^3/kg
+vf=0.001663; vg=0.1245; // specific volume of ammonia in m^3/kg
+x=(v-vf)/(vg-vf); // Quality of vapour since v<vg
+disp (x,"The Quality of ammonia = ","(a) Ammonia 26 oC and 0.074 m^3/kg");
+// (b).Ammonia 550kPa and 0.31m^3/kg
+// From saturation table of ammonia at 550 kPa
+v=0.31; // specific volume of ammonia in m^3/kg
+vg=0.23; // specific volume of ammonia in m^3/kg
+// v > vg . Since from superheated table by interpolation for 550kPa and v
+T=82.1; // Temperature of ammonia in degree celcius
+disp ("oC",T,"Temperature of ammonia = ","(b).Ammonia 550kPa and 0.31m^3/kg");
+// (c).Freon 12, 0.35MPa and 0.036 m^3/kg
+// From saturation table of Freon 12 at 0.35MPa
+v=0.036; // specific volume of Freon 12 in m^3/kg
+vf=0.000722; vg=0.049329; // specific volume of Freon 12 in m^3/kg
+x=(v-vf)/(vg-vf); // Quality of vapour since v<vg
+disp (x,"The Quality of Freon 12 = ","(c).Freon 12, 0.35MPa and 0.036 m^3/kg");
+// (d).Methane 0.5MPa and 1.0 m^3/kmol
+v=1; // specific volume of Methane in m^3/kmol
+// From table at 0.5 MPa molar values are
+vf=0.04153; vg=2.007; // specific volume of Methane in m^3/kmol
+x=(v-vf)/(vg-vf); // Quality of vapour since v<vg
+disp (x,"The Quality of Methane = ","(d).Methane 0.5MPa and 1.0 m^3/kmol");