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

---
 2873/CH7/EX7.22/Ex7_22.sce | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 2873/CH7/EX7.22/Ex7_22.sce

(limited to '2873/CH7/EX7.22')

diff --git a/2873/CH7/EX7.22/Ex7_22.sce b/2873/CH7/EX7.22/Ex7_22.sce
new file mode 100755
index 000000000..c02332dd6
--- /dev/null
+++ b/2873/CH7/EX7.22/Ex7_22.sce
@@ -0,0 +1,24 @@
+// Display mode
+mode(0);
+// Display warning for floating point exception
+ieee(1);
+clear;
+clc;
+disp("Engineering Thermodynamics by Onkar Singh Chapter 7 Example 22")
+Cp=1.005;//specific heat at constant pressure in KJ/kg K
+Cv=0.718;//specific heat at constant volume in KJ/kg K
+Ti=(25+273.15);//atmospheric temperature in K
+disp("filling of the tank is a transient flow(unsteady)process.for the transient filling process,considering subscripts i and f for initial and final states,")
+disp("hi=uf")
+disp("Cp*Ti=Cv*Tf")
+disp("so Tf=Cp*Ti/Cv in K")
+Tf=Cp*Ti/Cv
+disp("inside final temperature,Tf=417.33 K")
+disp("change in entropy,deltaS_gen=(Sf-Si)+deltaS_surr in KJ/kg K")
+disp("Cp*log(Tf/Ti)+0")
+deltaS_gen=Cp*log(Tf/Ti)
+disp("change in entropy,deltaS_gen=0.3379 KJ/kg K")
+disp("irreversibility,I=To*deltaS_gen in KJ/kg")
+To=Ti;
+I=To*deltaS_gen
+disp("irreversibility,I=100.74 KJ/kg")
-- 
cgit