11 files changed, 211 insertions, 0 deletions
diff --git a/3835/CH9/EX9.1/Ex9_1.sce b/3835/CH9/EX9.1/Ex9_1.sce
new file mode 100644
index 000000000..554f8e114
--- /dev/null
+++ b/3835/CH9/EX9.1/Ex9_1.sce
@@ -0,0 +1,34 @@
+clear
+//
+//case a
+e=600
+p=6
+n=1500
+z=200
+a=2
+//since e=(phy*n*p*z)/(60*a)
+phy=(e*60*a)/(n*p*z)
+printf("\n phy=0.04")
+//case b
+phy=0.05
+p=8
+n=500
+z=800
+a=8
+p=8
+e=(phy*p*n*z)/(60*a)
+printf("\n e= %0.1f  V",e)
+//case c
+e=400
+a=2
+n=(e*60*a)/(phy*p*z)
+printf("\n n= %0.1f  rpm",n)
+//case d
+phy=0.05
+p=4
+n=800
+z=600
+a=4
+p=4
+e=(phy*n*p*z)/(60*a)
+printf("\n e= %0.1f  V",e)
diff --git a/3835/CH9/EX9.10/Ex9_10.sce b/3835/CH9/EX9.10/Ex9_10.sce
new file mode 100644
index 000000000..3cd1eb74a
--- /dev/null
+++ b/3835/CH9/EX9.10/Ex9_10.sce
@@ -0,0 +1,16 @@
+clear
+//
+//given and derived from the circuit in the figure
+ish=2
+ia=77 //75+2
+ra=0.15
+v=200
+e=v+ia*ra
+//when dc machine runs as a motor 
+ia=73 //75-2
+eb=v-(ia*ra)
+//n1 and n2 are the speeds at which the motor is operating as a generator and motor
+n1=211.55
+n2=189.05
+p=n1/n2
+printf("\n %0.3f ",p)
diff --git a/3835/CH9/EX9.11/Ex9_11.sce b/3835/CH9/EX9.11/Ex9_11.sce
new file mode 100644
index 000000000..026e9e751
--- /dev/null
+++ b/3835/CH9/EX9.11/Ex9_11.sce
@@ -0,0 +1,18 @@
+clear
+//
+//given
+n=500
+v=250
+rsh=80
+ra=0.02
+drop=1.5
+//derived
+ish=3.125 //ish=v/rsh
+il=480    //il=w*1000/v
+ia=483.125 //ia=il+ish
+e=v+ra*ia+2*drop
+il=80
+ia=il-ish
+eb=v-ra*ia-2*drop
+n=(500*eb)/e //e is proportional to n
+printf("\n n= %0.1f  rpm",n)
diff --git a/3835/CH9/EX9.12/Ex9_12.sce b/3835/CH9/EX9.12/Ex9_12.sce
new file mode 100644
index 000000000..272fc0de5
--- /dev/null
+++ b/3835/CH9/EX9.12/Ex9_12.sce
@@ -0,0 +1,18 @@
+clear
+//
+//given and derived
+ish=1
+il=26
+ia=25
+ra=0.4
+//phy1*i1=phy2*i2 and ish2*i2=ish1*i1
+//subtituting values in the above equation we get i2=25/ish2
+eb1=200-ia*ra
+//eb2=200-0.4*i2
+//eb1/eb2=(n1*ish1)/(n2*ish2)
+//190/(200-0.4*25/ish2)=500/(700*ish2)
+//on finding the square root we get the value of ish2 as 0.698A
+ish2=0.698
+totres=200/0.698
+r=totres-200
+printf("\n resistance to be inserted in the field circuit is= %0.1f  ohm",r)
diff --git a/3835/CH9/EX9.14/Ex9_14.sce b/3835/CH9/EX9.14/Ex9_14.sce
new file mode 100644
index 000000000..f21673360
--- /dev/null
+++ b/3835/CH9/EX9.14/Ex9_14.sce
@@ -0,0 +1,22 @@
+clear
+//
+//given and derived
+v=450
+r=0.25
+i1=160
+i2=125
+r1=450/(160)
+eb1=v-i2*r1
+//flux decreases by 12% hence eb2=1.12*eb1
+eb2=110.60
+r2=(v-eb2)/i1
+eb3=v-i2*r2
+eb4=1.12*eb3
+r3=(v-eb4)/i1
+
+//resistance of each section of the starter is determined as follows
+R1=r1-r2
+printf("\n R1= %0.1f  ohm",R1)
+R2=r2-r3
+printf("\n R2= %0.1f  ohm",R2)
+
diff --git a/3835/CH9/EX9.2/Ex9_2.sce b/3835/CH9/EX9.2/Ex9_2.sce
new file mode 100644
index 000000000..d6b006a21
--- /dev/null
+++ b/3835/CH9/EX9.2/Ex9_2.sce
@@ -0,0 +1,19 @@
+clear
+//
+d=0.2
+l=0.25
+p=6
+z=250
+bav=0.9
+n=800
+a=2
+ld=50
+phy=0.045 //flux per pole=0.9*0.2*0.25
+e=(phy*p*n*z)/(60*a)
+ia=e/ld
+//case a
+t=(60*e*ia)/(2*3.14*n)
+printf("\n torque= %0.1f  Nm",t)
+//case b
+po=e*ia
+printf("\n power output= %0.1f  W",po)
diff --git a/3835/CH9/EX9.4/Ex9_4.sce b/3835/CH9/EX9.4/Ex9_4.sce
new file mode 100644
index 000000000..086df85bf
--- /dev/null
+++ b/3835/CH9/EX9.4/Ex9_4.sce
@@ -0,0 +1,15 @@
+clear
+//
+//given
+i=250
+v=125
+rl=v/i //load resistance
+gemf=125+200*0.05+1.5
+printf("\n generated emf= %0.1f  V",gemf)
+e=(136.5*1200)/1500 //generated emf at 1200rpm
+//let v be the terminal voltage at 1200rpm
+//then armature current ia=v/rl
+//substituting all values in v=e-ia*ra-(voltage drop across the brushes)=97.91
+v=97.91
+i=v*2 //where rl=0.5 in the denominator is written as 2 
+printf("\n current= %0.1f  A",i)
diff --git a/3835/CH9/EX9.5/Ex9_5.sce b/3835/CH9/EX9.5/Ex9_5.sce
new file mode 100644
index 000000000..3d0f29aca
--- /dev/null
+++ b/3835/CH9/EX9.5/Ex9_5.sce
@@ -0,0 +1,12 @@
+clear
+//
+//given
+//the external characteristic of the generator,the combined armature and series field resistance is given by ra+rs
+r=0.375 //ra+rs
+//case a
+i=150
+//-0.375+0.4=0.025 the voltage drop
+vab=0.025*150
+printf("\n when i=150 the voltage drop between points a and b is= %0.1f  V",vab)
+vab=0.025*45
+printf("\n when i=45 the voltage drop between points a and b is= %0.1f  V",vab)
diff --git a/3835/CH9/EX9.7/Ex9_7.sce b/3835/CH9/EX9.7/Ex9_7.sce
new file mode 100644
index 000000000..268c69fd0
--- /dev/null
+++ b/3835/CH9/EX9.7/Ex9_7.sce
@@ -0,0 +1,15 @@
+clear
+//
+//shunt field current
+ish=400/220 //from circuit diagram
+//armature current
+i=50
+ia=i+ish
+printf("\n armature current= %0.1f  A",ia)
+//armature voltage
+voldrop=3
+ra=0.04
+rs=0.02
+v=400
+e=v+ia*(ra+rs)+voldrop
+printf("\n armature voltage= %0.1f  V",e)
diff --git a/3835/CH9/EX9.8/Ex9_8.sce b/3835/CH9/EX9.8/Ex9_8.sce
new file mode 100644
index 000000000..b5e6ba3f0
--- /dev/null
+++ b/3835/CH9/EX9.8/Ex9_8.sce
@@ -0,0 +1,26 @@
+clear
+//
+//given
+i=35
+v=220
+ra=0.15
+n1=1600
+//when motor is running at 1200rpm the back emf eb1 is given by eb1=v-(35*0.15)
+eb1=214.75
+//flux phy1 is proportional to armature current ia.Thus, at ia1=35 and ia2=15 n is proportional to eb/phy
+//2=(eb2*phy1)/(phy2*eb1)
+//therefore
+eb2=184.07
+//case a
+//resistance to be connected in series is rse ohm
+ia2=15
+rse=((v-eb2)/ia2)-ra
+printf("\n rse= %0.1f  ohm",rse)
+//case b
+eb2=0.5*1.15*214.75
+ia2=50
+rse=((v-eb2)/ia2)-ra
+phy1=35
+eb2=220-50*0.15
+n2=(n1*eb2*phy1)/(1.15*phy1*eb1)
+printf("\n n2= %0.1f  rpm",n2)
diff --git a/3835/CH9/EX9.9/Ex9_9.sce b/3835/CH9/EX9.9/Ex9_9.sce
new file mode 100644
index 000000000..a9c311f21
--- /dev/null
+++ b/3835/CH9/EX9.9/Ex9_9.sce
@@ -0,0 +1,16 @@
+clear
+//
+//case a
+i=60
+eb1=450
+ia=15.18 //derived from problem
+//using formula n2/n1=(eb2*phy1)/(eb1*phy2)
+eb2=45.54
+rse=(eb1-eb2)/ia
+printf("\n rse= %0.1f  ohm",rse)
+//case b
+ia=38.97 //derived
+//using the above used formula
+eb2=219.21
+rse=(eb1-eb2)/ia
+printf("\n rse= %0.1f  ohm",rse)