diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2921/CH18/EX18.2 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '2921/CH18/EX18.2')
| -rwxr-xr-x | 2921/CH18/EX18.2/Ex18_2.sce | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/2921/CH18/EX18.2/Ex18_2.sce b/2921/CH18/EX18.2/Ex18_2.sce new file mode 100755 index 000000000..52ce63d4d --- /dev/null +++ b/2921/CH18/EX18.2/Ex18_2.sce @@ -0,0 +1,28 @@ +clc; +clear; +mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-18.2 Page No.400\n'); + +//Lead angle +L=1/3; +Dp=1.354; +LA=atan(L/(%pi*Dp)); + +mprintf('\n Lead angle = %f deg.',LA*180/%pi); + +//Efficiency +f=0.15; +e=tan(LA)*(1-f*tan(LA))/(tan(LA)+f); + +mprintf('\n Efficiency = %f',e*100); + +//Power +n=175; +T=454; +P=T*n/63000; +Pt=P*2; + +mprintf('\n Power = %f hp per lead screw.',P); + +if f>tan(LA) then + mprintf('\n It is self-locking'); +end |