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

---
 1922/CH4/EX4.2/4_2.sce | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100755 1922/CH4/EX4.2/4_2.sce

(limited to '1922/CH4/EX4.2')

diff --git a/1922/CH4/EX4.2/4_2.sce b/1922/CH4/EX4.2/4_2.sce
new file mode 100755
index 000000000..edfb04adc
--- /dev/null
+++ b/1922/CH4/EX4.2/4_2.sce
@@ -0,0 +1,29 @@
+clc
+clear
+//Initialization of variables
+p1=2.758 //Mpa
+p2=0.552 //Mpa
+T1=700 //K
+T2=700 //K
+n=1
+R=8.3143
+Cv=21
+Cp=29.3
+//calculations
+dsa=n*R*log(p1/p2)
+T3=437.5 //K
+dsb=Cv*log(T3/T2)
+T4=350 //K
+dsc=Cp*log(T4/T3)
+T5=634 //K
+dsd=0
+T6=700 //K
+dse=Cp*log(T6/T5)
+dstotal=dsa+dsb+dsc+dsd+dse
+//results
+printf("Entropy change in case a = %.3f kJ/kmol K",dsa)
+printf("\n Entropy change in case b = %.3f kJ/kmol K",dsb)
+printf("\n Entropy change in case c = %.3f kJ/kmol K",dsc)
+printf("\n Entropy change in case d = %.3f kJ/kmol K",dsd)
+printf("\n Entropy change in case e = %.3f kJ/kmol K",dse)
+printf("\n Entropy change in total process = %.3f kJ/kmol K",dstotal)
-- 
cgit