summaryrefslogtreecommitdiff
path: root/3035/CH4/EX4.3/Ex4_3.sce
blob: 6634e89ad19d45e1d1ce15043ed1ce4b9ccdd8e3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14

// Variable Declaration
d_ab = 4    //Distance b/w conductor a & b(m)
d_bc = 9    //Distance b/w conductor b & c(m)
d_ca = 6    //Distance b/w conductor c & a(m)
r = 1.0     //Radius of each conductor(cm)

// Calculation Section
D_m = (d_ab * d_bc * d_ca)**(1.0/3)             //Geometric mean separation(m)
r_1 = 0.7788 * (r/100)                          //Radius of hypothetical conductor(m)
L = 2 * 10**(-7) * log(D_m/r_1) * 10**6    //Line inductance(mH/phase/km)

// Result Section
printf('Line inductance , L = %.2f mH/phase/km' ,L)