From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001 From: prashantsinalkar Date: Tue, 10 Oct 2017 12:27:19 +0530 Subject: initial commit / add all books --- 3760/CH7/EX7.1/Ex7_1.sce | 14 ++++++++++++++ 3760/CH7/EX7.10/Ex7_10.sce | 8 ++++++++ 3760/CH7/EX7.11/Ex7_11.sce | 18 ++++++++++++++++++ 3760/CH7/EX7.12/Ex7_12.sce | 19 +++++++++++++++++++ 3760/CH7/EX7.13/Ex7_13.sce | 22 ++++++++++++++++++++++ 3760/CH7/EX7.15/Ex7_15.sce | 9 +++++++++ 3760/CH7/EX7.2/Ex7_2.sce | 20 ++++++++++++++++++++ 3760/CH7/EX7.3/Ex7_3.sce | 19 +++++++++++++++++++ 3760/CH7/EX7.5/Ex7_5.sce | 30 ++++++++++++++++++++++++++++++ 3760/CH7/EX7.6/Ex7_6.sce | 19 +++++++++++++++++++ 3760/CH7/EX7.7/Ex7_7.sce | 20 ++++++++++++++++++++ 3760/CH7/EX7.8/Ex7_8.sce | 28 ++++++++++++++++++++++++++++ 3760/CH7/EX7.9/Ex7_9.sce | 9 +++++++++ 13 files changed, 235 insertions(+) create mode 100644 3760/CH7/EX7.1/Ex7_1.sce create mode 100644 3760/CH7/EX7.10/Ex7_10.sce create mode 100644 3760/CH7/EX7.11/Ex7_11.sce create mode 100644 3760/CH7/EX7.12/Ex7_12.sce create mode 100644 3760/CH7/EX7.13/Ex7_13.sce create mode 100644 3760/CH7/EX7.15/Ex7_15.sce create mode 100644 3760/CH7/EX7.2/Ex7_2.sce create mode 100644 3760/CH7/EX7.3/Ex7_3.sce create mode 100644 3760/CH7/EX7.5/Ex7_5.sce create mode 100644 3760/CH7/EX7.6/Ex7_6.sce create mode 100644 3760/CH7/EX7.7/Ex7_7.sce create mode 100644 3760/CH7/EX7.8/Ex7_8.sce create mode 100644 3760/CH7/EX7.9/Ex7_9.sce (limited to '3760/CH7') diff --git a/3760/CH7/EX7.1/Ex7_1.sce b/3760/CH7/EX7.1/Ex7_1.sce new file mode 100644 index 000000000..c592868ab --- /dev/null +++ b/3760/CH7/EX7.1/Ex7_1.sce @@ -0,0 +1,14 @@ +clc; +p=6; // number of poles +c=40; // number of coils +w=2; // winding pitch for simplex lap winding +printf('Number of commutator segments is equal to number of coils=%f\n ',c); +k=1/3; // integer added(or subtracted) to calculate back pitch to make it an odd integer +yb=((2*c)/p)-k; +printf('Back pitch is %f \n',yb); +yf=yb-w; +printf('Front pitch for progressive winding is %f\n',yf); +yf=yb+w; +printf('Front pitch for retrogressive winding is %f\n',yf) +yc=1; +printf('For simplex lap winding, commutator pitch is equal to %f ',yc); diff --git a/3760/CH7/EX7.10/Ex7_10.sce b/3760/CH7/EX7.10/Ex7_10.sce new file mode 100644 index 000000000..4aca2e29d --- /dev/null +++ b/3760/CH7/EX7.10/Ex7_10.sce @@ -0,0 +1,8 @@ +clc; +disp('b(1)'); +c=12; // number of coils +r=0.1; // resistance of each coil +// any one coil connected to commutator segment is in parallel with other 11 series connected coils therefore +R=11*r; // resistance of 11 coil +req=(r*R)/(r+R); +printf('Resistance measured between two adjacent commutator segments is %f ohm\n',req); diff --git a/3760/CH7/EX7.11/Ex7_11.sce b/3760/CH7/EX7.11/Ex7_11.sce new file mode 100644 index 000000000..d36744414 --- /dev/null +++ b/3760/CH7/EX7.11/Ex7_11.sce @@ -0,0 +1,18 @@ +clc; +disp('a'); +s=24; // total number of slots +p=4; // number of poles +np=3; // number of phases +ph=60; // phase spread +// given armature has double layer winding and full pitch coil span +v=(p*180)/s; +printf('Slot angular pitch is %d degrees\n',v); +disp('Number of adjacent slots in one phase belt is'); +disp(ph/v); +cs=s/p; +printf('Coil span is %d slots\n',cs); +disp('Using this data winding table for the three phases is shown in Ex7.11') +disp('d'); +sp=s/(p*np); // slots per pole per phase +disp('Distribution factor is'); +disp(sind(ph/2)/(sp*sind(v/2))); diff --git a/3760/CH7/EX7.12/Ex7_12.sce b/3760/CH7/EX7.12/Ex7_12.sce new file mode 100644 index 000000000..952e75c57 --- /dev/null +++ b/3760/CH7/EX7.12/Ex7_12.sce @@ -0,0 +1,19 @@ +clc; +disp('a'); +s=24; // total number of slots +p=4; // number of poles +np=3; // number of phases +ph=120; // phase spread +// given armature has double layer winding and full pitch coil span +v=(p*180)/s; +printf('Slot angular pitch is %d degrees\n',v); +disp('Number of adjacent slots in one phase belt is'); +disp(ph/v); +cs=s/p; +printf('Coil span is %d slots\n',cs); +disp('Using this data winding table for the three phases is shown in Ex7.12') +disp('d'); +sp=s/(p*np); // slots per pole per phase +disp('Distribution factor is'); +disp(sind(ph/2)/(sp*sind(ph/(2*sp)))); + diff --git a/3760/CH7/EX7.13/Ex7_13.sce b/3760/CH7/EX7.13/Ex7_13.sce new file mode 100644 index 000000000..cf76204a3 --- /dev/null +++ b/3760/CH7/EX7.13/Ex7_13.sce @@ -0,0 +1,22 @@ +clc; +np=3; // number of phase +sp=9; // slots per pole +zs=4; // conductors per slot +f=0.8; // coil span as a fraction of pole pitch +ph=60; // phase spread +v=180/sp; // slot angular pitch +disp('Number of adjacent slots belonging to any phase is '); +disp(ph/v); +printf('Pole pitch is %f slots\n',sp); +c=floor(0.8*sp); +printf('Coil span is of %f slots\n',c); +disp('Using this data, winding table is shown in Ex7.13'); +t=(sp*zs*4)/2; // total turns in machine +spp=sp/np; // slots per pole per phase +kd=sind(ph/2)/(spp*sind(v/2)); // distribution factor +cp=c*v; // coil span in degrees +e=180-cp; // chording angle +kp=cosd(e/2); // coil span factor +kw=kd*kp; // winding factor +tp=(t*kw)/np; +printf('Number of effective turns per phase is %f',tp); diff --git a/3760/CH7/EX7.15/Ex7_15.sce b/3760/CH7/EX7.15/Ex7_15.sce new file mode 100644 index 000000000..ad69787dc --- /dev/null +++ b/3760/CH7/EX7.15/Ex7_15.sce @@ -0,0 +1,9 @@ +clc; +s=24; // number of slots +p=4; // number of poles +ph=60; // phase spread +ap=(p*180)/s; // slot angular pitch +pp=s/p; // pole pitch +printf('Pole pitch is %d slots\n',pp); +printf('slot angular pitch is %d degrees',ap); +disp('using these data, half coil and whole coil single layer concentric windings diagram are drawn'); diff --git a/3760/CH7/EX7.2/Ex7_2.sce b/3760/CH7/EX7.2/Ex7_2.sce new file mode 100644 index 000000000..a1458d2ca --- /dev/null +++ b/3760/CH7/EX7.2/Ex7_2.sce @@ -0,0 +1,20 @@ +clc; +p=4; // number of poles +c=12; // number of coils +// Number of commutator segments is equal to number of coils=12 +// Each coil has two coil side therefore total coil sides are 24 +s=(2*c)/2 ; // total number of slots required +k=1; // integer added(or subtracted) to calculate back pitch to make it an odd integer +w=2; // winding pitch +yb1=((2*c)/p)-k; // back pitch +// or +yb2=((2*c)/p)+k; // back pitch +disp('Back pitch is '); +disp(yb1,'or',yb2); +yf1=yb1-2; // front pitch for yb=5 +yf2=yb2-2; // front pitch for yb=7 +disp('front pitch for progressive winding is '); +disp(yf1,'or',yf2); +disp('It is desirable that (yb+yf)/2 should be equal to pole pitch that is 6(in terms of coil sides per pole). So choose yb=7 and yf=5'); +disp('Commutator pitch for progressive lap winding is'); +disp(1); diff --git a/3760/CH7/EX7.3/Ex7_3.sce b/3760/CH7/EX7.3/Ex7_3.sce new file mode 100644 index 000000000..36d579d0f --- /dev/null +++ b/3760/CH7/EX7.3/Ex7_3.sce @@ -0,0 +1,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'); diff --git a/3760/CH7/EX7.5/Ex7_5.sce b/3760/CH7/EX7.5/Ex7_5.sce new file mode 100644 index 000000000..e8b631ff3 --- /dev/null +++ b/3760/CH7/EX7.5/Ex7_5.sce @@ -0,0 +1,30 @@ +clc; +disp('case a'); +s=30; // number of slots +c=60; // number of coils +p=4; // number of poles +k=1; // integer added(or subtracted) to calculate back pitch to make it an odd integer +tc=c*2; // total coil sides +u=tc/s; // coil sides per slots +yb1=(tc/p)+k; +yb2=(tc/p)-k; +disp('Back pitch is'); +disp(yb1); +disp('or'); +disp(yb2); +disp('for back pitch=29, top coil sides 1 and 3 in slot 1 are connected to bottom coil 30 and 32 in slot 8. Due to this arrangement split coils can be avoided. But for back pitch= 31, coil sides 34 which is in slot 9 has to be used, so split coils are needed ') +disp('case b'); +s=20; // number of slots +c=60; // number of coils +p=4; // number of poles +k=1; // integer added(or subtracted) to calculate back pitch to make it an odd integer +tc=c*2; // total coil sides +u=tc/s; // coil sides per slots +yb1=(tc/p)+k; +yb2=(tc/p)-k; +disp('Back pitch is'); +disp(yb1); +disp('or'); +disp(yb2); +disp('for back pitch=29, top coil sides 1,3 and 5 are connected to bottom coil 30, 32 and 34. Due to this arrangement split coils cannot be avoided. But for back pitch= 31, coil sides 1,3 and 5 are connected to bottom coil sides 32, 34 and 36 which are in slot 6,so split coils are not needed '); + diff --git a/3760/CH7/EX7.6/Ex7_6.sce b/3760/CH7/EX7.6/Ex7_6.sce new file mode 100644 index 000000000..ad8ff7729 --- /dev/null +++ b/3760/CH7/EX7.6/Ex7_6.sce @@ -0,0 +1,19 @@ +clc; +p=4; // number of poles +s=11; // number of slots +ts=2; // coil sides per slot +C=(s*ts)/2; // total coils +w=((2*C)+2)/(p/2); // winding pitch +// since both back and front pitch should be odd choose +Yb=7; +Yf=5; +disp('Back pitch is') +disp(Yb); +disp('Front pitch is') +disp(Yf); +yc=(C+1)/(p/2); +disp('commutator pitch'); +disp(yc); +disp('Using this data winding diagram can be drawn'); +disp('Winding table is'); +disp('(1-8)-(13-20)-(3-10)-(15-22)-(5-12)-(17-2)-(7-14)-(19-4)-(9-16)-(21-6)-(11-18)-1'); diff --git a/3760/CH7/EX7.7/Ex7_7.sce b/3760/CH7/EX7.7/Ex7_7.sce new file mode 100644 index 000000000..14c54e7fc --- /dev/null +++ b/3760/CH7/EX7.7/Ex7_7.sce @@ -0,0 +1,20 @@ +clc; +p=6; // number of poles +s=72; // number of slots +ts=4; // number of coil sides per slot +C=(s*ts)/2; // total number of coils +// To make commutator pitch an integer one coil is made dummy coil therefore +C=C-1; +yc=(C+1)/(p/2); +disp('commutator pitch'); +disp(yc); +yw=((2*C)+2)/(p/2); +disp('Winding pitch is'); +disp(yw); +// since back and front pitch should be odd choose +yb=49; +disp('Back pitch is'); +disp(yb); +yf=47; +disp('Front pitch is'); +disp(yf); diff --git a/3760/CH7/EX7.8/Ex7_8.sce b/3760/CH7/EX7.8/Ex7_8.sce new file mode 100644 index 000000000..744df0e7e --- /dev/null +++ b/3760/CH7/EX7.8/Ex7_8.sce @@ -0,0 +1,28 @@ +clc; +p=4; // number of poles +z=2540; // number of conductors +s=32; // number of slots +c=127; // number of commutator sectors=total number of coils +v=500; // induced voltage required +f=5*10^-3; // field flux per pole +a=2; // number of parallel paths +zs=ceil(z/s); // conductors per slot +// for zs=80 +Z=zs*s; // total conductors +t=floor(Z/(2*c)); // turn per coil +C=Z/(2*t); // actual number of coils +// It is necessary that actual coils should be same as commutator segments so one coil is made dummy +disp('commutor pitch is') +disp((c+1)/(p/2)); +disp('or'); +disp((c-1)/(p/2)); +disp('Winding pitch is') +disp(((2*c)+2)/(p/2)); +disp('or'); +disp(((2*c)-2)/(p/2)); +disp('For progressive winding, back pitch=65 and front pitch=63'); +disp('For retrogressive winding, back pitch=63 and front pitch=63'); +// since dumy coil is not in circuit, number of active conductor is +Z=c*t*2; +n=(v*a*60)/(f*Z*p); +printf('Speed for required induced voltage is %f rpm',n); diff --git a/3760/CH7/EX7.9/Ex7_9.sce b/3760/CH7/EX7.9/Ex7_9.sce new file mode 100644 index 000000000..e580e99b3 --- /dev/null +++ b/3760/CH7/EX7.9/Ex7_9.sce @@ -0,0 +1,9 @@ +clc; +p=8; // number of poles +c=240; // number of coils +r=10; // number of equilizer ring +Yeq=(2*c)/p; +printf('Equipotential pitch is %f coils\n',Yeq); +Ytp=(2*c)/(r*p); +printf('Tapping point pitch is %f coils',Ytp); +disp('Arrangement is shown in tabular form in example 7.9'); -- cgit