summaryrefslogtreecommitdiff
path: root/1319/CH1/EX1.26/1_26.sce
blob: b5d73662751e514ed4d5d288ac9035c87abfaaf1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
// Find the current required to develop a flux of 1.6 mWb

clc;
clear;

B=1;
H=900;
m0=4*%pi*(10^-7);
mr=B/(m0*H);

//lengths
lg=1*(10^-3);// Air gap
lc=24*(10^-2);// Central Limb
la=60*(10^-2);// Side limbs

//area
A=4*4*(10^-4);

phi=1.6*(10^-3); // Flux

//Reluctances
Ra=lg/(m0*A); // Air gap
Rc=lc/(m0*mr*A);// Central limb
Rs=la/(m0*mr*A);// One side limbs

//mmf
AT1=(Ra+Rc)*phi; // Central limb
AT2=Rs*phi/2;// One of the side limb
AT=AT1+AT2; // Total 

N=680;//Turns

I=AT/N;

printf('The current the current required to produce a total flux of 1.6 mWb = %g A\n',I)