summaryrefslogtreecommitdiff
path: root/3129/CH3/EX3.1/Ex3_1.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3129/CH3/EX3.1/Ex3_1.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '3129/CH3/EX3.1/Ex3_1.sce')
-rwxr-xr-x3129/CH3/EX3.1/Ex3_1.sce41
1 files changed, 41 insertions, 0 deletions
diff --git a/3129/CH3/EX3.1/Ex3_1.sce b/3129/CH3/EX3.1/Ex3_1.sce
new file mode 100755
index 000000000..85f279dc4
--- /dev/null
+++ b/3129/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,41 @@
+//Finding the Performance Parameters of a Half-Wave Rectifier
+//Example 3.1 (Page No- 71)
+clc
+clear
+Vm = 1; // Assume value of Vm
+R = 1; // Assume R is 1
+Vdc = (0.318*Vm)/R;
+Idc = (0.318*Vm)/R;
+Pdc = (0.318*Vm)^2/R;
+Pac = (0.5*Vm)^2/R;
+Vrms = 0.5*Vm;
+Irms = (0.5*Vm)/R;
+// part(a)
+eta = (Pdc/Pac)*100; // efficiency
+printf('Efficiency : %2.2f%% \n',eta);
+//part(b)
+FF = Vrms/Vdc; //Form Factor
+perFF = FF*100; // % Form factor
+printf('Form Factor : %1.2f or %d%% \n',FF,perFF);
+//part(c)
+RF = sqrt(FF^2-1); // Ripple Factor
+perRF = RF*100; // % RF
+printf('Ripple Factor: %1.2f of %d%% \n',RF,perRF);
+//part(d);
+Vs = Vm/sqrt(2);
+Is = (0.5*Vm)/R;
+VA = Vs*Is;
+TUF = Pdc/(VA); // Transformer Utility Factor
+printf('Transformer utility Factor : %0.3f \n',TUF);
+//part(e)
+printf('Peak Inverse Voltage (PIV) = Vm \n');
+//part(f)
+Is_peak=Vm/R;
+Is = (0.5*Vm)/R;
+CF = Is_peak/Is; // Crest Factor
+printf('Crest Factor : %d \n',CF);
+//part(g)
+PF = Pac/VA;
+printf('Input Power factor: %0.3f',PF);
+
+