summaryrefslogtreecommitdiff
path: root/1709/CH6
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1709/CH6
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 '1709/CH6')
-rwxr-xr-x1709/CH6/EX6.1/6_1.sce12
-rwxr-xr-x1709/CH6/EX6.2/6_2.sce10
-rwxr-xr-x1709/CH6/EX6.3/6_3.sce13
-rwxr-xr-x1709/CH6/EX6.4/6_4.sce11
-rwxr-xr-x1709/CH6/EX6.5/6_5.sce12
-rwxr-xr-x1709/CH6/EX6.6/6_6.sce13
6 files changed, 71 insertions, 0 deletions
diff --git a/1709/CH6/EX6.1/6_1.sce b/1709/CH6/EX6.1/6_1.sce
new file mode 100755
index 000000000..f2972f2b2
--- /dev/null
+++ b/1709/CH6/EX6.1/6_1.sce
@@ -0,0 +1,12 @@
+clc
+//Initialization of variables
+m=5 //lbm
+P=50 //psia
+T=500 + 460 //R
+//calculations
+disp("From saturated steam tables,")
+s1=0.4110 //B/lbm R
+s2=1.7887 //B/lbm R
+dS=m*(s2-s1)
+//results
+printf("Change in entropy = %.3f B/R",dS)
diff --git a/1709/CH6/EX6.2/6_2.sce b/1709/CH6/EX6.2/6_2.sce
new file mode 100755
index 000000000..e73e02a15
--- /dev/null
+++ b/1709/CH6/EX6.2/6_2.sce
@@ -0,0 +1,10 @@
+clc
+//Initialization of variables
+P=20 //psia
+T=227.96+ 459.69 //R
+//calculations
+disp("from saturation tables,")
+sfg=1.3962 //B/ R lbm
+Q=T*sfg
+//results
+printf("heat transfer = %.1f B/lbm",Q)
diff --git a/1709/CH6/EX6.3/6_3.sce b/1709/CH6/EX6.3/6_3.sce
new file mode 100755
index 000000000..432c068ea
--- /dev/null
+++ b/1709/CH6/EX6.3/6_3.sce
@@ -0,0 +1,13 @@
+clc
+//Initialization of variables
+T1=100+460 //R
+P1=15//psia
+P2=50 //psia
+n=1.3
+cp=0.24
+//calculations
+T2=T1*(P2/P1)^((n-1)/n)
+dS=cp*log(T2/T1) - 53.35/778 *log(P2/P1)
+//results
+printf("Change in entropy = %.3f B/lbm R",dS)
+//the answer given in textbook is wrong. Please check it using a calculator
diff --git a/1709/CH6/EX6.4/6_4.sce b/1709/CH6/EX6.4/6_4.sce
new file mode 100755
index 000000000..eeb285090
--- /dev/null
+++ b/1709/CH6/EX6.4/6_4.sce
@@ -0,0 +1,11 @@
+clc
+//Initialization of variables
+T1=85+460 //R
+T2=T1
+cp=0.24
+P2=15 //psia
+P1=30 //psia
+//calculations
+dS=cp*log(T2/T1) - 53.35/778 *log(P2/P1)
+//results
+printf("Change in entropy = %.4f B/lbm R",dS)
diff --git a/1709/CH6/EX6.5/6_5.sce b/1709/CH6/EX6.5/6_5.sce
new file mode 100755
index 000000000..2c5bcd9a1
--- /dev/null
+++ b/1709/CH6/EX6.5/6_5.sce
@@ -0,0 +1,12 @@
+clc
+//Initialization of variables
+Qh=-1000 //Btu
+Ql=1000 //Btu
+Th=1460 //R
+Tl=960 //R
+//calculations
+Sh=Qh/Th
+Sl=Ql/Tl
+S=Sh+Sl
+//results
+printf("Change in entropy of the universe = %.3f B/R",S)
diff --git a/1709/CH6/EX6.6/6_6.sce b/1709/CH6/EX6.6/6_6.sce
new file mode 100755
index 000000000..7f332736d
--- /dev/null
+++ b/1709/CH6/EX6.6/6_6.sce
@@ -0,0 +1,13 @@
+clc
+//Initialization of variables
+disp("from steam tables,")
+h1=1416.4 //B/lbm
+s1=1.6842 //B/lbm R
+//calculations
+s2=s1
+P2=50 //psia
+T2=317.5 //F
+h2=1193.7
+W=h2-h1
+//results
+printf("Work calculated = %.1f B/lbm",W)