summaryrefslogtreecommitdiff
path: root/Machine_Design_by_T_H_Wentzell/15-Keys_and_Couplings.ipynb
blob: e2731361733fac2087f259a8a60a23dd33ee116c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
{
"cells": [
 {
		   "cell_type": "markdown",
	   "metadata": {},
	   "source": [
       "# Chapter 15: Keys and Couplings"
	   ]
	},
{
		   "cell_type": "markdown",
		   "metadata": {},
		   "source": [
			"## Example 15.1: Design_of_Keys.sce"
		   ]
		  },
  {
"cell_type": "code",
	   "execution_count": null,
	   "metadata": {
	    "collapsed": true
	   },
	   "outputs": [],
"source": [
"clc;\n",
"clear;\n",
"mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-15.1 Page No.332\n');\n",
"//Torque\n",
"P=5;\n",
"n=1750;\n",
"T=63000*P/n;\n",
"mprintf('\n Torque = %f in-lb.',T);\n",
"//Length of key for shear\n",
"Su=61000;\n",
"Ss=0.5*Su;\n",
"b=0.125;\n",
"D=0.5;\n",
"Ls1=2*T/(Ss*b*D);\n",
"SF=2.5;\n",
"Ls=SF*Ls1;\n",
"mprintf('\n Length of key for shear = %f in.',Ls);\n",
"//Length of key for compression\n",
"Sc=51000;\n",
"t=0.125;\n",
"Lc1=4*T/(Sc*t*D);\n",
"Lc=SF*Lc1;\n",
"mprintf('\n Length of key for compression = %f in.',Lc);"
   ]
   }
,
{
		   "cell_type": "markdown",
		   "metadata": {},
		   "source": [
			"## Example 15.2: Splines.sce"
		   ]
		  },
  {
"cell_type": "code",
	   "execution_count": null,
	   "metadata": {
	    "collapsed": true
	   },
	   "outputs": [],
"source": [
"clc;\n",
"clear;\n",
"mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-15.2 Page No.335\n');\n",
"//Torque capacity\n",
"Ss=30500;\n",
"D=1;\n",
"L=2;\n",
"T1=Ss*%pi*D^2*L/16;\n",
"SF=2;\n",
"T=T1/SF;\n",
"mprintf('\n Torque capacity 1 = %f in-lb.',T);\n",
"n=6;\n",
"d=0.81;\n",
"A=(D-d)*L*n/2;\n",
"S=1000;\n",
"rm=(1+0.810)/4;\n",
"T2=S*A*rm;\n",
"mprintf('\n Torque capacity 2 = %f in-lb.',T2);"
   ]
   }
],
"metadata": {
		  "kernelspec": {
		   "display_name": "Scilab",
		   "language": "scilab",
		   "name": "scilab"
		  },
		  "language_info": {
		   "file_extension": ".sce",
		   "help_links": [
			{
			 "text": "MetaKernel Magics",
			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
			}
		   ],
		   "mimetype": "text/x-octave",
		   "name": "scilab",
		   "version": "0.7.1"
		  }
		 },
		 "nbformat": 4,
		 "nbformat_minor": 0
}