summaryrefslogtreecommitdiff
path: root/833/CH12
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /833/CH12
downloadScilab-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/CH12')
-rwxr-xr-x833/CH12/EX12.1/Ex12_1.sce32
-rwxr-xr-x833/CH12/EX12.1/Ex12_1.txt32
-rwxr-xr-x833/CH12/EX12.1/Result12_1.txt32
-rwxr-xr-x833/CH12/EX12.11/Ex12_11.sce15
-rwxr-xr-x833/CH12/EX12.11/Ex12_11.txt15
-rwxr-xr-x833/CH12/EX12.11/Result12_11.txt4
-rwxr-xr-x833/CH12/EX12.12/Ex12_12.sce22
-rwxr-xr-x833/CH12/EX12.12/Ex12_12.txt22
-rwxr-xr-x833/CH12/EX12.12/Result12_12.txt6
-rwxr-xr-x833/CH12/EX12.2/Ex12_2.sce28
-rwxr-xr-x833/CH12/EX12.2/Ex12_2.txt28
-rwxr-xr-x833/CH12/EX12.2/Result12_2.txt8
-rwxr-xr-x833/CH12/EX12.5/Ex12_5.sce9
-rwxr-xr-x833/CH12/EX12.5/Ex12_5.txt9
-rwxr-xr-x833/CH12/EX12.5/Result12_5.txt4
-rwxr-xr-x833/CH12/EX12.7/Ex12_7.sce11
-rwxr-xr-x833/CH12/EX12.7/Ex12_7.txt11
-rwxr-xr-x833/CH12/EX12.7/Result12_7.txt4
-rwxr-xr-x833/CH12/EX12.8/Ex12_8.sce10
-rwxr-xr-x833/CH12/EX12.8/Ex12_8.txt10
-rwxr-xr-x833/CH12/EX12.8/Result12_8.txt4
-rwxr-xr-x833/CH12/EX12.9/Ex12_9.sce15
-rwxr-xr-x833/CH12/EX12.9/Ex12_9.txt15
-rwxr-xr-x833/CH12/EX12.9/Result12_9.txt3
24 files changed, 349 insertions, 0 deletions
diff --git a/833/CH12/EX12.1/Ex12_1.sce b/833/CH12/EX12.1/Ex12_1.sce
new file mode 100755
index 000000000..b04bbbf55
--- /dev/null
+++ b/833/CH12/EX12.1/Ex12_1.sce
@@ -0,0 +1,32 @@
+//Caption:Calculate (a)No load power factor (b)Core and friction loss (c)r_m (d)power factor on short circuit (e)Equivalent impedance in series circuit (f)Rotor resistance referred to stator (g)Stator leakage reactance (h)Rotor leakage reactance referred to stator
+//Exa:12.1
+clc;
+clear;
+close;
+P=3000//Power of motor(in watt)
+V=415//Voltage supplied(in volts)
+f=50//Frequency(in hertz)
+p=6//Number of poles
+pf=0.8//Power factor
+I_n=3.5//No load current(in A)
+P_n=250//Power input on no load test(in watt)
+r_s=1.5//Stator resistance per phase(in ohm)
+V_r=115//Reduced voltage applied at short circuit test(in volts)
+I_s=13//Current supplied on short circuit test(in A)
+P_s=1660//Voltage applied at short circuit test(in watt)
+pfn=P_n/(sqrt(3)*V*I_n)
+disp(pfn,'(a)Noload power factor=')
+P_wf=P_n-(3*(I_n^2)*r_s)
+disp(P_wf,'(b)Core and friction loss(in watt)=')
+r_m=(V/sqrt(3))/(I_n*pfn)
+disp(r_m,'(c)Resistance(in ohms)=')
+pfs=P_s/(sqrt(3)*V_r*I_s)
+disp(pfs,'(d)Power factor on short circuit=')
+Ze=(V/sqrt(3))/((I_s*V)/V_r)
+disp(Ze,'(e)Equivalent impedance in series circuit(in ohms)=')
+R=(Ze*pfs)-r_s
+disp(R,'(f)Rotor resistance referred to stator(in ohm)=')
+X=(sqrt((Ze^2)-((Ze*pfs)^2)))
+disp(X,'(g)Stator leakage reactance(in ohms)=')
+x=X/2
+disp(x,'(h)Rotor leakage reactance referred to stator(in ohms)=') \ No newline at end of file
diff --git a/833/CH12/EX12.1/Ex12_1.txt b/833/CH12/EX12.1/Ex12_1.txt
new file mode 100755
index 000000000..b04bbbf55
--- /dev/null
+++ b/833/CH12/EX12.1/Ex12_1.txt
@@ -0,0 +1,32 @@
+//Caption:Calculate (a)No load power factor (b)Core and friction loss (c)r_m (d)power factor on short circuit (e)Equivalent impedance in series circuit (f)Rotor resistance referred to stator (g)Stator leakage reactance (h)Rotor leakage reactance referred to stator
+//Exa:12.1
+clc;
+clear;
+close;
+P=3000//Power of motor(in watt)
+V=415//Voltage supplied(in volts)
+f=50//Frequency(in hertz)
+p=6//Number of poles
+pf=0.8//Power factor
+I_n=3.5//No load current(in A)
+P_n=250//Power input on no load test(in watt)
+r_s=1.5//Stator resistance per phase(in ohm)
+V_r=115//Reduced voltage applied at short circuit test(in volts)
+I_s=13//Current supplied on short circuit test(in A)
+P_s=1660//Voltage applied at short circuit test(in watt)
+pfn=P_n/(sqrt(3)*V*I_n)
+disp(pfn,'(a)Noload power factor=')
+P_wf=P_n-(3*(I_n^2)*r_s)
+disp(P_wf,'(b)Core and friction loss(in watt)=')
+r_m=(V/sqrt(3))/(I_n*pfn)
+disp(r_m,'(c)Resistance(in ohms)=')
+pfs=P_s/(sqrt(3)*V_r*I_s)
+disp(pfs,'(d)Power factor on short circuit=')
+Ze=(V/sqrt(3))/((I_s*V)/V_r)
+disp(Ze,'(e)Equivalent impedance in series circuit(in ohms)=')
+R=(Ze*pfs)-r_s
+disp(R,'(f)Rotor resistance referred to stator(in ohm)=')
+X=(sqrt((Ze^2)-((Ze*pfs)^2)))
+disp(X,'(g)Stator leakage reactance(in ohms)=')
+x=X/2
+disp(x,'(h)Rotor leakage reactance referred to stator(in ohms)=') \ No newline at end of file
diff --git a/833/CH12/EX12.1/Result12_1.txt b/833/CH12/EX12.1/Result12_1.txt
new file mode 100755
index 000000000..e7f3f387e
--- /dev/null
+++ b/833/CH12/EX12.1/Result12_1.txt
@@ -0,0 +1,32 @@
+(a)Noload power factor=
+
+ 0.0993718
+
+ (b)Core and friction loss(in watt)=
+
+ 194.875
+
+ (c)Resistance(in ohms)=
+
+ 688.9
+
+ (d)Power factor on short circuit=
+
+ 0.6410712
+
+ (e)Equivalent impedance in series circuit(in ohms)=
+
+ 5.1073293
+
+ (f)Rotor resistance referred to stator(in ohm)=
+
+ 1.7741617
+
+ (g)Stator leakage reactance(in ohms)=
+
+ 3.9197803
+
+ (h)Rotor leakage reactance referred to stator(in ohms)=
+
+ 1.9598901
+ \ No newline at end of file
diff --git a/833/CH12/EX12.11/Ex12_11.sce b/833/CH12/EX12.11/Ex12_11.sce
new file mode 100755
index 000000000..e620b20ca
--- /dev/null
+++ b/833/CH12/EX12.11/Ex12_11.sce
@@ -0,0 +1,15 @@
+//Caption:Calculate external resistance per phase
+//Exa:12.11
+clc;
+clear;
+close;
+p=6//Number of poles
+f=50//Frequency(in hertz)
+r=0.25//Resistance per phase(in ohms)
+n_1=965//Speed on full load(in r.p.m)
+n_2=800//Reduced speed(in r.p.m)
+n_s=(120*f)/p
+s_1=(n_s-n_1)/n_s
+s_2=(n_s-n_2)/n_s
+R=((s_2*r)/s_1)-r
+disp(R,'Required external resistance per phase(in ohms)=') \ No newline at end of file
diff --git a/833/CH12/EX12.11/Ex12_11.txt b/833/CH12/EX12.11/Ex12_11.txt
new file mode 100755
index 000000000..e620b20ca
--- /dev/null
+++ b/833/CH12/EX12.11/Ex12_11.txt
@@ -0,0 +1,15 @@
+//Caption:Calculate external resistance per phase
+//Exa:12.11
+clc;
+clear;
+close;
+p=6//Number of poles
+f=50//Frequency(in hertz)
+r=0.25//Resistance per phase(in ohms)
+n_1=965//Speed on full load(in r.p.m)
+n_2=800//Reduced speed(in r.p.m)
+n_s=(120*f)/p
+s_1=(n_s-n_1)/n_s
+s_2=(n_s-n_2)/n_s
+R=((s_2*r)/s_1)-r
+disp(R,'Required external resistance per phase(in ohms)=') \ No newline at end of file
diff --git a/833/CH12/EX12.11/Result12_11.txt b/833/CH12/EX12.11/Result12_11.txt
new file mode 100755
index 000000000..4099faf80
--- /dev/null
+++ b/833/CH12/EX12.11/Result12_11.txt
@@ -0,0 +1,4 @@
+Required external resistance per phase(in ohms)=
+
+ 1.1785714
+ \ No newline at end of file
diff --git a/833/CH12/EX12.12/Ex12_12.sce b/833/CH12/EX12.12/Ex12_12.sce
new file mode 100755
index 000000000..a7f1fd46d
--- /dev/null
+++ b/833/CH12/EX12.12/Ex12_12.sce
@@ -0,0 +1,22 @@
+//Caption:Find the dimensions of D and L
+//Exa:12.12
+clc;
+clear;
+close;
+P=7.5//Power of induction motor(in KW)
+p=4//Number of poles
+f=50//frequency(in hertz)
+V=415//Voltage applied of motor(in volts)
+e=0.88//Efficiency
+pf=0.87//Power factor
+b=2.5//Ratio of pull out torque to full load torque
+c=1.75//Ratio of starting to full load torque
+n=1440//Speed of motor(in r.p.m)
+ac=23000//Ampere conductors per meter
+k=0.955
+B=0.45//flux per pole(in wb/m^2)
+n_s=(120*f)/(60*p)
+S=P/(e*pf)
+D=165//Choosing(in mm)
+L=(S*(10^3))/(1.11*k*(%pi^2)*B*ac*n_s*(10^(-3))*(D^2)*(10^(-6)))
+disp(L,D,'D and L(in mm) are=') \ No newline at end of file
diff --git a/833/CH12/EX12.12/Ex12_12.txt b/833/CH12/EX12.12/Ex12_12.txt
new file mode 100755
index 000000000..a7f1fd46d
--- /dev/null
+++ b/833/CH12/EX12.12/Ex12_12.txt
@@ -0,0 +1,22 @@
+//Caption:Find the dimensions of D and L
+//Exa:12.12
+clc;
+clear;
+close;
+P=7.5//Power of induction motor(in KW)
+p=4//Number of poles
+f=50//frequency(in hertz)
+V=415//Voltage applied of motor(in volts)
+e=0.88//Efficiency
+pf=0.87//Power factor
+b=2.5//Ratio of pull out torque to full load torque
+c=1.75//Ratio of starting to full load torque
+n=1440//Speed of motor(in r.p.m)
+ac=23000//Ampere conductors per meter
+k=0.955
+B=0.45//flux per pole(in wb/m^2)
+n_s=(120*f)/(60*p)
+S=P/(e*pf)
+D=165//Choosing(in mm)
+L=(S*(10^3))/(1.11*k*(%pi^2)*B*ac*n_s*(10^(-3))*(D^2)*(10^(-6)))
+disp(L,D,'D and L(in mm) are=') \ No newline at end of file
diff --git a/833/CH12/EX12.12/Result12_12.txt b/833/CH12/EX12.12/Result12_12.txt
new file mode 100755
index 000000000..9f621e74c
--- /dev/null
+++ b/833/CH12/EX12.12/Result12_12.txt
@@ -0,0 +1,6 @@
+ D and L(in mm) are=
+
+ 165.
+
+ 132.91837
+ \ No newline at end of file
diff --git a/833/CH12/EX12.2/Ex12_2.sce b/833/CH12/EX12.2/Ex12_2.sce
new file mode 100755
index 000000000..ad770419b
--- /dev/null
+++ b/833/CH12/EX12.2/Ex12_2.sce
@@ -0,0 +1,28 @@
+//Caption:Find (a)Starting current (b)Starting torque
+//Exa:12.2
+clc;
+clear;
+close;
+P=3000//Power of motor(in watt)
+V=415//Voltage supplied(in volts)
+f=50//Frequency(in hertz)
+p=6//Number of poles
+pf=0.8//Power factor
+pfs=0.64//Power factor on short circuit
+pfn=0.1//No load power factor
+I_n=3.5//No load current(in A)
+P_n=250//Power input on no load test(in watt)
+r_s=1.5//Stator resistance per phase(in ohm)
+V_r=115//Reduced voltage applied at short circuit test(in volts)
+I_s=13//Current supplied on short circuit test(in A)
+P_s=1660//Voltage applied at short circuit test(in watt)
+n_s=1000//Synchronous speed(in r.p.m)
+R2=1.77//Rotor resistance referred to stator(in ohms)
+I_st=I_s*V/(V_r)
+disp(I_st,'(a)Starting current(in A)=')
+I_i=I_st*(cosd(pfs)+(%i*(sind(pfs))))
+I_o=I_n*(cosd(pfn)+(%i*(sind(pfn))))
+I_2=I_i-I_o
+P_ri=3*(I_2*conj(I_2))*R2
+T=P_ri/(2*%pi*(n_s/60))
+disp(T,'(b)Starting torque(in N-m)=') \ No newline at end of file
diff --git a/833/CH12/EX12.2/Ex12_2.txt b/833/CH12/EX12.2/Ex12_2.txt
new file mode 100755
index 000000000..ad770419b
--- /dev/null
+++ b/833/CH12/EX12.2/Ex12_2.txt
@@ -0,0 +1,28 @@
+//Caption:Find (a)Starting current (b)Starting torque
+//Exa:12.2
+clc;
+clear;
+close;
+P=3000//Power of motor(in watt)
+V=415//Voltage supplied(in volts)
+f=50//Frequency(in hertz)
+p=6//Number of poles
+pf=0.8//Power factor
+pfs=0.64//Power factor on short circuit
+pfn=0.1//No load power factor
+I_n=3.5//No load current(in A)
+P_n=250//Power input on no load test(in watt)
+r_s=1.5//Stator resistance per phase(in ohm)
+V_r=115//Reduced voltage applied at short circuit test(in volts)
+I_s=13//Current supplied on short circuit test(in A)
+P_s=1660//Voltage applied at short circuit test(in watt)
+n_s=1000//Synchronous speed(in r.p.m)
+R2=1.77//Rotor resistance referred to stator(in ohms)
+I_st=I_s*V/(V_r)
+disp(I_st,'(a)Starting current(in A)=')
+I_i=I_st*(cosd(pfs)+(%i*(sind(pfs))))
+I_o=I_n*(cosd(pfn)+(%i*(sind(pfn))))
+I_2=I_i-I_o
+P_ri=3*(I_2*conj(I_2))*R2
+T=P_ri/(2*%pi*(n_s/60))
+disp(T,'(b)Starting torque(in N-m)=') \ No newline at end of file
diff --git a/833/CH12/EX12.2/Result12_2.txt b/833/CH12/EX12.2/Result12_2.txt
new file mode 100755
index 000000000..30c8a52ea
--- /dev/null
+++ b/833/CH12/EX12.2/Result12_2.txt
@@ -0,0 +1,8 @@
+(a)Starting current(in A)=
+
+ 46.913043
+
+ (b)Starting torque(in N-m)=
+
+ 95.567391
+ \ No newline at end of file
diff --git a/833/CH12/EX12.5/Ex12_5.sce b/833/CH12/EX12.5/Ex12_5.sce
new file mode 100755
index 000000000..f002123ce
--- /dev/null
+++ b/833/CH12/EX12.5/Ex12_5.sce
@@ -0,0 +1,9 @@
+//Caption:Find starting current in terms of full load current
+//Exa:12.5
+clc;
+clear;
+close;
+s=0.04//Slip
+a=1//Starting torque T_st/Full load torque(T_fl) are equal
+I_s=sqrt(a/s)
+disp(I_s,'Starting current is (below)times the full load current=' ) \ No newline at end of file
diff --git a/833/CH12/EX12.5/Ex12_5.txt b/833/CH12/EX12.5/Ex12_5.txt
new file mode 100755
index 000000000..f002123ce
--- /dev/null
+++ b/833/CH12/EX12.5/Ex12_5.txt
@@ -0,0 +1,9 @@
+//Caption:Find starting current in terms of full load current
+//Exa:12.5
+clc;
+clear;
+close;
+s=0.04//Slip
+a=1//Starting torque T_st/Full load torque(T_fl) are equal
+I_s=sqrt(a/s)
+disp(I_s,'Starting current is (below)times the full load current=' ) \ No newline at end of file
diff --git a/833/CH12/EX12.5/Result12_5.txt b/833/CH12/EX12.5/Result12_5.txt
new file mode 100755
index 000000000..cdebc7276
--- /dev/null
+++ b/833/CH12/EX12.5/Result12_5.txt
@@ -0,0 +1,4 @@
+ Starting current is (below)times the full load current=
+
+ 5.
+ \ No newline at end of file
diff --git a/833/CH12/EX12.7/Ex12_7.sce b/833/CH12/EX12.7/Ex12_7.sce
new file mode 100755
index 000000000..c76d871d5
--- /dev/null
+++ b/833/CH12/EX12.7/Ex12_7.sce
@@ -0,0 +1,11 @@
+//Caption:Find starting torque in terms of full load torque
+//Exa:12.7
+clc;
+clear;
+close;
+s=0.03//slip
+a=2.5//Ratio of supply current to full load current
+b=5//Ratio of short circuit current to full load current
+x=sqrt(a/b)
+T=(x^2)*(b^2)*s
+disp(T,'Starting torque is (below) times the full load torque=') \ No newline at end of file
diff --git a/833/CH12/EX12.7/Ex12_7.txt b/833/CH12/EX12.7/Ex12_7.txt
new file mode 100755
index 000000000..c76d871d5
--- /dev/null
+++ b/833/CH12/EX12.7/Ex12_7.txt
@@ -0,0 +1,11 @@
+//Caption:Find starting torque in terms of full load torque
+//Exa:12.7
+clc;
+clear;
+close;
+s=0.03//slip
+a=2.5//Ratio of supply current to full load current
+b=5//Ratio of short circuit current to full load current
+x=sqrt(a/b)
+T=(x^2)*(b^2)*s
+disp(T,'Starting torque is (below) times the full load torque=') \ No newline at end of file
diff --git a/833/CH12/EX12.7/Result12_7.txt b/833/CH12/EX12.7/Result12_7.txt
new file mode 100755
index 000000000..b1de4ad12
--- /dev/null
+++ b/833/CH12/EX12.7/Result12_7.txt
@@ -0,0 +1,4 @@
+ Starting torque is (below) times the full load torque=
+
+ 0.375
+ \ No newline at end of file
diff --git a/833/CH12/EX12.8/Ex12_8.sce b/833/CH12/EX12.8/Ex12_8.sce
new file mode 100755
index 000000000..c8366770f
--- /dev/null
+++ b/833/CH12/EX12.8/Ex12_8.sce
@@ -0,0 +1,10 @@
+//Caption:Find the % tappings required
+//Exa:12.8
+clc;
+clear;
+close;
+s=0.04//Slip
+a=4//Ratio of short circuit current to full load current
+b=40//Starting torque to full load torque(in%)
+x=sqrt((b/100)/(s*(a^2)))*100
+disp(x,'% tappings required is(in%)=') \ No newline at end of file
diff --git a/833/CH12/EX12.8/Ex12_8.txt b/833/CH12/EX12.8/Ex12_8.txt
new file mode 100755
index 000000000..c8366770f
--- /dev/null
+++ b/833/CH12/EX12.8/Ex12_8.txt
@@ -0,0 +1,10 @@
+//Caption:Find the % tappings required
+//Exa:12.8
+clc;
+clear;
+close;
+s=0.04//Slip
+a=4//Ratio of short circuit current to full load current
+b=40//Starting torque to full load torque(in%)
+x=sqrt((b/100)/(s*(a^2)))*100
+disp(x,'% tappings required is(in%)=') \ No newline at end of file
diff --git a/833/CH12/EX12.8/Result12_8.txt b/833/CH12/EX12.8/Result12_8.txt
new file mode 100755
index 000000000..7a8004abe
--- /dev/null
+++ b/833/CH12/EX12.8/Result12_8.txt
@@ -0,0 +1,4 @@
+ % tappings required is(in%)=
+
+ 79.056942
+ \ No newline at end of file
diff --git a/833/CH12/EX12.9/Ex12_9.sce b/833/CH12/EX12.9/Ex12_9.sce
new file mode 100755
index 000000000..a092453c9
--- /dev/null
+++ b/833/CH12/EX12.9/Ex12_9.sce
@@ -0,0 +1,15 @@
+//Caption:Find the line current at start
+//Exa:12.9
+clc;
+clear;
+close;
+P=5000//Power supplied to induction motor(in watts)
+V=415//Voltage supplied to motor(in volts)
+f=50//frequency(in hertz)
+e=0.85//Efficiency
+pf=0.8//Power factor lagging
+b=5//Ratio of short circuit current to full load current
+P_i=P/e
+I_fl=P_i/(sqrt(3)*V*pf)
+I_l=(1/3)*b*I_fl
+disp(I_l,'Line current(in A)=') \ No newline at end of file
diff --git a/833/CH12/EX12.9/Ex12_9.txt b/833/CH12/EX12.9/Ex12_9.txt
new file mode 100755
index 000000000..a092453c9
--- /dev/null
+++ b/833/CH12/EX12.9/Ex12_9.txt
@@ -0,0 +1,15 @@
+//Caption:Find the line current at start
+//Exa:12.9
+clc;
+clear;
+close;
+P=5000//Power supplied to induction motor(in watts)
+V=415//Voltage supplied to motor(in volts)
+f=50//frequency(in hertz)
+e=0.85//Efficiency
+pf=0.8//Power factor lagging
+b=5//Ratio of short circuit current to full load current
+P_i=P/e
+I_fl=P_i/(sqrt(3)*V*pf)
+I_l=(1/3)*b*I_fl
+disp(I_l,'Line current(in A)=') \ No newline at end of file
diff --git a/833/CH12/EX12.9/Result12_9.txt b/833/CH12/EX12.9/Result12_9.txt
new file mode 100755
index 000000000..7a7bc616a
--- /dev/null
+++ b/833/CH12/EX12.9/Result12_9.txt
@@ -0,0 +1,3 @@
+ Line current(in A)=
+
+ 17.049087 \ No newline at end of file