initial commit / add all books

1 files changed, 19 insertions, 0 deletions

diff --git a/2219/CH2/EX2.1/Ex2_1.sce b/2219/CH2/EX2.1/Ex2_1.sce
new file mode 100755
index 000000000..3a3f67084
--- /dev/null
+++ b/2219/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,19 @@
+// chapter 2 example 1

+//------------------------------------------------------------------------------

+clc;

+clear;

+// µr1 = 3;     // relative permeability of region 1

+// µr2 = 5;     // relative permeability of region 2

+//  H1 = (4ax + 3ay -6az)A/m;   Magnetic field intensity

+// Therefore B1 = µoµr1H1

+//              = µo(12ax + 9ay -18az)A/m

+// since normal component of (B) is continuous across the interface

+// Therefore, B2 = µo[12ax + 9(µr2/µr1)ay -18(µr2/µr1)az]

+//               = µo[12ax + 15ay - 30az]

+//            H2 = [12/5ax + 15/5ay - 30/5az]A/m

+//            H2 = (2.4ax + 3ay - 6az)

+H2      = sqrt(2.4^2 + 3^2 + 6^2);

+

+// output

+mprintf('Magnetic field intensity in region- 2 = %3.2f A/m',H2);

+//------------------------------------------------------------------------------