summaryrefslogtreecommitdiff
path: root/503/CH9/EX9.13
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /503/CH9/EX9.13
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 '503/CH9/EX9.13')
-rwxr-xr-x503/CH9/EX9.13/ch9_13.sci21
1 files changed, 21 insertions, 0 deletions
diff --git a/503/CH9/EX9.13/ch9_13.sci b/503/CH9/EX9.13/ch9_13.sci
new file mode 100755
index 000000000..b8ec49b47
--- /dev/null
+++ b/503/CH9/EX9.13/ch9_13.sci
@@ -0,0 +1,21 @@
+//to find resistance added to ckt
+
+clc;
+Rrot=.061;
+R2=Rrot/2;
+f=50;
+P=12;
+w_s=(120*f/P)*(2*%pi/60);
+s=0.045;
+w=(1-s)*w_s;
+P=200*10^3;
+T_fan=P/w;
+I2=sqrt(T_fan*w_s*s/(3*R2));
+E2=I2*R2/s;
+n=450;
+ww=2*%pi*n/60;
+nn=500;
+ss=(nn-n)/nn;
+Tnew=T_fan*(ww/w)^2;
+Rt=(3/w_s)*(E2*ss)^2/(ss*Tnew);
+Rext=Rt-R2;disp(Rext,'external resistance(ohm)'); \ No newline at end of file