summaryrefslogtreecommitdiff
path: root/3760/CH4/EX4.15/Ex4_15.sce
diff options
context:
space:
mode:
Diffstat (limited to '3760/CH4/EX4.15/Ex4_15.sce')
-rw-r--r--3760/CH4/EX4.15/Ex4_15.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3760/CH4/EX4.15/Ex4_15.sce b/3760/CH4/EX4.15/Ex4_15.sce
new file mode 100644
index 000000000..d33226095
--- /dev/null
+++ b/3760/CH4/EX4.15/Ex4_15.sce
@@ -0,0 +1,14 @@
+clc;
+ATp=15000;//armture ampere turns per pole
+Pr=0.68;//ratio of pole arc to pole pitch
+Ia=850;//rated armature current
+Bcp=0.25;//interpolar flux density in tesla
+gcp=0.01;//interpolar air gap length
+U=4*%pi*0.0000001;//permeability of air
+ATc=Pr*ATp;//compensating winding ampere turns per pole
+C=2*(ATc/Ia);//compensating winding conductors per pole
+MMF_ag=(Bcp/U)*gcp;//M.M.F. required for the air gap under the interpole
+MMF=MMF_ag+ATp;//interpole M.M.F. without compensating winding
+MMF_c=MMF-ATc;//ampere turns furnished by each interpole
+N=MMF_c/Ia;//No. of turns on each interpole
+printf('Number of turns on each interpole is %f.',round(N));