1 files changed, 26 insertions, 0 deletions
diff --git a/1418/CH27/EX27.2/EX27_2.sce b/1418/CH27/EX27.2/EX27_2.sce
new file mode 100644
index 000000000..2bf8e47d9
--- /dev/null
+++ b/1418/CH27/EX27.2/EX27_2.sce
@@ -0,0 +1,26 @@
+//EXAMPLE 27.2
+//8-POLE GENERATOR
+
+clc;
+funcprot(0);
+
+//Variable Initialisation
+P=8;......//Total number of poles
+Z=722;.....//Total number of conductors
+V=500;.......//Termiinal voltage in Volts
+Ia=200;........//Armature current in Amperes
+Z=1280;......//Total number of conductors
+as=160;........//Total number of armature segments
+ba=4;..........//Advancement in brushes from no-load neutral axis
+Al=P;...........//Number of parallel paths in a 
+
+I=Ia/P;.....//Current per path in Amperes
+b=ba*360/as;......//Brush lead in degrees
+
+
+ATdpole=Z*I*b/360;.....//Armatuue demagnetizing ampere-turns per pole
+disp(ATdpole,"Armatuue demagnetizing ampere-turns per pole:");
+ATepole=Z*I*((1/(2*P))-(b/360));.......//Armature cross-magnetizing ampere-turns per pole
+disp(ATepole,"Armature cross-magnetizing ampere-turns per pole:");
+
+