summaryrefslogtreecommitdiff
path: root/3769/CH9/EX9.22
diff options
context:
space:
mode:
Diffstat (limited to '3769/CH9/EX9.22')
-rw-r--r--3769/CH9/EX9.22/Ex9_22.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3769/CH9/EX9.22/Ex9_22.sce b/3769/CH9/EX9.22/Ex9_22.sce
new file mode 100644
index 000000000..e667b74d2
--- /dev/null
+++ b/3769/CH9/EX9.22/Ex9_22.sce
@@ -0,0 +1,17 @@
+clear
+//Given
+r=0.04 //m
+I1=20
+I2=16
+l=0.15
+r1=0.1
+
+//Calculation
+//
+u=4*%pi*10**-7
+F1=(u*I1*I2*l)/(2.0*%pi*r)
+F2=(u*I1*I2*l)/(2.0*%pi*r1)
+F=F1-F2
+
+//Result
+printf("\n Net force on the loop is %0.3f *10**-4 N", F*10**4)