summaryrefslogtreecommitdiff
path: root/3760/CH2/EX2.21/Ex2_21.sce
diff options
context:
space:
mode:
Diffstat (limited to '3760/CH2/EX2.21/Ex2_21.sce')
-rw-r--r--3760/CH2/EX2.21/Ex2_21.sce7
1 files changed, 7 insertions, 0 deletions
diff --git a/3760/CH2/EX2.21/Ex2_21.sce b/3760/CH2/EX2.21/Ex2_21.sce
new file mode 100644
index 000000000..f09f6f630
--- /dev/null
+++ b/3760/CH2/EX2.21/Ex2_21.sce
@@ -0,0 +1,7 @@
+clc;
+B=1.6; // flux density between magnetic surfaces
+a=1; // area of magnetic surfaces
+uo=4*%pi*10^-7; // free space permeability
+f=(B^2*a)/(2*uo);
+printf('Force between two magnetic surfaces is %f N',f);
+