summaryrefslogtreecommitdiff
path: root/1628/CH16/EX16.8/Ex16_8.sce
blob: 3b6363a25babf927ad93b91bccc844fb5faf7685 (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.8

po=30000;          // o/p power
v=200;             // Voltage 
Il=po/v;           // Load Current (Il)
disp(' Load Current (Il) = '+string(Il)+' Amp');

Rsh=50;                      // Shunt field resistance R1
Ish=v/Rsh;                   // Shunt field Current
Ia=Il+Ish;                   // Armature Current (Ia)
Ra=0.05;                     // Shunt field resistance R2
Eg=v+(Ia*Ra);                // Generated emf (Eg)
disp('Generated emf (Eg) = '+string(Eg)+' Volt');

Cu=Ish^2*Rsh+Ia^2*Ra;        // The copper Losses (Cu)
disp('The copper Losses (Cu) = '+string(Cu)+' W');

e=po*100/(1000+po+Cu);       // The Efficiency (e)
disp('The Efficiency (e) = '+string (e)+' %');



             // p 641     16.8