diff options
Diffstat (limited to '3764/CH3')
| -rw-r--r-- | 3764/CH3/EX3.01/Ex3_01.sce | 22 | ||||
| -rw-r--r-- | 3764/CH3/EX3.02/Ex3_02.sce | 17 | ||||
| -rw-r--r-- | 3764/CH3/EX3.03/Ex3_03.sce | 17 | ||||
| -rw-r--r-- | 3764/CH3/EX3.06/Ex3_06.sce | 18 | ||||
| -rw-r--r-- | 3764/CH3/EX3.09/Ex3_09.sce | 21 | ||||
| -rw-r--r-- | 3764/CH3/EX3.10/Ex3_10.sce | 24 | ||||
| -rw-r--r-- | 3764/CH3/EX3.2/Ex3_2.sce | 26 | ||||
| -rw-r--r-- | 3764/CH3/EX3.6/Ex3_6.sce | 34 | ||||
| -rw-r--r-- | 3764/CH3/EX3.8/Ex3_8.sce | 18 | ||||
| -rw-r--r-- | 3764/CH3/EX3.9/Ex3_9.sce | 32 |
10 files changed, 229 insertions, 0 deletions
diff --git a/3764/CH3/EX3.01/Ex3_01.sce b/3764/CH3/EX3.01/Ex3_01.sce new file mode 100644 index 000000000..15eddea4a --- /dev/null +++ b/3764/CH3/EX3.01/Ex3_01.sce @@ -0,0 +1,22 @@ +clc +// + +//Variable declaration +l=1.5 // length of the cylindrical shaft +Tmax=120 // Maximum allowable torque +c1=0.02 // Inner radius +c2=0.03 // Outer radius + + + +//Calculation +//Case(a) +J=(1/2.0)*(%pi)*(c2**4-c1**4) // Polar moment of inertia +c=c2 // Letting c equal to c2 +T=((J*Tmax*((10**6)))/(c))/(1000.0) // Largest Permissible Torque +//Case(b) +Tmin=(c1/c2)*(Tmax) // Minimum Shearing Stress + +//Result +printf("\n Largest permissible torque that can be applied to the shaft = %0.3f kN' ,T) +printf("\n Minimum shearing stress that can be applied to the shaft = %0.3f MPa' ,Tmin) diff --git a/3764/CH3/EX3.02/Ex3_02.sce b/3764/CH3/EX3.02/Ex3_02.sce new file mode 100644 index 000000000..9f1b6a0f5 --- /dev/null +++ b/3764/CH3/EX3.02/Ex3_02.sce @@ -0,0 +1,17 @@ +clc +// + +//Variable declaration +G=77*((10**9)) // Modulus of rigidity(GPa) +L=1.5 // length of the shaft(m) +TWIST=2 // Allowable twist + +//Calculation +//Case(a) +phy=(2)*((2*(%pi))/(360)) // Angle of twist(rad) +//Case(b) +J=1.021*((10**-6)) // Polar moment of inertia(m**4) +T=(((J*G)/(L))*(phy))/(1000) // Torque to be applied to the end of shaft(kN.m) + +// Result +printf("\n Maximum torque that can be transmitted by the shaft as designed = %0.3f kN.m' ,T) diff --git a/3764/CH3/EX3.03/Ex3_03.sce b/3764/CH3/EX3.03/Ex3_03.sce new file mode 100644 index 000000000..81cfc6ea8 --- /dev/null +++ b/3764/CH3/EX3.03/Ex3_03.sce @@ -0,0 +1,17 @@ +clc +// + +//Variable declaration +tmin=70*((10**6)) // Shearing stress(Pa) +G=77*((10**9))*(1.0) // Modulus of rigidity(Pa) +L=1500 // ength of arc AA'(mm) +c1=20 // inner radius(mm) + +//Calculation +//Case(a) +Ymin=tmin/G // shearing strain on the inner surface of the shaft +//Case(b) +phy=((L*Ymin)/(c1))*(360/(2*(%pi))) // Angle of twist(degrees) + +// Result +printf("\n Maximum torque that can be transmitted by the shaft as designed = %0.3f degree' ,phy) diff --git a/3764/CH3/EX3.06/Ex3_06.sce b/3764/CH3/EX3.06/Ex3_06.sce new file mode 100644 index 000000000..615570c41 --- /dev/null +++ b/3764/CH3/EX3.06/Ex3_06.sce @@ -0,0 +1,18 @@ +clc +// + +//Variable declaration +P=5 // Power(hp) +f=3600 // frequency(rpm) +Tmax=8500 // Maximum torque(psi) + +//Calculation +P=P*(6600) // Converting power into lb/s +f=(3600)/(60.0) // Converting frequency into cycles per second +T=(P)/(2*(%pi)*f) // Torque exerted on the shaft +Ratio=T/Tmax // Here we are finding the value of J/c +c=(((10.30)*((10**-3))*(2))/(%pi))**(1/3.0) +d=2*c // Diameter of the shaft that should be used + +//Result +printf("\n Case(a): Size of shaft = %1f lb.in' ,d) diff --git a/3764/CH3/EX3.09/Ex3_09.sce b/3764/CH3/EX3.09/Ex3_09.sce new file mode 100644 index 000000000..97ad0ba15 --- /dev/null +++ b/3764/CH3/EX3.09/Ex3_09.sce @@ -0,0 +1,21 @@ +clc +// + +//Variable declaration +T=4.60*(10**3) // Torque(N.m) +L=1.2 // length(m) +G=77*(10**9) // modulus of rigidity(Pa) +J=614*(10**-9) // Polar moment of inertia(m**4) +phy=8.50 +c=25*(10**-3) // radius(m) + +//Calculation +// Case(a) +phyl=((T*L)/(J*G))*(360/(2*(%pi))) // Lateral twist(degree) +phyp=phy-phyl // Permanent twist(degree) +// Case(b) +Tlmax=((T*c)/(J))/((10**6)) // Residual stresses(MPa) + +// Result +printf("\n Case(a): Permanent twist = %1f degree' ,phyp) +printf("\n Case(b): Residual stress = %1f MPa ' ,Tlmax) diff --git a/3764/CH3/EX3.10/Ex3_10.sce b/3764/CH3/EX3.10/Ex3_10.sce new file mode 100644 index 000000000..91fa85f8c --- /dev/null +++ b/3764/CH3/EX3.10/Ex3_10.sce @@ -0,0 +1,24 @@ +clc +// + +//Variable declaration +t=0.160 // thickness(in) +T=24 // Torque(kip.in) + + +//Calculation +// Case(a) +Area=3.84*2.34 // Area bounded by centre line(in**2) +t=(T)/(2*t*Area) // shearing stress in wall(ksi) +// Case(b) +tABAC=0.120 +tBDCD=0.200 +tAB=(T)/(2*tABAC*Area) // shearing stress in wall(ksi) +tAC=tAB +tBD=(T)/(2*tBDCD*Area) // shearing stress in wall(ksi) +tCD=tBD + +// Result +printf("\n Case(a): Shearing stress in each wall = %1f ksi' ,t) +printf("\n Case(b): Shearing stress in wall AB and AC= %1f ksi ' ,tAB) +printf("\n Case(b): Shearing stress in wall BD and CD= %1f ksi ' ,tCD) diff --git a/3764/CH3/EX3.2/Ex3_2.sce b/3764/CH3/EX3.2/Ex3_2.sce new file mode 100644 index 000000000..37cddb337 --- /dev/null +++ b/3764/CH3/EX3.2/Ex3_2.sce @@ -0,0 +1,26 @@ +clc +// + +//Variable declaration +din=4 // Inner diamter of shaft (in) +dout=6 // Outer diamter of shaft (in) +STRESS=12 // Shearing stress(ksi) + +//Calculation +//Hollow Shaft as Designed. +J=((%pi)/2.0)*(((dout/2)**4)-((din/2)**4)) // Polar moment of inertia(in**4) +Th=(J*STRESS)/3.0 // Allowable shearing stress(kip.in) + +//Solid Shaft of Equal Weight +rad=sqrt((dout/2)**2-(din/2)**2) // Radius of solid shaft of equal weight(in) +Te=(12*(%pi)*((rad**3)))/2.0 // Maximum allowable torque(kip.in) + +//Hollow Shaft of 8-in. Diameter. +c5=sqrt(4**2 + 2**2 -3**2) // Inner radius of hallow shaft(in) +J8=((%pi)*(4**4-3.317**4))/2.0 // Polar moment of inertia(in**4) +Tor=((212)*(12))/4.0 + +// Result +printf("\n Case(a):Maximum torque that can be transmitted by the shaft as designed = %0.3f kip.in' ,Th) +printf("\n Case(b):Maximum torque that can be transmitted by the shaft of equal weight = %0.3f kip.in' ,Te) +printf("\n Case(c):Maximum torque that can be transmitted by the hollow shaft of equal weight and 8 in outer diameter = %0.3f kip.in' ,Tor) diff --git a/3764/CH3/EX3.6/Ex3_6.sce b/3764/CH3/EX3.6/Ex3_6.sce new file mode 100644 index 000000000..1911a3aef --- /dev/null +++ b/3764/CH3/EX3.6/Ex3_6.sce @@ -0,0 +1,34 @@ +clc +// + +//Variable declaration +D=7.5 // Diameter of the bigger shaft(in) +d=3.75 // Diameter of the smaller shaft(in) +r=0.5625 // Inner radius(in) +k=1.33 // Stress concentration factor + +//Calculation +temp1=(D/d) +temp2=(r/d) +T=((1/2)*(%pi)*((1.875)**3)*(8/1.33)) // Maximum torque(ksi) + +//Power +f=(900/60) // Frequency(Hz) +Pa=(2*(%pi)*15*62.3*(10**3)) // Power(lb/s) +Pa=(Pa/6600) // Power(hp) + +//Final Design +r=15/16 // Radius(in) +temp2=(0.9375/3.75) +k=1.20 // Stress concentration factor +T=(10.35*(8/1.20)) // Torque(kip.in) +Pb=(2)*(%pi)*(15)*(69)*((10**3)) // Power(lb/s) +Pb=(Pb/6600) // Power(hp) + +//Percent Change in Power +PC=(((Pb-Pa)/Pa)*100) + + +//Result +printf("\n Case(a): Maximum power that can be transmitted = %1f hp' ,Pa) +printf("\n Case(b): Percentage in power = %1f ' ,PC) diff --git a/3764/CH3/EX3.8/Ex3_8.sce b/3764/CH3/EX3.8/Ex3_8.sce new file mode 100644 index 000000000..955d98801 --- /dev/null +++ b/3764/CH3/EX3.8/Ex3_8.sce @@ -0,0 +1,18 @@ +clc +// + +//Variable declaration +Tp=44.1 +phyF=8.59 + +// Calculation +// Elastic Unloading +Tmax=((44.1)*(1.125))/2.02 +Tmin=(Tmax)*(0.75/1.125) +phyl=(((44.1*(10**3)*60)*(360/(2*%pi)))/((2.02)*(11.2*(10**6)))**2) + +phy=phyF-phyl + +// Result +printf("\n Case(a: Residual stress = %1f kip.in' ,0) +printf("\n Case(b: Permanent angle of twist= %1f degree ' ,phy) diff --git a/3764/CH3/EX3.9/Ex3_9.sce b/3764/CH3/EX3.9/Ex3_9.sce new file mode 100644 index 000000000..061d048ae --- /dev/null +++ b/3764/CH3/EX3.9/Ex3_9.sce @@ -0,0 +1,32 @@ +clc +// + +//Bar with Square Cross Section +//Variable declaration +tALL=40 // Stress(MPa) + + +//Calculation +// Bar with square cross section +a=0.040 // Length(m) +b=0.040 // Length(m) +temp=(a/b) +c1=0.208 // Coefficient +tmax=tALL // Maximum stress(MPa) +T1=(40)*((10**6))*(0.208)*((0.040**3)) // Torque(N.m) + +// Bar with Rectangular Cross Section. +a=0.064 // Length(m) +b=0.025 // Length(m) +temp2=(a/b) +T2=(40)*((10**6))*(0.259)*(0.064)*((0.025**2)) // Torque(N.m) + +//Square Tube +A=(0.034)*(0.034) // Area bounded by the center line of the cross section(m**2) +T3=((40)*((10**6))*(2)*(0.006)*(1.156)*((10**-3))**0) // Torque(N.m) + + +// Result +printf("\n Largest torque on bar with square cross section = %1f N.m' ,T1) +printf("\n Largest torque on bar with rectangular cross section = %1f N.m' ,T2) +printf("\n Largest torque on square tube = %1f N.m' ,T3) |