summaryrefslogtreecommitdiff
path: root/1628/CH5/EX5.3/Ex5_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '1628/CH5/EX5.3/Ex5_3.sce')
-rwxr-xr-x1628/CH5/EX5.3/Ex5_3.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/1628/CH5/EX5.3/Ex5_3.sce b/1628/CH5/EX5.3/Ex5_3.sce
new file mode 100755
index 000000000..6d4c71a93
--- /dev/null
+++ b/1628/CH5/EX5.3/Ex5_3.sce
@@ -0,0 +1,17 @@
+
+
+ // Example 5.3
+
+mo=4*%pi*10^-7; // Permeability of free Space
+i1=80; // Current in 1st Wire
+i2=30; // Current in 2nd Wire
+r=2; // Distance between 2 wires
+
+F=(mo*i1*i2)/(2*%pi*r);
+disp(' Force between 2 wires = '+string(F)+' N/m');
+
+
+
+
+
+ // p 192 5.3