diff options
Diffstat (limited to 'Working_Examples/293/CH15/EX15.5')
-rwxr-xr-x | Working_Examples/293/CH15/EX15.5/eg15_5.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/Working_Examples/293/CH15/EX15.5/eg15_5.sce b/Working_Examples/293/CH15/EX15.5/eg15_5.sce new file mode 100755 index 0000000..151ccb4 --- /dev/null +++ b/Working_Examples/293/CH15/EX15.5/eg15_5.sce @@ -0,0 +1,12 @@ +//b
+mu0 = 4*%pi*10^-7 ;
+//plunger magnet dimensions (in meters)
+x = 0.025;
+h = 0.05;
+a = 0.025;
+g = 0.00125;
+
+mmf = 1414; //(in At)
+
+F = %pi*a*mu0*(mmf^2)*(h^2)*(1/(x + h)^2)/g; //magnitude of the force
+disp(F, "magnitude of the force (in Newtons) = ")
\ No newline at end of file |