diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /833/CH11 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '833/CH11')
39 files changed, 788 insertions, 0 deletions
diff --git a/833/CH11/EX11.1/Ex11_1.sce b/833/CH11/EX11.1/Ex11_1.sce new file mode 100755 index 000000000..533bfaac9 --- /dev/null +++ b/833/CH11/EX11.1/Ex11_1.sce @@ -0,0 +1,13 @@ +//Caption: Find (a)Number of poles and (b)% slip
+//Exa:11.1
+clc;
+clear;
+close;
+f=50//Frequency(in hertz)
+n=960//Speed of induction motor on full load(in r.p.m)
+n_s=1000//Synchronous speed(in r.p.m)
+p=(f*120)/(n_s)
+disp(p,'(a)Number of poles is=')
+s=n_s-n
+S=(s/n_s)*100
+disp(S,'(b)%Slip is(in%)=')
\ No newline at end of file diff --git a/833/CH11/EX11.1/Ex11_1.txt b/833/CH11/EX11.1/Ex11_1.txt new file mode 100755 index 000000000..533bfaac9 --- /dev/null +++ b/833/CH11/EX11.1/Ex11_1.txt @@ -0,0 +1,13 @@ +//Caption: Find (a)Number of poles and (b)% slip
+//Exa:11.1
+clc;
+clear;
+close;
+f=50//Frequency(in hertz)
+n=960//Speed of induction motor on full load(in r.p.m)
+n_s=1000//Synchronous speed(in r.p.m)
+p=(f*120)/(n_s)
+disp(p,'(a)Number of poles is=')
+s=n_s-n
+S=(s/n_s)*100
+disp(S,'(b)%Slip is(in%)=')
\ No newline at end of file diff --git a/833/CH11/EX11.1/Result11_1.txt b/833/CH11/EX11.1/Result11_1.txt new file mode 100755 index 000000000..9cd3636cc --- /dev/null +++ b/833/CH11/EX11.1/Result11_1.txt @@ -0,0 +1,7 @@ +(a)Number of poles is=
+
+ 6.
+
+ (b)%Slip is(in%)=
+
+ 4.
\ No newline at end of file diff --git a/833/CH11/EX11.10/Ex11_10.sce b/833/CH11/EX11.10/Ex11_10.sce new file mode 100755 index 000000000..f0d8a310c --- /dev/null +++ b/833/CH11/EX11.10/Ex11_10.sce @@ -0,0 +1,22 @@ +//Caption: Calculate (a)% slip (b)Rotor copper loss (c)Output from the rotor (d)Efficiency
+//Exa:11.10
+clc;
+clear;
+close;
+V=440//Supplied voltage(in volts)
+f=50//frequency(in hertz)
+p=6//Number of poles
+n=960//Speed of motor(in r.p.m)
+P_i=50000//Input power(in watt)
+P_wf=1800//Winding and friction losses(in watt)
+P_s=1200//Stator losses(in watt)
+n_s=(120*f)/p
+S=((n_s-n)/n_s)*100
+disp(S,'(a)% slip=')
+P_r=P_i-P_s
+P_rc=(S/100)*P_r
+disp(P_rc,'(b)Rotor copper loss(in watt)=')
+P_o=P_r-P_rc-P_wf
+disp(P_o,'(c)Output of rotor(in watt)=')
+eff=(P_o/P_i)*100
+disp(eff,'(d)Efficiency(in%)=')
\ No newline at end of file diff --git a/833/CH11/EX11.10/Ex11_10.txt b/833/CH11/EX11.10/Ex11_10.txt new file mode 100755 index 000000000..f0d8a310c --- /dev/null +++ b/833/CH11/EX11.10/Ex11_10.txt @@ -0,0 +1,22 @@ +//Caption: Calculate (a)% slip (b)Rotor copper loss (c)Output from the rotor (d)Efficiency
+//Exa:11.10
+clc;
+clear;
+close;
+V=440//Supplied voltage(in volts)
+f=50//frequency(in hertz)
+p=6//Number of poles
+n=960//Speed of motor(in r.p.m)
+P_i=50000//Input power(in watt)
+P_wf=1800//Winding and friction losses(in watt)
+P_s=1200//Stator losses(in watt)
+n_s=(120*f)/p
+S=((n_s-n)/n_s)*100
+disp(S,'(a)% slip=')
+P_r=P_i-P_s
+P_rc=(S/100)*P_r
+disp(P_rc,'(b)Rotor copper loss(in watt)=')
+P_o=P_r-P_rc-P_wf
+disp(P_o,'(c)Output of rotor(in watt)=')
+eff=(P_o/P_i)*100
+disp(eff,'(d)Efficiency(in%)=')
\ No newline at end of file diff --git a/833/CH11/EX11.10/Result11_10.txt b/833/CH11/EX11.10/Result11_10.txt new file mode 100755 index 000000000..237b4a0e5 --- /dev/null +++ b/833/CH11/EX11.10/Result11_10.txt @@ -0,0 +1,16 @@ +(a)% slip=
+
+ 4.
+
+ (b)Rotor copper loss(in watt)=
+
+ 1952.
+
+ (c)Output of rotor(in watt)=
+
+ 45048.
+
+ (d)Efficiency(in%)=
+
+ 90.096
+
\ No newline at end of file diff --git a/833/CH11/EX11.11/Ex11_11.sce b/833/CH11/EX11.11/Ex11_11.sce new file mode 100755 index 000000000..1461ca797 --- /dev/null +++ b/833/CH11/EX11.11/Ex11_11.sce @@ -0,0 +1,43 @@ +//Caption:Find (a)Equivalent rotor current per phase (b)Stator current per phase (c)Power factor (d)Rotor input (e)Rotor copper losses (f)Torque (g)Mechanical power output from rotor (h)Stator input (i)Efficiency
+//Exa:11.11
+clc;
+clear;
+close;
+V=440//Voltage supplied(in volts)
+p=8//Number of poles
+f=50//Frequency(in hertz)
+r1=0.2//Stator resistance(in ohm)
+x1=1.2//Stator reactance(in ohm)
+r2=0.3//Equivalent resistance of rotor referred to stator(in ohm)
+x2=1.2//Equivalent reactance of rotor referred to stator(in ohm)
+r_m=150//Magnetising resistance(in ohms)
+x_m=18//Magnetising reactance(in ohms)
+P_wf=750//Winding and friction losses(in watt)
+s=0.04//Slip
+n_s=(f*120)/(p*60)
+y1=1/r_m
+y2=1/(%i*x_m)
+y3=1/((r2/s)+(%i*x2))
+Y=y1+y2+y3
+Z=1/Y
+Z_t=Z+(r1+(%i*x1))
+E=V*Z/(Z_t)
+z3=1/y3
+i2=E/z3
+disp(i2,'(a)Rotor current per phase(in A)=')
+i1=V/Z_t
+disp(i1,'(b)Stator current per phase(in A)=')
+pf=cosd(atand(-(imag(Z_t))/real(Z_t)))
+disp(pf,'(c)Power factor=')
+P_r=(i2*(conj(i2)))*(r2/s)
+disp(P_r,'(d)Rotor input(in watt)=')
+P_rc=(i2*(conj(i2)))*r2
+disp(P_rc,'(e)Rotor copper loss(in watt)=')
+T=3*P_r/(2*%pi*n_s)
+disp(T,'(f)Torque(in N-m)=')
+P_me=P_r-P_rc-(P_wf/3)
+disp(P_me,'(g)Mechanical output from rotor(in watts per phase)=')
+P_st=V*(sqrt(i1*(conj(i1))))*pf
+disp(P_st,'(h)Stator input(watts per phase)=')
+eff=(P_me/P_st)*100
+disp(eff,'(i)Efficiency(in %)=')
\ No newline at end of file diff --git a/833/CH11/EX11.11/Ex11_11.txt b/833/CH11/EX11.11/Ex11_11.txt new file mode 100755 index 000000000..1461ca797 --- /dev/null +++ b/833/CH11/EX11.11/Ex11_11.txt @@ -0,0 +1,43 @@ +//Caption:Find (a)Equivalent rotor current per phase (b)Stator current per phase (c)Power factor (d)Rotor input (e)Rotor copper losses (f)Torque (g)Mechanical power output from rotor (h)Stator input (i)Efficiency
+//Exa:11.11
+clc;
+clear;
+close;
+V=440//Voltage supplied(in volts)
+p=8//Number of poles
+f=50//Frequency(in hertz)
+r1=0.2//Stator resistance(in ohm)
+x1=1.2//Stator reactance(in ohm)
+r2=0.3//Equivalent resistance of rotor referred to stator(in ohm)
+x2=1.2//Equivalent reactance of rotor referred to stator(in ohm)
+r_m=150//Magnetising resistance(in ohms)
+x_m=18//Magnetising reactance(in ohms)
+P_wf=750//Winding and friction losses(in watt)
+s=0.04//Slip
+n_s=(f*120)/(p*60)
+y1=1/r_m
+y2=1/(%i*x_m)
+y3=1/((r2/s)+(%i*x2))
+Y=y1+y2+y3
+Z=1/Y
+Z_t=Z+(r1+(%i*x1))
+E=V*Z/(Z_t)
+z3=1/y3
+i2=E/z3
+disp(i2,'(a)Rotor current per phase(in A)=')
+i1=V/Z_t
+disp(i1,'(b)Stator current per phase(in A)=')
+pf=cosd(atand(-(imag(Z_t))/real(Z_t)))
+disp(pf,'(c)Power factor=')
+P_r=(i2*(conj(i2)))*(r2/s)
+disp(P_r,'(d)Rotor input(in watt)=')
+P_rc=(i2*(conj(i2)))*r2
+disp(P_rc,'(e)Rotor copper loss(in watt)=')
+T=3*P_r/(2*%pi*n_s)
+disp(T,'(f)Torque(in N-m)=')
+P_me=P_r-P_rc-(P_wf/3)
+disp(P_me,'(g)Mechanical output from rotor(in watts per phase)=')
+P_st=V*(sqrt(i1*(conj(i1))))*pf
+disp(P_st,'(h)Stator input(watts per phase)=')
+eff=(P_me/P_st)*100
+disp(eff,'(i)Efficiency(in %)=')
\ No newline at end of file diff --git a/833/CH11/EX11.11/Result11_11.txt b/833/CH11/EX11.11/Result11_11.txt new file mode 100755 index 000000000..419b10fd1 --- /dev/null +++ b/833/CH11/EX11.11/Result11_11.txt @@ -0,0 +1,36 @@ +(a)Rotor current per phase(in A)=
+
+ 49.164969 - 14.714454i
+
+ (b)Stator current per phase(in A)=
+
+ 48.887575 - 36.523225i
+
+ (c)Power factor=
+
+ 0.8011191
+
+ (d)Rotor input(in watt)=
+
+ 19752.82
+
+ (e)Rotor copper loss(in watt)=
+
+ 790.11281
+
+ (f)Torque(in N-m)=
+
+ 754.50216
+
+ (g)Mechanical output from rotor(in watts per phase)=
+
+ 18712.708
+
+ (h)Stator input(watts per phase)=
+
+ 21510.533
+
+ (i)Efficiency(in %)=
+
+ 86.99323
+
\ No newline at end of file diff --git a/833/CH11/EX11.12/Ex11_12.sce b/833/CH11/EX11.12/Ex11_12.sce new file mode 100755 index 000000000..f2659dfa7 --- /dev/null +++ b/833/CH11/EX11.12/Ex11_12.sce @@ -0,0 +1,37 @@ +//Caption:Find (a)Equivalent rotor current per phase (b)Stator current per phase (c)Power factor (d)Rotor input (e)Rotor copper losses (f)Torque (g)Mechanical power output from rotor (h)Stator input (i)Efficiency.Solve it by APPROXIMATE equivalent circuit method
+//Exa:11.12
+clc;
+clear;
+close;
+V=440//Voltage supplied(in volts)
+p=8//Number of poles
+f=50//Frequency(in hertz)
+r1=0.2//Stator resistance(in ohm)
+x1=1.2//Stator reactance(in ohm)
+r2=0.3//Equivalent resistance of rotor referred to stator(in ohm)
+x2=1.2//Equivalent reactance of rotor referred to stator(in ohm)
+r_m=150//Magnetising resistance(in ohms)
+x_m=18//Magnetising reactance(in ohms)
+P_wf=750//Winding and friction losses(in watt)
+s=0.04//Slip
+I2=V/((r1+(r2/s))+(%i*x1)+(%i*x2))
+disp(I2,'(a)Equivalent rotor current per phase(in A)=')
+y1=1/r_m
+y2=1/(%i*x_m)
+I_o=V*(y1+y2)
+I_1=I2+I_o
+disp(I_1,'(b)Stator current per phase(in A)=')
+pf=cosd(atand(imag(I_1)/real(I_1)))
+disp(pf,'(c)Power factor=')
+P_r=(I2*conj(I2))*(r2/s)
+disp(P_r,'(d)Rotor input(in watt)=')
+P_rc=(I2*conj(I2))*r2
+disp(P_rc,'(e)Rotor copper losses(in watts)=')
+T=P_r/(2*%pi*((f*120)/(p*60)))
+disp(T,'(f)Torque(in N-m)=')
+P_me=P_r-P_rc-(P_wf/3)
+disp(P_me,'(g)Mechanical power output from rotor(in watts per phase)=')
+P_si=V*pf*(sqrt(I_1*conj(I_1)))
+disp(P_si,'(h)Stator input(in watts per phase)=')
+e=(P_me/P_si)*100
+disp(e,'(i)Efficiency (in %)=')
\ No newline at end of file diff --git a/833/CH11/EX11.12/Ex11_12.txt b/833/CH11/EX11.12/Ex11_12.txt new file mode 100755 index 000000000..f2659dfa7 --- /dev/null +++ b/833/CH11/EX11.12/Ex11_12.txt @@ -0,0 +1,37 @@ +//Caption:Find (a)Equivalent rotor current per phase (b)Stator current per phase (c)Power factor (d)Rotor input (e)Rotor copper losses (f)Torque (g)Mechanical power output from rotor (h)Stator input (i)Efficiency.Solve it by APPROXIMATE equivalent circuit method
+//Exa:11.12
+clc;
+clear;
+close;
+V=440//Voltage supplied(in volts)
+p=8//Number of poles
+f=50//Frequency(in hertz)
+r1=0.2//Stator resistance(in ohm)
+x1=1.2//Stator reactance(in ohm)
+r2=0.3//Equivalent resistance of rotor referred to stator(in ohm)
+x2=1.2//Equivalent reactance of rotor referred to stator(in ohm)
+r_m=150//Magnetising resistance(in ohms)
+x_m=18//Magnetising reactance(in ohms)
+P_wf=750//Winding and friction losses(in watt)
+s=0.04//Slip
+I2=V/((r1+(r2/s))+(%i*x1)+(%i*x2))
+disp(I2,'(a)Equivalent rotor current per phase(in A)=')
+y1=1/r_m
+y2=1/(%i*x_m)
+I_o=V*(y1+y2)
+I_1=I2+I_o
+disp(I_1,'(b)Stator current per phase(in A)=')
+pf=cosd(atand(imag(I_1)/real(I_1)))
+disp(pf,'(c)Power factor=')
+P_r=(I2*conj(I2))*(r2/s)
+disp(P_r,'(d)Rotor input(in watt)=')
+P_rc=(I2*conj(I2))*r2
+disp(P_rc,'(e)Rotor copper losses(in watts)=')
+T=P_r/(2*%pi*((f*120)/(p*60)))
+disp(T,'(f)Torque(in N-m)=')
+P_me=P_r-P_rc-(P_wf/3)
+disp(P_me,'(g)Mechanical power output from rotor(in watts per phase)=')
+P_si=V*pf*(sqrt(I_1*conj(I_1)))
+disp(P_si,'(h)Stator input(in watts per phase)=')
+e=(P_me/P_si)*100
+disp(e,'(i)Efficiency (in %)=')
\ No newline at end of file diff --git a/833/CH11/EX11.12/Result11_12.txt b/833/CH11/EX11.12/Result11_12.txt new file mode 100755 index 000000000..8bc0d28b9 --- /dev/null +++ b/833/CH11/EX11.12/Result11_12.txt @@ -0,0 +1,36 @@ +(a)Equivalent rotor current per phase(in A)=
+
+ 52.083013 - 16.233666i
+
+ (b)Stator current per phase(in A)=
+
+ 55.016346 - 40.678111i
+
+ (c)Power factor=
+
+ 0.8040793
+
+ (d)Rotor input(in watt)=
+
+ 22321.291
+
+ (e)Rotor copper losses(in watts)=
+
+ 892.85165
+
+ (f)Torque(in N-m)=
+
+ 284.20351
+
+ (g)Mechanical power output from rotor(in watts per phase)=
+
+ 21178.44
+
+ (h)Stator input(in watts per phase)=
+
+ 24207.192
+
+ (i)Efficiency (in %)=
+
+ 87.488211
+
\ No newline at end of file diff --git a/833/CH11/EX11.13/Ex11_13.sce b/833/CH11/EX11.13/Ex11_13.sce new file mode 100755 index 000000000..23fc76ab5 --- /dev/null +++ b/833/CH11/EX11.13/Ex11_13.sce @@ -0,0 +1,30 @@ +//Caption:Find (a)Equivalent rotor current (b)Stator current (c)Power factor (d)Stator input (e)Rotor input (f)Efficiency
+//Exa:11.13
+clc;
+clear;
+close;
+V=440//Voltage supplied(in volts)
+f=50//frequency(in hertz)
+Z_s=1.5+(%i*3)//Stator impedance per phase(in ohms)
+Z_r=1.6+(%i*1)//Rotor impedance per phase(in ohms)
+Z_m=3+(%i*40)//Magnetising impedance per phase(in ohms)
+P_wf=300//Friction and winding loss(in watt)
+s=0.04//Slip
+Z=40+(%i*1)
+z=Z*Z_m/(Z+Z_m)
+Zt=z+Z_s
+I1=(V/sqrt(3))/Zt
+E=(V/sqrt(3))-(I1*Z_s)
+I2=E/Z
+disp(I2,'(a)Equivalent Rotor current(in A)=')
+disp(I1,'(b)Stator current(in A)=')
+pf=cosd(atand(imag(Zt)/real(Zt)))
+disp(pf,'(c)Power factor=')
+P_s=sqrt(3)*V*sqrt(I1*conj(I1))*pf
+disp(P_s,'(d)Stator input(in watt)=')
+P_r=3*(I2*conj(I2))*(real(Z_r)/s)
+disp(P_r,'(e)Rotor input(in watt)=')
+P_ro=P_r*(1-s)
+P_me=P_ro-P_wf
+e=(P_me/P_s)*100
+disp(e,'(e)Efficiency(in%)=')
\ No newline at end of file diff --git a/833/CH11/EX11.13/Ex11_13.txt b/833/CH11/EX11.13/Ex11_13.txt new file mode 100755 index 000000000..23fc76ab5 --- /dev/null +++ b/833/CH11/EX11.13/Ex11_13.txt @@ -0,0 +1,30 @@ +//Caption:Find (a)Equivalent rotor current (b)Stator current (c)Power factor (d)Stator input (e)Rotor input (f)Efficiency
+//Exa:11.13
+clc;
+clear;
+close;
+V=440//Voltage supplied(in volts)
+f=50//frequency(in hertz)
+Z_s=1.5+(%i*3)//Stator impedance per phase(in ohms)
+Z_r=1.6+(%i*1)//Rotor impedance per phase(in ohms)
+Z_m=3+(%i*40)//Magnetising impedance per phase(in ohms)
+P_wf=300//Friction and winding loss(in watt)
+s=0.04//Slip
+Z=40+(%i*1)
+z=Z*Z_m/(Z+Z_m)
+Zt=z+Z_s
+I1=(V/sqrt(3))/Zt
+E=(V/sqrt(3))-(I1*Z_s)
+I2=E/Z
+disp(I2,'(a)Equivalent Rotor current(in A)=')
+disp(I1,'(b)Stator current(in A)=')
+pf=cosd(atand(imag(Zt)/real(Zt)))
+disp(pf,'(c)Power factor=')
+P_s=sqrt(3)*V*sqrt(I1*conj(I1))*pf
+disp(P_s,'(d)Stator input(in watt)=')
+P_r=3*(I2*conj(I2))*(real(Z_r)/s)
+disp(P_r,'(e)Rotor input(in watt)=')
+P_ro=P_r*(1-s)
+P_me=P_ro-P_wf
+e=(P_me/P_s)*100
+disp(e,'(e)Efficiency(in%)=')
\ No newline at end of file diff --git a/833/CH11/EX11.13/Result11_13.txt b/833/CH11/EX11.13/Result11_13.txt new file mode 100755 index 000000000..4028e8cba --- /dev/null +++ b/833/CH11/EX11.13/Result11_13.txt @@ -0,0 +1,24 @@ +(a)Equivalent Rotor current(in A)=
+
+ 5.669941 - 0.3569549i
+
+ (b)Stator current(in A)=
+
+ 5.8794709 - 6.0201051i
+
+ (c)Power factor=
+
+ 0.6987011
+
+ (d)Stator input(in watt)=
+
+ 4480.7586
+
+ (e)Rotor input(in watt)=
+
+ 3873.0778
+
+ (e)Efficiency(in%)=
+
+ 76.285177
+
\ No newline at end of file diff --git a/833/CH11/EX11.2/Ex11_2.sce b/833/CH11/EX11.2/Ex11_2.sce new file mode 100755 index 000000000..78eda61ae --- /dev/null +++ b/833/CH11/EX11.2/Ex11_2.sce @@ -0,0 +1,14 @@ +//Caption: Find (a)Speed of motor (b)%Slip
+//Exa:11.2
+clc;
+clear;
+close;
+p=6//Number of poles
+f_s=50//Stator frequency(in c/s)
+f_r=2//Rotor frequency(in c/s)
+n_s=(120*f_s)/p
+n=(f_r*120)/p
+s=n_s-n
+disp(s,'(a)Speed of motor(in r.p.m)=')
+S=(n/n_s)*100
+disp(S,'(b)%Slip(in %)=')
\ No newline at end of file diff --git a/833/CH11/EX11.2/Ex11_2.txt b/833/CH11/EX11.2/Ex11_2.txt new file mode 100755 index 000000000..78eda61ae --- /dev/null +++ b/833/CH11/EX11.2/Ex11_2.txt @@ -0,0 +1,14 @@ +//Caption: Find (a)Speed of motor (b)%Slip
+//Exa:11.2
+clc;
+clear;
+close;
+p=6//Number of poles
+f_s=50//Stator frequency(in c/s)
+f_r=2//Rotor frequency(in c/s)
+n_s=(120*f_s)/p
+n=(f_r*120)/p
+s=n_s-n
+disp(s,'(a)Speed of motor(in r.p.m)=')
+S=(n/n_s)*100
+disp(S,'(b)%Slip(in %)=')
\ No newline at end of file diff --git a/833/CH11/EX11.2/Result11_2.txt b/833/CH11/EX11.2/Result11_2.txt new file mode 100755 index 000000000..982bd6f8d --- /dev/null +++ b/833/CH11/EX11.2/Result11_2.txt @@ -0,0 +1,8 @@ + (a)Speed of motor(in r.p.m)=
+
+ 960.
+
+ (b)%Slip(in %)=
+
+ 4.
+
\ No newline at end of file diff --git a/833/CH11/EX11.3/Ex11_3.sce b/833/CH11/EX11.3/Ex11_3.sce new file mode 100755 index 000000000..95fbb97c5 --- /dev/null +++ b/833/CH11/EX11.3/Ex11_3.sce @@ -0,0 +1,14 @@ +//Caption: Calculate (a)Number of poles (b)Slip (c)Slip for full load torque if total resistance in rotor circuit is doubled
+//Exa:11.3
+clc;
+clear;
+close;
+n=970//Speed of induction motor(in r.p.m)
+f=50//Frequency(in hertz)
+n_s=1000//Synchronous speed(in r.p.m)
+p=(f*120)/n_s
+disp(p,'(a)Number of poles=')
+s=((n_s-n)/n_s)*100
+disp(s,'(b)Slip(in%)=')
+S=((s/100)*2)*100
+disp(S,'(c)Required slip(in%)=')
\ No newline at end of file diff --git a/833/CH11/EX11.3/Ex11_3.txt b/833/CH11/EX11.3/Ex11_3.txt new file mode 100755 index 000000000..95fbb97c5 --- /dev/null +++ b/833/CH11/EX11.3/Ex11_3.txt @@ -0,0 +1,14 @@ +//Caption: Calculate (a)Number of poles (b)Slip (c)Slip for full load torque if total resistance in rotor circuit is doubled
+//Exa:11.3
+clc;
+clear;
+close;
+n=970//Speed of induction motor(in r.p.m)
+f=50//Frequency(in hertz)
+n_s=1000//Synchronous speed(in r.p.m)
+p=(f*120)/n_s
+disp(p,'(a)Number of poles=')
+s=((n_s-n)/n_s)*100
+disp(s,'(b)Slip(in%)=')
+S=((s/100)*2)*100
+disp(S,'(c)Required slip(in%)=')
\ No newline at end of file diff --git a/833/CH11/EX11.3/Result11_3.txt b/833/CH11/EX11.3/Result11_3.txt new file mode 100755 index 000000000..8b9f2d63b --- /dev/null +++ b/833/CH11/EX11.3/Result11_3.txt @@ -0,0 +1,12 @@ + (a)Number of poles=
+
+ 6.
+
+ (b)Slip(in%)=
+
+ 3.
+
+ (c)Required slip(in%)=
+
+ 6.
+
\ No newline at end of file diff --git a/833/CH11/EX11.4/Ex11_4.sce b/833/CH11/EX11.4/Ex11_4.sce new file mode 100755 index 000000000..6144f30ee --- /dev/null +++ b/833/CH11/EX11.4/Ex11_4.sce @@ -0,0 +1,30 @@ +//Caption: Calculate (a)Mechanical power output (b)Torque (c)Maximum Torque (d)Speed at maximum torque (e)Power output when torque is maximum
+//Exa:11.4
+clc;
+clear;
+close;
+p=4//Number of poles
+V=440//Voltage of motor(in volts)
+f=50//Frequency(in hertz)
+n_s=1500//Synchronous speed(r.p.m)
+sp=1440//Speed of motor at load(in r.p.m)
+s=4//Slip at full load(in %)
+t=1.8//Stator to rotor turns ratio
+R_r=0.1//Resistance of rotor per phase(in ohms)
+X_r=0.8//Reactance of rotor per phase at standstill(in ohms)
+r_r=R_r*(t^2)//Rotor resistance referred to stator(in ohms)
+x_r=X_r*(t^2)//Reactance of rotor at stanstill referred to stator(in ohms)
+E=V/(sqrt(3))
+P=((s/100)*(E^2)*r_r)/((r_r^2)+((s/100)^2)*(x_r^2))
+T=(3*P)/(2*(%pi)*(n_s/60))
+P_M=(3*P*sp)/n_s
+disp(P_M,'(a)Mechanical power output(in watt)=')
+disp(T,'(b)Torque(in N-m)=')
+s_m=R_r/X_r
+N=n_s*(1-s_m)
+P_1=((s_m)*(E^2)*(r_r))/((r_r^2)+((s_m^2)*(x_r^2)))
+T_m=(3*P_1)/(2*(%pi)*(n_s/60))
+disp(T_m,'(c)Maximum torque(in N-m)=')
+disp(N,'(d)Speed at maximum torque(in r.p.m)=')
+P_o=(3*P_1*N)/n_s
+disp(P_o,'(e)Output power at maximum torque(in watt)=')
\ No newline at end of file diff --git a/833/CH11/EX11.4/Ex11_4.txt b/833/CH11/EX11.4/Ex11_4.txt new file mode 100755 index 000000000..6144f30ee --- /dev/null +++ b/833/CH11/EX11.4/Ex11_4.txt @@ -0,0 +1,30 @@ +//Caption: Calculate (a)Mechanical power output (b)Torque (c)Maximum Torque (d)Speed at maximum torque (e)Power output when torque is maximum
+//Exa:11.4
+clc;
+clear;
+close;
+p=4//Number of poles
+V=440//Voltage of motor(in volts)
+f=50//Frequency(in hertz)
+n_s=1500//Synchronous speed(r.p.m)
+sp=1440//Speed of motor at load(in r.p.m)
+s=4//Slip at full load(in %)
+t=1.8//Stator to rotor turns ratio
+R_r=0.1//Resistance of rotor per phase(in ohms)
+X_r=0.8//Reactance of rotor per phase at standstill(in ohms)
+r_r=R_r*(t^2)//Rotor resistance referred to stator(in ohms)
+x_r=X_r*(t^2)//Reactance of rotor at stanstill referred to stator(in ohms)
+E=V/(sqrt(3))
+P=((s/100)*(E^2)*r_r)/((r_r^2)+((s/100)^2)*(x_r^2))
+T=(3*P)/(2*(%pi)*(n_s/60))
+P_M=(3*P*sp)/n_s
+disp(P_M,'(a)Mechanical power output(in watt)=')
+disp(T,'(b)Torque(in N-m)=')
+s_m=R_r/X_r
+N=n_s*(1-s_m)
+P_1=((s_m)*(E^2)*(r_r))/((r_r^2)+((s_m^2)*(x_r^2)))
+T_m=(3*P_1)/(2*(%pi)*(n_s/60))
+disp(T_m,'(c)Maximum torque(in N-m)=')
+disp(N,'(d)Speed at maximum torque(in r.p.m)=')
+P_o=(3*P_1*N)/n_s
+disp(P_o,'(e)Output power at maximum torque(in watt)=')
\ No newline at end of file diff --git a/833/CH11/EX11.4/Result11_4.txt b/833/CH11/EX11.4/Result11_4.txt new file mode 100755 index 000000000..468d8bd26 --- /dev/null +++ b/833/CH11/EX11.4/Result11_4.txt @@ -0,0 +1,20 @@ +(a)Mechanical power output(in watt)=
+
+ 20813.847
+
+ (b)Torque(in N-m)=
+
+ 138.02611
+
+ (c)Maximum torque(in N-m)=
+
+ 237.74998
+
+ (d)Speed at maximum torque(in r.p.m)=
+
+ 1312.5
+
+ (e)Output power at maximum torque(in watt)=
+
+ 32677.469
+
\ No newline at end of file diff --git a/833/CH11/EX11.5/Ex11_5.sce b/833/CH11/EX11.5/Ex11_5.sce new file mode 100755 index 000000000..982a4a8e7 --- /dev/null +++ b/833/CH11/EX11.5/Ex11_5.sce @@ -0,0 +1,21 @@ +//Caption:Find (a)Speed of the motor (b)Speed at which torque will be maximum (c)Ratio of maximum to full load torque
+//Exa:11.5
+clc;
+clear;
+close;
+V=3300//Voltage supplied to induction motor(in volts)
+p=10//Number of poles
+f=50//frequency(in hertz)
+R_r=0.015//Rotor resistance per phase(in ohms)
+X_r=0.25//Standstill reactance per phase(in ohms)
+s=2.5//Slip(in %)
+n_s=(f*120)/p
+n=n_s*(1-(s/100))
+disp(n,'(a)Speed of the motor(in r.p.m)=')
+S=R_r/X_r
+N=n_s*(1-S)
+disp(N,'(b)Speed at which torque will be maximum(in r.p.m)=')
+T_f=(s/100)*R_r/((R_r^2)+(((s/100)^2)*(X_r^2)))
+T_m=S*R_r/((R_r^2)+((S^2)*(X_r^2)))
+R=T_m/T_f
+disp(R,'(c)Ratio of maximum to full load torque=')
\ No newline at end of file diff --git a/833/CH11/EX11.5/Ex11_5.txt b/833/CH11/EX11.5/Ex11_5.txt new file mode 100755 index 000000000..982a4a8e7 --- /dev/null +++ b/833/CH11/EX11.5/Ex11_5.txt @@ -0,0 +1,21 @@ +//Caption:Find (a)Speed of the motor (b)Speed at which torque will be maximum (c)Ratio of maximum to full load torque
+//Exa:11.5
+clc;
+clear;
+close;
+V=3300//Voltage supplied to induction motor(in volts)
+p=10//Number of poles
+f=50//frequency(in hertz)
+R_r=0.015//Rotor resistance per phase(in ohms)
+X_r=0.25//Standstill reactance per phase(in ohms)
+s=2.5//Slip(in %)
+n_s=(f*120)/p
+n=n_s*(1-(s/100))
+disp(n,'(a)Speed of the motor(in r.p.m)=')
+S=R_r/X_r
+N=n_s*(1-S)
+disp(N,'(b)Speed at which torque will be maximum(in r.p.m)=')
+T_f=(s/100)*R_r/((R_r^2)+(((s/100)^2)*(X_r^2)))
+T_m=S*R_r/((R_r^2)+((S^2)*(X_r^2)))
+R=T_m/T_f
+disp(R,'(c)Ratio of maximum to full load torque=')
\ No newline at end of file diff --git a/833/CH11/EX11.5/Result11_5.txt b/833/CH11/EX11.5/Result11_5.txt new file mode 100755 index 000000000..5e7b68ea4 --- /dev/null +++ b/833/CH11/EX11.5/Result11_5.txt @@ -0,0 +1,12 @@ +(a)Speed of the motor(in r.p.m)=
+
+ 585.
+
+ (b)Speed at which torque will be maximum(in r.p.m)=
+
+ 564.
+
+ (c)Ratio of maximum to full load torque=
+
+ 1.4083333
+
\ No newline at end of file diff --git a/833/CH11/EX11.6/Ex11_6.sce b/833/CH11/EX11.6/Ex11_6.sce new file mode 100755 index 000000000..ec777b908 --- /dev/null +++ b/833/CH11/EX11.6/Ex11_6.sce @@ -0,0 +1,21 @@ +//Caption: Calculate (a)Speed at which mechanical power from rotor will be maximum (b)Maximum power
+//Exa:11.6
+clc;
+clear;
+close;
+p=4//Number of poles
+f=50//Frequency(in hertz)
+V=440//Supplied voltage to induction motor(in volts)
+R_r=0.1//Rotor resistance per phase(in ohm)
+X_r=0.8//Rotor reactance at standstill per phase(in ohm)
+t=1.3//Ratio of stator turns per phase to rotor turns per phase
+a=R_r/X_r
+s=(-(a^2))+sqrt(1+(a^2))
+n_s=120*f/p
+N=n_s*(1-s)
+disp(N,'(a)Required speed(in r.p.m)=')
+r=R_r*t
+x=X_r*t
+E=V/sqrt(3)
+P_m=(3*s*(E^2)*r*(1-s))/((r^2)+((s^2)+(x^2)))
+disp(P_m,'(b)Maximum power(in watts)=')
\ No newline at end of file diff --git a/833/CH11/EX11.6/Ex11_6.txt b/833/CH11/EX11.6/Ex11_6.txt new file mode 100755 index 000000000..ec777b908 --- /dev/null +++ b/833/CH11/EX11.6/Ex11_6.txt @@ -0,0 +1,21 @@ +//Caption: Calculate (a)Speed at which mechanical power from rotor will be maximum (b)Maximum power
+//Exa:11.6
+clc;
+clear;
+close;
+p=4//Number of poles
+f=50//Frequency(in hertz)
+V=440//Supplied voltage to induction motor(in volts)
+R_r=0.1//Rotor resistance per phase(in ohm)
+X_r=0.8//Rotor reactance at standstill per phase(in ohm)
+t=1.3//Ratio of stator turns per phase to rotor turns per phase
+a=R_r/X_r
+s=(-(a^2))+sqrt(1+(a^2))
+n_s=120*f/p
+N=n_s*(1-s)
+disp(N,'(a)Required speed(in r.p.m)=')
+r=R_r*t
+x=X_r*t
+E=V/sqrt(3)
+P_m=(3*s*(E^2)*r*(1-s))/((r^2)+((s^2)+(x^2)))
+disp(P_m,'(b)Maximum power(in watts)=')
\ No newline at end of file diff --git a/833/CH11/EX11.6/Result11_6.txt b/833/CH11/EX11.6/Result11_6.txt new file mode 100755 index 000000000..36343b238 --- /dev/null +++ b/833/CH11/EX11.6/Result11_6.txt @@ -0,0 +1,7 @@ + (a)Required speed(in r.p.m)=
+
+ 11.764172
+
+ (b)Maximum power(in watts)=
+
+ 94.023391
\ No newline at end of file diff --git a/833/CH11/EX11.7/Ex11_7.sce b/833/CH11/EX11.7/Ex11_7.sce new file mode 100755 index 000000000..15005a4b0 --- /dev/null +++ b/833/CH11/EX11.7/Ex11_7.sce @@ -0,0 +1,20 @@ +//Caption: Find Current per phase in the rotor (a)when rotor is at standstill and star connected impedance of 4.1+%i2 per phase is connected in series with rotor (b)when rotor runs at 3% slip with short circuit at the slip rings
+//Exa:11.7
+clc;
+clear;
+close;
+V=69.28//Induced e.m.f(in volts)
+r=0.9//Resistance of rotor per phase(in ohm)
+x=6//Standstill rectance of rotor per phase(in ohm)
+z=4.1+(%i*2)
+s=3//Slip(in%)
+V_r=V/sqrt(3)
+R_r=r+real(z)
+X_r=(%i*2)+(%i*x)
+Z=R_r+X_r
+I_r=V_r/Z
+disp(I_r,'(a)Current when rotor is at standstill=')
+E=(s/100)*V_r
+Imp=r+(%i*(s/100)*x)
+i_r=E/Imp
+disp(i_r,'(b)Current when rotor runs at 3% slip=')
\ No newline at end of file diff --git a/833/CH11/EX11.7/Ex11_7.txt b/833/CH11/EX11.7/Ex11_7.txt new file mode 100755 index 000000000..15005a4b0 --- /dev/null +++ b/833/CH11/EX11.7/Ex11_7.txt @@ -0,0 +1,20 @@ +//Caption: Find Current per phase in the rotor (a)when rotor is at standstill and star connected impedance of 4.1+%i2 per phase is connected in series with rotor (b)when rotor runs at 3% slip with short circuit at the slip rings
+//Exa:11.7
+clc;
+clear;
+close;
+V=69.28//Induced e.m.f(in volts)
+r=0.9//Resistance of rotor per phase(in ohm)
+x=6//Standstill rectance of rotor per phase(in ohm)
+z=4.1+(%i*2)
+s=3//Slip(in%)
+V_r=V/sqrt(3)
+R_r=r+real(z)
+X_r=(%i*2)+(%i*x)
+Z=R_r+X_r
+I_r=V_r/Z
+disp(I_r,'(a)Current when rotor is at standstill=')
+E=(s/100)*V_r
+Imp=r+(%i*(s/100)*x)
+i_r=E/Imp
+disp(i_r,'(b)Current when rotor runs at 3% slip=')
\ No newline at end of file diff --git a/833/CH11/EX11.7/Result11_7.txt b/833/CH11/EX11.7/Result11_7.txt new file mode 100755 index 000000000..21780ad7a --- /dev/null +++ b/833/CH11/EX11.7/Result11_7.txt @@ -0,0 +1,8 @@ +(a)Current when rotor is at standstill=
+
+ 2.2471251 - 3.5954001i
+
+ (b)Current when rotor runs at 3% slip=
+
+ 1.2820137 - 0.2564027i
+
\ No newline at end of file diff --git a/833/CH11/EX11.8/Ex11_8.sce b/833/CH11/EX11.8/Ex11_8.sce new file mode 100755 index 000000000..98998c7fe --- /dev/null +++ b/833/CH11/EX11.8/Ex11_8.sce @@ -0,0 +1,16 @@ +//Caption:Find (a)% reduction in stator voltage and (b)the power factor of the rotor circuit
+//Exa:11.8
+clc;
+clear;
+close;
+R_r=0.02//Rotor resistance per phase(in ohm)
+X_r=0.1//Rotor reactance per phase(in ohm)
+s=4//Slip(in%)
+S=100-s
+T_f=((s/100)*R_r)/((R_r^2)+(((s/100)^2)*(X_r^2)))
+S_r=1-(.5*(S/100))
+T=(S_r*R_r)/((R_r^2)+((S_r^2)*(X_r^2)))
+Re=(1-sqrt(T_f/T))*100
+disp(Re,'(a)% reduction in stator voltage(in %)=')
+pf=R_r/(sqrt((R_r^2)+((S_r^2)*(X_r^2))))
+disp(pf,'(b)Power factor=')
\ No newline at end of file diff --git a/833/CH11/EX11.8/Ex11_8.txt b/833/CH11/EX11.8/Ex11_8.txt new file mode 100755 index 000000000..98998c7fe --- /dev/null +++ b/833/CH11/EX11.8/Ex11_8.txt @@ -0,0 +1,16 @@ +//Caption:Find (a)% reduction in stator voltage and (b)the power factor of the rotor circuit
+//Exa:11.8
+clc;
+clear;
+close;
+R_r=0.02//Rotor resistance per phase(in ohm)
+X_r=0.1//Rotor reactance per phase(in ohm)
+s=4//Slip(in%)
+S=100-s
+T_f=((s/100)*R_r)/((R_r^2)+(((s/100)^2)*(X_r^2)))
+S_r=1-(.5*(S/100))
+T=(S_r*R_r)/((R_r^2)+((S_r^2)*(X_r^2)))
+Re=(1-sqrt(T_f/T))*100
+disp(Re,'(a)% reduction in stator voltage(in %)=')
+pf=R_r/(sqrt((R_r^2)+((S_r^2)*(X_r^2))))
+disp(pf,'(b)Power factor=')
\ No newline at end of file diff --git a/833/CH11/EX11.8/Result11_8.txt b/833/CH11/EX11.8/Result11_8.txt new file mode 100755 index 000000000..2e98c6f92 --- /dev/null +++ b/833/CH11/EX11.8/Result11_8.txt @@ -0,0 +1,7 @@ +(a)% reduction in stator voltage(in %)=
+
+ 24.239555
+
+ (b)Power factor=
+
+ 0.3589791
\ No newline at end of file diff --git a/833/CH11/EX11.9/Ex11_9.sce b/833/CH11/EX11.9/Ex11_9.sce new file mode 100755 index 000000000..59231bc6e --- /dev/null +++ b/833/CH11/EX11.9/Ex11_9.sce @@ -0,0 +1,13 @@ +//Caption:Find (a)the rotor copper loss per phase if motor is running at slip of 4% (b)Mechanical power developed
+//Exa:11.9
+clc;
+clear;
+close;
+P_i=100000//Input power(in watt)
+P_sc=2000//Stator copper loss(in watt)
+s=4//slip(in %)
+P_r=P_i-P_sc
+P_rc=((s/100)*P_r)/3
+disp(P_rc,'(a)Rotor copper lossper phase(in watt)=')
+P_m=P_r-(P_rc*3)
+disp(P_m,'(b)Mechanical power developed(in watt)=')
\ No newline at end of file diff --git a/833/CH11/EX11.9/Ex11_9.txt b/833/CH11/EX11.9/Ex11_9.txt new file mode 100755 index 000000000..59231bc6e --- /dev/null +++ b/833/CH11/EX11.9/Ex11_9.txt @@ -0,0 +1,13 @@ +//Caption:Find (a)the rotor copper loss per phase if motor is running at slip of 4% (b)Mechanical power developed
+//Exa:11.9
+clc;
+clear;
+close;
+P_i=100000//Input power(in watt)
+P_sc=2000//Stator copper loss(in watt)
+s=4//slip(in %)
+P_r=P_i-P_sc
+P_rc=((s/100)*P_r)/3
+disp(P_rc,'(a)Rotor copper lossper phase(in watt)=')
+P_m=P_r-(P_rc*3)
+disp(P_m,'(b)Mechanical power developed(in watt)=')
\ No newline at end of file diff --git a/833/CH11/EX11.9/Result11_9.txt b/833/CH11/EX11.9/Result11_9.txt new file mode 100755 index 000000000..e500eafb8 --- /dev/null +++ b/833/CH11/EX11.9/Result11_9.txt @@ -0,0 +1,7 @@ + (a)Rotor copper lossper phase(in watt)=
+
+ 1306.6667
+
+ (b)Mechanical power developed(in watt)=
+
+ 94080.
\ No newline at end of file |