diff options
Diffstat (limited to '1325/CH6/EX6.5/6_5.sce')
| -rw-r--r-- | 1325/CH6/EX6.5/6_5.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1325/CH6/EX6.5/6_5.sce b/1325/CH6/EX6.5/6_5.sce new file mode 100644 index 000000000..4a8851954 --- /dev/null +++ b/1325/CH6/EX6.5/6_5.sce @@ -0,0 +1,15 @@ +//to find the number of plates required
+clc
+P=20//lb/in^2
+u=0.07//friction coefficient
+N=3600//rpm
+H=100//hp
+r1=5//in
+r2=0.8*r1//given
+A=%pi*(r1^2-r2^2)//the area of each friction surface
+W=A*P//total axial thrust on plates
+M=(1/2)*u*W*(r1+r2)//friction moment for each pair of contacts
+T=H*33000*12/(2*%pi*N)//total torque to be transmitted
+x=(T/M)//effective friction surfaces required
+printf("\nNumber of effective friction surfaces required= %.f\n",x)
+
|