summaryrefslogtreecommitdiff
path: root/1628/CH16/EX16.10/Ex16_10.sce
blob: bc88d71d9f9412c5a9149491c66c0e20a76f6119 (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

                // Examle 16.10

i1=4;                     // No load current
i2=6;                     // Full-load current
n=1500;                   // No.Of turns per poles
At1=i1*n;                 // Amper Turns per pole on No Load
disp(' Amper Turns per pole on No Load = '+string(At1)+' At');
 
At2=i2*n;                 // Amper Turns per pole on Full Load
disp(' Amper Turns per pole on Full Load = '+string(At2)+' At');

At=At2-At1;               // Amper Turns per pole of seires winding
disp(' Amper Turns per pole of seires winding = '+string(At)+' At');

Nse=At/100;               // Full Load Current
disp(' Full Load Current = '+string(Nse));





             //    p 647     16.10