diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3640/CH5/EX5.3/Ex5_3.sce | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip |
initial commit / add all books
Diffstat (limited to '3640/CH5/EX5.3/Ex5_3.sce')
-rw-r--r-- | 3640/CH5/EX5.3/Ex5_3.sce | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/3640/CH5/EX5.3/Ex5_3.sce b/3640/CH5/EX5.3/Ex5_3.sce new file mode 100644 index 000000000..bbbf3bf3c --- /dev/null +++ b/3640/CH5/EX5.3/Ex5_3.sce @@ -0,0 +1,36 @@ +clc
+//Ex5_3 uses a magnetization curve given in textbook
+mprintf("At 1200 rev/min and shunt field current of 0.7A Eg*=90V \n") //from magnetization curve
+n=1200 //speed of rotation in rev/min
+Eg1=90 //voltage in volts
+wB=(n/60)*2
+mprintf("wB=%dπrad/sec\n",wB)
+mprintf("KaΦ*=Eg*/wB=%fV-s/rad\n",Eg1/(wB*%pi))//ans may vary due to roundoff error
+Td=30 //torque in N-m
+Ia=Td/(Eg1/(wB*%pi))
+mprintf("Ia=τd/KaΦ*=%fA\n",Ia)//ans may vary due to roundoff error
+VT=125 //voltage in volts
+ra=0.2 //resistance in ohms
+Eg=VT-(Ia*ra)
+mprintf("Eg=%fV\n",Eg)//ans may vary due to roundoff error
+w=Eg/((Eg1/(wB*%pi)))
+mprintf("w=Eg/KaΦ*=%frad/s\n",w)//ans may vary due to roundoff error
+n=(w*60)/(2*%pi)
+mprintf("n=%frev/min\n",n)//ans may vary due to roundoff error
+//other two techniques
+//first technique
+nB=1200 //speed in rev/min
+n=nB*(Eg/Eg1)//ans may vary due to roundoff error
+mprintf("n=%frev/min\n",n)
+//second technique
+mprintf("τd=%flb-ft\n",Td*0.738)//ans may vary due to roundoff error
+mprintf("Ka`Φ=Eg*/nB=%fV-min/rev\n",Eg/nB)
+Ia=(Td*0.738)/(7.04*(Eg1/nB))//ans may vary due to roundoff error
+mprintf("Ia=τd/(7.04*Ka`*Φ)=%fA\n",Ia)
+n=Eg/(Eg1/nB)
+mprintf("n=Eg/K`aΦ=%frev/min\n",n)//ans may vary due to roundoff error
+
+
+
+
+
|