summaryrefslogtreecommitdiff
path: root/1628/CH6/EX6.1/Ex6_1.sce
blob: ae79c3c28bf7b74cb4fe892ea456b4e878552ad3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

                      // Example  6.1

N=200;             // No.Of turns
I=4;               // Current of a Coil
l=.06;             // circumference of Coil
H=(N*I)/l;         // Formula of Megnetic Field Strength
disp('(a) The Megnetic Field Strength = '+string(H)+' A/m');
mo=4*%pi*10^-7;    // Permeability of free Space
mr=1;              //Permeability of coil
B=mr*mo*H;         // Formula of Flux Density
disp('(b) The Flux Density is = '+string(B)+' Tesla');
A=500*10^-6;       // Area of Coil 
Q=B*A;             // Total Flux
disp('(c) The total Flux is = '+string(Q)+' Wb');



        //  p 211      6.1