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 /10/CH6/EX5 | |
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 '10/CH6/EX5')
-rwxr-xr-x | 10/CH6/EX5/cha6_5.sce | 60 |
1 files changed, 60 insertions, 0 deletions
diff --git a/10/CH6/EX5/cha6_5.sce b/10/CH6/EX5/cha6_5.sce new file mode 100755 index 000000000..9e01b753f --- /dev/null +++ b/10/CH6/EX5/cha6_5.sce @@ -0,0 +1,60 @@ +V=460;Phase=3;N=1200;Hp=125;
+Ra=0.078;Xal=0.15;Xar=1.85;Nre=28.2;Nse=28.2;
+
+Ia=sqrt(Phase)*V
+
+Ia=121.4
+
+Vt=V/sqrt(Phase)
+
+Ea=Vt-(Ia*Ra)
+
+Xs=Xal+Xar
+
+function[x,y]=polar2rect(r,theta)
+x=r*cos(theta*%pi/180);
+y=r*sin(theta*%pi/180);
+endfunction
+
+[x1,y1]=polar2rect(Ea,0)
+
+[x2,y2]=polar2rect(Xs,90)
+
+X1=x1+%i*y1
+
+X2=x2+%i*y2
+
+Im=X1/X2
+
+function[r,theta]=rect2polar(x,y)
+r=sqrt(x^2+y^2);
+theta=atan(y/x)*180/%pi;
+endfunction
+
+[Im,Angle1]=rect2polar(7.84D-15,-128.0)
+
+function[x,y]=polar2rect(r,theta)
+x=r*cos(theta*%pi/180);
+y=r*sin(theta*%pi/180);
+endfunction
+
+[x1,y1]=polar2rect(Im,Angle1)
+
+[x2,y2]=polar2rect(Ia,0)
+
+X1=x1+%i*y1
+
+X2=x2+%i*y2
+
+X=X1-X2
+
+function[r,theta]=rect2polar(x,y)
+r=sqrt(x^2+y^2);
+theta=atan(y/x)*180/%pi;
+endfunction
+
+[a,b]=rect2polar(-121.4,-128)
+
+n=sqrt(2)/Phase*Nre
+
+If=(a/n)*(Xs/Xar)
|