CALCS PROC033
CYLINDER BEARING ON FLAT STEEL PLATE

NOTATION

Ddiameter, cylinder
bwidth, cylinder
Pwforce, .0 Perm Defm, wilson
Pjforce, .0 Perm Defm, jenson
Pflforce, limit, fem

APPLICATION

Wheel on rail

OUTPUT

local stress in supporting plate

SEE ALSO

other porcs & progs

THEORY

Roark5, Page5

GUIDANCE

Further investigation required. Caution: this must be used in the units shown in the text.

INPUT FORMAT

LET LET Nm=:K1=2.54:K2=.45/1000:K3=14230:Fy=K3*Fy(Nm):E=K3*E(Nm):D=/K1:b=/K1:P=:PROC033

EXAMPLE

Call Statement

LET Nm=1:K1=2.54:K2=.45/1000:K3=14230:Fy=K3*Fy(1):E=K3*E(1):D=10/K1:b=3.5/K1:P=3.75:PROC033

Output

PROC033 title
Plim= K2*b*((Fy-13000)/20000)*600*D= 2.696
Pjen= K2*b*(1+(1.78/(1+D^2/(800*b^2)))*(Fy^2*D/E))= 0.3629
Pfem= K1^2*(5/500)*Fy(Nm)*1.2*1.15*b*D= 1.69
UF= ABS(P)/Plim= 1.3911.391
UF= ABS(P)/Pjen= 10.3310.33
UF= ABS(P)/Pfem= 2.2182.218
END033