diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /698/CH14/EX14.2 | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip |
initial commit / add all books
Diffstat (limited to '698/CH14/EX14.2')
-rw-r--r-- | 698/CH14/EX14.2/2_derivation_of_torque_uniform_wear.txt | 32 | ||||
-rw-r--r-- | 698/CH14/EX14.2/P2_Derivation_of_torque_uniform_wear.sce | 28 |
2 files changed, 60 insertions, 0 deletions
diff --git a/698/CH14/EX14.2/2_derivation_of_torque_uniform_wear.txt b/698/CH14/EX14.2/2_derivation_of_torque_uniform_wear.txt new file mode 100644 index 000000000..937d9feb2 --- /dev/null +++ b/698/CH14/EX14.2/2_derivation_of_torque_uniform_wear.txt @@ -0,0 +1,32 @@ +When a clutch is new, the pressure may be rather uniform.
+If the surfaces are relatively rigid, the outer portion, where velocity is high,
+will wear more than inner portion.
+After the initial wearing-in,it is reasonable to assume that the curve of the profile will maintain its shape;
+or, the wear thereafter may be considered to be uniform.
+Uniform wear can be expressed in a different way by saying that
+at any time interval, the work done per unit area is constant:
+[(frictional force)*(velocity)]/area =
+ [(f*p*2*pi*r dr)*(rw)]/(2*pi*r dr) = constant C
+or
+ p=C'/f*r*w Since f and w are constant,
+ p=C/r, where C is constant.
+An alternate method of showing that pressure varies inversely as the radius is
+to consider that wear (delta) is proportional to pressure p and velocity V.
+Thus
+ (delta)=K*p*V=K*p*(r*w),
+or
+ p=C/r since (delta) and K are constants and w is fixed for a given clutch.
+The differential frictional torque=dT= r(f*p(2*pi*r dR));
+
+Intergrating with respect to r over r=Ri to r=Ro,
+we get the total torque as
+ T=2*pi*f*C[((Ro^2)-(Ri^2))/2]
+
+To find C, we can integrate p(2*pi*r dr) with respect to r over r=Ri to r=Ro
+We get
+ C=F/(2*pi*(Ro-Ri))
+
+Substituting this value of C into T
+We obtain
+
+ T=F*f*[(1/2)*(Ro+Ri)] = F*f*Rf
\ No newline at end of file diff --git a/698/CH14/EX14.2/P2_Derivation_of_torque_uniform_wear.sce b/698/CH14/EX14.2/P2_Derivation_of_torque_uniform_wear.sce new file mode 100644 index 000000000..2d6ecd036 --- /dev/null +++ b/698/CH14/EX14.2/P2_Derivation_of_torque_uniform_wear.sce @@ -0,0 +1,28 @@ +clc
+//Example 14.2
+//Derivation of torque capacity for one pair of surfaces subjected to uniform wear
+
+//------------------------------------------------------------------------------
+//This example is derivation based, hence the code will comprise only of statements printed to text file
+//Printing result file to .txt
+res2=mopen(TMPDIR+'2_derivation_of_torque_uniform_wear.txt','wt')
+mfprintf(res2,"When a clutch is new, the pressure may be rather uniform.\nIf the surfaces are relatively rigid, the outer portion, where velocity is high,\nwill wear more than inner portion.\n")
+mfprintf(res2,"After the initial wearing-in,it is reasonable to assume that the curve of the profile will maintain its shape;\nor, the wear thereafter may be considered to be uniform.\n")
+mfprintf(res2,"Uniform wear can be expressed in a different way by saying that\nat any time interval, the work done per unit area is constant:\n")
+mfprintf(res2,"[(frictional force)*(velocity)]/area = \n\t[(f*p*2*pi*r dr)*(rw)]/(2*pi*r dr) = constant C\n")
+mfprintf(res2,"or\n\tp=C''/f*r*w\t Since f and w are constant,")
+mfprintf(res2,"\n\tp=C/r, where C is constant.\n")
+mfprintf(res2,"An alternate method of showing that pressure varies inversely as the radius is\nto consider that wear (delta) is proportional to pressure p and velocity V.\n")
+mfprintf(res2,"Thus \n\t(delta)=K*p*V=K*p*(r*w),\nor\n\tp=C/r\t\tsince (delta) and K are constants and w is fixed for a given clutch.\n")
+mfprintf(res2,"The differential frictional torque=dT= r(f*p(2*pi*r dR));\n\n")
+mfprintf(res2,"Intergrating with respect to r over r=Ri to r=Ro,\nwe get the total torque as\n")
+mfprintf(res2,"\t\tT=2*pi*f*C[((Ro^2)-(Ri^2))/2]\n\n")
+mfprintf(res2,"To find C, we can integrate p(2*pi*r dr) with respect to r over r=Ri to r=Ro\n")
+mfprintf(res2,"We get\n\t\tC=F/(2*pi*(Ro-Ri))\n\n")
+mfprintf(res2,"Substituting this value of C into T\n")
+mfprintf(res2,"We obtain\n\n")
+mfprintf(res2,"\t\tT=F*f*[(1/2)*(Ro+Ri)] = F*f*Rf")
+mclose(res2)
+editor(TMPDIR+'2_derivation_of_torque_uniform_wear.txt')
+//------------------------------------------------------------------------------
+//-------------------------------End of program---------------------------------
\ No newline at end of file |