summaryrefslogtreecommitdiff
path: root/3754/CH21/EX21.1/21_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3754/CH21/EX21.1/21_1.sce')
-rw-r--r--3754/CH21/EX21.1/21_1.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3754/CH21/EX21.1/21_1.sce b/3754/CH21/EX21.1/21_1.sce
new file mode 100644
index 000000000..784037c28
--- /dev/null
+++ b/3754/CH21/EX21.1/21_1.sce
@@ -0,0 +1,22 @@
+clear//
+
+//Variables
+
+RL = 100.0 //Resistance (in ohm)
+Vm = 300.0 //Maximum voltage (in volts)
+P1 = 25.0 //Load power1 (in watt)
+P2 = 80.0 //Load power2 (in watt)
+
+//Calculation
+
+Vdc = Vm / (2 * %pi) //dc voltage (in volts)
+//When power is 25 watt
+cosinealpha = (P1 * RL / Vdc**2)**0.5 -1 //cos of alpha
+alpha = acos(cosinealpha) //Value of alpha (in radians)
+
+//When power is 80 watt
+cosinealpha1 = (P2 * RL / Vdc**2)**0.5 -1 //cos of alpha
+alpha1 = acos(cosinealpha1) //Value of alpha (in radians)
+//Result
+
+printf("\n Angular firing control when load power P = 25 W is %0.2f degree.\nAngular firing control when load power P = 80 W is %0.2f degree.",alpha*180.0/%pi,alpha1*180.0/%pi)