diff options
Diffstat (limited to '1370/CH7/EX7.25/exp7_25.sce')
| -rwxr-xr-x | 1370/CH7/EX7.25/exp7_25.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1370/CH7/EX7.25/exp7_25.sce b/1370/CH7/EX7.25/exp7_25.sce new file mode 100755 index 000000000..7bfc28573 --- /dev/null +++ b/1370/CH7/EX7.25/exp7_25.sce @@ -0,0 +1,14 @@ +//example7.25
+clc
+disp("For a half wave rectifier,")
+disp("(I_m) = (E_sm)/(R_f+R_L)")
+disp("and, (I_DC) = (I_m)/pi = (E_sm)/pi*(R_f+R_L)")
+disp("and, (V_DC) = (I_DC)*(R_L)")
+disp("Therefore, (P_DC) = (V_DC)*(I_DC) = (I_DC^2)*(R_L) = ((E_sm^2)*(R_L))/((pi^2)*(R_f+R_L)^2)")
+disp("For this power to be maximum,")
+disp("(dP_DC)/(dR_L) = 0")
+disp("(d/dR_L)*((E_sm^2)*(R_L))/((pi^2)*(R_f+R_L)^2) = ((E_sm^2)/(pi^2))*((R_f+R_L)^2 - R_L*2(R_f+R_L))/(R_f+R_L)^4")
+disp("Therefore, (R_f+R_L)^2 - 2*R_L*(R_f+R_L) = 0")
+disp("Therefore, (R_f^2)-(R_L^2) = 0")
+disp("Therefore, (R_L)^2 = (R_f)^2 i.e. R_L = R_f")
+disp("Thus the power output is maximum if R_L = R_f")
|