diff options
Diffstat (limited to '1904/CH4/EX4.1')
| -rwxr-xr-x | 1904/CH4/EX4.1/4_1.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/1904/CH4/EX4.1/4_1.sce b/1904/CH4/EX4.1/4_1.sce new file mode 100755 index 000000000..7046b5874 --- /dev/null +++ b/1904/CH4/EX4.1/4_1.sce @@ -0,0 +1,19 @@ +//To determine the constant K for 16kV feeder
+//Page 201
+clc;
+clear;
+
+//Conductor Pararmeters
+r=1.503;
+xa=0.609;
+xd=0.1366;
+pf=0.9;
+Vb=2400;
+Vr=Vb;
+x=xa+xd;
+Kc=0.01; //From the Curve
+
+K=((r*pf)+(x+sind(acosd(pf))))*(1000/3)*100/(Vr*Vb); // In Percent
+
+printf('\na) The Value of Constant K is %g percent VDpu per kVA mile\n',K)
+printf('b) From the precalculated per cent voltage drop Curve, It is found that the K is \n%g percent VDpu per kVA mile which is same as the answer obtained in part a\n',Kc)
|