initial commit / add all books

10 files changed, 136 insertions, 0 deletions

diff --git a/3651/CH5/EX5.1/1.sce b/3651/CH5/EX5.1/1.sce
new file mode 100644
index 000000000..af657fccb
--- /dev/null
+++ b/3651/CH5/EX5.1/1.sce
@@ -0,0 +1,16 @@
+//Variable declaration

+rho=5*10**16;   //resistivity(ohm m)

+l=5*10**-2;    //thickness(m)

+b=8*10**-2;    //length(m)

+w=3*10**-2;    //width(m)

+

+//Calculation

+A=b*w;    //area(m**2)

+Rv=rho*l/A;    

+X=l+b;      //length(m)

+Y=w;      //perpendicular(m)

+Rs=Rv*X/Y;    

+Ri=Rs*Rv/(Rs+Rv);       //insulation resistance(ohm)			

+

+printf('insulation resistance is %0.3f *10**18 ohm',(Ri/10**18))

+printf('answer varies due to rounding off errors')
\ No newline at end of file
diff --git a/3651/CH5/EX5.10/10.sce b/3651/CH5/EX5.10/10.sce
new file mode 100644
index 000000000..4e7972742
--- /dev/null
+++ b/3651/CH5/EX5.10/10.sce
@@ -0,0 +1,16 @@
+//Variable declaration

+A=94;      //area(m**2)

+vy=0.1;    //value of length(weber/m**2)

+vx=20;     //value of unit length

+n=50;      //number of magnetization cycles

+d=7650;    //density(kg/m**3)

+

+//Calculation

+h=A*vy*vx;     //hysteresis loss per cycle(J/m**3)

+hs=h*n;       //hysteresis loss per second(watt/m**3)

+pl=hs/d;      //power loss(watt/kg)

+

+//Result

+printf('hysteresis loss per cycle is  %0.3f    J/m**3 \n',h)

+printf('hysteresis loss per second is  %0.3f   watt/m**3  \n',hs)

+printf('power loss is %0.3f watt/kg\n',(pl))
\ No newline at end of file
diff --git a/3651/CH5/EX5.2/2.sce b/3651/CH5/EX5.2/2.sce
new file mode 100644
index 000000000..d39d686a9
--- /dev/null
+++ b/3651/CH5/EX5.2/2.sce
@@ -0,0 +1,13 @@
+//Variable declaration

+epsilon0=8.84*10**-12;

+R=0.55*10**-10;    //radius(m)

+N=2.7*10**25;      //number of atoms

+

+//Calculation

+alpha_e=4*%pi*epsilon0*R**3;    //polarisability of He(farad m**2)

+epsilonr=1+(N*alpha_e/epsilon0);      //relative permittivity

+

+//Result

+printf('polarisability of He is  %0.3f *10**-40 farad m**2\n',(alpha_e*10**40))

+printf('relative permittivity is  %0.3f \n',(epsilonr))

+printf('answer varies due to ing off errors')
\ No newline at end of file
diff --git a/3651/CH5/EX5.3/3.sce b/3651/CH5/EX5.3/3.sce
new file mode 100644
index 000000000..69f4defb4
--- /dev/null
+++ b/3651/CH5/EX5.3/3.sce
@@ -0,0 +1,14 @@
+//Variable declaration

+A=360*10**-4;    //area(m**2)

+V=15;    //voltage(V)

+C=6*10**-6;     //capacitance(farad)

+epsilonr=8;

+epsilon0=8.84*10**-12;

+

+//Calculation

+E=V*C/(epsilon0*epsilonr*A);     //field strength(V/m)

+dm=epsilon0*(epsilonr-1)*V*A;    //total dipole moment(Cm)

+

+//Result

+printf('field strength is %0.3f *10**7 V/m\n',(E/10**7))

+printf('total dipole moment is %0.3f *10**-12 Cm\n',(dm*10**12))
\ No newline at end of file
diff --git a/3651/CH5/EX5.4/4.sce b/3651/CH5/EX5.4/4.sce
new file mode 100644
index 000000000..000b90a2e
--- /dev/null
+++ b/3651/CH5/EX5.4/4.sce
@@ -0,0 +1,15 @@
+//Variable declaration

+epsilonr=4.36;      //dielectric constant

+t=2.8*10**-2;       //loss tangent(t)

+N=4*10**28;         //number of electrons

+epsilon0=8.84*10**-12;      

+

+//Calculation

+epsilon_r = epsilonr*t;

+epsilonstar = (complex(epsilonr,-epsilon_r));

+alphastar = (epsilonstar-1)/(epsilonstar+2);

+alpha_star = 3*epsilon0*alphastar/N;             //complex polarizability(Fm**2)

+

+//Result

+printf('the complex polarizability is  %0.3f *10**-40 F-m**2    \n',alpha_star*10**40)

+printf('answer cant be rouned off to 2 decimals as given in the textbook. Since it is a complex number and complex cant be converted to float')
\ No newline at end of file
diff --git a/3651/CH5/EX5.5/5.sce b/3651/CH5/EX5.5/5.sce
new file mode 100644
index 000000000..744c982ac
--- /dev/null
+++ b/3651/CH5/EX5.5/5.sce
@@ -0,0 +1,11 @@
+//Variable declaration

+El=10**-2*50;       //energy loss(J)

+H=El*60;      //heat produced(J)

+d=7.7*10**3;    //iron rod(kg/m**3)

+s=0.462*10**-3;    //specific heat(J/kg K)

+

+//Calculation

+theta=H/(d*s);     //temperature rise(K)

+

+//Result

+printf('temperature rise is %0.3f K \n',(theta))
\ No newline at end of file
diff --git a/3651/CH5/EX5.6/6.sce b/3651/CH5/EX5.6/6.sce
new file mode 100644
index 000000000..8d7ef0e13
--- /dev/null
+++ b/3651/CH5/EX5.6/6.sce
@@ -0,0 +1,15 @@
+//Variable declaration

+e=1.6*10**-19;    //charge(coulomb)

+new=6.8*10**15;   //frequency(revolutions per second)

+mew0=4*%pi*10**-7;

+R=5.1*10**-11;     //radius(m)

+

+//Calculation

+i=(e*new);          //current(ampere)

+B=mew0*i/(2*R);    //magnetic field at the centre(weber/m**2)

+A=%pi*R**2;

+d=i*A;       //dipole moment(ampere/m**2)

+

+//Result

+printf('magnetic field at the centre is %0.3f weber/m**2\n',(B))

+printf('dipole moment is %0.3f *10**-24 ampere/m**2\n',(d*10**24))
\ No newline at end of file
diff --git a/3651/CH5/EX5.7/7.sce b/3651/CH5/EX5.7/7.sce
new file mode 100644
index 000000000..9f016dc5e
--- /dev/null
+++ b/3651/CH5/EX5.7/7.sce
@@ -0,0 +1,12 @@
+//Variable declaration

+chi=0.5*10**-5;    //magnetic susceptibility

+H=10**6;     //field strength(ampere/m)

+mew0=4*%pi*10**-7;

+

+//Calculation

+I=chi*H;     //intensity of magnetisation(ampere/m)

+B=mew0*(I+H);    //flux density in material(weber/m**2)

+

+//Result

+printf('intensity of magnetisation is  %0.3f  ampere/m   \n',I)

+printf('flux density in material is %0.3f weber/m**2 \n',(B))
\ No newline at end of file
diff --git a/3651/CH5/EX5.8/8.sce b/3651/CH5/EX5.8/8.sce
new file mode 100644
index 000000000..d8e02205e
--- /dev/null
+++ b/3651/CH5/EX5.8/8.sce
@@ -0,0 +1,12 @@
+//Variable declaration

+B=9.27*10**-24;      //bohr magneton(ampere m**2)

+a=2.86*10**-10;      //edge(m)

+Is=1.76*10**6;       //saturation value of magnetisation(ampere/m)

+

+//Calculation

+N=2/a**3;

+mew_bar=Is/N;      //number of Bohr magnetons(ampere m**2)

+mew_bar=mew_bar/B;      //number of Bohr magnetons(bohr magneon/atom)

+

+//Result

+printf('number of Bohr magnetons is %0.3f bohr magneon/atom\n',(mew_bar))
\ No newline at end of file
diff --git a/3651/CH5/EX5.9/9.sce b/3651/CH5/EX5.9/9.sce
new file mode 100644
index 000000000..aad8a9a90
--- /dev/null
+++ b/3651/CH5/EX5.9/9.sce
@@ -0,0 +1,12 @@
+//Variable declaration

+mew0=4*%pi*10**-7;

+H=9.27*10**-24;      //bohr magneton(ampere m**2)

+beta=10**6;      //field(ampere/m)

+k=1.38*10**-23;    //boltzmann constant

+T=303;    //temperature(K)

+

+//Calculation

+mm=mew0*H*beta/(k*T);    //average magnetic moment(bohr magneton/spin)

+

+//Result

+printf('average magnetic moment is %0.3f *10**-3 bohr magneton/spin\n',(mm*10**3))
\ No newline at end of file