diff options
Diffstat (limited to '3871/CH7/EX7.22')
| -rw-r--r-- | 3871/CH7/EX7.22/Ex7_22.sce | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/3871/CH7/EX7.22/Ex7_22.sce b/3871/CH7/EX7.22/Ex7_22.sce new file mode 100644 index 000000000..87b6dd3c5 --- /dev/null +++ b/3871/CH7/EX7.22/Ex7_22.sce @@ -0,0 +1,33 @@ +//===========================================================================
+//chapter 7 example 22
+
+clc;
+clear all;
+
+//variable declaration
+W1 = 5000; //wattmeter reading in W
+W2 = -1000; //wattmeter reading in W
+VL = 440; //load voltage in V
+f = 50; //frequency in Hz
+VP = 440;
+
+//calculations
+P = W1+W2; //total power in the load circuit in W
+phi = atan(((W1-W2)/(W1+W2))*sqrt(3)); //phase angle in °
+phi1 = phi*180/%pi;
+pf = cos(phi); //power factor
+IP = P/((sqrt(3)*VL*pf)); //load current per phase in A
+IP1 = IP/sqrt(3);
+ZP = VP/IP1; //load impedance per phase
+RP = ZP*pf; //load resistance per phase in Ω
+XP =ZP*sin(phi); //load reactance per phase in Ω
+pf1 = 0.5; //power factor
+phi2 = (acos(pf1))*180/%pi;
+//reading of wattmeter will be zero
+XP1 = RP*tan((phi2)*%pi/180); //reactnace in circuit per phase in Ω
+XC =XP-XP1; //value of capacitive reactance in troduced in each phase in Ω
+C = 1/(2*%pi*f*XC); //value of capacitive reactance introduced in each phase of delta connected in uF
+
+//result
+mprintf("value of capacitive reactance introduced in each phase of delta connected = %3.0f uF",(C*10^6));
+
|