diff options
Diffstat (limited to '3888/CH14/EX14.1/Ex14_1.sce')
| -rw-r--r-- | 3888/CH14/EX14.1/Ex14_1.sce | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/3888/CH14/EX14.1/Ex14_1.sce b/3888/CH14/EX14.1/Ex14_1.sce new file mode 100644 index 000000000..8ba96a1f3 --- /dev/null +++ b/3888/CH14/EX14.1/Ex14_1.sce @@ -0,0 +1,32 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 14.1
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+
+d=600; //Distance between three conductors in cm
+b=72; //Pressure in Hg
+r=1; //Radius of the conductor in cm
+t=27; //Air temperature in Celcius
+m=0.90; //Irregularity factor
+mv=0.82; //Surface factor
+adf=3.92*b/(273+t); //Air density factor
+Vc=r*21.1*m*0.9408*log(d/r); //Phase to neutral critical disruptive voltage in kV
+cdv=Vc*sqrt(3); //Line to line critical disruptive voltage in kV
+Vv=21.1*mv*r*0.9408*(1+(0.3/sqrt(r*0.9408)))*log(d/r); //Critical visual disruptive voltage
+cvdv=Vv*sqrt(3); //Line to line critical visual disruptive voltage in kV
+
+
+printf("\nThe critical disruptive voltage is %.2f kV",cdv);
+printf("\nThe visual critical disruptive voltage is %.2f kV",cvdv);
+
+
+
+
+
+
|