diff options
Diffstat (limited to '3035/CH4/EX4.3/Ex4_3.sce')
-rwxr-xr-x | 3035/CH4/EX4.3/Ex4_3.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3035/CH4/EX4.3/Ex4_3.sce b/3035/CH4/EX4.3/Ex4_3.sce new file mode 100755 index 000000000..6634e89ad --- /dev/null +++ b/3035/CH4/EX4.3/Ex4_3.sce @@ -0,0 +1,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) |