From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 1019/CH2/EX2.13/Example_2_13.sce | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 1019/CH2/EX2.13/Example_2_13.sce

(limited to '1019/CH2/EX2.13/Example_2_13.sce')

diff --git a/1019/CH2/EX2.13/Example_2_13.sce b/1019/CH2/EX2.13/Example_2_13.sce
new file mode 100644
index 000000000..58deac87b
--- /dev/null
+++ b/1019/CH2/EX2.13/Example_2_13.sce
@@ -0,0 +1,16 @@
+//Example 2.13
+clear;
+clc;
+
+//Given
+R=8.314;// gas constant in J K^-1 mol^-1
+p1=10;// initial pressure in atm
+p2=1;// final pressure in atm
+T=300;// temperature in K
+
+// To determine Wexp and Wcomp
+Wexp=R*T*(1-(p2/p1));//work done in J mol^-1 during expansion
+Wcomp=(-1)*R*T*(1-(p1/p2));//work done in J mol^-1 during compression
+mprintf('(i) Work done by the system in expansion process = %f J mol^-1',Wexp);
+mprintf('\n (ii) Work done on the system during compression process = %f J mol^-1',Wcomp);
+//end
\ No newline at end of file
-- 
cgit