diff options
Diffstat (limited to '3816/CH3/EX3.3/3_3.sce')
-rw-r--r-- | 3816/CH3/EX3.3/3_3.sce | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/3816/CH3/EX3.3/3_3.sce b/3816/CH3/EX3.3/3_3.sce new file mode 100644 index 000000000..524f4c325 --- /dev/null +++ b/3816/CH3/EX3.3/3_3.sce @@ -0,0 +1,32 @@ +clc;
+clear;
+Mva=3.75;
+V=10;
+p=5;
+S=144;
+C=5;
+S1=12;
+x1=1;
+x2=2;
+thetaa1=0.116;
+m=3;
+r=(p*%pi)/S;
+disp(r,'The slot angle is:')
+g1=S/(p*m);
+disp(g1,'The fractional value of slot per pole per phase is:')
+Sab=g1*((3*x1)+2);
+disp(Sab,'The spacing between the starts of Aand B is:')
+Sac=g1*((3*x2)+4);
+disp(Sac,'The spacing between the starts of A and C is:')
+theta1=60*(1/2);
+theta2=2*(1/2)*(1/2);
+theta3=30*(1/2);
+Kdn=(sin(theta1))/(24*sin(theta2));
+Ken=cos(theta3);
+Kwn=Kdn*Ken;
+n=0:1:7;
+disp(Kwn,'Kwn=')
+Eph1=4.44*0.925*50*240*thetaa1;
+Eph5=(5750*(0.049/0.925)*(11.2*100.6))/10000;
+Eph7=(5750*(0.035/0.925)*(2.8*100.6))/10000;
+disp(Eph7,Eph5,Eph1,'The emfs are:')
|