summaryrefslogtreecommitdiff
path: root/3035/CH5/EX5.8/Ex5_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '3035/CH5/EX5.8/Ex5_8.sce')
-rwxr-xr-x3035/CH5/EX5.8/Ex5_8.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3035/CH5/EX5.8/Ex5_8.sce b/3035/CH5/EX5.8/Ex5_8.sce
new file mode 100755
index 000000000..266d45d5e
--- /dev/null
+++ b/3035/CH5/EX5.8/Ex5_8.sce
@@ -0,0 +1,19 @@
+// Variable Declaration
+n = 4 //Number of disc
+v_2 = 13.2 //Voltage across second unit(kV)
+v_3 = 18.0 //Voltage across third unit(kV)
+
+// Calculation Section
+m = 0.198 //Obtained by solving the quadratic equation
+a_1 = 1
+a_2 = 1+m
+a_3 = m*(a_1+a_2)+a_2
+a_4 = m*(a_1+a_2+a_3)+a_3
+v_1 = v_2/a_2 //Voltage across first unit(kV)
+v_4 = a_4*v_1 //Voltage across second unit(kV)
+V = v_1+v_2+v_3+v_4 //Conductor voltage(kV)
+efficiency = V/(n*v_4)*100 //String efficiency(%)
+
+// Result Section
+printf('Conductor voltage with respect to the cross-arm , V = %.2f kV' ,V)
+printf('String efficiency = %.2f percent' ,efficiency)