summaryrefslogtreecommitdiff
path: root/3760/CH2/EX2.6
diff options
context:
space:
mode:
Diffstat (limited to '3760/CH2/EX2.6')
-rw-r--r--3760/CH2/EX2.6/Ex2_6.sce8
1 files changed, 8 insertions, 0 deletions
diff --git a/3760/CH2/EX2.6/Ex2_6.sce b/3760/CH2/EX2.6/Ex2_6.sce
new file mode 100644
index 000000000..b94e01698
--- /dev/null
+++ b/3760/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,8 @@
+clc;
+g=0.003; // gap length
+wp=0.006; // pole width
+B=0.8; // flux density in air gap
+uo=4*%pi*10^-7; // free space permeability
+// after the derivation of expression
+fe=(B^2*wp*g)/(2*uo);
+printf('Force tending to bring electromagnets into axial alignment is %f N',fe);