summaryrefslogtreecommitdiff
path: root/3665/CH11
diff options
context:
space:
mode:
Diffstat (limited to '3665/CH11')
-rw-r--r--3665/CH11/EX11.1/Ex11_1.sce15
-rw-r--r--3665/CH11/EX11.10/Ex11_10.sce21
-rw-r--r--3665/CH11/EX11.11/Ex11_11.sce14
-rw-r--r--3665/CH11/EX11.12/Ex11_12.sce17
-rw-r--r--3665/CH11/EX11.2/Ex11_2.sce14
-rw-r--r--3665/CH11/EX11.3/Ex11_3.sce17
-rw-r--r--3665/CH11/EX11.4/Ex11_4.sce16
-rw-r--r--3665/CH11/EX11.5/Ex11_5.sce15
-rw-r--r--3665/CH11/EX11.6/Ex11_6.sce15
-rw-r--r--3665/CH11/EX11.7/Ex11_7.sce14
-rw-r--r--3665/CH11/EX11.8/Ex11_8.sce17
-rw-r--r--3665/CH11/EX11.9/Ex11_9.sce14
12 files changed, 189 insertions, 0 deletions
diff --git a/3665/CH11/EX11.1/Ex11_1.sce b/3665/CH11/EX11.1/Ex11_1.sce
new file mode 100644
index 000000000..0cb889a05
--- /dev/null
+++ b/3665/CH11/EX11.1/Ex11_1.sce
@@ -0,0 +1,15 @@
+clc//
+//
+//
+
+//Variable declaration
+M=1.4; //magnetic field(T)
+H=6.5*10^-4; //magnetic field(T)
+
+//Calculation
+chi=M/H;
+mew_r=1+chi; //relative permeability of iron
+
+//Result
+printf("\n relative permeability of iron is %0.3f ",mew_r)
+printf("\n answer given in the book is wrong")
diff --git a/3665/CH11/EX11.10/Ex11_10.sce b/3665/CH11/EX11.10/Ex11_10.sce
new file mode 100644
index 000000000..58918918f
--- /dev/null
+++ b/3665/CH11/EX11.10/Ex11_10.sce
@@ -0,0 +1,21 @@
+clc//
+//
+//
+
+//Variable declaration
+d=7.8*10^3; //density(kg/m^3)
+n=6.025*10^26; //number of atoms
+w=157.26; //atomic weight(kg)
+mewm=9.27*10^-24;
+mew=7.1*mewm;
+mew0=4*%pi*10^-7;
+
+//Calculation
+N=d*n/w; //number of atoms
+mew_B=N*mew/10^3; //magnetic moment per gram(Am^2)
+Bs=N*mew0*mew;
+
+//Result
+printf("\n magnetic moment per gram %0.3f Am^2",mew_B)
+printf("\n magnetic moment per gram is %0.4f Wb/m^2",Bs)
+printf("\n answer given in the book varies due to rounding off errors")
diff --git a/3665/CH11/EX11.11/Ex11_11.sce b/3665/CH11/EX11.11/Ex11_11.sce
new file mode 100644
index 000000000..ba4e8490a
--- /dev/null
+++ b/3665/CH11/EX11.11/Ex11_11.sce
@@ -0,0 +1,14 @@
+clc//
+//
+//
+
+//Variable declaration
+Tc=3.7; //temperature(K)
+Hc0=0.0306; //critical field(T)
+T=2; //temperature(K)
+
+//Calculation
+Hc2=Hc0*(1-(T/Tc)^2); //critical field(T)
+
+//Result
+printf("\n critical field is %0.5f Tesla",Hc2)
diff --git a/3665/CH11/EX11.12/Ex11_12.sce b/3665/CH11/EX11.12/Ex11_12.sce
new file mode 100644
index 000000000..168488472
--- /dev/null
+++ b/3665/CH11/EX11.12/Ex11_12.sce
@@ -0,0 +1,17 @@
+clear//
+//
+//
+
+//Variable declaration
+Tc=7.18; //temperature(K)
+H0=6.5*10**4; //critical field(T)
+T=4.2; //temperature(K)
+d=1*10**-3; //diameter(m)
+
+//Calculation
+Hc=H0*(1-(T/Tc)**2); //critical field(T)
+ic=%pi*d*Hc; //critical current(A)
+
+//Result
+printf("\n critical current is %0.2f A",ic)
+printf("\n answer given in the book is wrong")
diff --git a/3665/CH11/EX11.2/Ex11_2.sce b/3665/CH11/EX11.2/Ex11_2.sce
new file mode 100644
index 000000000..569e95da2
--- /dev/null
+++ b/3665/CH11/EX11.2/Ex11_2.sce
@@ -0,0 +1,14 @@
+clc//
+//
+//
+
+//Variable declaration
+M=3300; //magnetic field(amp/m)
+H=220; //magnetic field(amp/m)
+
+//Calculation
+chi=M/H;
+mew_r=1+chi; //relative permeability
+
+//Result
+printf("\n relative permeability is %0.3f ",mew_r)
diff --git a/3665/CH11/EX11.3/Ex11_3.sce b/3665/CH11/EX11.3/Ex11_3.sce
new file mode 100644
index 000000000..2bbe579ce
--- /dev/null
+++ b/3665/CH11/EX11.3/Ex11_3.sce
@@ -0,0 +1,17 @@
+clc//
+//
+//
+
+//Variable declaration
+H=10^6; //magnetic field(amp/m)
+chi=1.5*10^-3;
+mew0=4*%pi*10^-7;
+
+//Calculation
+M=chi*H; //magnetisation of material(A/m)
+B=mew0*(M+H); //flux density(T)
+
+//Result
+printf("\n magnetisation of material is %0.3f *10^3 A/m",M/10^3)
+printf("\n flux density is %0.4f T",B)
+printf("\n answer given in the book varies due to rounding off errors")
diff --git a/3665/CH11/EX11.4/Ex11_4.sce b/3665/CH11/EX11.4/Ex11_4.sce
new file mode 100644
index 000000000..c6ba74b94
--- /dev/null
+++ b/3665/CH11/EX11.4/Ex11_4.sce
@@ -0,0 +1,16 @@
+clc//
+//
+//
+
+//Variable declaration
+H=10^4; //magnetic field(amp/m)
+chi=3.7*10^-3;
+mew0=4*%pi*10^-7;
+
+//Calculation
+M=chi*H; //magnetisation of material(A/m)
+B=mew0*(M+H); //flux density(T)
+
+//Result
+printf("\n magnetisation of material is %0.3f A/m",M)
+printf("\n flux density is %0.4f wb/m^2",B)
diff --git a/3665/CH11/EX11.5/Ex11_5.sce b/3665/CH11/EX11.5/Ex11_5.sce
new file mode 100644
index 000000000..7ce3e122a
--- /dev/null
+++ b/3665/CH11/EX11.5/Ex11_5.sce
@@ -0,0 +1,15 @@
+clc//
+//
+//
+
+//Variable declaration
+r=5*10^-2 //radius(m)
+I=500*10^-3; //current(A)
+
+//Calculation
+A=2*%pi*r^2;
+mew_m=I*A; //magnetic moment(Am^2)
+
+//Result
+printf("\n magnetic moment is %0.3f *10^-3 Am^2",mew_m*10^3)
+printf("\n answer given in the book varies due to rounding off errors")
diff --git a/3665/CH11/EX11.6/Ex11_6.sce b/3665/CH11/EX11.6/Ex11_6.sce
new file mode 100644
index 000000000..3f8e2c8e4
--- /dev/null
+++ b/3665/CH11/EX11.6/Ex11_6.sce
@@ -0,0 +1,15 @@
+clc//
+//
+//
+
+//Variable declaration
+r=5.29*10^-11; //radius(m)
+B=2; //magnetic field(T)
+e=1.602*10^-19; //charge(c)
+m=9.108*10^-31; //mass(kg)
+
+//Calculation
+mew_ind=e^2*r^2*B/(4*m); //change in magnetic moment(Am^2)
+
+//Result
+printf("\n change in magnetic moment is %0.3f *10^-29 Am^2",mew_ind*10^29)
diff --git a/3665/CH11/EX11.7/Ex11_7.sce b/3665/CH11/EX11.7/Ex11_7.sce
new file mode 100644
index 000000000..08147d6e7
--- /dev/null
+++ b/3665/CH11/EX11.7/Ex11_7.sce
@@ -0,0 +1,14 @@
+clc//
+//
+//
+
+//Variable declaration
+chi1=2.8*10^-4; //susceptibility
+T1=350; //temperature(K)
+T2=300; //temperature(K)
+
+//Calculation
+chi2=chi1*T1/T2; //susceptibility
+
+//Result
+printf("\n susceptibility is %0.3f *10^-4",chi2*10^4)
diff --git a/3665/CH11/EX11.8/Ex11_8.sce b/3665/CH11/EX11.8/Ex11_8.sce
new file mode 100644
index 000000000..fc6a60ccd
--- /dev/null
+++ b/3665/CH11/EX11.8/Ex11_8.sce
@@ -0,0 +1,17 @@
+clc//
+//
+//
+
+//Variable declaration
+Bs=0.65; //magnetic induction(wb/m^2)
+d=8906; //density(kg/m^3)
+n=6.025*10^26; //avagadro number
+mew0=4*%pi*10^-7;
+w=58.7; //atomic weight(kg)
+
+//Calculation
+N=d*n/w; //number of nickel atoms(per m^3)
+mew_m=Bs/(N*mew0*9.27*10^-24); //magnetic moment(mewB)
+
+//Result
+printf("\n magnetic moment is %0.2f mewB",mew_m)
diff --git a/3665/CH11/EX11.9/Ex11_9.sce b/3665/CH11/EX11.9/Ex11_9.sce
new file mode 100644
index 000000000..7cd76e706
--- /dev/null
+++ b/3665/CH11/EX11.9/Ex11_9.sce
@@ -0,0 +1,14 @@
+clc//
+//
+//
+
+//Variable declaration
+mew=9.4*10^-24;
+H=2; //magnetic field(weber/m^2)
+k=1.38*10^-23; //boltzmann constant
+
+//Calculation
+T=2*mew*H/(log(2)*k); //temperature(K)
+
+//Result
+printf("\n temperature is %0.1f K",T)
generated by cgit (git 2.34.1) at 2024-12-22 09:51:11 +0000