12 files changed, 143 insertions, 0 deletions
diff --git a/3020/CH16/EX16.1/ex16_1.sce b/3020/CH16/EX16.1/ex16_1.sce
new file mode 100755
index 000000000..229d02dcd
--- /dev/null
+++ b/3020/CH16/EX16.1/ex16_1.sce
@@ -0,0 +1,15 @@
+clc;
+clear all;
+e = 1.6e-19; // Charge of an electron
+m = 9.11e-31; // Mass of an electron in Kg
+r = 1.73e-8 ; // Resistivity of copper in ohm meter
+at = 63.5; // Atomic weight of copper in gm
+d = 8.92e3; // Density of copper in Kg per cubic meter
+N = 6.023e26; // Avagadros number
+n = (N*d)/at; //Carrier Concentration
+rhoc = 1/r // Conductivity of copper
+t = (rhoc*m)/(n*e^2); //Average collision time
+u = rhoc/(n*e);// Mobility of electrons in copper
+disp('m^2/(V.s)',u,'Mobility of electrons in copper is')
+disp('s',t,'Average time collision of electrons in copper')
+//Wrong answer printed in textbook of aberage time collision
diff --git a/3020/CH16/EX16.10/ex16_10.sce b/3020/CH16/EX16.10/ex16_10.sce
new file mode 100755
index 000000000..a2c8eb441
--- /dev/null
+++ b/3020/CH16/EX16.10/ex16_10.sce
@@ -0,0 +1,19 @@
+clc;
+clear all;
+e = 1.6e-19; // Charge of an electron
+m = 9.11e-31; // Mass of an electron in Kg
+r = 1.6e-8 ; // resistivity of silver in (ohm.meter)
+at = 107.9e-3; // Atomic weight of copper in gm
+d = 10.5e3; // Density of silver in Kg per cubic meter
+N = 6.023e23; // Avagadros number
+c = 3e8 ;// Velocity of light in air
+fe= 5.5*e // Fermi energy of the silver piece
+E = 100;// Electric field
+sigma = 1/r; // Conductivity
+n = (N*d)/at; 
+tr = (sigma*m)/(n*e^2);// Relaxation time
+lambda = c*tr; // Mean free path
+vd = (sigma*E)/(n*e);// Drift velocity
+disp('s',tr,'Relaxation time is')
+disp('m',lambda,'Mean free path is')
+disp('m/s',vd,'Drift velocity of electrons')
diff --git a/3020/CH16/EX16.11/ex16_11.sce b/3020/CH16/EX16.11/ex16_11.sce
new file mode 100755
index 000000000..0fb5cb71f
--- /dev/null
+++ b/3020/CH16/EX16.11/ex16_11.sce
@@ -0,0 +1,7 @@
+clc;
+clear all;
+rho1 = 1.7e-8; // Resistivity of copper wire at room temperature
+T1 = 973; // Temperature in kelvin
+T2 = 300; // Room temperature in kelvin
+rho2 = rho1*(sqrt(T1)/sqrt(T2));
+disp('Ohm.meter',rho2,'Resistivity of copper wire is')
diff --git a/3020/CH16/EX16.12/ex16_12.sce b/3020/CH16/EX16.12/ex16_12.sce
new file mode 100755
index 000000000..69209d548
--- /dev/null
+++ b/3020/CH16/EX16.12/ex16_12.sce
@@ -0,0 +1,16 @@
+clc;
+clear all;
+e = 1.6e-19; // Charge of an electron
+m = 9.11e-31; // Mass of an electron in Kg
+rho = 1.54e-8; // Resistivity
+EF= 5.5*e; // Fermi energy in joule
+n = 5.8e28; // Concentration of electrons per cubic meters
+E = 100; // Electric field in V/m
+tr = m/(rho*n*e^2); // Relaxation time
+u = (e*tr)/m; // Mobility of electrons
+disp('m^2/(V.s)',u,'Mobility of electrons')
+vd = (e*tr*E)/m; //drift velocity of electrons
+disp('m/s',vd,'The drift velocity of electrons is')
+VF = sqrt((2*EF)/m);// Fermi velocity
+lambda = VF*tr; // Mean free path
+disp('m',lambda,'The mean free path is')
diff --git a/3020/CH16/EX16.2/ex16_2.sce b/3020/CH16/EX16.2/ex16_2.sce
new file mode 100755
index 000000000..a0a1452f1
--- /dev/null
+++ b/3020/CH16/EX16.2/ex16_2.sce
@@ -0,0 +1,11 @@
+clc;
+clear all;
+m = 9.11e-31; // Mass of electron in Kg
+e = 1.6e-19; // charge of an electron
+r = 1.85e-10; // Radius of sodium atom in meters
+tr = 3e-14; //Mean free time of sodium in meters/sec
+a = (4*r)/sqrt(3); // Lattice constant of a BCC structure
+ne = 2/(a^3); 
+rho = (m)/(ne*e^2*tr); // Resistivity of copper
+disp('Ohm.m',rho,'Resistivity of copper is')
+//Slight variation in answer as compared to textbook
diff --git a/3020/CH16/EX16.3/ex16_3.sce b/3020/CH16/EX16.3/ex16_3.sce
new file mode 100755
index 000000000..10e8d9ed3
--- /dev/null
+++ b/3020/CH16/EX16.3/ex16_3.sce
@@ -0,0 +1,8 @@
+clc;
+clear all;
+n = 25.33e27; // Number of electrons per unit volume
+tr = 3.1e14; // Mean free time of electron
+m = 9.11e-31; // Mass of electron in Kg
+e = 1.6e-19; // Charge of an electron
+rho = m/(n*e^2*tr); //Electrical resistivity of sodium metal
+disp('Ohm.meter',rho,'Electrical resistivity of sodium metal at zero degrees is') 
diff --git a/3020/CH16/EX16.4/ex16_4.sce b/3020/CH16/EX16.4/ex16_4.sce
new file mode 100755
index 000000000..fcda8af54
--- /dev/null
+++ b/3020/CH16/EX16.4/ex16_4.sce
@@ -0,0 +1,11 @@
+clc;
+clear all;
+n = 5.8e28; // Number of electrons per unit volume
+tr = 3.4e-14; // Relaxation time of electron in seconds
+m = 9.11e-31; // Mass of electron in Kg
+e = 1.6e-19; // Charge of an electron
+rho = m/(n*e^2*tr); //Electrical resistivity of sodium metal
+disp('Ohm.meter',rho,'Electrical resistivity of sodium metal at zero degrees is')
+ue = (e*tr)/m; //Mobility of electron in metal
+disp('m^2/(V.s)',ue,'The mobility of electron in metal is')
+// Wrong answer printed in textbook... checked in calculator
diff --git a/3020/CH16/EX16.5/ex16_5.sce b/3020/CH16/EX16.5/ex16_5.sce
new file mode 100755
index 000000000..309de3687
--- /dev/null
+++ b/3020/CH16/EX16.5/ex16_5.sce
@@ -0,0 +1,11 @@
+clc;
+clear all;
+r = 1.54e-8; // Resistivity of silver in ohm per meter
+E = 100; // Electric field along wire in v/m
+cc = 5.8e28; // Carrier concentration of electron per cubic meter
+e = 1.6e-19; // Charge of an electron
+u = 1/(r*cc*e);// Mobility of electron 
+vd = u*E;// Drift velocity
+disp('m^2/(V.s)',u,'The mobility of electron is')
+disp('m/s',vd,'Drift velocity is')
+ 
diff --git a/3020/CH16/EX16.6/ex16_6.sce b/3020/CH16/EX16.6/ex16_6.sce
new file mode 100755
index 000000000..9912af88b
--- /dev/null
+++ b/3020/CH16/EX16.6/ex16_6.sce
@@ -0,0 +1,12 @@
+clc;
+clear all;
+e = 1.6e-19; // Charge of an electron
+m = 9.11e-31; // Mass of an electron in Kg
+rho = 6.8e7 ; // Conductivity of silver in 1/(ohm.meter)
+at = 107.9; // Atomic weight of copper in gm
+d = 10.5e3; // Density of silver in Kg per cubic meter
+N = 6.023e26; // Avagadros number
+n = (N*d)/at; //Density of electrons
+disp('atoms/m^3',n,'The density of electrons is')
+u = (rho/(n*e)); // Mobility of electron
+disp('(m^2.V)/s',u,'The mobility of electron is')
diff --git a/3020/CH16/EX16.7/ex16_7.sce b/3020/CH16/EX16.7/ex16_7.sce
new file mode 100755
index 000000000..56d7fd8a2
--- /dev/null
+++ b/3020/CH16/EX16.7/ex16_7.sce
@@ -0,0 +1,7 @@
+clc;
+clear all;
+sigma = 5.87e7; // Electrical conductivity of copper 
+k = 390; // Thermal conductivity
+T = 293; // Temperature in kelvin
+L = k/(sigma*T); //Lorrentz number
+disp('(W.OHM)/K^2',L,'The lorrentz number is')
diff --git a/3020/CH16/EX16.8/ex16_8.sce b/3020/CH16/EX16.8/ex16_8.sce
new file mode 100755
index 000000000..758894c9c
--- /dev/null
+++ b/3020/CH16/EX16.8/ex16_8.sce
@@ -0,0 +1,14 @@
+clc;
+clear all;
+e = 1.6e-19; // Charge of an electron
+m = 9.1e-31; // Mass of an electron
+k = 1.38e-23; //Boltzmann constant
+tr = 1e-14; // The relaxation time in seconds
+T = 300; // Temperature in kelvin
+n = 6e28; //The electron concentration in cubic meters
+sigma = (n*e^2*tr)/(m);// Electrical Conductivity
+K = (n*%pi^2*k^2*T*tr)/(3*m); //Thermal Conductivity
+L = K/(sigma*T); // Lorrentz number
+disp('1/(ohm.meter)',sigma,'The electrical conductivity is')
+disp('W/(m.k)',K,'The thermal conductivity is')
+disp('(W.ohm)/K^2',L,'The lorrentz number is') 
diff --git a/3020/CH16/EX16.9/ex16_9.sce b/3020/CH16/EX16.9/ex16_9.sce
new file mode 100755
index 000000000..8b487aa1e
--- /dev/null
+++ b/3020/CH16/EX16.9/ex16_9.sce
@@ -0,0 +1,12 @@
+clc;
+clear all;
+N = 6.022e23; // Avagadros number
+at = 63.5; // Atomic weight of copper
+m = 9.1e-31; // Mass of electron
+e = 1.6e-19;// Charge of an electron
+tr = 1e-14; // Relaxation time
+d = 8900e3; // Density of electrons
+n = (N*d)/at;
+ n1 = 1; //Number of electrons free per atom in copper is 1
+ sigma = (n*e^2*tr)/m;
+ disp('1/(ohm.meter)',sigma,'The electrical conductivity is')