summaryrefslogtreecommitdiff
path: root/3760/CH7/EX7.3/Ex7_3.sce
blob: 36d579d0f0c3a047a020d3bafc2620e80e549dee (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
clc;
p=4; // number of poles
s=14; // number of slots
cp=2; // coil sides per slots
w=2; // winding pitch
C=(s*cp)/2; // number of coils
yb=(2*C)/p;
disp('Back pitch is');
disp(yb);
yf=yb-w;
disp('Front pitch is');
disp(yf);
disp('winding table for progressive lap winding is');
disp('(1-8)-(3-10)-(5-12)-(7-14)-(9-16)-(11-18)-(13-20)-(15-22)-(17-24)-(19-26)');
disp('-(21-28)-(23-2)-(25-4)-(27-6)');
disp('from winding diagram')
disp('Brush A is touching segments 1 and 2 partly');
disp('Brush B is at segment 5');
disp('Brush C is at segment 8');