diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1938/CH5/EX5.14 | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '1938/CH5/EX5.14')
-rwxr-xr-x | 1938/CH5/EX5.14/5_14.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/1938/CH5/EX5.14/5_14.sce b/1938/CH5/EX5.14/5_14.sce new file mode 100755 index 000000000..7a2dbc0e0 --- /dev/null +++ b/1938/CH5/EX5.14/5_14.sce @@ -0,0 +1,19 @@ +clc,clear
+printf('Example 5.14\n\n')
+
+VA=1000*1000
+V_L=4600 , V_ph=V_L/sqrt(3)
+I_L=VA/(sqrt(3)*V_L)
+I_aph_FL=I_L,I_aph=I_aph_FL
+I_sc=(150/100)* I_aph_FL
+V_OC_line=1744
+V_OC_ph= V_OC_line/sqrt(3)
+
+Z_s=V_OC_ph / I_sc
+R_a=1
+X_s=sqrt(Z_s^2-R_a^2)
+
+phi=acos(0.8 ) //lagging
+E_ph = sqrt((V_ph*cos(phi)+I_aph*R_a)^2 +(V_ph*sin(phi)+ I_aph*X_s)^2)
+regulation=100*(E_ph-V_ph)/V_ph
+printf('Voltage regulation at full load 0.8 pf is %.2f percent\n',regulation)
|