CALCS PROC023
LUG WELD

NOTATION

xlugx coord-normal dim, lug hole from weld
ylugy coord-parallel dim,lug hole from weld end
ybaseweld length
Tlugthickness-lug
flt/penindicator- 1 fillet or 2 full penetration weld
Tthroatthickness-fillet weld throat dim
Aarea, weld
Zmodulus, weld,bending,in plane
fa.tstress-axial-top,bottom
fa.bshear-weld

APPLICATION

Weld fixing lug subject to pin shear force

OUTPUT

Shear & direct stress

SEE ALSO

PROC046

THEORY

refs

GUIDANCE

Pz not yet in formulation

INPUT FORMAT

LET Nm=:Nk=:xlug=:ylug=:ybase=:Tlug=:FltPen=:Tthrt=:Px=:Py=:Pz=:PROC023

EXAMPLE

Call Statement

LET Nm=1:Nk=1:xlug=26:ylug=15:ybase=30:Tlug=1.5:FltPen=1:Tthrt=.7:Px=14:Py=23:Pz=0:PROC023

Output

PROC023 LUG PLATE & WELD, Rev 110299
A= 2*Tthrt*(ybase+Tlug)= 44.1
Z= Tthrt*Tlug*ybase+Tthrt*ybase^2/3= 241.5
ft= (Px/A+(+Px*(ylug-ybase/2)-Py*xlug)/Z)= -2.159
fb= (Px/A+(-Px*(ylug-ybase/2)+Py*xlug)/Z)= 2.794
fs= (4/3)*Py/A= 0.6954
UF= FNmax(ft,fb,0,0,0)/(Kd(Nk)*Fy(Nm))= 1.1911.191
UF= fs/(Ks(Nk)*Fy(Nm))= 0.5113
Lateral Bending
thetau= ATN((ybase-ylug)/xlug)= 0.5233
thetal= ATN(-ylug/xlug)= -0.5233
Pzu= (Tlug^3*E(Nm)/(6*xlug^2))*((2*thetau+SIN(2*thetau)-2*thetal-SIN(2*thetal))/4)= 1.647
K= ABS(Pz/Pzu)*(Tlug*E(Nm)/xlug^2)= 0
fbu= K*(COS(thetau))^2= 0
fbl= K*(COS(thetal))^2= 0
fbmax= K*(COS(0))^2= 0
UF= FNmax(fbu,fbl,fbmax,0,0)/(Kb(Nk)*Fy(Nm))= 0
END023