1 files changed, 20 insertions, 0 deletions
diff --git a/2330/CH4/EX4.1/ex4_1.sce b/2330/CH4/EX4.1/ex4_1.sce
new file mode 100755
index 000000000..d82b9de45
--- /dev/null
+++ b/2330/CH4/EX4.1/ex4_1.sce
@@ -0,0 +1,20 @@
+// Example 4.1
+format('v',5)
+clc;
+clear;
+close;
+// given data
+V2rms= 40;// in V
+R_L= 20;// in Ω
+V2peak= V2rms/0.707;// in V
+Vout_peak= V2peak;// in V
+// The dc voltage across the load resistor 
+Vdc=0.318*Vout_peak;// in V
+//The peak inverse voltage across the diode 
+PIV= V2peak;// in V
+Idc= Vdc/R_L;// in A
+// The dc current through the diode 
+I_diode= Idc;// in A
+disp(Vdc,"The dc voltage across the load resistor in volts is : ");
+disp(PIV,"The peak inverse voltage across the diode in volts is : ");
+disp(I_diode,"The dc current through the diode in A is : ")