diff options
Diffstat (limited to '2642/CH1/EX1.12')
-rwxr-xr-x | 2642/CH1/EX1.12/Ex1_12.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/2642/CH1/EX1.12/Ex1_12.sce b/2642/CH1/EX1.12/Ex1_12.sce new file mode 100755 index 000000000..9d0089b02 --- /dev/null +++ b/2642/CH1/EX1.12/Ex1_12.sce @@ -0,0 +1,24 @@ +// FUNDAMENTALS OF ELECTICAL MACHINES
+// M.A.SALAM
+// NAROSA PUBLISHING HOUSE
+// SECOND EDITION
+
+// Chapter 1 : REVIEW OF ELECRTIC CIRCUITS
+// Example : 1.12
+
+clc;clear; // clears the console and command history
+
+
+// Given data
+P = 120 // total power in kW
+cos_teta = 0.6 // power factor
+
+// caclulations
+teta = acosd(0.6) // power factor angle
+P_1 = tand(teta)*P/sqrt(3)
+P_2 = (P_1+P)/2 // second wattmeter reading in kW
+
+// display the result
+disp("Example 1.12 solution");
+printf(" \n Second wattmeter reading \n P_2= %.1f kW \n", P_2);
+
|