diff options
Diffstat (limited to '1319/CH5/EX5.20')
| -rw-r--r-- | 1319/CH5/EX5.20/5_20.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/1319/CH5/EX5.20/5_20.sce b/1319/CH5/EX5.20/5_20.sce new file mode 100644 index 000000000..85b233b04 --- /dev/null +++ b/1319/CH5/EX5.20/5_20.sce @@ -0,0 +1,19 @@ +//To determine the max regulation and the pf at which it occurs
+
+clc;
+clear;
+
+Vr=2.5;
+Vx=5;
+
+printf('The expression for voltage requlation is y= %g cos(phi) + %g sin(phi) \n',Vr,Vx )
+
+printf('Differenciating w.r.t phi and equating it to zero, we get the power factor angle \n')
+
+printf('We get tan(phi)=> Vr/Vx => 5/2.5 => 2 \n \n')
+
+phi=atand(Vx/Vr); // power factor angle
+
+y= Vr*cosd(phi)+Vx*sind(phi); // Max Volatge regulation
+
+printf('The maximum regulation is %g percent \n and the power factor at which it occurs is %g degrees \n',y,phi)
|