initial commit / add all books

9 files changed, 151 insertions, 0 deletions

diff --git a/371/CH8/EX8.1/8_1.sci b/371/CH8/EX8.1/8_1.sci
new file mode 100755
index 000000000..ddd4e029b
--- /dev/null
+++ b/371/CH8/EX8.1/8_1.sci
@@ -0,0 +1,15 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.1//

+I5=0.2;//amplitude of 5th harmonic current in Kilo Amperes//

+Vp= 11/(sqrt(3));//Input supply phase voltage in Kilo Volts//

+P=5;//supply power per phase of filter in MVAR//

+Pc=P+((Vp^2*I5^2)/(5*P));//AC Converter power per phase in MVAR//

+printf('\nvalue of AC converter power=Pc=%f MVAR',Pc);

+C=(Pc*10^3*3)/(11^2*314);//capacitance of the ShuntFilter in milliFarad//

+printf('\nvalue of the capacitance of shunt filter=C=%fmillifarads',C);

+L=(106*10^6)/(400*4*25*250*3.14^2);//inductance of filter in mHenry//

+printf('\nInductance of filter=L=%fmilliHenry',L);

+Q=50;//value of Q//

+W5=2*3.14*5*50;//angular frequency of 5th harmonic//

+R=(W5*L)/Q;//Resistance of filter in milliOhms//

+printf('\nResistance of filter=R=%fmilliOhms',R);
\ No newline at end of file
diff --git a/371/CH8/EX8.2/8_2.sci b/371/CH8/EX8.2/8_2.sci
new file mode 100755
index 000000000..c6184b561
--- /dev/null
+++ b/371/CH8/EX8.2/8_2.sci
@@ -0,0 +1,14 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.2//

+printf('For six pulse converter most effective harmonic is 6th and for worst case a=90 degree\n');

+Wv=24.1;//voltage ripple in percentage//

+printf('voltage ripple=Wv=%fpercent',Wv);

+Id=200;

+I6=(5*Id)/100;//Harmonic current for 6th harmonic in amp//

+printf('\nHarmonic current for 6th harmonic=I6=%famp',I6);

+Edc=460;//dc voltage in volts//

+W=2*3.14*50;

+La=1;//inductance already present in the circuit in milliHenry//

+L=((Wv*Edc*10)/(I6*6*W))-La;//additional inductance required in milliHenry//

+L=5.93-1;

+printf('\nadditional inductance required=L=%fmilliHenry',L);
\ No newline at end of file
diff --git a/371/CH8/EX8.3/8_3.sci b/371/CH8/EX8.3/8_3.sci
new file mode 100755
index 000000000..e0af86865
--- /dev/null
+++ b/371/CH8/EX8.3/8_3.sci
@@ -0,0 +1,31 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.3//

+Id=200;//rated dc current in amperes//

+I2=0.817*Id;//AC line current in amperes//

+printf('AC line current of the thyristor=I2=%famperes',I2);

+E2=415;//AC line voltage in volts//

+Edc=400;//dc terminal voltage in volts//

+Xt=0.04*E2/I2;//effective reactance of the thyristor in ohms//

+printf('\neffective reactance of the thyristor=Xt=%fohms',Xt);

+C=1-((Id*Xt)/(E2*sqrt(3)));//cosine value of the commutational angle//

+printf('\ncosine value of the commutational angle=C=%f',C);

+CA=acos(C)*180/%pi;

+printf('\ncommutation angle=CA=%fdegrees',CA);

+F=Edc/(1.35*E2*(1+C)/2);//cosine value of the firing angle//

+printf('\ncosine value of the firing value=F=%f',F);

+FA=acos(F)*180/%pi;

+printf('\nfiring angle=FA=%fdegrees',FA);

+I2=0.817*Id;//AC line current in amps//

+printf('\nAC line current=I2=%famps',I2);

+Ied=0.58*Id;//current through each device in amps//

+printf('\nCurrent through each device=Ied=%famps',Ied);

+PF=F*(1+C)/2;//power factor//

+printf('\npower factor=PF=%f',PF);

+AP=sqrt(3)*E2*I2*PF;//active power drawn from the mains in Watts//

+printf('\nactive power drawn from the mains=AP=%fWatts',AP);

+RP=sqrt(3)*E2*I2*sqrt(1-PF^2);//reactive power in VAR//

+printf('\nReactive power drawn=RP=%fVAR',RP);//end of the program//

+

+

+

+

diff --git a/371/CH8/EX8.4/8_4.sci b/371/CH8/EX8.4/8_4.sci
new file mode 100755
index 000000000..c611fa43e
--- /dev/null
+++ b/371/CH8/EX8.4/8_4.sci
@@ -0,0 +1,15 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.4//

+Id=100;//rated dc current in amperes//

+I2=0.817*Id;//AC line current in amperes//

+printf('AC line current of the thyristor=I2=%famperes',I2);

+E2=230;//AC line voltage in volts//

+Edc=200;//dc terminal voltage in volts//

+PF=cos(%pi/4)*(1+cos(%pi/10))/2;//power factor//

+printf('\npower factor=PF=%f',PF);

+RP=sqrt(3)*E2*I2*sqrt(1-PF^2);//reactive power to be supplied by shunt compensator in VAR//

+printf('\nReactive power to be supplied by shunt compensator=RP=%fVAR',RP);//end of the program//

+

+

+

+

diff --git a/371/CH8/EX8.5/8_5.sci b/371/CH8/EX8.5/8_5.sci
new file mode 100755
index 000000000..d55d01ace
--- /dev/null
+++ b/371/CH8/EX8.5/8_5.sci
@@ -0,0 +1,16 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.5//

+I11=400/11;//amplitude of 11th harmonic current in Amperes//

+V1= 11/(sqrt(3));//Input supply phase voltage in Kilo Volts//

+P=7;//supply power per phase of filter in MVAR//

+Pc=P+((V1^2*I11^2*10^-3)/(11*P));//AC Converter MVAR rating of the capacitor//

+printf('value of MVAR rating of the capacitor=Pc=%fMVAR',Pc);

+W=2*3.14*50;

+C=(Pc*10^6)/(V1^2*W);//capacitance of the ShuntFilter in microFarad//

+printf('\nvalue of the capacitance of shunt filter=C=%fmicrofarads',C);

+W11=11*W;

+L=10^8/(C*W11^2);//inductance of filter in mHenry//

+printf('\nInductance of filter=L=%fmilliHenry',L);

+Q=35;//value of Q//

+R=(W11*L)/Q;//Resistance of filter in milliOhms//

+printf('\nResistance of filter=R=%fmilliOhms',R);
\ No newline at end of file
diff --git a/371/CH8/EX8.6/8_6.sci b/371/CH8/EX8.6/8_6.sci
new file mode 100755
index 000000000..d547dc673
--- /dev/null
+++ b/371/CH8/EX8.6/8_6.sci
@@ -0,0 +1,14 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.6//

+printf('For six pulse converter most effective harmonic is 6th and for worst case a=90 degree\n');

+h=6;

+Wv=24.1;//voltage ripple in percentage//

+printf('voltage ripple=Wv=%fpercent',Wv);

+Edc=460;//dc voltage in volts//

+W=2*3.14*50;

+Ldc=6;//total dc circuit inductance in milliHenry//

+I6=Wv*Edc*10/(Ldc*h*W);//Harmonic current for 6th harmonic in amp//

+printf('\nHarmonic current for 6th harmonic=I6=%famp',I6);

+Id=300;

+Wi=100*I6/Id;//maximum value of current ripple in percentage//

+printf('\nmax. value of current ripple=Wi=%fpercent',Wi);//end of program//

diff --git a/371/CH8/EX8.7/8_7.sci b/371/CH8/EX8.7/8_7.sci
new file mode 100755
index 000000000..e81289dd0
--- /dev/null
+++ b/371/CH8/EX8.7/8_7.sci
@@ -0,0 +1,19 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.7//

+A=%pi/4;

+h=6;

+Wv=sqrt(2)*sqrt(h^2-cos(A)^2*(h^2-1))*100/(h^2-1);

+printf('voltage ripple of the 6th harmonic=Wv=%fpercent',Wv);

+printf('\nFor six pulse converter most effective harmonic is 6th and for worst case A=90degrees\n');

+A=%pi/2;

+Wv6=sqrt(2)*sqrt(h^2-cos(A)^2*(h^2-1))*100/(h^2-1);//maximum voltage ripple in percentage//

+printf('\nmaximum voltage ripple=Wv6=%fpercent',Wv6);

+A=%pi/4;

+h=12;

+Wv=sqrt(2)*sqrt(h^2-cos(A)^2*(h^2-1))*100/(h^2-1);

+printf('\nvoltage ripple of the 12th harmonic=Wv=%fpercent',Wv);

+A=%pi/2;

+Wv12=sqrt(2)*sqrt(h^2-cos(A)^2*(h^2-1))*100/(h^2-1);//maximum voltage ripple in percentage//

+printf('\nmaximum voltage ripple=Wv12=%fpercent',Wv12);

+PR=(Wv6-Wv12)*100/Wv6;//percentage reduction in max. voltage ripple//

+printf('\npercentage reduction in max. voltage ripple=PR=%fpercent',PR);
\ No newline at end of file
diff --git a/371/CH8/EX8.8/8_8.sci b/371/CH8/EX8.8/8_8.sci
new file mode 100755
index 000000000..d76b5d0b5
--- /dev/null
+++ b/371/CH8/EX8.8/8_8.sci
@@ -0,0 +1,9 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.8//

+Wv=18.6;

+h=6;

+C=sqrt(h^2-(Wv^2*((h^2-1)^2)/2*10^4))*10^6/sqrt(h^2-1);//cosine of triggering angle//

+C=sqrt(14.68/35);

+printf('cosine of triggering angle=C=%f',C);

+A=acos(C)*180/%pi;

+printf('\ntriggering angle of the device=A=%fdegrees',A);//endof program//

diff --git a/371/CH8/EX8.9/8_9.sci b/371/CH8/EX8.9/8_9.sci
new file mode 100755
index 000000000..286fc50c9
--- /dev/null
+++ b/371/CH8/EX8.9/8_9.sci
@@ -0,0 +1,18 @@
+//Harmonic and Powerfactor with the Converter system//

+//Example 8.9//

+E2=415;//AC line voltage in volts//

+Edc=380;//dc terminal voltage in volts//

+C=1.1*Edc/(1.35*E2);

+printf('cosine of the triggering angle=C=%f',C);

+A=acos(C)*180/%pi;

+printf('\ntriggering angle of the device=A=%fdegrees',A);

+PF=C*(1+cos(%pi/12))/2;//power factor//

+printf('\npower factor=PF=%f',PF);

+Id=200;

+I2=0.817*Id;

+RP=sqrt(3)*E2*I2*sqrt(1-PF^2)/1000;//reactive power to be supplied by shunt compensator in KVAR//

+printf('\nReactive power to be supplied by shuntcompensator=RP=%fKVAR',RP);//end of the program//

+

+

+

+