summaryrefslogtreecommitdiff
path: root/1628/CH16/EX16.17/Ex16_17.sce
blob: 0f964aa8d71b726c540c81dea59de6c86652c758 (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

               // Example 16.17
               
Ra=0.2;               // Resistance                              
V=250;                // Supply voltage               
Eb=0;                 // Voltage at rest
Ia=(V-Eb)/Ra;         // Current drawn by the machine at Eb=200
disp(' Current drawn by the machine at (Eb=0) = '+string(Ia)+' Amp'); 

Eb1=200;              // Voltage at Eb=200
Ia1=(V-Eb1)/Ra;       // Current drawn by the machine at Eb=200
disp(' Current drawn by the machine at (Eb=200) = '+string(Ia1)+' Amp'); 

Eb2=250;              // Voltage at Eb=250
Ia2=(V-Eb2)/Ra;       // Current drawn by the machine at Eb=250
disp(' Current drawn by the machine at (Eb=250) = '+string(Ia2)+' Amp'); 

Eb3=-250;              // Voltage at Eb=-250
Ia3=(V-Eb3)/Ra;        // Current drawn by the machine at Eb=-250
disp(' Current drawn by the machine at (Eb=-250) = '+string(Ia3)+' Amp'); 





                    //  p 653           16.17