summaryrefslogtreecommitdiff
path: root/1370/CH4/EX4.16
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1370/CH4/EX4.16
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1370/CH4/EX4.16')
-rwxr-xr-x1370/CH4/EX4.16/Exp4_16.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/1370/CH4/EX4.16/Exp4_16.sce b/1370/CH4/EX4.16/Exp4_16.sce
new file mode 100755
index 000000000..c944e60d3
--- /dev/null
+++ b/1370/CH4/EX4.16/Exp4_16.sce
@@ -0,0 +1,18 @@
+//Example 4.16
+clc
+disp("V_ph = 2200 V, f = 50 Hz, 440 kVA, R_a = 0.5 ohm")
+disp("I_aph = 200 A = I_ac, V_oc = 1160 V, I_f = 40 A")
+za=1160/200
+format(4)
+disp(za,"(a) Z_s(in ohm) = V_oc/I_ssc |same I_f =")
+xs=sqrt((5.8^2)-(0.5^2))
+format(7)
+disp(xs,"(b) X_s(in ohm) = sqrt(Z_a^2 - R_a^2) =")
+disp("(c) cos(phi) = 0.707 leading, sin(phi) = 0.707")
+ephi=sqrt(((((2200*0.707)+(200*0.5))^2)+(((2200*0.707)-(200*5.7784))^2)))
+disp("Therefore, E_ph^2 = (V_ph*cos(phi)+I_a*R_a)^2 + (V_ph*sin(phi)-I_a*R_a)^2")
+format(10)
+disp(ephi,"E_ph(in V) =")
+r=((1702.9754-2200)/2200)*100
+format(7)
+disp(r,"Therefore, %R(in percentage) = (E_ph-V_ph / V_ph)*100 = ")