summaryrefslogtreecommitdiff
path: root/833/CH15
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /833/CH15
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/CH15')
-rwxr-xr-x833/CH15/EX15.6/Ex15_6.sce21
-rwxr-xr-x833/CH15/EX15.6/Ex15_6.txt21
-rwxr-xr-x833/CH15/EX15.6/Result15_6.txt8
-rwxr-xr-x833/CH15/EX15.7/Ex15_7.sce16
-rwxr-xr-x833/CH15/EX15.7/Ex15_7.txt16
-rwxr-xr-x833/CH15/EX15.7/Result15_7.txt8
-rwxr-xr-x833/CH15/EX15.8/Ex15_8.sce16
-rwxr-xr-x833/CH15/EX15.8/Ex15_8.txt16
-rwxr-xr-x833/CH15/EX15.8/Result15_8.txt12
-rwxr-xr-x833/CH15/EX15.9/Ex15_9.sce22
-rwxr-xr-x833/CH15/EX15.9/Ex15_9.txt22
-rwxr-xr-x833/CH15/EX15.9/Result15_9.txt4
12 files changed, 182 insertions, 0 deletions
diff --git a/833/CH15/EX15.6/Ex15_6.sce b/833/CH15/EX15.6/Ex15_6.sce
new file mode 100755
index 000000000..ca312c8d0
--- /dev/null
+++ b/833/CH15/EX15.6/Ex15_6.sce
@@ -0,0 +1,21 @@
+//Caption:Find (a)Input power(in KVA) (b)Power factor
+//Exa:15.6
+clc;
+clear;
+close;
+V=440//Voltage of circuit(in volts)
+f=50//Frequency(in hertz)
+I=30//Current taken by circuit(in A)
+pf=0.8//Power factor
+Pl=10//Load supplied(in KW)
+e=0.85//Efficiency
+Pi=Pl/e
+Ii=Pi*1000/(sqrt(3)*V)
+Ia=I*pf
+Ir=I*sind(acosd(pf))
+i=Ii+Ia
+It=sqrt((Ii^2)+(Ir^2))
+pfm=Ii/It
+Wi=sqrt(3)*V*It/(1000)
+disp(Wi,'(a)Input power(in KVA)=')
+disp(pfm,'(b)Power factor=') \ No newline at end of file
diff --git a/833/CH15/EX15.6/Ex15_6.txt b/833/CH15/EX15.6/Ex15_6.txt
new file mode 100755
index 000000000..ca312c8d0
--- /dev/null
+++ b/833/CH15/EX15.6/Ex15_6.txt
@@ -0,0 +1,21 @@
+//Caption:Find (a)Input power(in KVA) (b)Power factor
+//Exa:15.6
+clc;
+clear;
+close;
+V=440//Voltage of circuit(in volts)
+f=50//Frequency(in hertz)
+I=30//Current taken by circuit(in A)
+pf=0.8//Power factor
+Pl=10//Load supplied(in KW)
+e=0.85//Efficiency
+Pi=Pl/e
+Ii=Pi*1000/(sqrt(3)*V)
+Ia=I*pf
+Ir=I*sind(acosd(pf))
+i=Ii+Ia
+It=sqrt((Ii^2)+(Ir^2))
+pfm=Ii/It
+Wi=sqrt(3)*V*It/(1000)
+disp(Wi,'(a)Input power(in KVA)=')
+disp(pfm,'(b)Power factor=') \ No newline at end of file
diff --git a/833/CH15/EX15.6/Result15_6.txt b/833/CH15/EX15.6/Result15_6.txt
new file mode 100755
index 000000000..854f4632e
--- /dev/null
+++ b/833/CH15/EX15.6/Result15_6.txt
@@ -0,0 +1,8 @@
+(a)Input power(in KVA)=
+
+ 18.071732
+
+ (b)Power factor=
+
+ 0.6510005
+ \ No newline at end of file
diff --git a/833/CH15/EX15.7/Ex15_7.sce b/833/CH15/EX15.7/Ex15_7.sce
new file mode 100755
index 000000000..7b8b32e47
--- /dev/null
+++ b/833/CH15/EX15.7/Ex15_7.sce
@@ -0,0 +1,16 @@
+//Caption:(a)How much KVA should be supplied by synchronous motor (b)Power factor of synchronous motor
+//Exa:15.7
+clc;
+clear;
+close;
+Pm=40//Power absorb by motor(in Kw)
+Pl=300//Load connected in parallel with motor(in KW)
+pfm=0.85//Power factor of motor
+pfl=0.9//Power factor on load
+Pt=Pl+Pm
+Pr=Pt*tand(acosd(pfl))
+Pri=Pl*tand(acosd(pfm))
+Ps=Pri-Pr
+pf=cosd(atand(Ps/Pm))
+disp(Ps,'(a)Power supplied by synchronous motor(in KVA)=')
+disp(pf,'(b)Power factor of synchronous machine=') \ No newline at end of file
diff --git a/833/CH15/EX15.7/Ex15_7.txt b/833/CH15/EX15.7/Ex15_7.txt
new file mode 100755
index 000000000..7b8b32e47
--- /dev/null
+++ b/833/CH15/EX15.7/Ex15_7.txt
@@ -0,0 +1,16 @@
+//Caption:(a)How much KVA should be supplied by synchronous motor (b)Power factor of synchronous motor
+//Exa:15.7
+clc;
+clear;
+close;
+Pm=40//Power absorb by motor(in Kw)
+Pl=300//Load connected in parallel with motor(in KW)
+pfm=0.85//Power factor of motor
+pfl=0.9//Power factor on load
+Pt=Pl+Pm
+Pr=Pt*tand(acosd(pfl))
+Pri=Pl*tand(acosd(pfm))
+Ps=Pri-Pr
+pf=cosd(atand(Ps/Pm))
+disp(Ps,'(a)Power supplied by synchronous motor(in KVA)=')
+disp(pf,'(b)Power factor of synchronous machine=') \ No newline at end of file
diff --git a/833/CH15/EX15.7/Result15_7.txt b/833/CH15/EX15.7/Result15_7.txt
new file mode 100755
index 000000000..b06e1165b
--- /dev/null
+++ b/833/CH15/EX15.7/Result15_7.txt
@@ -0,0 +1,8 @@
+(a)Power supplied by synchronous motor(in KVA)=
+
+ 21.253786
+
+ (b)Power factor of synchronous machine=
+
+ 0.8830811
+ \ No newline at end of file
diff --git a/833/CH15/EX15.8/Ex15_8.sce b/833/CH15/EX15.8/Ex15_8.sce
new file mode 100755
index 000000000..5d466c0aa
--- /dev/null
+++ b/833/CH15/EX15.8/Ex15_8.sce
@@ -0,0 +1,16 @@
+//Caption: (a)Power alternator can supply (b)Power factor of synchronous motor (c)Load taken by motor
+//Exa:15.8
+clc;
+clear;
+close;
+P=500//Load supplied by alternator(inKW)
+pf=0.8//Power factor
+e=0.9
+L=P/pf
+Ps=L-P
+disp(Ps,'(a)Power alternator can supply(in KW)=')
+Pr=P*tand(acosd(pf))
+pfm=cosd(atand(Pr/Ps))
+disp(pfm,'(b)Power factor of synchronous motor=')
+l=Ps*e
+disp(l,'(c)Load taken by motor(in Kw)=') \ No newline at end of file
diff --git a/833/CH15/EX15.8/Ex15_8.txt b/833/CH15/EX15.8/Ex15_8.txt
new file mode 100755
index 000000000..5d466c0aa
--- /dev/null
+++ b/833/CH15/EX15.8/Ex15_8.txt
@@ -0,0 +1,16 @@
+//Caption: (a)Power alternator can supply (b)Power factor of synchronous motor (c)Load taken by motor
+//Exa:15.8
+clc;
+clear;
+close;
+P=500//Load supplied by alternator(inKW)
+pf=0.8//Power factor
+e=0.9
+L=P/pf
+Ps=L-P
+disp(Ps,'(a)Power alternator can supply(in KW)=')
+Pr=P*tand(acosd(pf))
+pfm=cosd(atand(Pr/Ps))
+disp(pfm,'(b)Power factor of synchronous motor=')
+l=Ps*e
+disp(l,'(c)Load taken by motor(in Kw)=') \ No newline at end of file
diff --git a/833/CH15/EX15.8/Result15_8.txt b/833/CH15/EX15.8/Result15_8.txt
new file mode 100755
index 000000000..cf08eb280
--- /dev/null
+++ b/833/CH15/EX15.8/Result15_8.txt
@@ -0,0 +1,12 @@
+(a)Power alternator can supply(in KW)=
+
+ 125.
+
+ (b)Power factor of synchronous motor=
+
+ 0.3162278
+
+ (c)Load taken by motor(in Kw)=
+
+ 112.5
+ \ No newline at end of file
diff --git a/833/CH15/EX15.9/Ex15_9.sce b/833/CH15/EX15.9/Ex15_9.sce
new file mode 100755
index 000000000..6cc6f980a
--- /dev/null
+++ b/833/CH15/EX15.9/Ex15_9.sce
@@ -0,0 +1,22 @@
+//Caption:Find efficiency of machine
+//Exa:15.9
+clc;
+clear;
+close;
+P=50000//Power of alternator(in KVA)
+V=11//Voltage of alternator(in Kv)
+pf=0.8//Power factor
+r=0.01//Resistance of stator winding per phase(in ohms)
+Wc=150//Copper loss(in KW)
+Wf=100//Friction loss(in KW)
+Ww=250//Winding loss(in KW)
+Wco=200//Core loss(in KW)
+We=15//Excitor loss(in KW)
+Is=(P*1000)/(sqrt(3)*V*1000)
+Ps=(Is^2)*3*(r/1000)
+Ws=(0.5*Ps)
+Lt=Ps+Ws+Wc+Wf+Ww+Wco+We
+Po=P*pf
+Pi=Po+Lt
+e=Po*100/Pi
+disp(e,'Efficieny of machine(in %)=') \ No newline at end of file
diff --git a/833/CH15/EX15.9/Ex15_9.txt b/833/CH15/EX15.9/Ex15_9.txt
new file mode 100755
index 000000000..6cc6f980a
--- /dev/null
+++ b/833/CH15/EX15.9/Ex15_9.txt
@@ -0,0 +1,22 @@
+//Caption:Find efficiency of machine
+//Exa:15.9
+clc;
+clear;
+close;
+P=50000//Power of alternator(in KVA)
+V=11//Voltage of alternator(in Kv)
+pf=0.8//Power factor
+r=0.01//Resistance of stator winding per phase(in ohms)
+Wc=150//Copper loss(in KW)
+Wf=100//Friction loss(in KW)
+Ww=250//Winding loss(in KW)
+Wco=200//Core loss(in KW)
+We=15//Excitor loss(in KW)
+Is=(P*1000)/(sqrt(3)*V*1000)
+Ps=(Is^2)*3*(r/1000)
+Ws=(0.5*Ps)
+Lt=Ps+Ws+Wc+Wf+Ww+Wco+We
+Po=P*pf
+Pi=Po+Lt
+e=Po*100/Pi
+disp(e,'Efficieny of machine(in %)=') \ No newline at end of file
diff --git a/833/CH15/EX15.9/Result15_9.txt b/833/CH15/EX15.9/Result15_9.txt
new file mode 100755
index 000000000..1c16ea80b
--- /dev/null
+++ b/833/CH15/EX15.9/Result15_9.txt
@@ -0,0 +1,4 @@
+ Efficieny of machine(in %)=
+
+ 97.50172
+ \ No newline at end of file