diff options
Diffstat (limited to '3035/CH5/EX5.9/Ex5_9.sce')
-rwxr-xr-x | 3035/CH5/EX5.9/Ex5_9.sce | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/3035/CH5/EX5.9/Ex5_9.sce b/3035/CH5/EX5.9/Ex5_9.sce new file mode 100755 index 000000000..4aeec87ce --- /dev/null +++ b/3035/CH5/EX5.9/Ex5_9.sce @@ -0,0 +1,26 @@ + +// Variable Declaration +n = 3 //Number of disc + +unit_1 = 100/3.072 //Disc voltage as % of conductor voltage of Topmost unit +unit_2 = 1.014/3.072*100 //Disc voltage as % of conductor voltage of second unit +unit_3 = 1.058/3.072*100 //Disc voltage as % of conductor voltage of bottom unit +efficiency = 3.072*100/(n*1.058) //String efficiency(%) + +// Calculation Section +unit_1g = 100/3.752 //Disc voltage as % of conductor voltage of Topmost unit +unit_2g = 1.18/3.752*100 //Disc voltage as % of conductor voltage of second unit +unit_3g = 1.5724/3.752*100 //Disc voltage as % of conductor voltage of bottom unit +efficiency1 = 3.752*100/(n*1.5724) //String efficiency(%) + +// Result Section +printf('Disc voltages as a percentage of the conductor voltage with guard ring are :') +printf('Topmost unit = %.2f percent' ,unit_1) +printf('Second unit = %.2f percent' ,unit_2) +printf('Bottom unit = %.2f percent' ,unit_3) +printf('String efficiency = %.2f percent' ,efficiency) +printf('\nDisc voltages as a percentage of the conductor voltage without guard ring are :') +printf('Topmost unit = %.2f percent' ,unit_1g) +printf('Second unit = %.2f percent' ,unit_2g) +printf('Bottom unit = %.2f percent' ,unit_3g) +printf('String efficiency = %.2f percent' ,efficiency1) |