summaryrefslogtreecommitdiff
path: root/3784/CH1/EX1.21/Ex1_21.sce
diff options
context:
space:
mode:
Diffstat (limited to '3784/CH1/EX1.21/Ex1_21.sce')
-rw-r--r--3784/CH1/EX1.21/Ex1_21.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/3784/CH1/EX1.21/Ex1_21.sce b/3784/CH1/EX1.21/Ex1_21.sce
new file mode 100644
index 000000000..19f561f41
--- /dev/null
+++ b/3784/CH1/EX1.21/Ex1_21.sce
@@ -0,0 +1,27 @@
+clc
+// Variable Initialization
+Vm=230//Supply Voltage in Volts
+Ra=0.75//Combined Field and Armature circuit resistance in Ohm
+N=1300 //Motor speed in Rpm
+V=210//Rated voltage of motor in Volts
+a=45//firing angle in Degree
+Kaf=0.03 //Constant in N-m/A^2
+Kres=0.075 //Constant in V-s/Rad
+
+//Solution
+//For semi-converter controlled Dc Drive
+W=(2*%pi*N)/60 //angular speed in Rad/sec
+Ia=(((Vm*1.414)/%pi)*(1+cosd(a))-(Kres*W))*(1/(Ra+Kaf*W))//Armature current in Amp
+T=Kaf*(Ia)^2//Torque in N-m
+I=(T/Kaf)^(1/2)//motor current in Amp
+Va=(Vm*1.414)*(1+cosd(a))*(1/%pi)//Average voltage in Volts
+//Input Power if losses are neglected
+Ps=Va*I //Power loss in Watt
+Pi=Vm*I*(5/6)^0.5 //power input in watt
+Pf=(Ps/Pi)//Power Factor in Lag
+
+//Results
+printf('\n\n The motor Torque =%0.1f N-m \n\n',T)
+printf('\n\n The motor Current =%0.1f Amp \n\n',I)
+printf('\n\n The Supply Power Factor =%0.1f Lag \n\n',Pf)
+