14 files changed, 162 insertions, 0 deletions

diff --git a/620/CH11/EX11.1/example11_1.sce b/620/CH11/EX11.1/example11_1.sce
new file mode 100644
index 000000000..a2102dd04
--- /dev/null
+++ b/620/CH11/EX11.1/example11_1.sce
@@ -0,0 +1,18 @@
+r1=5*10^(-2);

+r2=7*10^(-2);

+n=400;

+i=2;

+f=1.5*10^(-4);

+disp("Part a");

+d=r2-r1;

+a=%pi*d^2/4;

+b=f/a;

+disp("the flux density (in T) is"); disp(b);

+disp("Part b");

+mmf=n*i;

+disp("the magnetomotive force (in At) is"); disp(mmf);

+disp("Part c");

+r=(r1+r2)/2;

+l=2*%pi*r;

+h=mmf/l;

+disp("the manetizing intensity (in At/m) is"); disp(h);
\ No newline at end of file
diff --git a/620/CH11/EX11.1/example11_1.txt b/620/CH11/EX11.1/example11_1.txt
new file mode 100644
index 000000000..77220347c
--- /dev/null
+++ b/620/CH11/EX11.1/example11_1.txt
@@ -0,0 +1,18 @@
+Part a   

+ 

+ the flux density (in T) is   

+ 

+    0.4774648  

+ 

+ Part b   

+ 

+ the magnetomotive force (in At) is   

+ 

+    800.  

+ 

+ Part c   

+ 

+ the manetizing intensity (in At/m) is   

+ 

+    2122.0659  

+ 
\ No newline at end of file
diff --git a/620/CH11/EX11.2/example11_2.sce b/620/CH11/EX11.2/example11_2.sce
new file mode 100644
index 000000000..27ace5acc
--- /dev/null
+++ b/620/CH11/EX11.2/example11_2.sce
@@ -0,0 +1,23 @@
+disp("Part a");

+r1=5*10^(-2);

+r2=7*10^(-2);

+n=400;

+i=2;

+f=1.5*10^(-4);

+d=r2-r1;

+a=%pi*d^2/4;

+b=f/a;

+mmf=n*i;

+r=(r1+r2)/2;

+l=2*%pi*r;

+h=mmf/l;

+mu=b/h;

+disp("the permeability of the iron core (in Wb/At.m) is");disp(mu);

+disp("Part b");

+mu0=4*%pi*10^(-7);

+mu1=mu/mu0;

+disp("the relative permeability is"); disp(mu1);

+disp("Part c");

+mur=600;

+b1=mur*mu0*h;

+disp("the flux density in the core (in T) is"); disp(b1);

diff --git a/620/CH11/EX11.2/example11_2.txt b/620/CH11/EX11.2/example11_2.txt
new file mode 100644
index 000000000..b7c9351a8
--- /dev/null
+++ b/620/CH11/EX11.2/example11_2.txt
diff --git a/620/CH11/EX11.3/example11_3.sce b/620/CH11/EX11.3/example11_3.sce
new file mode 100644
index 000000000..09a9d2618
--- /dev/null
+++ b/620/CH11/EX11.3/example11_3.sce
@@ -0,0 +1,18 @@
+l=10*10^(-2);

+a=l*l

+f=1.2*10^(-2);

+disp("Part a");

+i=5;

+b=f/a;

+F=b*i*l;

+disp("the force (in N) acting on the wire is"); disp(F);

+disp("Part b");

+deg=%pi/4;

+F1=b*i*l*sin(deg);

+disp("the force (n N) acting on the wire is"); disp(F1);

+disp("Part c");

+m=18*10^(-3);

+g=9.8;

+w=m*g;

+i1=w/(b*l);

+disp("he current (in A) that must pass through the wire is"); disp(i1);
\ No newline at end of file
diff --git a/620/CH11/EX11.3/example11_3.txt b/620/CH11/EX11.3/example11_3.txt
new file mode 100644
index 000000000..7c9cb7afd
--- /dev/null
+++ b/620/CH11/EX11.3/example11_3.txt
@@ -0,0 +1,17 @@
+Part a   

+ 

+ the force (in N) acting on the wire is   

+ 

+    0.6  

+ 

+ Part b   

+ 

+ the force (n N) acting on the wire is   

+ 

+    0.4242641  

+ 

+ Part c   

+ 

+ he current (in A) that must pass through the wire is   

+ 

+    1.47  
\ No newline at end of file
diff --git a/620/CH11/EX11.4/example11_4.sce b/620/CH11/EX11.4/example11_4.sce
new file mode 100644
index 000000000..508aae286
--- /dev/null
+++ b/620/CH11/EX11.4/example11_4.sce
@@ -0,0 +1,24 @@
+r1=5*10^(-2);

+r2=7*10^(-2);

+r=(r1+r2)/2;

+l=2*%pi*r;

+n=400;

+i=2;

+mu1=2.26*10^(-4);

+disp("Part a");

+d=r2-r1;

+a=%pi*d^2/4;

+rm=l/(mu1*a);

+disp("the reluctance (in At/Wb) of the cast iron toroid is"); disp(rm);

+disp("Part b");

+mmf=n*i;

+phi=mmf/rm;

+disp("the flux (in Wb) set up in the toroidis"); disp(phi);

+disp("Part c");

+mu=4*%pi*10^(-7);

+l1=5*10^(-3);

+rm1=l1/(mu*a);

+mmf1=phi*rm1;

+MMF=mmf+mmf1;

+i1=MMF/n;

+disp("the new value of current required (in A) is"); disp(i1);
\ No newline at end of file
diff --git a/620/CH11/EX11.4/example11_4.txt b/620/CH11/EX11.4/example11_4.txt
new file mode 100644
index 000000000..6e2e59674
--- /dev/null
+++ b/620/CH11/EX11.4/example11_4.txt
diff --git a/620/CH11/EX11.5/example11_5.sce b/620/CH11/EX11.5/example11_5.sce
new file mode 100644
index 000000000..9d639ea87
--- /dev/null
+++ b/620/CH11/EX11.5/example11_5.sce
@@ -0,0 +1,9 @@
+s=2*10^(-2);

+a=s^2;

+phi=5.2*10^(-4);

+b=phi/a;

+h=800;...........//from the B-H curve

+l=4*6*10^(-2);

+n=600;

+i=h*l/n;

+disp("the current required (in A) is"); disp(i);
\ No newline at end of file
diff --git a/620/CH11/EX11.5/example11_5.txt b/620/CH11/EX11.5/example11_5.txt
new file mode 100644
index 000000000..6f791fe63
--- /dev/null
+++ b/620/CH11/EX11.5/example11_5.txt
@@ -0,0 +1,3 @@
+ the current required (in A) is   

+ 

+    0.32 
\ No newline at end of file
diff --git a/620/CH11/EX11.6/example11_6.sce b/620/CH11/EX11.6/example11_6.sce
new file mode 100644
index 000000000..1c6d5a922
--- /dev/null
+++ b/620/CH11/EX11.6/example11_6.sce
@@ -0,0 +1,9 @@
+i=1.12;

+n=600;

+l=4*6*10^(-2);

+mmf=n*i;

+b=0.6;........// from the B-Hcurve

+s=2*10^(-2);

+a=s^2;

+phi=b*a;

+disp("the flux (in Wb) in the core is"); disp(phi);
\ No newline at end of file
diff --git a/620/CH11/EX11.6/example11_6.txt b/620/CH11/EX11.6/example11_6.txt
new file mode 100644
index 000000000..579130bf0
--- /dev/null
+++ b/620/CH11/EX11.6/example11_6.txt
@@ -0,0 +1,3 @@
+the flux (in Wb) in the core is   

+ 

+    0.00024 
\ No newline at end of file
diff --git a/620/CH11/EX11.7/example11_7.sce b/620/CH11/EX11.7/example11_7.sce
new file mode 100644
index 000000000..a7073f2f2
--- /dev/null
+++ b/620/CH11/EX11.7/example11_7.sce
@@ -0,0 +1,17 @@
+phi=0.7*10^(-4);

+i=0.1;

+s1=0.01;

+a_cs=s1^2;

+s2=0.005;

+a_ss=s1*s2;

+b_cs=phi/a_cs;

+b_ss=phi/a_ss;

+h_cs=400;

+h_ss=1100;

+l_cs=0.035;

+l_ss=0.105;

+ni_cs=h_cs*l_cs;

+ni_ss=h_ss*l_ss;

+ni=ni_cs+ni_ss;

+n=ni/i;

+disp("the number of turns required in the coil is"); disp(n);
\ No newline at end of file
diff --git a/620/CH11/EX11.7/example11_7.txt b/620/CH11/EX11.7/example11_7.txt
new file mode 100644
index 000000000..13c97559f
--- /dev/null
+++ b/620/CH11/EX11.7/example11_7.txt
@@ -0,0 +1,3 @@
+ the number of turns required in the coil is   

+ 

+    1295. 
\ No newline at end of file