1 files changed, 8 insertions, 0 deletions

diff --git a/3845/CH22/EX22.6/Ex22_6.sce b/3845/CH22/EX22.6/Ex22_6.sce
new file mode 100644
index 000000000..b8b227de3
--- /dev/null
+++ b/3845/CH22/EX22.6/Ex22_6.sce
@@ -0,0 +1,8 @@
+//Example 22.6

+B=2*5*10^-5;//Magnetic field strength (twice that of Earth's) (T)

+r=5*10^-2;//Distance (m)

+mu_0=4*%pi*10^-7;//Permeability of free space (T.m/A)

+I=2*%pi*r*B/mu_0;//Current (A)

+printf('Current in the wire = %0.1f A',I)

+//Openstax - College Physics

+//Download for free at http://cnx.org/content/col11406/latest