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

---
 1967/CH4/EX4.1/4_1.sce | 12 ++++++++++++
 1967/CH4/EX4.2/4_2.sce | 11 +++++++++++
 1967/CH4/EX4.3/4_3.sce | 11 +++++++++++
 1967/CH4/EX4.4/4_4.sce | 12 ++++++++++++
 1967/CH4/EX4.5/4_5.sce | 11 +++++++++++
 1967/CH4/EX4.6/4_6.sce | 18 ++++++++++++++++++
 6 files changed, 75 insertions(+)
 create mode 100755 1967/CH4/EX4.1/4_1.sce
 create mode 100755 1967/CH4/EX4.2/4_2.sce
 create mode 100755 1967/CH4/EX4.3/4_3.sce
 create mode 100755 1967/CH4/EX4.4/4_4.sce
 create mode 100755 1967/CH4/EX4.5/4_5.sce
 create mode 100755 1967/CH4/EX4.6/4_6.sce

(limited to '1967/CH4')

diff --git a/1967/CH4/EX4.1/4_1.sce b/1967/CH4/EX4.1/4_1.sce
new file mode 100755
index 000000000..ad93f421e
--- /dev/null
+++ b/1967/CH4/EX4.1/4_1.sce
@@ -0,0 +1,12 @@
+clc
+//initialisation of variables
+clear
+T1= 400 //K
+T2= 300 //K
+k1= 6.095 //cal mole^-1 K^-1
+k2= 3.253*10^-3 //cal mole^-1 K^-2
+k3= -1.017*10^-6 //cal mole^-1 K^-3
+//CALCULATIONS
+dH= k1*(T1-T2)+0.5*k2*(T1^2-T2^2)+(1/3)*k3*(T1^3-T2^3)
+//RESULTS
+printf ('Heat required to raise the temperature = %.f cal-mole^-1',dH)
diff --git a/1967/CH4/EX4.2/4_2.sce b/1967/CH4/EX4.2/4_2.sce
new file mode 100755
index 000000000..2acbad8b9
--- /dev/null
+++ b/1967/CH4/EX4.2/4_2.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+clear
+p1= 10 //atm
+p2= 1 //atm
+T1= 25 //C
+n= 2/5
+//CALCULATIONS
+T2= (p1/p2)^n*(273+T1)-273
+//RESULTS
+printf ('Final temperature = %.f C',T2)
diff --git a/1967/CH4/EX4.3/4_3.sce b/1967/CH4/EX4.3/4_3.sce
new file mode 100755
index 000000000..603504da9
--- /dev/null
+++ b/1967/CH4/EX4.3/4_3.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+clear
+p1= 20 //atm
+p2= 200 //atm
+T1= 25 //C
+n= 2/7
+//CALCULATIONS
+T2= (p1/p2)^n*(273+T1)-273
+//RESULTS
+printf ('Final temperature = %.f C',T2)
diff --git a/1967/CH4/EX4.4/4_4.sce b/1967/CH4/EX4.4/4_4.sce
new file mode 100755
index 000000000..26d8bf253
--- /dev/null
+++ b/1967/CH4/EX4.4/4_4.sce
@@ -0,0 +1,12 @@
+clc
+//initialisation of variables
+clear
+Cv= 5*4.18*10^7 //ergs deg^-1 mole^-1
+T1= 25 //C
+P2= 5 //atm
+P1= 1 //atm
+n= 2/7
+//CALCULATIONS
+W= Cv*(273+T1)*(1-(P2/P1)^n)
+//RESULTS
+printf ('Work of expansion = %.2e ergs mole^-1',W)
diff --git a/1967/CH4/EX4.5/4_5.sce b/1967/CH4/EX4.5/4_5.sce
new file mode 100755
index 000000000..bd25ea09c
--- /dev/null
+++ b/1967/CH4/EX4.5/4_5.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+clear
+Ti= 25 //C
+p= 200 //atm
+p= 1 //atm
+dT= 31 //C 
+//CALCULATIONS
+Tf= Ti-dT
+//RESULTS
+printf ('Final temperature = %.f degrees',Tf)
diff --git a/1967/CH4/EX4.6/4_6.sce b/1967/CH4/EX4.6/4_6.sce
new file mode 100755
index 000000000..47b75a912
--- /dev/null
+++ b/1967/CH4/EX4.6/4_6.sce
@@ -0,0 +1,18 @@
+clc
+//initialisation of variables
+clear
+k1= 6.45//cal deg^-1 mol^-1
+k2= 1.41*10^-3 //cal deg^-2 mol^-1
+k3= -0.81*10^-7 //cal deg^-3 mol^-1
+T= 300 //K
+k4= -0.21*1.36 //cal deg^-3 mol^-1 atm^-1
+k5= 6.87*1.5//cal deg^-3 mol^-1 atm^-2
+p= 10^-3
+//CALCULATIONS
+Cp= k1+k2*T+k3*T^2
+dCp= k2+2*k3*T
+dCp1= k4*p+k5*p
+//RESULTS
+printf ('Cp = %.2f cal deg^-1 mole^-1',Cp)
+printf ('\n Specific heat at temperature = %.2e cal deg^-2 mole^-1',dCp)
+printf ('\n Specific heat at pressure = %.2e cal deg^-2 mole^-1 atm^-1',dCp1)
-- 
cgit