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 /2078/CH5/EX5.4/Example5_4.sce | |
| 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 '2078/CH5/EX5.4/Example5_4.sce')
| -rwxr-xr-x | 2078/CH5/EX5.4/Example5_4.sce | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/2078/CH5/EX5.4/Example5_4.sce b/2078/CH5/EX5.4/Example5_4.sce new file mode 100755 index 000000000..3550f6f15 --- /dev/null +++ b/2078/CH5/EX5.4/Example5_4.sce @@ -0,0 +1,31 @@ +//Exa 5.4
+clc;
+clear;
+close;
+//Given data :
+l=50;//km
+S=10000;//kVA
+pf=0.8;//power factor
+d=1.2*100;//cm
+cos_fi_r=pf;
+sin_fi_r=sqrt(1-cos_fi_r^2);
+V=33000;//Volts
+VR=V/sqrt(3);//V
+f=50;//Hz
+I=S*1000/sqrt(3)/V;//A
+LineLoss=10/100*S*10^3*pf;//W
+R=LineLoss/3/I^2;//ohm
+rho=1.73*10^-6;//kg/m^3
+a=rho*l*1000*100/R;//cm^2
+r=sqrt(a/%pi);//cm
+L=0.2*log(d/r/0.7788)*l;//mH
+X=2*%pi*f*L*10^-3;//ohm
+VS=VR+I*(R*cos_fi_r+X*sin_fi_r);//V
+VSL=sqrt(3)*VS/1000;//kV
+disp(VSL,"Line voltage at sending end(kV)");
+pf_s=(VR*cos_fi_r+I*R)/VS;//lagging(sendinf end pf)
+disp(pf_s,"Sending end pf(lagging) ");
+Eta_T=S*pf/(S*pf+LineLoss/1000)*100;
+disp(Eta_T,"Transmission Efficiency(%)");
+Reg=(VSL-V/1000)/(V/1000)*100;//%
+disp(Reg,"% Regulation");
|