From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 1949/CH6/EX6.8/Ex6_8.sce | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100755 1949/CH6/EX6.8/Ex6_8.sce

(limited to '1949/CH6/EX6.8/Ex6_8.sce')

diff --git a/1949/CH6/EX6.8/Ex6_8.sce b/1949/CH6/EX6.8/Ex6_8.sce
new file mode 100755
index 000000000..405ade0f1
--- /dev/null
+++ b/1949/CH6/EX6.8/Ex6_8.sce
@@ -0,0 +1,20 @@
+//Chapter-6,Example 6_8,Page 6-29
+clc()
+
+//Given Values:
+
+u0=4*%pi*10^-7     //Permeability in vacuum
+A=0.2*10^-4        //Crosss sectional area of iron bar in m^2
+H=1600             //magnetising field in A/m
+phi=2.4*10^-5      //Magnetic flux in weber
+
+
+//Calculations:
+//We know, phi=B*A
+B=phi/A            //Flux density
+u=B/H              //magnetic permeability
+ur=u/u0            //relative permeability
+xm=ur-1            //susceptibility of the iron bar
+
+printf('magnetic permeability of iron bar is =%.6f N/(A^2) \n \n',u)
+printf(' susceptibility of the iron bar is =%.2f \n',xm)
-- 
cgit