summaryrefslogtreecommitdiff
path: root/2075/CH9/EX9.1/pe9_1.sce
blob: fef256959a09fd7c7eb44636760680432021d3c8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//example 9.1
clc;funcprot(0);
//Initialization of Variable
V=28;//V
C=4700;//microF
R=16;//load
f=120;//hertz
//calculation
Vp=V*2^.5-2;
disp(Vp,"peak voltage in V:")
Vd=.95*Vp;
disp(Vd,"load voltage in V:")
Id=Vd/R;
v=Id/f/C;
disp(v*1e6,"ripple voltage in V:")
//approximation
Vd=Vp-v*1e6/2;
disp(Vd,"approx. load voltage in V:")
clear()