From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 2417/CH6/EX6.14/Ex6_14.sce | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100755 2417/CH6/EX6.14/Ex6_14.sce

(limited to '2417/CH6/EX6.14')

diff --git a/2417/CH6/EX6.14/Ex6_14.sce b/2417/CH6/EX6.14/Ex6_14.sce
new file mode 100755
index 000000000..62ea0a13c
--- /dev/null
+++ b/2417/CH6/EX6.14/Ex6_14.sce
@@ -0,0 +1,20 @@
+clear;
+clc;
+printf("\t\t\tProblem Number 6.14\n\n\n");
+// Chapter 6: The Ideal Gas
+// Problem 6.14 (page no. 255) 
+// Solution
+
+R=60; //Unit:ft*lbf/lbm*R //constant of proportionality
+deltah=500; //Btu/lbm //change in enthalpy
+deltau=350; //Btu/lbm //change in internal energy
+J=778; //conversion factor
+//Because deltah-(cp*deltaT) and deltau=cv*deltaT
+// deltah/deltau=(cp*deltaT)/(cv*deltaT)=cp/cv=k
+k=deltah/deltau; //Ratio of specific heats
+printf("Ratio of specific heats k is %f\n",k);
+//From equation cv=R/(J*(k-1))
+cv=R/(J*(k-1)); //specific heat at constant volume //Btu/lbm*R
+printf("Specific heat at constant volume is %f Btu/lbm*R\n",cv);
+cp=k*cv; //Specific heat at constant pressure //Btu/lbm*R
+printf("Specific heat at constant pressure is %f Btu/lbm*R\n",cp);
-- 
cgit