diff options
Diffstat (limited to '3872/CH8/EX8.5')
| -rw-r--r-- | 3872/CH8/EX8.5/EX8_5.jpg | bin | 0 -> 21453 bytes | |||
| -rw-r--r-- | 3872/CH8/EX8.5/EX8_5.sce | 18 |
2 files changed, 18 insertions, 0 deletions
diff --git a/3872/CH8/EX8.5/EX8_5.jpg b/3872/CH8/EX8.5/EX8_5.jpg Binary files differnew file mode 100644 index 000000000..1585ee12c --- /dev/null +++ b/3872/CH8/EX8.5/EX8_5.jpg diff --git a/3872/CH8/EX8.5/EX8_5.sce b/3872/CH8/EX8.5/EX8_5.sce new file mode 100644 index 000000000..c2d59db7d --- /dev/null +++ b/3872/CH8/EX8.5/EX8_5.sce @@ -0,0 +1,18 @@ +//Book - Power System: Analysis & Design 5th Edition
+//Authors - J. Duncan Glover, Mulukutla S. Sarma, and Thomas J. Overbye
+//Chapter - 8 ; Example 8.5
+//Scilab Version - 6.0.0 ; OS - Windows
+
+clc;
+clear;
+
+Zn = %i*10; //generator neutral impedance in ohm
+Zgo = %i*1; //generator zero sequence impedance in ohm
+Zg1 = %i*15; //generator positive sequence impedance in ohm
+Zg2 = %i*3; //generator negative sequence impedance in ohm
+Zl1 = 0.087+(%i*0.99); //line impedace in ohm
+Zdel = 22.98+%i*(19.281); //impedance of the delta load in ohm
+V1=(415.69-(%i*240))/sqrt(3); //RMS line to neutral phase voltage of AC supply in Volts
+I1 = V1/(Zl1+((1/3)*Zdel)); //sequence component of line current in A
+
+printf('\nThe sequence component of the line current Ia is %.4f amperes and its angle is %.4f degree ',abs(I1), atand(imag(I1), real(I1)));
|
