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 /503/CH8/EX8.11 | |
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 '503/CH8/EX8.11')
-rwxr-xr-x | 503/CH8/EX8.11/ch8_11.sci | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/503/CH8/EX8.11/ch8_11.sci b/503/CH8/EX8.11/ch8_11.sci new file mode 100755 index 000000000..e1c1c4155 --- /dev/null +++ b/503/CH8/EX8.11/ch8_11.sci @@ -0,0 +1,20 @@ +//to calculate net power op,eff,line current and pf
+
+clc;
+j=sqrt(-1);
+Zs=(1/3)*(.3+j*6);
+phi=atand(imag(Zs)/real(Zs));
+Vt=400/sqrt(3);
+Ef=600/sqrt(3);
+a=sqrt(Vt^2+Ef^2-2*Vt*Ef*cosd(phi));
+Ia=a/abs(Zs);disp(Ia,'line current(A)');
+B=acosd((Vt^2+a^2-Ef^2)/(2*Vt*a));
+
+phi=90-(90-atand(imag(Zs)/real(Zs)))-B;disp(cosd(phi),'pf');
+Pein=Vt*Ia*cosd(phi);
+Ra=.1;
+b=Ia^2*Ra;
+loss=2400;
+Pmout=Pein-loss/3-b;disp(Pmout,'net power op(W)');
+eff=Pmout/Pein;
+disp(eff*100,'efficiency(%)');
\ No newline at end of file |