summaryrefslogtreecommitdiff
path: root/3556/CH12/EX12.15/Ex12_15.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3556/CH12/EX12.15/Ex12_15.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 '3556/CH12/EX12.15/Ex12_15.sce')
-rw-r--r--3556/CH12/EX12.15/Ex12_15.sce37
1 files changed, 37 insertions, 0 deletions
diff --git a/3556/CH12/EX12.15/Ex12_15.sce b/3556/CH12/EX12.15/Ex12_15.sce
new file mode 100644
index 000000000..dcdbb0ac3
--- /dev/null
+++ b/3556/CH12/EX12.15/Ex12_15.sce
@@ -0,0 +1,37 @@
+clc
+// Fundamental of Electric Circuit
+// Charles K. Alexander and Matthew N.O Sadiku
+// Mc Graw Hill of New York
+// 5th Edition
+
+// Part 2 : AC Circuits
+// Chapter 12 : Three Phase Circuit
+// Example 12 - 15
+
+clear; clc; close;
+//
+// Given data
+Zy = complex(8,6);
+VL = 208.0000;
+// Calculations Wattmeter Reading 1 dan Wattmeter Reading 2
+Zy_mag = norm(Zy);
+Zy_angle = atand(imag(Zy),real(Zy));
+Vp = VL/sqrt(3);
+IL = Vp/Zy_mag;
+P1 = VL*IL*cosd(Zy_angle + 30.0000);
+P2 = VL*IL*cosd(Zy_angle - 30.0000);
+// Calculations Total Real Power
+PT = P1 + P2;
+// Calculations Total Reactive Power
+QT = sqrt(3)*(P2 - P1);
+//
+disp("Example 12-15 Solution : ");
+disp("a. Wattmeter Reading : ");
+printf(" \n P1 = Reading of Wattmeter W1 = %.3f Watt",P1)
+printf(" \n P2 = Reading of Wattmeter W2 = %.3f Watt",P2)
+disp("")
+disp("b. Total Real Power : ");
+printf(" \n PT = Total Real Power = %.3f Watt",PT)
+disp("")
+disp("c. Total Reactive Power : ");
+printf(" \n QT = Total Real Power = %.3f Watt",QT)