1 files changed, 14 insertions, 0 deletions
diff --git a/3760/CH9/EX9.8/ExB_8.sce b/3760/CH9/EX9.8/ExB_8.sce
new file mode 100644
index 000000000..588b823f7
--- /dev/null
+++ b/3760/CH9/EX9.8/ExB_8.sce
@@ -0,0 +1,14 @@
+clc;
+vl=230; // line voltage
+f=50; // frequency of supply
+c=100*10^-6; // value of capacitance in each phase
+vp=230/sqrt(3); // phase voltage
+zp=1/(2*%pi*f*c); // phase impedance
+il=vp/zp; // line current
+// value of cos(theta) is taken from figB.15
+w1=vl*il*cosd(120);
+w2=vl*il*cosd(60);
+printf('Reading of wattmeter 1 is %f W\n',w1);
+printf('Reading of wattmeter 2 is %f W\n',w2);
+p=w1+w2;
+printf('Total input power is %f W',p);