From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3872/CH2/EX2.2/EX2_2.jpg | Bin 0 -> 16961 bytes
 3872/CH2/EX2.2/EX2_2.sce |  26 ++++++++++++++++++++++++++
 2 files changed, 26 insertions(+)
 create mode 100644 3872/CH2/EX2.2/EX2_2.jpg
 create mode 100644 3872/CH2/EX2.2/EX2_2.sce

(limited to '3872/CH2/EX2.2')

diff --git a/3872/CH2/EX2.2/EX2_2.jpg b/3872/CH2/EX2.2/EX2_2.jpg
new file mode 100644
index 000000000..e46c2ac7f
Binary files /dev/null and b/3872/CH2/EX2.2/EX2_2.jpg differ
diff --git a/3872/CH2/EX2.2/EX2_2.sce b/3872/CH2/EX2.2/EX2_2.sce
new file mode 100644
index 000000000..7a01ddca2
--- /dev/null
+++ b/3872/CH2/EX2.2/EX2_2.sce
@@ -0,0 +1,26 @@
+//Book - Power System: Analysis & Design 5th Edition
+//Authors - J. Duncan Glover, Mulukutla S. Sarma, and Thomas J. Overbye
+//Chapter - 2 ; Example 2.2
+//Scilab Version - 6.0.0 ; OS - Windows
+
+
+clc;
+clear;
+V=100*exp(%i*130*%pi/180);                          //Source Voltage in Volts
+I=10*exp(%i*10*%pi/180);                            //Source current in Amperes
+S=V*conj(I);                                        //Apparent power in VA
+P=real(S);                                          //Real power in Watts
+Q=imag(S);                                          //Reactive power in VAR
+printf('The values are P=%d Watts and Q=%d VAR. Hence,',P,Q);
+if P<0 then
+    P=-P
+    printf('\nThe source absorbs %d Watts',P);
+else 
+    printf('\nThe source delivers %d Watts',P);
+end
+if Q<0 then
+    Q=-Q;
+    printf('\nThe source absorbs %d VAR',Q);
+else
+    printf('\nThe source delivers %d VAR',Q);
+end
-- 
cgit