summaryrefslogtreecommitdiff
path: root/Working_Examples/83/CH3/EX3.2/example_3_2.sce
diff options
context:
space:
mode:
authorSiddharth Agarwal2019-09-03 18:27:40 +0530
committerSiddharth Agarwal2019-09-03 18:27:40 +0530
commit8ac15bc5efafa2afc053c293152605b0e6ae60ff (patch)
treee1bc17aae137922b1ee990f17aae4a6cb15b7d87 /Working_Examples/83/CH3/EX3.2/example_3_2.sce
parent52a477ec613900885e29c4a0b02806a415b4f83a (diff)
downloadXcos_block_examples-master.tar.gz
Xcos_block_examples-master.tar.bz2
Xcos_block_examples-master.zip
Xcos examples from textbooks and for blocksHEADmaster
Diffstat (limited to 'Working_Examples/83/CH3/EX3.2/example_3_2.sce')
-rwxr-xr-xWorking_Examples/83/CH3/EX3.2/example_3_2.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/Working_Examples/83/CH3/EX3.2/example_3_2.sce b/Working_Examples/83/CH3/EX3.2/example_3_2.sce
new file mode 100755
index 0000000..e312350
--- /dev/null
+++ b/Working_Examples/83/CH3/EX3.2/example_3_2.sce
@@ -0,0 +1,21 @@
+//Chapter 3
+//Example 3.2
+//page 88
+//To claculate the capacitance to neutral and charging current of a three phase transmission line
+clear;clc;
+d=350; //distance between adjacent lines
+r=1.05/2; //radius of the conductor
+v=110e3; //line voltage;
+f=50;
+
+Deq=(d*d*2*d)^(1/3); //GMD or equivalent
+
+Cn=(0.0242/log10(Deq/r));
+
+Xn=1/(2*%pi*f*Cn*10^(-6)); // Cn is in uF hence we add 10^6 while printing
+
+Ic=(v/sqrt(3))/Xn;
+
+printf("\nCapacitance to neutral is = %f uF/km\n\n",Cn);
+printf("Capacitive rectance of the line is = %f ohm/km to neutral\n\n",Xn);
+printf("Charging Current = %0.2f A/km\n\n",Ic); \ No newline at end of file