diff options
Diffstat (limited to '1628/CH5/EX5.3/Ex5_3.sce')
-rwxr-xr-x | 1628/CH5/EX5.3/Ex5_3.sce | 17 |
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 |