1 files changed, 28 insertions, 0 deletions
diff --git a/3755/CH11/EX11.7/Ex11_7.sce b/3755/CH11/EX11.7/Ex11_7.sce
new file mode 100644
index 000000000..e53522249
--- /dev/null
+++ b/3755/CH11/EX11.7/Ex11_7.sce
@@ -0,0 +1,28 @@
+clear
+//
+//
+//
+
+//Variable declaration
+mew0=4*%pi*10^-7;
+phi=2*10^-6;     //flux(weber)
+A=10^-4;     //area(m^2)
+N=300;      //number of turns
+l=30*10^-2;    //length(m)
+i=0.032;     //current(ampere)
+
+//Calculation
+B=phi/A;       //flux density(weber/metre^2)
+n=N/l;
+H=n*i;        //magnetic intensity(amp-turn/metre)
+mew=B/H;      //permeability of ring(weber/amp-metre)
+mewr=mew/mew0;      //relative permeability
+chi=mewr-1;      //magnetic susceptibility
+
+//Result
+printf("\n flux density is %0.3f *10^-2 weber/metre^2",B*10^2)
+printf("\n magnetic intensity is %0.0f amp-turn/metre",H)
+printf("\n permeability of ring is %0.3f *10^-7 weber/amp-metre",mew*10^7)
+printf("\n relative permeability is %0.1f ",mewr)
+printf("\n magnetic susceptibility is %0.3f ",chi)
+printf("\n answer in the book is wrong")