diff options
Diffstat (limited to '1938/CH6/EX6.25/6_25.sce')
| -rwxr-xr-x | 1938/CH6/EX6.25/6_25.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1938/CH6/EX6.25/6_25.sce b/1938/CH6/EX6.25/6_25.sce new file mode 100755 index 000000000..c9f779bf3 --- /dev/null +++ b/1938/CH6/EX6.25/6_25.sce @@ -0,0 +1,15 @@ +clc,clear
+printf('Example 6.25\n\n')
+
+I_a=10
+phi=20 //lag and degrees
+V_t=400
+X_d=10,X_q=6.5,R_a=0 //armature resistance and synchronous reactance of direct,quadrature axis
+
+psi=atand( (V_t*sind(phi)+I_a*X_q)/(V_t*cosd(phi)+I_a*R_a) )
+delta=psi-phi
+I_d=I_a*sind(psi)
+I_q=I_a*cosd(psi)
+
+printf('Load angle is %.2f degrees \n',delta)
+printf('I_d and I_q are %.4f A and %.4f A respectively ',I_d,I_q )
|