5 files changed, 76 insertions, 0 deletions
diff --git a/1694/CH7/EX1.7/EX1_7.sce b/1694/CH7/EX1.7/EX1_7.sce
new file mode 100644
index 000000000..a554924df
--- /dev/null
+++ b/1694/CH7/EX1.7/EX1_7.sce
@@ -0,0 +1,16 @@
+clear;
+clc;
+printf("\nEx1.7\n");
+//page no.-9
+//given
+rho=2700;.......//density of potassium bromide in kg/m^3
+m=119;.........//molecular wt. 
+n=4;...........//molecules per unit cell for F.C.C.
+N=6.02*10^26;...//avagadro no.
+
+M=(n*m)/N;..........//mass in each unit cell
+//as density=mass/volume, so volume is a^3
+
+a=(M/rho)^(1/3)......//lattice constant in Angstrom
+
+printf("\nlattice constant is 6.64 angstrom\n");
diff --git a/1694/CH7/EX7.1/EX7_1.sce b/1694/CH7/EX7.1/EX7_1.sce
new file mode 100644
index 000000000..1c890d372
--- /dev/null
+++ b/1694/CH7/EX7.1/EX7_1.sce
@@ -0,0 +1,12 @@
+clear;
+clc;
+printf("\nEx7.1\n");
+//page no.-205
+//given
+mu1=0.36;............//MOBILITY OF ELECTRONS IN m^2/volt-sec
+mu2=0.17;............//MOBILITY OF HOLES IN m^2/volt-sec
+e=1.6*10^-19;........//charge in coulamb
+n=2.5*10^19;.........//density of electron & holes per m^3
+sigma=n*e*(mu1+mu2)...//total conductivity in mho/metre
+
+printf("\ntotal conductivity is 2.12 mho/metre\n");
diff --git a/1694/CH7/EX7.2/EX7_2.sce b/1694/CH7/EX7.2/EX7_2.sce
new file mode 100644
index 000000000..8e5c09808
--- /dev/null
+++ b/1694/CH7/EX7.2/EX7_2.sce
@@ -0,0 +1,15 @@
+clear;
+clc;
+printf("\nEx7.2\n");
+//page no.-218
+//given
+t=10^-3;........//thickness of copper strip in m
+e=1.6*10^-19;....//charge in C
+n=8.4*10^28;.....//no. of charge carriers in per m^3
+I=200;...........//current in A
+B=1.5;...........//magnetic field in weber/m^2
+
+V=(I*B)/(n*e*t)......//potential difference in volt
+//to convert in micro volt multiply by 10^6
+
+printf("\npotential difference is 22 micro volt\n");
diff --git a/1694/CH7/EX7.3/EX7_3.sce b/1694/CH7/EX7.3/EX7_3.sce
new file mode 100644
index 000000000..a5ea0d1a6
--- /dev/null
+++ b/1694/CH7/EX7.3/EX7_3.sce
@@ -0,0 +1,19 @@
+clear;
+clc;
+printf("\nEx7.3\n");
+//page no.-218
+//given
+V=29.7*10^-6;........//potential difference in volt
+d=4*10^-2;...........//width of copper strip in m
+I=100;...............//current in A
+B=2;.................//magnetic field of induction in weber/m^2
+e=1.6*10^-19;........//charge in coulumb
+A=2*10^-5;...........//area in m^2
+
+E=V/d............//hall electric effect in volt/m
+
+printf("\nhall electric effect is 7.425*10^-4 V/m\n");
+
+n=(I*B)/(A*e*E)......//no. of charge carriers per m^3
+
+printf("\nno. of charge carriers 8.4*10^28 per m^3");
diff --git a/1694/CH7/EX7.4/EX7_4.sce b/1694/CH7/EX7.4/EX7_4.sce
new file mode 100644
index 000000000..3e7ee4d31
--- /dev/null
+++ b/1694/CH7/EX7.4/EX7_4.sce
@@ -0,0 +1,14 @@
+clear;
+clc;
+printf("\nEx7.4\n");
+//page no.-219
+//given
+e=1.6*10^-19;......//CHARGE IN C
+R=-0.0125;..........//HALL COEFFICIENT IN m^3/coulumb
+E=100;...............//ELECTRIC FIELD IN volt/m
+mu=0.36;.............//mobility
+n=1/(e*R).............//no. of charge carriers per m^3
+
+J=n*e*mu*E............//current density in ampere/m^2
+
+printf("\ncurrent density is 2880 A/m^2");