diff options
Diffstat (limited to '3035/CH6/EX6.2/Ex6_2.sce')
| -rwxr-xr-x | 3035/CH6/EX6.2/Ex6_2.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3035/CH6/EX6.2/Ex6_2.sce b/3035/CH6/EX6.2/Ex6_2.sce new file mode 100755 index 000000000..ec90610d3 --- /dev/null +++ b/3035/CH6/EX6.2/Ex6_2.sce @@ -0,0 +1,17 @@ +// Variable Declaration +E_c = 100.0 //Safe working stress(kV/cm) rms +V = 130.0 //Operating voltage(kV) rms +d = 1.5 //Diameter of conductor(cm) + +// Calculation Section +ln_D = 2*V/(E_c*d)+log(d) +D = exp(ln_D) +thick_1 = (D-d)/2 //Insulation thickness(cm) + +d_2 = 2*V/E_c +D_2 = 2.718*d_2 //Sheath diameter(cm) +thick_2 = (D_2-d_2)/2 //Insulation thickness(cm) + +// Result Section +printf('(i) Internal sheath radius = %.2f cm' ,thick_1) +printf('(ii) Internal sheath radius = %.2f cm' ,thick_2) |