summaryrefslogtreecommitdiff
path: root/833/CH11/EX11.8
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /833/CH11/EX11.8
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/CH11/EX11.8')
-rwxr-xr-x833/CH11/EX11.8/Ex11_8.sce16
-rwxr-xr-x833/CH11/EX11.8/Ex11_8.txt16
-rwxr-xr-x833/CH11/EX11.8/Result11_8.txt7
3 files changed, 39 insertions, 0 deletions
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