summaryrefslogtreecommitdiff
path: root/1271/CH18/EX18.4
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1271/CH18/EX18.4
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1271/CH18/EX18.4')
-rwxr-xr-x1271/CH18/EX18.4/4.txt6
-rwxr-xr-x1271/CH18/EX18.4/example18_4.sce12
2 files changed, 18 insertions, 0 deletions
diff --git a/1271/CH18/EX18.4/4.txt b/1271/CH18/EX18.4/4.txt
new file mode 100755
index 000000000..e48fa07ad
--- /dev/null
+++ b/1271/CH18/EX18.4/4.txt
@@ -0,0 +1,6 @@
+ # PROBLEM 4 #
+Standard formula used
+ I = Chi *H
+
+ Magnetisation is -0.040000 A/m.
+ Magnetic flux density is 0.012566 T.
diff --git a/1271/CH18/EX18.4/example18_4.sce b/1271/CH18/EX18.4/example18_4.sce
new file mode 100755
index 000000000..7a5e8ecb7
--- /dev/null
+++ b/1271/CH18/EX18.4/example18_4.sce
@@ -0,0 +1,12 @@
+clc
+// Given that
+X = -0.4e-5 // magnetic susceptibility of material
+H = 1e4 // magnetic field in A/m
+mu_ = 4 * %pi * 1e-7 // magnetic permittivity of space
+// Sample Problem 4 on page no. 18.22
+printf("\n # PROBLEM 4 # \n")
+printf("Standard formula used \n ")
+printf(" I = Chi *H \n")
+I = X * H
+B = mu_ * (H + I)
+printf("\n Magnetisation is %f A/m.\n Magnetic flux density is %f T.",I,B)