summaryrefslogtreecommitdiff
path: root/3760/CH4/EX4.78/Ex4_78.sce
diff options
context:
space:
mode:
Diffstat (limited to '3760/CH4/EX4.78/Ex4_78.sce')
-rw-r--r--3760/CH4/EX4.78/Ex4_78.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3760/CH4/EX4.78/Ex4_78.sce b/3760/CH4/EX4.78/Ex4_78.sce
new file mode 100644
index 000000000..776ee4989
--- /dev/null
+++ b/3760/CH4/EX4.78/Ex4_78.sce
@@ -0,0 +1,22 @@
+clc;
+// fields test on two similar machine gave following test
+iam=60; // motor armature current
+vam=500; // voltage across armature
+vfm=40; // voltage across field
+vt=450; // terminal voltage for generator
+io=46; // output current for generator
+vfg=40; // voltage across field
+ra=0.25; // armture resistance
+pi=(vam+vfm+vfg)*iam; // power input to whole set
+pog=vt*io; // generator output
+tl=pi-pog; // total loss in whole set
+poh=iam^2*ra+iam*(vfm+vfg)+io^2*ra; // total ohmic losses
+wo=(tl-poh)/2; // no load roational losses for each machines
+pim=(vam+vfm)*iam; // motor power input
+plm=iam^2*ra+iam*vfm+wo; // total motor loss
+nm=(1-(plm/pim))*100;
+printf('Motor efficiency is %f percent\n',nm);
+plg=io^2*ra+iam*vfm+wo; // total motor loss
+pgm=pog+plg; // generator input
+ng=(1-(plg/pgm))*100;
+printf('Generator efficiency is %f percent',ng);