diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1784/CH37/EX37.6 | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '1784/CH37/EX37.6')
-rwxr-xr-x | 1784/CH37/EX37.6/example6.sce | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/1784/CH37/EX37.6/example6.sce b/1784/CH37/EX37.6/example6.sce new file mode 100755 index 000000000..1794036ce --- /dev/null +++ b/1784/CH37/EX37.6/example6.sce @@ -0,0 +1,22 @@ +//chapter 37
+//example6
+clc
+//given
+n=10*10^2 //turns/m
+i=2 //in amp
+B=1.0 //in wb/m
+u0=4*%pi*10^-7 //in wb/amp-m
+//(A)
+H=n*i
+disp(H,"(A) Magnetic field strength in amp/m is")
+//(B)
+M=(B-u0*H)/u0
+disp("(B) Magnetisation is Zero when core is removed")
+disp(M," Magnetisation when th ecore is replaced in amp/m")
+//(C)
+disp("(C) Effective magnetizing current i=i(M,0)=M*(2*%pi*r0/N0)=M/n")
+i=M/n
+disp(i," Effective magnetizing current in amp is")
+//D
+Km=B/(u0*H)
+disp(Km,"(D) Permeability ")
|