summaryrefslogtreecommitdiff
path: root/1991/CH8/EX8.4/8_4.sce
blob: 18733ffc5c337f5fbbf0c097009bb6187a5598a0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clc
clear
//INPUT DATA
Ix=1 //current in first wire
Iy=1 //current in second wire
FbyL=2*10^-7 //according to the definition of ampere
a=1 //distance between the wires


//calculation

m=(2*%pi*a*FbyL)/(Ix*Iy)



//output
printf("the permeability of free space is %3.3e H/m  ",m)