diff options
Diffstat (limited to '1418/CH27/EX27.6/EX27_6.sce')
-rw-r--r-- | 1418/CH27/EX27.6/EX27_6.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/1418/CH27/EX27.6/EX27_6.sce b/1418/CH27/EX27.6/EX27_6.sce new file mode 100644 index 000000000..812c7615e --- /dev/null +++ b/1418/CH27/EX27.6/EX27_6.sce @@ -0,0 +1,24 @@ +//EXAMPLE 27.6
+//DC GENERATOR
+
+clc;
+funcprot(0);
+
+//Variable Initialisation
+Z=500;......//Total number of conductors
+Ia=200;......//Total current in Amperes
+P=6;.........//Total number of poles
+b=10;........//Angle of lead in degrees
+y=1.3;...........//Leakage coefficient
+Aw=2;...........//Number of parallel paths for wave wound generator
+
+I=Ia/Aw;.....//Current per path in Amperes
+ATepole=Z*I*((1/(2*P))-(b/360));...........//Cross magnetizing ampere-turns per pole
+r=round(ATepole);.....//Rounding of decimal places
+disp(r,"(a).Cross magnetizing ampere-turns per pole:");
+ATdpole=Z*I*b/360;........//Demagnetizing ampere-turns per pole
+r1=round(ATdpole);.......//Rounding of decimal places
+disp(r1,"(b).Demagnetizing ampere-turns per pole:");
+S=y*r1/Ia;.......//Series turns required to balance the demagnetizing ampere-turns
+r2=round(S);....//Rounding of decimal places
+disp(r2,"Series turns required to balance the demagnetizing ampere-turns:");
|