11 files changed, 126 insertions, 0 deletions
diff --git a/1439/CH13/EX13.1/13_1.sce b/1439/CH13/EX13.1/13_1.sce
new file mode 100755
index 000000000..3811e7e68
--- /dev/null
+++ b/1439/CH13/EX13.1/13_1.sce
@@ -0,0 +1,18 @@
+clc 
+//initialisation of variables
+t= 10 //min
+i= 0.1 //amp
+M= 63.54 //gm mole^-1
+n=2
+F= 96500 //amp-sec equiv^-1
+Mo= 32 //g mole^-1
+T= 25 //C
+R= 0.08205 //l-atm deg^-1 mole^-1
+p= 740
+n1=4
+//CALCULATIONS
+m= t*60*i*M/(F*n)
+V= t*60*i*Mo*R*(273+T)*760/(F*n1*Mo*p)
+//RESULTS
+printf ('number of grams of copper deposited at cathode= %.5f gram',m)
+printf ('\n volume of oxygen liberated at anode= %.5f lit',V)
diff --git a/1439/CH13/EX13.10/13_10.sce b/1439/CH13/EX13.10/13_10.sce
new file mode 100755
index 000000000..97d02e432
--- /dev/null
+++ b/1439/CH13/EX13.10/13_10.sce
@@ -0,0 +1,12 @@
+clc 
+//initialisation of variables
+Tn= 0.820
+Tn1=0.450
+A= 426.1
+A1= 91
+//CALCULATIONS
+l= Tn*A
+l1= Tn1*A1
+L= l+l1
+//RESULTS
+printf ('A0 for acetic acid= %.1f ',L)
diff --git a/1439/CH13/EX13.11/13_11.sce b/1439/CH13/EX13.11/13_11.sce
new file mode 100755
index 000000000..f24d4482b
--- /dev/null
+++ b/1439/CH13/EX13.11/13_11.sce
@@ -0,0 +1,13 @@
+clc 
+//initialisation of variables
+T= 25 //C
+n= 2
+F= 96500 //coloumbs
+R= 8.316 //J mole^-1 K^-1
+a= 76.2*10-5
+a1= 79*10^-5
+A= 155.2*10^-5
+//CALCULATIONS
+D0= n*a*a1*R*(273+T)*10^-6/(F*A)
+//RESULTS
+printf ('limiting diffusion coefficient= %.2e cm^2 sec^-1',D0)
diff --git a/1439/CH13/EX13.2/13_2.sce b/1439/CH13/EX13.2/13_2.sce
new file mode 100755
index 000000000..4ad6e9965
--- /dev/null
+++ b/1439/CH13/EX13.2/13_2.sce
@@ -0,0 +1,11 @@
+clc 
+//initialisation of variables
+r= 82.4 //ohms
+k= 0.002768 //ohm^-1
+R1= 326 //ohm
+//CALCULATIONS
+K= r*k
+K1= (K/R1)
+//RESULTS
+printf ('cell constant= %.4f cm^-1',K)
+printf ('\n specific conductance= %.3e ohm^-1 cm^-1',K1)
diff --git a/1439/CH13/EX13.3/13_3.sce b/1439/CH13/EX13.3/13_3.sce
new file mode 100755
index 000000000..7166cd235
--- /dev/null
+++ b/1439/CH13/EX13.3/13_3.sce
@@ -0,0 +1,8 @@
+clc 
+//initialisation of variables
+C= 0.005 //N
+k= 6.997*10^-4 //ohm^-1 cm^-1
+//CALCULATIONS
+A= 1000*k/C
+//RESULTS
+printf ('equivalent conductance= %.1f cm^2 equiv^-1 ohm^-1',A)
diff --git a/1439/CH13/EX13.4/13_4.sce b/1439/CH13/EX13.4/13_4.sce
new file mode 100755
index 000000000..3da390dce
--- /dev/null
+++ b/1439/CH13/EX13.4/13_4.sce
@@ -0,0 +1,9 @@
+clc 
+//initialisation of variables
+AHcl= 426.1 //cm^2 equiv^-1 ohm^-1
+ANaC2H3O2= 91 //cm^2 equiv^-1 ohm^-1
+ANaCl= 126.5 //cm^2 equiv^-1 ohm^-1
+//CALCULATIONS
+AHC2H3O2= AHcl+ANaC2H3O2-ANaCl
+//RESULTS
+printf ('equivalent conductance of acetic acid= %.1f cm^2 equiv^-1 ohm^-1',AHC2H3O2)
diff --git a/1439/CH13/EX13.5/13_5.sce b/1439/CH13/EX13.5/13_5.sce
new file mode 100755
index 000000000..94426d6f5
--- /dev/null
+++ b/1439/CH13/EX13.5/13_5.sce
@@ -0,0 +1,10 @@
+clc 
+//initialisation of variables
+Ke= 48.15
+Ki= 390.6
+c= 0.001028 //N
+//CALCULATIONS
+a= Ke/Ki
+K= a^2*c/(1-a)
+//RESULTS
+printf ('ionisation constant= %.2e ',K)
diff --git a/1439/CH13/EX13.6/13_6.sce b/1439/CH13/EX13.6/13_6.sce
new file mode 100755
index 000000000..566b0fe03
--- /dev/null
+++ b/1439/CH13/EX13.6/13_6.sce
@@ -0,0 +1,13 @@
+clc 
+//initialisation of variables
+i= 0.00521 //amp
+A= 0.23 //cm^2
+k= 0.0129 //ohm^-1 cm^-1
+t= 67 //min
+l= 4.64 //cm
+//CALCULATIONS
+r= i/(A*k)
+uK= l/(t*60*r)
+//RESULTS
+printf ('electrical field strength= %.2f volts cm^-1',r)
+printf ('\n mobility of potassium ion= %.1e cm^2 volt^-1 cm^-1',uK)
diff --git a/1439/CH13/EX13.7/13_7.sce b/1439/CH13/EX13.7/13_7.sce
new file mode 100755
index 000000000..c0203581e
--- /dev/null
+++ b/1439/CH13/EX13.7/13_7.sce
@@ -0,0 +1,10 @@
+clc 
+//initialisation of variables
+C= 0.1 //N
+F= 96500 //coloumbs
+mna= 42.6*10^-5 //cm^2 volt sec^-1
+mcl= 68*10^-5 // cm^2 colt sec^-1
+//CALCULATIONS
+k= F*(mna+mcl)*C/1000
+//RESULTS
+printf ('specific conductance of sodium chloride= %.5f ohm^-1 cm^-1',k)
diff --git a/1439/CH13/EX13.8/13_8.sce b/1439/CH13/EX13.8/13_8.sce
new file mode 100755
index 000000000..808dbddce
--- /dev/null
+++ b/1439/CH13/EX13.8/13_8.sce
@@ -0,0 +1,9 @@
+clc 
+//initialisation of variables
+V= 4.9 //faraday^-1
+c= 0.1 //N
+//CALCULATIONS
+TK= V*c
+Tcl= 1-TK
+//RESULTS
+printf ('transference number of chlorine= %.3f ',Tcl)
diff --git a/1439/CH13/EX13.9/13_9.sce b/1439/CH13/EX13.9/13_9.sce
new file mode 100755
index 000000000..0b9937463
--- /dev/null
+++ b/1439/CH13/EX13.9/13_9.sce
@@ -0,0 +1,13 @@
+clc 
+//initialisation of variables
+Mc= 63.54 //gms
+n= 2
+mc= 0.3 //gms
+mc1= 1.43
+mc2= 1.2140
+//CALCULATIONS
+Me= Mc/n
+Tc= ((mc/Me)-((mc1-mc2)/Me))/(mc/Me)
+Ta= 1-Tc
+//RESULTS
+printf ('copper transference number= %.2f ',Ta)