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.43 | |
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.43')
-rwxr-xr-x | 503/CH8/EX8.43/ch8_43.sci | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/503/CH8/EX8.43/ch8_43.sci b/503/CH8/EX8.43/ch8_43.sci new file mode 100755 index 000000000..690ce6807 --- /dev/null +++ b/503/CH8/EX8.43/ch8_43.sci @@ -0,0 +1,32 @@ +//to clculate pf angle, torque angle,equivalent capicitor and inductor value
+
+clc;
+of1=250;
+scr=.52; //short ckt ratio
+of2=of1/scr;
+r=25*10^6;
+V=13000;
+Ia=r/(sqrt(3)*V);
+Isc=Ia*of1/of2;
+Xs=V/(sqrt(3)*Isc);
+Xb=V/(sqrt(3)*Ia);
+Xsadj=Xs/Xb;
+
+f=50;
+If=200;
+Ef=V*If/of1;
+Vt=V/sqrt(3);
+Ia=(Vt-Ef/sqrt(3))/Xs;
+dl=0;disp(dl,'torque angle(deg)');
+pf=90;disp(pf,'pf angle(deg)');
+L=(V/(sqrt(3)*Ia))/(2*%pi*f);
+disp(L,'inductor value(H)');
+
+If=300;
+Eff=V*If/of1;
+Vt=Ef/sqrt(3);
+Ia=(Eff/sqrt(3)-Vt)/Xs;
+dl=0;disp(dl,'torque angle(deg)');
+pf=90;disp(pf,'pf angle(deg)');
+c=1/((V/(Ia))*(2*%pi*f));
+disp(c,'capacitor value(F)');
|