summaryrefslogtreecommitdiff
path: root/2417/CH3/EX3.13/Ex3_13.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2417/CH3/EX3.13/Ex3_13.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/CH3/EX3.13/Ex3_13.sce')
-rwxr-xr-x2417/CH3/EX3.13/Ex3_13.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/2417/CH3/EX3.13/Ex3_13.sce b/2417/CH3/EX3.13/Ex3_13.sce
new file mode 100755
index 000000000..925d4fcf8
--- /dev/null
+++ b/2417/CH3/EX3.13/Ex3_13.sce
@@ -0,0 +1,20 @@
+clear;
+clc;
+printf("\t\t\tProblem Number 3.13\n\n\n");
+// Chapter 3 : The First Law Of Thermodynamics
+// Problem 3.13 (page no. 113)
+// Solution
+
+p1=150; //Unit:psia //Initial pressure
+T1=1000; //Unit:R //Temperature at pressure p1
+p2=15; //Unit:psia //Final pressure
+T2=600; //Unit:R //Temperature at pressure p2
+Cp=0.24; //Unit:Btu/(LBm*R) //Specific heat for constant pressure process
+v1=2.47; //Unit:ft^3/LBm //Specific volume at inlet conditions
+v2=14.8; //Unit:ft^3/LBm //Specific volume at outlet conditions
+
+//For a non-flow,constant pressure process
+//w/J=deltah=h2-h1=Cp(T2-T1) //deltah=change in enthalpy
+//W=w/J
+W=Cp*(T1-T2); //W=Work output //Unit:Btu/LBm
+printf("The work output of the turbine per pound of working fluid is %f Btu/LBm",W);