summaryrefslogtreecommitdiff
path: root/2078/CH5/EX5.9/Example5_9.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2078/CH5/EX5.9/Example5_9.sce
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 '2078/CH5/EX5.9/Example5_9.sce')
-rwxr-xr-x2078/CH5/EX5.9/Example5_9.sce34
1 files changed, 34 insertions, 0 deletions
diff --git a/2078/CH5/EX5.9/Example5_9.sce b/2078/CH5/EX5.9/Example5_9.sce
new file mode 100755
index 000000000..23738c94c
--- /dev/null
+++ b/2078/CH5/EX5.9/Example5_9.sce
@@ -0,0 +1,34 @@
+//Exa 5.9
+clc;
+clear;
+close;
+//Given data :
+l=100;//km
+P=20;//MW
+VRL=66*10^3;//volt
+f=50;//Hz
+R=10;//ohm
+L=111.7*10^-3;//H
+C=0.9954*10^-6;//F
+pf=0.8;//power factor
+X=2*%pi*f*L;//ohm
+Y=2*%pi*f*C;//S
+cos_fi_r=pf;
+sin_fi_r=sqrt(1-cos_fi_r^2);
+VR=VRL/sqrt(3);//volt
+IR=P*10^6/(sqrt(3)*VRL*pf);//A
+IR=IR*(cos_fi_r-%i*sin_fi_r);//A
+Z=R+%i*X;//ohm
+Vdash=VR+1/2*IR*Z;//Volt
+IC=Vdash*%i*Y;//A
+IS=IR+IC;//A
+VS=Vdash+1/2*IS*Z;//Volt
+VSL=abs(VS)*sqrt(3);//Volt
+disp(VSL,"Sending end line voltage(Volt) :");
+Reg=(VSL-VRL)/VRL*100;//%
+disp(Reg,"Regulation(%) : ");
+fi_s=atand(imag(VS),real(VS))-atand(imag(IS),real(IS));//
+cos_fi_s=cosd(fi_s);//sending end pf
+Eta_T=sqrt(3)*VRL*abs(IR)*cos_fi_r/(sqrt(3)*VSL*abs(IS)*cos_fi_s)*100;//%
+disp(Eta_T,"Transmission Efficiency(%) : ");
+//Ans is not accurate in the book.