671/CH10/EX10.15/10_15.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

V=230
Rf=120
Ra=0.15
If=V/Rf
Psh=V*V/Rf

I=14.5
Pin=I*V
Ia=I-If
Pk=Pin-Ia*Ia*Ra

I=215
Ia=I-If
Pl=Ia*Ia*Ra+Pk
Pin=V*I
effi=(Pin-Pl)/Pin
disp(effi)

Ia=sqrt(Pk/Ra)
Il=Ia+If
Pl=2*Pk
Pin=V*Il
effi=(Pin-Pl)/Pin
disp(effi)