UEL
*
ELGEN, ELSET=UTRUSS
101, 5
*
UEL PROPERTY, ELSET=UTRUSS
0.002, 2.1E11, 0.3, 7200.
The user element consists of two nodes that are assumed to lie paral lel to th e x-axis. The eleme nt
behaves like a linear truss elemen t. The supplied elem ent properties are the cross-sectional area, Young’s
modulus, Poisson’s ratio, and density, respectively.
The next e x cerp t shows the listing of the subroutine. The user subroutine h as been coded for use in
a per turbation static analysis; general static analysis, inclu ding R i ks analy sis wit h load incrementation
defined by the subroutine; eigenfrequency extraction analysis; and direct-integration dynamic analysis.
The names of the verification input files associated with the su br out ine and these p rocedures can be found
in “UEL,” Section 4.1.14 of the Abaqus Verification G uide. The subroutine perform s all calculatio ns
required for the relevant procedures as described earlier in this section. The flagspassedinthroughthe
LFLAGS array are used to associate particular calculations with solution p rocedures.
During a modified Riks analysis all force loads must be passed into UEL by means of distributed
load definitions such that they are av ailab le for the definition of incremental load vectors; the load keys
Un and UnN U must be used properly, as discussed in “User-defined elem ents,” Section 32.17.1 of th e
Abaqus Analysis User’s Guide. The coding in subroutine UEL must distrib ute the loads into consistent
equivalent nodal forces and account for them in the calculation of the RHS and ENERGY arrays.
SUBROUTINE UEL(RHS,AMATRX,SVARS,ENERGY,NDOFEL,NRHS,NSVARS,
1 PROPS,NPROPS,COORDS,MCRD,NNODE,U,DU,V,A,JTYPE,TIME,
2 DTIME,KSTEP,KINC,JELEM,PARAMS,NDLOAD,JDLTYP,ADLMAG,
3 PREDEF,NPREDF,LFLAGS,MLVARX,DDLMAG,MDLOAD,PNEWDT,
4 JPROPS,NJPROP,PERIOD)
C
INCLUDE 'ABA_PARAM.INC'
PARAMETER ( ZERO = 0.D0, HALF = 0.5D0, ONE = 1.D0 )
C
DIMENSION RHS(MLVARX,*),AMATRX(NDOFEL,NDOFEL),
1 SVARS(NSVARS),ENERGY(8),PROPS(*),COORDS(MCRD,NNODE),
2 U(NDOFEL),DU(MLVARX,*),V(NDOFEL),A(NDOFEL),TIME(2),
3 PARAMS(3),JDLTYP(MDLOAD,*),ADLMAG(MDLOAD,*),
4 DDLMAG(MDLOAD,*),PREDEF(2,NPREDF,NNODE),LFLAGS(*),
5 JPROPS(*)
DIMENSION SRESID(6)
C
C UEL SUBROUTINE FOR A HORIZONTAL TRUSS ELEMENT
C
C SRESID - stores the static residual at time t+dt
C SVARS - In 1-6, contains the static residual at time t
C upon entering the routine. SRESID is copied to
1.1.28–14
Abaqus ID:
Printed on: