blob: 8ba96a1f3a30db33f83bd653500b1ca2cfa3c7a2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
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);
|