summaryrefslogtreecommitdiff
path: root/2417/CH6/EX6.18/Ex6_18.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2417/CH6/EX6.18/Ex6_18.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 '2417/CH6/EX6.18/Ex6_18.sce')
-rwxr-xr-x2417/CH6/EX6.18/Ex6_18.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/2417/CH6/EX6.18/Ex6_18.sce b/2417/CH6/EX6.18/Ex6_18.sce
new file mode 100755
index 000000000..438eea95d
--- /dev/null
+++ b/2417/CH6/EX6.18/Ex6_18.sce
@@ -0,0 +1,20 @@
+clear;
+clc;
+printf("\t\t\tProblem Number 6.18\n\n\n");
+// Chapter 6: The Ideal Gas
+// Problem 6.18 (page no. 261)
+// Solution
+
+//data,
+cp=0.9093; //Specific heat at constant pressure //kJ/kg*R
+p2=150; //kPa //final pressure
+p1=500; //kPa //initial pressure
+T2=273+0; //final temperature //Celsius converted to kelvin
+T1=273+100; //initial temperature //Celsius converted to kelvin
+//J=778; //conversion factor
+R=8.314/32; //moleculer weight of oxygen=32 //Unit:ft*lbf/lbm*R //constant of proportionality
+//Using equation, and dropping J gives,
+deltas=(cp*(log(T2/T1)))-((R)*(log(p2/p1))); //change in entropy //kJ/kg*K
+//For 2 kg,
+deltaS=2*deltas; //The change in enthalpy in kJ/K
+printf("For 2 kg oxygen,The change in enthalpy is %f kJ/K\n",deltaS);