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

---
 1964/CH2/EX2.2/ex2_2.sce | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100755 1964/CH2/EX2.2/ex2_2.sce

(limited to '1964/CH2/EX2.2/ex2_2.sce')

diff --git a/1964/CH2/EX2.2/ex2_2.sce b/1964/CH2/EX2.2/ex2_2.sce
new file mode 100755
index 000000000..403794b88
--- /dev/null
+++ b/1964/CH2/EX2.2/ex2_2.sce
@@ -0,0 +1,21 @@
+//Chapter-2, Example 2.2, Page 90
+//=============================================================================
+clc;
+clear;
+//INPUT DATA
+phi=5*10^-2;//flux in wb
+a=0.2;//area of cross-section in m^2
+lg=1.2*10^-2;//length of air gap in m
+ur=1;//permeability
+u=ur*4*%pi*10^-7;//permeability
+//CALCULATIONS 
+B=(phi/a);//flux density in wb/sq.m
+H=(B/(4*%pi*10^-7*ur));//magnetic flux density in A/m
+S=lg/(a*u);//reluctance of air gap in A/wb
+permeance=1/S;//permenace in A/wb
+mmf_in_airgap=phi*S;//mmf in A
+//OUTPUT
+mprintf("Thus B,H,S,permeance,MMF in air gap  are %1.2f Wb/sq.m, %g A/m ,%f A/wb ,%g Wb/A ,%d A  respectively ",B,H,S,permeance,mmf_in_airgap);
+ //=================================END OF PROGRAM==============================
+
+
-- 
cgit