summaryrefslogtreecommitdiff
path: root/2672/CH6/EX6.14/Ex6_14.sce
blob: 06b0bf1c3f2b83c313713fec44414b91df445896 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Example 6_14
clc;
clear;
close;
format('v',7);
//given data : 
Vdc=100;//V
rf=20;//ohm
RL=500;//ohm
Idc=Vdc/RL;//A
Im=%pi*Idc;//A
Vm=Im*(RL+rf);//V
disp(Vm,"(a) The ac voltage required(V) : ");
format('v',5);
Eta=0.406/(1+rf/RL)*100;//%(Rectification Efficiency)
disp(Eta,"Rectification Efficiency(%) : ");