summaryrefslogtreecommitdiff
path: root/3594/CH7/EX7.2/7_2.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3594/CH7/EX7.2/7_2.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/CH7/EX7.2/7_2.sce')
-rw-r--r--3594/CH7/EX7.2/7_2.sce28
1 files changed, 28 insertions, 0 deletions
diff --git a/3594/CH7/EX7.2/7_2.sce b/3594/CH7/EX7.2/7_2.sce
new file mode 100644
index 000000000..c8b8af319
--- /dev/null
+++ b/3594/CH7/EX7.2/7_2.sce
@@ -0,0 +1,28 @@
+
+clc
+w=1.2//lb/ft^2
+u=0.3
+v=3600//ft/min
+V=v/60//ft/sec
+theta=165//degrees
+g=32.2//ft/s^2
+x=theta*%pi/180
+k=%e^(u*x)//k=T1/T2=e^(u*x)
+To=500//lb
+//Solution a)Vertical drive
+Tc=w*V^2/g//equation 7.5
+//solution a)
+H=2*(k-1)*(To-Tc)*V/((k+1)*550)
+Vmax=(To*g/(3*w))^(1/2)
+Hmax=2*(k-1)*(To-Tc)*Vmax/((k+1)*550)
+//Solution b)
+To1=To+Tc
+//from equation 7.15 2/To1^2=1/Tt^2+1/Ts^2
+//T1/T2=k
+T2=367 //lb - from trail and error
+T1=k*T2
+Tt=T1+Tc
+Ts=T2+Tc
+HP=(T1-T2)*V/550
+printf("\nSolution a)\nHorsepower transmitted= %.1f\nMaximum Horsepower transmitted= %.1f (at velocit = %.1f ft/s^2)Solution b)\nTt=%.f lb\nTs=%.f lb\nHorsepower transmitted= %.1f",H,Hmax,Vmax,Tt,Ts,HP)
+