1 files changed, 30 insertions, 0 deletions
diff --git a/3640/CH5/EX5.4/Ex5_4.sce b/3640/CH5/EX5.4/Ex5_4.sce
new file mode 100644
index 000000000..2839e834e
--- /dev/null
+++ b/3640/CH5/EX5.4/Ex5_4.sce
@@ -0,0 +1,30 @@
+clc
+//Ex5_4 uses a figure given in textbook
+Ia=50 //current in amperes
+IB=50 //current in amperes
+nB=1200 //speed in rev/min
+ratio=0.01 //ratio of Nsc/Nf ,unit less
+Isc=0.6*Ia //equation given in textbook
+mprintf("Isc=%dA\n",Isc)
+If=1.3 //field current in amperes
+mprintf("If*=If+(Nsc/Nf)*Isc=%fA\n",If+(ratio*Isc))
+Eg1=132.5 //voltage in volts
+mprintf("Ka`Φ=Eg*/nB=%fV-min/rev\n",Eg1/nB)//ans may vary due to roundoff error
+n=1140 //speed in rev/min
+Eg=n*(Eg1/nB)
+mprintf("Eg=Ka`n=%fV\n",Eg)//ans may vary due to roundoff error
+ra=0.2 //resistance in ohms
+Ra=0.03+ra //by kirchodff's law and parallel combination or resistances
+mprintf("Ra=%fΩ\n",Ra)
+VTfl=Eg-(Ia*Ra)
+mprintf("VTfl=%fV\n",VTfl)//ans may vary due to roundoff error
+mprintf("If*=If+0=%fA\n",If)
+Eg2=125 //voltage in volts
+VTnl=Eg*(n/nB)
+mprintf("Eg=Eg*(n/nB)=%fV\n",VTnl)//ans may vary due to roundoff error
+mprintf("Voltage Regulation=(VTnl-VTfl)/VTfl=%f%c",((VTnl-VTfl)/VTfl)*100,'%') //ans may vary due to roundoff error
+
+
+
+
+