summaryrefslogtreecommitdiff
path: root/1319/CH10/EX10.5/10_5.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1319/CH10/EX10.5/10_5.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '1319/CH10/EX10.5/10_5.sce')
-rw-r--r--1319/CH10/EX10.5/10_5.sce27
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)
+
+