Contact II
This corresponds to the previous example. Usage of *CONTACT_AUTOMATIC_SINGLE_SURFACE and *CONTACT_FORCE_TRANSDUCER_PENALTY keywords is shown.
https://www.dynaexamples.com/introduction/intro-by-k.-weimar/contact/contact-ii
https://www.dynaexamples.com/@@site-logo/LS-DYNA-Examples-Logo480x80.png
Contact II
This corresponds to the previous example. Usage of *CONTACT_AUTOMATIC_SINGLE_SURFACE and *CONTACT_FORCE_TRANSDUCER_PENALTY keywords is shown.
*BOUNDARY_SPC_SET *CONTACT_AUTOMATIC_SINGLE_SURFACE *CONTACT_FORCE_TRANSDUCER_PENALTY *CONTROL_CONTACT *CONTROL_ENERGY *CONTROL_HOURGLASS *CONTROL_TERMINATION *CONTROL_TIMESTEP *DATABASE_BINARY_D3PLOT *DATABASE_EXTENT_BINARY *DATABASE_GLSTAT *DATABASE_HISTORY_NODE *DATABASE_MATSUM *DATABASE_NODOUT *DATABASE_RCFORC *DATABASE_SLEOUT *DATABASE_SPCFORC *ELEMENT_SHELL *END *INITIAL_VELOCITY *KEYWORD *MAT_ELASTIC *NODE *PARAMETER *PART *SECTION_SHELL *SET_NODE_LIST *SET_SEGMENT *TITLE
*KEYWORD
$ new *PARAMETER keyword in version 970
$
*PARAMETER
$ PRMR VAL
$ initial velocity
r velo -100000.0
$ time interval between ASCII database outputs
r dt 0.001e-3
*TITLE
Sliding Interface Type 13 (automatic_single_surface)
*CONTROL_TERMINATION
$ f i f f f
$ endtim endcyc dtmin endneg endmas
0.20E-3
*CONTROL_TIMESTEP
$ f f i f f i i i
$ dtinit scft isdo tslimt dtms lctm erode ms1st
0.50
*CONTROL_ENERGY
$ i i i i
$ hgen rwen slnten rylen
2 1 2
*CONTROL_HOURGLASS
$ i f
$ ihq qh
4
*CONTROL_CONTACT
$ slsfac rwpnal islchk shlthk penopt thkchg orien
2 0 2
$ usrstr usrfrc nsbcs interm xpene ssthk ecdt tiedprj
*CONTACT_AUTOMATIC_SINGLE_SURFACE
$ i i i i i i i i
$ ssid msid sstyp mstyp sboxid mboxid spr mpr
1
$ f f f f f i f f
$ fs fd dc vc vdc penchk bt dt
$ f f f f f f f f
$ sfs sfm sst mst sfst sfmt fsf vsf
*SET_SEGMENT
$ i f f f f
$ sid da1 da2 da3 da4
1
$ i i i i f f f f
$ n1 n2 n3 n4 a1 a2 a3 a4
101 103 104 102
7 8 13 12
8 9 14 13
12 13 18 17
13 14 19 18
*CONTACT_FORCE_TRANSDUCER_PENALTY
$ i i i i i i i i
$ ssid msid sstyp mstyp sboxid mboxid spr mpr
2 3
$ f f f f f i f f
$ fs fd dc vc vdc penchk bt dt
$ f f f f f f f f
$ sfs sfm sst mst sfst sfmt fsf vsf
*DATABASE_EXTENT_BINARY
$ i i i i i i i i
$ neiph neips maxint strflg sigflg epsflg rltflg engflg
1
$ i i i
$ cmpflg ieverp beamip
1
*DATABASE_BINARY_D3PLOT
$ f i
$ dt/cycl lcdt
0.0100E-3
*DATABASE_HISTORY_NODE
$ i i i i i i i i
$ id1 id2 id3 id4 id5 id6 id7 id8
12 13 101
*DATABASE_GLSTAT
&dt
*DATABASE_MATSUM
&dt
*DATABASE_SPCFORC
&dt
*DATABASE_RCFORC
&dt
*DATABASE_NODOUT
&dt
*DATABASE_SLEOUT
&dt
*MAT_ELASTIC
$ i f f f f f f
$ mid ro e pr da db k
1 7.85e-9 210000.0 0.300
*SECTION_SHELL
$ i i f f f f i
$ sid elform shrf nip propt qr/irid icomp
1 0.83333 2.0 3.0
$ f f f f f
$ t1 t2 t3 t4 nloc
1.0 1.0 1.0 1.0
*SECTION_SHELL
$ i i f f f f i
$ sid elform shrf nip propt qr/irid icomp
2 0.83333 2.0 3.0
$ f f f f f
$ t1 t2 t3 t4 nloc
2.0 2.0 2.0 2.0
*PART
$ c
$ head
Impacted Material
$ i i i i i i
$ pid sid mid eosid hgid adpopt
1 1 1 0 0 0
*PART
$ c
$ head
Impactor Material
$ i i i i i i
$ pid sid mid eosid hgid adpopt
2 2 1 0 0 0
*INITIAL_VELOCITY
$ i i i
$ nsid nsidex boxid
1
$ f f f f f f
$ vx vy vz vxr vyr vzr
&velo
*SET_NODE_LIST
$ i f f f f
$ sid da1 da2 da3 da4
1
$ i i i i i i i i
$ nid1 nid2 nid3 nid4 nid5 nid6 nid7 nid8
101 102 103 104
*SET_NODE_LIST
2
1 2 3 4 5 6 10 11
15 16 20 21 22 23 24 25
*BOUNDARY_SPC_SET
$ NSID CID DOFX DOFY DOFZ DOFRX DOFRY DOFRZ
2 0 1 1 1 0 0 0
*NODE
$ i8 f f f
$ node x y z
*ELEMENT_SHELL
$ i i i i i i
$ eid pid n1 n2 n3 n4
*END