diff options
Diffstat (limited to '3888/CH10')
| -rw-r--r-- | 3888/CH10/EX10.10/Ex10_10.JPG | bin | 0 -> 17118 bytes | |||
| -rw-r--r-- | 3888/CH10/EX10.10/Ex10_10.sce | 37 | ||||
| -rw-r--r-- | 3888/CH10/EX10.3/Ex10_3.JPG | bin | 0 -> 17535 bytes | |||
| -rw-r--r-- | 3888/CH10/EX10.3/Ex10_3.sce | 20 | ||||
| -rw-r--r-- | 3888/CH10/EX10.5/Ex10_5.JPG | bin | 0 -> 20754 bytes | |||
| -rw-r--r-- | 3888/CH10/EX10.5/Ex10_5.sce | 25 | ||||
| -rw-r--r-- | 3888/CH10/EX10.6/Ex10_6.JPG | bin | 0 -> 16211 bytes | |||
| -rw-r--r-- | 3888/CH10/EX10.6/Ex10_6.sce | 30 | ||||
| -rw-r--r-- | 3888/CH10/EX10.7/Ex10_7.JPG | bin | 0 -> 22330 bytes | |||
| -rw-r--r-- | 3888/CH10/EX10.7/Ex10_7.sce | 27 | ||||
| -rw-r--r-- | 3888/CH10/EX10.8/Ex10_8.JPG | bin | 0 -> 14816 bytes | |||
| -rw-r--r-- | 3888/CH10/EX10.8/Ex10_8.sce | 20 | ||||
| -rw-r--r-- | 3888/CH10/EX10.9/Ex10_9.JPG | bin | 0 -> 27498 bytes | |||
| -rw-r--r-- | 3888/CH10/EX10.9/Ex10_9.sce | 31 |
14 files changed, 190 insertions, 0 deletions
diff --git a/3888/CH10/EX10.10/Ex10_10.JPG b/3888/CH10/EX10.10/Ex10_10.JPG Binary files differnew file mode 100644 index 000000000..d71283dc0 --- /dev/null +++ b/3888/CH10/EX10.10/Ex10_10.JPG diff --git a/3888/CH10/EX10.10/Ex10_10.sce b/3888/CH10/EX10.10/Ex10_10.sce new file mode 100644 index 000000000..09f5e3818 --- /dev/null +++ b/3888/CH10/EX10.10/Ex10_10.sce @@ -0,0 +1,37 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 10.10
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+r=0.05; //Radius of the conductor in m
+bc=5; //Distance between b & c in m
+bb1=3*bc; //Distance between b & b1 in m
+aa1=2*bc; //Distance between a & a1 in in m
+ab=(((bb1-aa1)/2)^(2)+bc^(2))^(1/2);
+ab1=((aa1+((bb1-aa1)/2))^(2)+bc^(2))^(1/2);
+ac1=((bc*2-((bb1-aa1)/2))^(2)+bc^(2))^(1/2);
+Dab=nthroot(ab*ab1*ab1*ab,4);
+Dbc=nthroot(bc*aa1*aa1*bc,4);
+Dca=nthroot(ab*ac1*ab*ac1,4);
+Deq=nthroot(Dab*Dbc*Dca,3);
+Dsa=sqrt(aa1*0.7788*r);
+Dsb=sqrt(bb1*0.7788*r);
+Dsc=sqrt(bc*0.7788*r);
+Ds=nthroot(Dsa*Dsb*Dsc,3);
+L=(2*10^(-7)*log(Deq/Ds))*10^(6); //Inductance of double circuit in mH/km/phase
+Dsa1=sqrt(aa1*r); //GMR for capacitance
+Dsb1=sqrt(bb1*r); //GMR for capacitance
+Dsc1=sqrt(bc*r); //GMR for capacitance
+Ds1=nthroot(Dsa1*Dsb1*Dsc1,3); //Equivalent GMR for capacitance
+C=(2*%pi*(10^(-9)/(36*%pi)))/log(Deq/Ds1); //Capacitance of double circuit in nF/km/phase
+
+
+printf("\nInductance of the line is %.3f mH/km/phase",L);
+printf("\nCapacitance of the line is %.2f nF/km/phase",C/10^(-12));
+ //Variation present in result due to wrong calculation of Ds1 value
+
diff --git a/3888/CH10/EX10.3/Ex10_3.JPG b/3888/CH10/EX10.3/Ex10_3.JPG Binary files differnew file mode 100644 index 000000000..0ba34b3c8 --- /dev/null +++ b/3888/CH10/EX10.3/Ex10_3.JPG diff --git a/3888/CH10/EX10.3/Ex10_3.sce b/3888/CH10/EX10.3/Ex10_3.sce new file mode 100644 index 000000000..ff9e179e5 --- /dev/null +++ b/3888/CH10/EX10.3/Ex10_3.sce @@ -0,0 +1,20 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 10.3
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+d=3; //Distance of two Wires in m
+r=0.02; //Radius of conductor in m
+L1=(2*10^(-7))*(log(d/(0.7788*r))); //Inductance of each conductor in H/m
+LI=2*L1/(10^(-6)); //Loop inductance of the line in mH/km
+
+
+printf("\nThe loop inductance of the line is %.3f mH/km",LI);
+printf("\nThe inductance of the each conductor is % .3e H/m",L1);
+
+
diff --git a/3888/CH10/EX10.5/Ex10_5.JPG b/3888/CH10/EX10.5/Ex10_5.JPG Binary files differnew file mode 100644 index 000000000..795c82c92 --- /dev/null +++ b/3888/CH10/EX10.5/Ex10_5.JPG diff --git a/3888/CH10/EX10.5/Ex10_5.sce b/3888/CH10/EX10.5/Ex10_5.sce new file mode 100644 index 000000000..a277e200b --- /dev/null +++ b/3888/CH10/EX10.5/Ex10_5.sce @@ -0,0 +1,25 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 10.5
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+r=0.03; //Conductor Radius in m
+d=0.35; //Spacing between Phase Conductors in m
+D=4; //Distance between Phases in m
+LA=((1*10^(-7))*((log((D*(D+d)*2*D*(2*D+d)*D*(D-d)*2*D*(2*D-d))^(1/2)/(0.7788*r*d)^2))+(%i*0.866)*log((D*(D+d)*D*(D-d))/(2*D*(2*D+d)*2*D*(2*D-d)))))*10^(6); //Phase A Inductance in mH/km
+LB=(1*10^(-7))*((log(((D*(D-d)*D*(D+d)*D*(D+d)*D*(D-d))^(1/2))/(0.7788*r*d)^2))+(%i*0.866)*log((D*(D+d)*D*(D-d))/(D*(D-d)*D*(D+d))))*10^(6); //Phase B Inductance in mH/km
+LC=LA; //Phase C Inductance in mH/km
+L_avg=(LA+LB+LC)/3; //Average Inductance in mH/km
+
+
+printf("\nInductance of phase A is %.3f%.3fi mH/km",real(LA),imag(LA));
+printf("\nInductance of phase B is %.3f mH/km",LB);
+printf("\nInductance of phase C is %.3f%.3fi mH/km",real(LC),imag(LC));
+printf("\nAverage inductance of the line is %.3f mH/km",L_avg);
+
+ //Variation present in result due to wrong calculation of LA and LB value
diff --git a/3888/CH10/EX10.6/Ex10_6.JPG b/3888/CH10/EX10.6/Ex10_6.JPG Binary files differnew file mode 100644 index 000000000..22678879e --- /dev/null +++ b/3888/CH10/EX10.6/Ex10_6.JPG diff --git a/3888/CH10/EX10.6/Ex10_6.sce b/3888/CH10/EX10.6/Ex10_6.sce new file mode 100644 index 000000000..213c414ab --- /dev/null +++ b/3888/CH10/EX10.6/Ex10_6.sce @@ -0,0 +1,30 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 10.6
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+r=0.025; //Conductor radius in m
+Dac1=4; //Distance between two conductors a & c1 in m
+Dac=6; //Distance between two conductors a & c in m
+Dbb1=10; //Distance between two conductors b & b1 in m
+Dab=(((Dbb1-Dac1)/2)^2+(Dac/2)^2)^(1/2); //Distance between two conductors a & b in m
+Daa1=(((Dac1)^2)+((Dac)^2))^(1/2); //Distance between two conductors a & a1 in m
+Dbc1=(((Dbb1-Dac1)/2)^2+((Dac1)+((Dbb1-Dac1)/2))^2)^(1/2); //Distance between two conductors b & c1 in m
+GMD1=nthroot((Dab*Dac*Dbc1*Dac1),4); //Mutual GMD of phase a position 1 in m
+GMR1=(0.7788*r*Daa1)^(1/2); //Self GMR of phase a position 1 in m
+GMD2=nthroot((Dab*Dab*Dbc1*Dbc1),4); //Mutual GMD of phase a position 2 in m
+GMR2=(0.7788*r*Dbb1)^(1/2); //Self GMR of phase a position 2 in m
+GMD3=GMD1; //Mutual GMD of phase a position 3 in m
+GMR3=GMR1; //Self GMR of phase a position 3 in m
+Dm=nthroot((GMD1*GMD2*GMD3),3); //Equivalent mutual GMD in m
+Ds=nthroot((GMR1*GMR2*GMR3),3); //Equivalent self GMR in m
+LA=(2/10)*(log(Dm/Ds)); //Inductance of phase a in mH/km
+
+
+printf("\nThe inductance per kilometre of a double circuit is %.3f mH/km",LA);
+
diff --git a/3888/CH10/EX10.7/Ex10_7.JPG b/3888/CH10/EX10.7/Ex10_7.JPG Binary files differnew file mode 100644 index 000000000..7b2dcb02a --- /dev/null +++ b/3888/CH10/EX10.7/Ex10_7.JPG diff --git a/3888/CH10/EX10.7/Ex10_7.sce b/3888/CH10/EX10.7/Ex10_7.sce new file mode 100644 index 000000000..092dabe76 --- /dev/null +++ b/3888/CH10/EX10.7/Ex10_7.sce @@ -0,0 +1,27 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 10.7
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+h=8; //Height of conductor in m
+r=0.01; //Radius of conductor in m
+D=4; //Distance of conductor in m
+L=10; //Length of the line in km
+V=33; //Supply voltage in kV
+f=50; //Supply frequency in Hz
+Cab=(%pi*(10^(-9))/(36*%pi))/(log(D/r)*(1/(sqrt(1+(D^(2)/(2*h)^(2)))))); //Capacitance between conductors a and b in pF/m
+Can=Cab*2; //Capacitance between phase and neutral plane in pF/m
+Cab1=(%pi*(10^(-9))/(36*%pi))/log(D/r); //Capacitance between conductors when effect of earth is ignored in pF/m
+Ic=2*%pi*f*Cab*L*V*10^3*10^3; //Charging Current of the line in A
+
+
+printf("\nCapacitance between conductors is %.2f pF/m",Cab/(10^-12));
+printf("\nCapacitance between phase and neutral plane is %.2f pF/m",Can/(10^-12));
+printf("\nCapacitance ehen effect of ground is neglected is %.2f pF/m",Cab1/(10^-12));
+printf("\nCharging current is %.3f A",Ic);
+
diff --git a/3888/CH10/EX10.8/Ex10_8.JPG b/3888/CH10/EX10.8/Ex10_8.JPG Binary files differnew file mode 100644 index 000000000..1da2f9fc4 --- /dev/null +++ b/3888/CH10/EX10.8/Ex10_8.JPG diff --git a/3888/CH10/EX10.8/Ex10_8.sce b/3888/CH10/EX10.8/Ex10_8.sce new file mode 100644 index 000000000..62bbcdbf6 --- /dev/null +++ b/3888/CH10/EX10.8/Ex10_8.sce @@ -0,0 +1,20 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 10.8
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+d=0.25; //Diameter of conductor in m
+r=0.0125; //Radius of conductor in m
+Dab=5; //Distance between conductors a & b in m
+Dbc=4; //Distance between conductors b & c in m
+Dac=6; //Distance between conductors a & c in m
+Deq=nthroot((Dab*Dbc*Dac),3); //Diameter equivalent of line in m
+Can=(2*%pi*10^(-9)/(36*%pi))/log(Deq/r); //Capacitance between phase a & neutral in pF/m
+
+
+printf("\nThe capacitance of the transmissin line is %.2f pF/m",Can/(10^-12));
diff --git a/3888/CH10/EX10.9/Ex10_9.JPG b/3888/CH10/EX10.9/Ex10_9.JPG Binary files differnew file mode 100644 index 000000000..53a36d3e9 --- /dev/null +++ b/3888/CH10/EX10.9/Ex10_9.JPG diff --git a/3888/CH10/EX10.9/Ex10_9.sce b/3888/CH10/EX10.9/Ex10_9.sce new file mode 100644 index 000000000..a2209b5d4 --- /dev/null +++ b/3888/CH10/EX10.9/Ex10_9.sce @@ -0,0 +1,31 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 10.9
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+f=50; //Frequency of the condutor in Hz
+D1=31.8; //Diameter of ACSR Moose conductor in mm(Unbundled conductor)
+d1=10; //Hoizontal spacing between adjacent conductors in m
+D2=19.6; //Diameter of ASCR Lynx conductor in mm(Bundled conductor)
+d2=10; //Spacing measured by centre of the bundle in m
+Db=0.4; //Spacing between the bundled conductors in m
+r1=D1*10^-3/2; //Radius of unbundled conductor in m
+Dm=nthroot((d1*d2*(d1+d2),3)); //Mutual GMD of unbundled conductorin m
+Dls1=0.7788*r1; //GMR For Inductance of unbundled conductor in m
+Dcs1=r1; //GMR For Capacitance of unbundled conductor in m
+XL1=2*%pi*f*2*10^(-4)*log(Dm/Dls1); //Inductive Reactance of unbundled conductor in ohm/km/phase
+XC1=(log(Dm/Dcs1))/(((2*%pi)^2)*f*8.85*10^(-12)); //Capacitive Reactance of unbundled conductor in ohm-km/phase
+r2=D2*10^-3/2; //Radius of bundled conductor in m
+Dls2=nthroot((0.7788*r2*Db^2),3); //Self GMR for Inductance of bundled conductor in m
+Dcs2=nthroot((r2*Db^2),3); //Self GMR for Capacitance of bundled conductor in m
+XL2=2*%pi*f*2*10^(-4)*log(Dm/Dls2); //Inductive Reactance of bundled conductor in ohm/km/phase
+XC2=(log(Dm/Dcs2))/(((2*%pi)^2)*f*8.85*10^(-12)); //Capacitive Reactance of bundled conductor in ohm-km/phase
+
+
+printf("\nThe value inductive reactance and capacitive reactance of unbundled conductor is %.3f ohm/km/ph and %.3e ohmkm/ph ",XL1,XC1/10^(3));
+printf("\nThe value inductive reactance and capacitive reactance of bundled conductor is %.4f ohm/km/ph and %.4e ohmkm/ph ",XL2,XC2/10^(3));
|
