diff options
| author | Siddharth Agarwal | 2019-09-03 18:27:40 +0530 |
|---|---|---|
| committer | Siddharth Agarwal | 2019-09-03 18:27:40 +0530 |
| commit | 8ac15bc5efafa2afc053c293152605b0e6ae60ff (patch) | |
| tree | e1bc17aae137922b1ee990f17aae4a6cb15b7d87 /Working_Examples/2777/CH7/EX7.8 | |
| parent | 52a477ec613900885e29c4a0b02806a415b4f83a (diff) | |
| download | Xcos_block_examples-8ac15bc5efafa2afc053c293152605b0e6ae60ff.tar.gz Xcos_block_examples-8ac15bc5efafa2afc053c293152605b0e6ae60ff.tar.bz2 Xcos_block_examples-8ac15bc5efafa2afc053c293152605b0e6ae60ff.zip | |
Diffstat (limited to 'Working_Examples/2777/CH7/EX7.8')
| -rwxr-xr-x | Working_Examples/2777/CH7/EX7.8/Ex7_8.sce | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/Working_Examples/2777/CH7/EX7.8/Ex7_8.sce b/Working_Examples/2777/CH7/EX7.8/Ex7_8.sce new file mode 100755 index 0000000..0c7e9ea --- /dev/null +++ b/Working_Examples/2777/CH7/EX7.8/Ex7_8.sce @@ -0,0 +1,40 @@ +
+// ELECTRICAL MACHINES
+// R.K.Srivastava
+// First Impression 2011
+// CENGAGE LEARNING INDIA PVT. LTD
+
+// CHAPTER : 7 : SPECIAL MOTORS AND INTRODUCTION TO GENERALIZED MACHINE THEORY
+
+// EXAMPLE : 7.8
+
+clear ; clc ; close ; // Clear the work space and console
+
+
+// GIVEN DATA
+
+V = 220; // supply voltage in Volts
+f = 50; // Frequency in Hertz
+p = 4; // Number of poles
+Xm = 60; // Mutual reactance in Ohms
+Rs = 1.0; // Resistance of stator windings in Ohms
+Xs = 6.0; // Leakage reactance of stator windings in Ohms
+Ra = 2.5; // Resistance of Armature windings in Ohms
+Xa = 6.0; // Leakage reactance of armature windings in Ohms
+P_hp = 1; // Output power in HP
+N = 1400; // Motor running speed in RPM
+alpha = 15; // Brush displacement from the low-impedance position in degree
+
+// CALCULATIONS
+
+Ns = (120*f)/p; // Synchronous speed in RPM
+s = N/Ns; // Speed ratio
+I = V / (Rs + %i*(Xs+Xm) + (%i*Xm^2*cosd(alpha))*(s*sind(alpha)-(%i*cosd(alpha)))/(Ra+%i*(Xa+Xm))); // Curent in Amphere
+pf = cosd(atand(imag(I),real(I))); // Power factor lagging
+
+
+// DISPLAY RESULTS
+
+disp("EXAMPLE : 7.8: SOLUTION :-");
+printf("\n (a) Currents, I = %.2f < %.2f A \n",abs(I),atand(imag(I),real(I)))
+printf("\n (b) Power factor = %.4f lagging \n",pf)
|