diff options
Diffstat (limited to '3760/CH2/EX2.6/Ex2_6.sce')
| -rw-r--r-- | 3760/CH2/EX2.6/Ex2_6.sce | 8 |
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);
|