summaryrefslogtreecommitdiff
path: root/431/CH2/EX2.25/EX2_25.sce
blob: 030f3fea0ac505bc73c7e1aaecb17557fad9de11 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Calculate the ampere turns for each commutating pole
//Chapter 2
//Example 2.25
//page 135
clear;
clc;
disp("Example 2.25")
P=8;..........................//pole
Z=107;.........................//generator with slots
Ia=1000;.....................//current containing in amperes
Bag=0.32;......................//gap flux density in Wb/m^2
lg=0.012;..........................//interpole air gap in meters
pi=3.14;
Mu=(4*pi*10^-7)
AT=(((Ia*Z)/(2*P))+((Bag*lg)/Mu));
printf("current for each commutating pole=%f",AT)