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

---
 3856/CH4/EX4.1/Ex4_1.sce | 37 +++++++++++++++++++++++++++++++++++++
 3856/CH4/EX4.1/Ex4_1.txt |  3 +++
 2 files changed, 40 insertions(+)
 create mode 100644 3856/CH4/EX4.1/Ex4_1.sce
 create mode 100644 3856/CH4/EX4.1/Ex4_1.txt

(limited to '3856/CH4/EX4.1')

diff --git a/3856/CH4/EX4.1/Ex4_1.sce b/3856/CH4/EX4.1/Ex4_1.sce
new file mode 100644
index 000000000..2f0628268
--- /dev/null
+++ b/3856/CH4/EX4.1/Ex4_1.sce
@@ -0,0 +1,37 @@
+//Calculate the value of work done if the expansion is carried out against a vacuum ,against a constant external pressure of 1.00 atm and reversibly
+
+//Example 4.1
+
+clc;
+
+clear;
+
+n=0.850;  //Number of mole of gas in mol
+
+R1=0.08206; //Gas constant in L atm K^-1 mol^-1
+
+T=300;  //Temperature in K
+
+P1=15.0;  //Initial pressure in atm
+
+P2=1.00;  //Final pressure in atm
+
+Pex=0;  //Pressure in vaccum
+
+V1=(n*R1*T)/P1; //Initial volume
+
+V2=(n*R1*T)/P2;  //Final volume
+
+w1=-Pex*(V2-V1)*101.3;  //Work done against vaccum in J
+
+printf("(a)Work done if the expansion is carried out against a vaccum = %.0f J",w1);
+
+w2=-P2*(V2-V1)*101.3;  //Work done against a constant external pressure in J
+
+printf("\n(b)Value of work done if the expansion is carried out against a constant external pressure = %.2f*10^3 J",w2*10^-3);
+
+R2=8.314;  //Gas constant in J K^-1 mol^-1
+
+w3=(-n*R2*T)*log((P1/P2));  //Work done for an isothermal,reversible process in J
+
+printf("\n(c)Work done if the expansion is carried out for an isothermal,reversible process = %.2f*10^3 J",w3*10^-3);
diff --git a/3856/CH4/EX4.1/Ex4_1.txt b/3856/CH4/EX4.1/Ex4_1.txt
new file mode 100644
index 000000000..0965cb49a
--- /dev/null
+++ b/3856/CH4/EX4.1/Ex4_1.txt
@@ -0,0 +1,3 @@
+ (a)Work done if the expansion is carried out against a vaccum = -0 J
+(b)Value of work done if the expansion is carried out against a constant external pressure = -1.98*10^3 J
+(c)Work done if the expansion is carried out for an isothermal,reversible process = -5.74*10^3 J
\ No newline at end of file
-- 
cgit