From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 371/CH8/EX8.1/8_1.sci | 15 +++++++++++++++ 371/CH8/EX8.2/8_2.sci | 14 ++++++++++++++ 371/CH8/EX8.3/8_3.sci | 31 +++++++++++++++++++++++++++++++ 371/CH8/EX8.4/8_4.sci | 15 +++++++++++++++ 371/CH8/EX8.5/8_5.sci | 16 ++++++++++++++++ 371/CH8/EX8.6/8_6.sci | 14 ++++++++++++++ 371/CH8/EX8.7/8_7.sci | 19 +++++++++++++++++++ 371/CH8/EX8.8/8_8.sci | 9 +++++++++ 371/CH8/EX8.9/8_9.sci | 18 ++++++++++++++++++ 9 files changed, 151 insertions(+) create mode 100755 371/CH8/EX8.1/8_1.sci create mode 100755 371/CH8/EX8.2/8_2.sci create mode 100755 371/CH8/EX8.3/8_3.sci create mode 100755 371/CH8/EX8.4/8_4.sci create mode 100755 371/CH8/EX8.5/8_5.sci create mode 100755 371/CH8/EX8.6/8_6.sci create mode 100755 371/CH8/EX8.7/8_7.sci create mode 100755 371/CH8/EX8.8/8_8.sci create mode 100755 371/CH8/EX8.9/8_9.sci (limited to '371/CH8') 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// + + + + -- cgit