2 files changed, 33 insertions, 0 deletions
diff --git a/1938/CH3/EX3.24/3_24.jpg b/1938/CH3/EX3.24/3_24.jpg
new file mode 100755
index 000000000..b943ff400
--- /dev/null
+++ b/1938/CH3/EX3.24/3_24.jpg
diff --git a/1938/CH3/EX3.24/3_24.sce b/1938/CH3/EX3.24/3_24.sce
new file mode 100755
index 000000000..3c2fb3d24
--- /dev/null
+++ b/1938/CH3/EX3.24/3_24.sce
@@ -0,0 +1,33 @@
+clc,clear
+printf('Example 3.24\n\n')
+ 
+R_a=0.02 //armature resistance
+V=250 //line voltage
+I=50 //current taken from supply 
+
+//for generator
+I_a_g=330,I_sh_g=5 //armature current and current through shunt field 
+arm_cu_loss_g = R_a*I_a_g^2//armature copper loss for generator
+field_cu_loss_g= V*I_sh_g //field copper loss for generator
+
+//for motor
+I_a_m=380,I_sh_m=4.2 //armature current and current through shunt field
+arm_cu_loss_m = R_a*I_a_m^2//armature copper loss for motor
+field_cu_loss_m= V*I_sh_m //field copper loss for motor
+power_drawn=V*I
+IFW_losses = power_drawn - (arm_cu_loss_g + arm_cu_loss_m)  //Iron , friction and windage losses
+IFW_losses_each= IFW_losses /2  // Iron , friction and windage losses for each machine
+
+//for generator
+total_loss_g = field_cu_loss_g + arm_cu_loss_g + IFW_losses_each
+generator_output=V*I_a_g
+generator_input = generator_output + total_loss_g 
+eta_g = 100*(generator_output/generator_input)//generator efficiency 
+printf('Efficiency of generator is %.4f percent\n',eta_g)
+
+//for motor
+total_loss_m= field_cu_loss_m + IFW_losses_each  +  arm_cu_loss_m
+motor_input=V*(I_a_m+I_sh_m)
+motor_output = motor_input - total_loss_m
+eta_m = 100*(motor_output/motor_input)//motor efficiency 
+printf('Efficiency of motor is %.4f percent\n',eta_m)