summaryrefslogtreecommitdiff
path: root/147/CH14/EX14.13/Example14_13.sce
blob: fdbb0734fdb261790e0e6c78b1543853c2ef9792 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
close();
clear;
clc;
//(a) 
//from solved example 14.12 and 14.9
Ra = 0.05; //ohm
V = 230; //V
Pc = 920 + 1800; //W
If = 4; //A
Ia = sqrt(Pc/Ra);
Il = Ia - If;
mprintf("(a) At load of %0.2f A ,the generator achieves maximum efficiency\n\n",Il);
//(b)
//output power 'Po'
Po = Il*V; //W
Pa = Ia^2 * Ra;
//input power 'Pi'
Pi = 2*Pa + Po; //W
//maximum efficiency 'n'
n = Po/Pi;
mprintf("(b) Maximum efficiency, n = %0.1f %%",n*100);