SOLID185
ET,typeids(1),solid185
KEYOPT,typeids(1),2,3
MP, EX,typeids(1),7416
MP, NUXY,typeids(1),0.22
TB, DP,typeids(1)
TBDATA,typeids(1),3.64,57.7,35
TB,CONCR,typeids(1),,,DP
TBTEMP,22
TBDATA,typeids(1),18.4,1.84,22.04
! Commands inserted into this file will be executed just after the contact region
definition.
! The type and mat number for the contact type is equal to the parameter "cid".
! The type and mat number for the target type is equal to the parameter "tid".
! The real number for an asymmetric contact pair is equal to the parameter "cid".
! The real numbers for symmetric contact pairs are equal to the parameters "cid" and
"tid".
! Active UNIT system in Workbench when this object was created: Metric (mm, kg, N, s,
mV, mA)
! NOTE: Any data that requires units (such as mass) is assumed to be in the
consistent solver unit system.
! See Solving Units in the help system for more information.
ET,cid,contac178 ! defines second element type - 2D contact elements
keyopt,cid,2,1
rmodif,cid,1,-35750
rmodif,cid,4,-1075
rmodif,cid,3,3
keyopt,cid,9,1
keyopt,cid,3,1
*DIM,joint_gap, TABLE,4,,,X,,,DJFCSYS !Type TABLE array, dimension 5[x1x1]
joint_gap(1,0)=0
joint_gap(2,0)=83.33
joint_gap(3,0)=166.66
joint_gap(4,0)=250
joint_gap(1,1)=-0.2
joint_gap(2,1)=-0.12
joint_gap(3,1)=-0.15
joint_gap(4,1)=-0.11
!
rmodif,cid,2,%joint_gap%
*DIM,joint_gap, TABLE,4,,,X,,,DJBCSYS
joint_gap(1,0)=0
joint_gap(2,0)=83.33
joint_gap(3,0)=166.66
joint_gap(4,0)=250
joint_gap(1,1)=-0.11
joint_gap(2,1)=-0.19
joint_gap(3,1)=-0.13
joint_gap(4,1)=-0.16
!
rmodif,cid,2,%joint_gap%
*DIM,joint_gap, TABLE,2,,,X,,,DJLCSYS
joint_gap(1,0)=-46.5
joint_gap(2,0)=-78.5
joint_gap(1,1)=-0.11
joint_gap(2,1)=-0.16
!
rmodif,cid,2,%joint_gap%
*DIM,joint_gap, TABLE,2,,,X,,,DJRCSYS
joint_gap(1,0)=-46.5
joint_gap(2,0)=-78.5
joint_gap(1,1)=-0.070
joint_gap(2,1)=-0.083
!
rmodif,cid,2,%joint_gap%
r,2,20e3,,0.005,,10
TYPE,2 ! activates or sets this element type
real,2
! define contact nodes and elements
! first the contact nodes
asel,s,area,,2 ! select top area
nsla,s,1 ! select the nodes within this area
nsel,r,loc,y,1.99,2.01 ! select bottom layer of nodes in this area
cm,source,node ! call this group of nodes 'source'
! then the target nodes
allsel ! relect everything
asel,s,area,,1 ! select bottom area
nsla,s,1 ! select nodes in this area
nsel,r,loc,y,1.99,2.01 ! the top layer of nodes from this area
cm,target,node ! call this selection 'target'
gcgen,source,target,3 ! generate contact elements between defined nodes