summaryrefslogtreecommitdiff
path: root/1964/CH2/EX2.2/ex2_2.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1964/CH2/EX2.2/ex2_2.sce
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 '1964/CH2/EX2.2/ex2_2.sce')
-rwxr-xr-x1964/CH2/EX2.2/ex2_2.sce21
1 files changed, 21 insertions, 0 deletions
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==============================
+
+