summaryrefslogtreecommitdiff
path: root/24/CH29/EX29.6/Example29_6.sce
blob: dcfaeb9506b59b21da5c5378cf0ca4197add620c (plain)
1
2
3
4
5
6
7
8
9
10
11
//Given that
i = 28  //in A
LD = 46.6*10^-3  //in kg/m
g = 9.8  //in m/s^2

//Sample Problem 29-6
printf("**Sample Problem 29-6**\n")
L = 1  //(say)
m = LD*L
B = m*g/i/L
printf("The minimum magnetic field required to suspend the wire is equal to %eT", B)