summaryrefslogtreecommitdiff
path: root/3594/CH13/EX13.1/Ex13_1.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3594/CH13/EX13.1/Ex13_1.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3594/CH13/EX13.1/Ex13_1.sce')
-rw-r--r--3594/CH13/EX13.1/Ex13_1.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/3594/CH13/EX13.1/Ex13_1.sce b/3594/CH13/EX13.1/Ex13_1.sce
new file mode 100644
index 000000000..69d8c5733
--- /dev/null
+++ b/3594/CH13/EX13.1/Ex13_1.sce
@@ -0,0 +1,24 @@
+
+clc
+//given
+//all lengths are in inches
+W=120//lb
+w=15//lb
+AB=12
+BF=8
+BC=12
+BE=6.5
+g=35230//inches rpm
+//at Minimum radius
+AF=(AB^2-BF^2)^(1/2)
+CE=(BC^2-BE^2)^(1/2)
+k2=(BE*AF)/(CE*BF)
+N2=(((W/2)*(1+k2)+w)*g/(w*AF))^(1/2)
+//At MAximum radius
+BF1=10
+BE1=8.5
+AF1=(AB^2-BF1^2)^(1/2)
+CE1=(BC^2-BE1^2)^(1/2)
+k1=(BE1*AF1)/(CE1*BF1)
+N1=(((W/2)*(1+k1)+w)*g/(w*AF1))^(1/2)
+printf("\nN1 (corresponding maximum radius) = %.1f rpm\nN2 (corresponding minimum radius) = %.1f rpm",N1,N2)