1 files changed, 27 insertions, 0 deletions
diff --git a/1319/CH10/EX10.5/10_5.sce b/1319/CH10/EX10.5/10_5.sce
new file mode 100644
index 000000000..d93f19e3a
--- /dev/null
+++ b/1319/CH10/EX10.5/10_5.sce
@@ -0,0 +1,27 @@
+// Calculate the inductance of a choke to enable the lamp
+
+clc;
+clear;
+
+P=500; // Power Rating of a discharge lamp
+I=4; // Current drawn by the lamp
+w=2*%pi*50; // Angular frequency
+
+Vdl=P/I; // Supply voltage for the proper working of the lamp
+V=250; // AC supply voltage
+
+//According the Voltage triangle
+
+Vil=sqrt((V^2)-(Vdl^2)); // Voltage drop across inductor
+
+Xl=Vil/I; //Reactance 
+L=Xl/w; // Inductor
+
+Prl=(I^2)*Xl; // Reactive power requirement of the coke
+
+C=Prl/((V^2)*w); // Capacitor supplying the necessary reactive power
+
+printf('The inductance that should be connected in series with the lamp to make it work = %g mH\n',L*1000)
+printf('The capacitor that should be connected in paralle to make the power factor unity = %g mF \n',C*1000)
+
+