Implicit Seat Pull
This problem demonstrates the ability to solve a complex, highly dynamic and nonlinear problem using the implicit solver of LS-DYNA. The load case will help users to set up seat pull simulations and similar problems. Please use a recent developer version of LS-DYNA (i.e. ls-dyna_mpp_d_dev_109569 or later) to compute this example.
https://www.dynaexamples.com/implicit/implicit_seatpull
https://www.dynaexamples.com/@@site-logo/LS-DYNA-Examples-Logo480x80.png
Implicit Seat Pull
This problem demonstrates the ability to solve a complex, highly dynamic and nonlinear problem using the implicit solver of LS-DYNA. The load case will help users to set up seat pull simulations and similar problems. Please use a recent developer version of LS-DYNA (i.e. ls-dyna_mpp_d_dev_109569 or later) to compute this example.
*KEYWORD *TITLE *CONTROL_ACCURACY *CONTROL_BULK_VISCOSITY *CONTROL_CONTACT *CONTROL_ENERGY *CONTROL_HOURGLASS *CONTROL_IMPLICIT_AUTO *CONTROL_IMPLICIT_DYNAMICS *CONTROL_IMPLICIT_GENERAL *CONTROL_IMPLICIT_SOLUTION *CONTROL_MPP_IO_LSTC_REDUCE *CONTROL_MPP_IO_NOD3DUMP *CONTROL_MPP_IO_NODUMP *CONTROL_MPP_IO_NOFULL *CONTROL_OUTPUT *CONTROL_PARALLEL *CONTROL_SHELL *CONTROL_SOLID *CONTROL_SOLUTION *CONTROL_TERMINATION *CONTROL_TIMESTEP *DATABASE_ABSTAT *DATABASE_BNDOUT *DATABASE_DEFORC *DATABASE_ELOUT *DATABASE_GLSTAT *DATABASE_JNTFORC *DATABASE_MATSUM *DATABASE_NODOUT *DATABASE_RBDOUT *DATABASE_RCFORC *DATABASE_RWFORC *DATABASE_SBTOUT *DATABASE_SECFORC *DATABASE_SLEOUT *DATABASE_SPCFORC *DATABASE_SWFORC *DATABASE_BINARY_D3DUMP *DATABASE_BINARY_D3PLOT *DATABASE_BINARY_INTFOR *DATABASE_BINARY_RUNRSF *DATABASE_EXTENT_BINARY *BOUNDARY_SPC_SET *SET_PART_LIST_TITLE *CONTACT_AUTOMATIC_SURFACE_TO_SURFACE_MORTAR_ID *CONTACT_AUTOMATIC_SINGLE_SURFACE_MORTAR *SET_PART_ADD *PART *SECTION_DISCRETE *MAT_SPRING_ELASTIC *SECTION_SHELL *MAT_RIGID *MAT_PIECEWISE_LINEAR_PLASTICITY *SECTION_BEAM *MAT_ELASTIC *SECTION_SEATBELT_TITLE *MAT_SEATBELT_TITLE *DEFINE_COORDINATE_SYSTEM_TITLE *DEFINE_COORDINATE_SYSTEM *DEFINE_CURVE *DEFINE_CURVE_TITLE *SET_NODE_LIST_TITLE *SET_NODE_LIST *CONSTRAINED_EXTRA_NODES_NODE *CONSTRAINED_EXTRA_NODES_SET *CONSTRAINED_JOINT_REVOLUTE_ID *CONSTRAINED_JOINT_STIFFNESS_GENERALIZED *CONSTRAINED_NODAL_RIGID_BODY *CONSTRAINED_SPOTWELD *ELEMENT_SHELL *ELEMENT_BEAM *ELEMENT_MASS *NODE *LOAD_RIGID_BODY *ELEMENT_SEATBELT *ELEMENT_DISCRETE *END
KEYWORD
$
$ Use a recent developer version of LS-DYNA, i.e. ls-dyna_mpp_d_dev_109569 or later
$
*CONTROL_ACCURACY
$# osu inn pidosu iacc
0 4 0 1
*CONTROL_BULK_VISCOSITY
$# q1 q2 type btype
0.0 0.0 -2 0
*CONTROL_CONTACT
$# slsfac rwpnal islchk shlthk penopt thkchg orien enmass
0.0 1.0 2 2 0 0 2 0
$# usrstr usrfrc nsbcs interm xpene ssthk ecdt tiedprj
0 0 0 1 0.0 1 0 0
$# sfric dfric edc vfc th th_sf pen_sf
0.0 0.0 0.0 0.0 0.0 0.0 0.0
$# ignore frceng skiprwg outseg spotstp spotdel spothin
1 1 0 0 0 10.80000001
$# isym nserod rwgaps rwgdth rwksf icov swradf ithoff
0 0 1 0.0 0.0 0 0.0 0
$# shledg pstiff ithcnt tdcnof ftall unused shltrw
1 0 0 0 0 0.0
*CONTROL_ENERGY
$# hgen rwen slnten rylen
2 2 2 2
*CONTROL_HOURGLASS
$# ihq qh
4 0.03
*CONTROL_IMPLICIT_AUTO
$# iauto iteopt itewin dtmin dtmax dtexp kfail kcycle
1 100 5 0.0 0.001 0.0 0 0
*CONTROL_IMPLICIT_DYNAMICS
$# imass gamma beta tdybir tdydth tdybur irate
10.60000002 0.38 0.01.00000E281.00000E28 1
*CONTROL_IMPLICIT_EIGENVALUE
$# neig center lflag lftend rflag rhtend eigmth shfscl
00 0.0 0-1.0000E29 01.00000E29 2 0.0
$# isolid ibeam ishell itshell mstres evdump mstrscl
0 0 0 0 0 0 0.01
*CONTROL_IMPLICIT_GENERAL
$# imflag dt0 imform nsbs igs cnstn form zero_v
1 0.0010 2 1 2 0 0 0
*CONTROL_IMPLICIT_SOLUTION
$# nsolvr ilimit maxref dctol ectol rctol lstol abstol
12 1 35 0.001 0.011.00000E100.89999998-1.000E+01
$# dnorm diverg istif nlprint nlnorm d3itctl cpchk
2 1 1 3 4 0 0
$# arcctl arcdir arclen arcmth arcdmp arcpsi arcalf arctim
0 0 0.0 1 2 0 0 0
$# lsmtd lsdir irad srad awgt sred
4 2 0.0 0.0 0.0 0.0
*CONTROL_MPP_IO_LSTC_REDUCE
*CONTROL_MPP_IO_NOD3DUMP
*CONTROL_MPP_IO_NODUMP
*CONTROL_MPP_IO_NOFULL
*CONTROL_OUTPUT
$# npopt neecho nrefup iaccop opifs ipnint ikedit iflush
1 3 0 01.00000E-4 0 0 0
$# iprtf ierode tet10 msgmax ipcurv gmdt ip1dblt eocs
0 0 2 50 0 0.0 0 0
$# tolev newleg frfreq minfo solsig msgflg cdetol
2 0 1 1 0 0 10.0
*CONTROL_PARALLEL
$# ncpu numrhs const para
0 0 1 1
*CONTROL_SHELL
$# wrpang esort irnxx istupd theory bwc miter proj
40.0 1 -1 4 2 1 1 1
$# rotascl intgrd lamsht cstyp6 tshell
0.0 0 0 0 0
$# psstupd sidt4tu cntco itsflg irquad
0 0 2 0 2
$# nfail1 nfail4 psnfail keepcs delfr drcpsid drcprm
0 0 0 0 0 0 1.0
*CONTROL_SOLID
$# esort fmatrix niptets swlocl psfail t10jtol
1 0 0 2 0 0.0
$# pm1 pm2 pm3 pm4 pm5 pm6 pm7 pm8 pm9 pm10
0 0 0 0 0 0 0 0 0 0
*CONTROL_SOLUTION
$# soln nlq isnan lcint
0 0 0 500
*CONTROL_TERMINATION
$# endtim endcyc dtmin endeng endmas
0.2 0 0.001 0.0 0.0
*CONTROL_TIMESTEP
$# dtinit tssfac isdo tslimt dt2ms lctm erode ms1st
0.00.89999998 0 0.0-6.0000E-7 0 1 0
$# dt2msf dt2mslc imscl unused unused rmscl
0.0 0 0 0.0
*DATABASE_ABSTAT
$# dt binary lcur ioopt
1.00000E-4 2 0 1
*DATABASE_BNDOUT
$# dt binary lcur ioopt
1.00000E-4 2 0 1
*DATABASE_DEFORC
$# dt binary lcur ioopt
1.00000E-4 2 0 1
*DATABASE_ELOUT
$# dt binary lcur ioopt option1 option2 option3 option4
1.00000E-4 2 0 1 0 0 0 0
*DATABASE_GLSTAT
$# dt binary lcur ioopt
1.00000E-4 2 0 1
*DATABASE_JNTFORC
$# dt binary lcur ioopt
0.001 2 0 1
*DATABASE_MATSUM
$# dt binary lcur ioopt
0.001 2 0 1
*DATABASE_NODOUT
$# dt binary lcur ioopt option1 option2
1.00000E-5 2 0 1 0.0 0
*DATABASE_RBDOUT
$# dt binary lcur ioopt
0.005 2 0 1
*DATABASE_RCFORC
$# dt binary lcur ioopt
0.001 2 0 1
*DATABASE_RWFORC
$# dt binary lcur ioopt
0.001 2 0 1
*DATABASE_SBTOUT
$# dt binary lcur ioopt
0.001 2 0 1
*DATABASE_SECFORC
$# dt binary lcur ioopt
1.00000E-4 2 0 1
*DATABASE_SLEOUT
$# dt binary lcur ioopt
0.001 2 0 1
*DATABASE_SPCFORC
$# dt binary lcur ioopt
0.001 2 0 1
*DATABASE_SWFORC
$# dt binary lcur ioopt
0.001 2 0 1
*DATABASE_BINARY_D3DUMP
$# cycl lcdt beam npltc psetid
40000.0 0 0 0 0
*DATABASE_BINARY_D3PLOT
$# dt lcdt beam npltc psetid
1.00000E-4 0 0 0 0
$# ioopt
0
*DATABASE_BINARY_INTFOR
$# dt lcdt beam npltc psetid
0.001 0 0 0 0
$# ioopt
0
*DATABASE_BINARY_RUNRSF
$# cycl nr beam npltc psetid
99999.0 0 0 0 0
*DATABASE_EXTENT_BINARY
$# neiph neips maxint strflg sigflg epsflg rltflg engflg
0 0 3 0 1 1 1 1
$# cmpflg ieverp beamip dcomp shge stssz n3thdt ialemat
0 0 0 1 1 1 2 1
$# nintsld pkp_sen sclp hydro msscl therm intout nodout
0 0 1.0 0 0 0
$# dtdt resplt neipb
0 1 0
*BOUNDARY_SPC_SET
$# nsid cid dofx dofy dofz dofrx dofry dofrz
7600202 0 1 1 1 1 1 1
*SET_NODE_LIST_TITLE
NODESET(SPC) 7600202
$# sid da1 da2 da3 da4 solver
7600202 0.0 0.0 0.0 0.0MECH
$# nid1 nid2 nid3 nid4 nid5 nid6 nid7 nid8
15953694 15953698 15953693 15953697 15953692 15953696 0 0
$
*CONTACT_AUTOMATIC_SURFACE_TO_SURFACE_MORTAR_ID
$# cid title
3Belts to SashBlocks
$# ssid msid sstyp mstyp sboxid mboxid spr mpr
9000007 7600201 3 2 0 0 0 0
$# fs fd dc vc vdc penchk bt dt
0.349999990.34999999 0.0 0.0 0.0 0 0.0 0.0
$# sfs sfm sst mst sfst sfmt fsf vsf
0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0
$# soft sofscl lcidab maxpar sbopt depth bsort frcfrq
1 0.0 0 0.0 0.0 0 0 0
$# penmax thkopt shlthk snlog isym i2d3d sldthk sldstf
0.0 0 0 0 0 0 0.0 0.0
$# igap ignodprfac/mpadtstif/mpar2 unused unused flangl cid_rcf
0 1 0.0 0.0 0.0 0
*SET_PART_LIST_TITLE
SET_PART_0000118101
$# sid da1 da2 da3 da4 solver
7600201 0.0 0.0 0.0 0.0MECH
$# pid1 pid2 pid3 pid4 pid5 pid6 pid7 pid8
7600251 0 0 0 0 0 0 0
*CONTACT_AUTOMATIC_SURFACE_TO_SURFACE_MORTAR_ID
$# cid title
4Belts to LapBlocks
$# ssid msid sstyp mstyp sboxid mboxid spr mpr
9000003 7600202 3 2 0 0 0 0
$# fs fd dc vc vdc penchk bt dt
0.349999990.34999999 0.0 0.0 0.0 0 0.0 0.0
$# sfs sfm sst mst sfst sfmt fsf vsf
0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0
$# soft sofscl lcidab maxpar sbopt depth bsort frcfrq
1 0.0 0 0.0 0.0 0 0 0
$# penmax thkopt shlthk snlog isym i2d3d sldthk sldstf
0.0 0 0 0 0 0 0.0 0.0
$# igap ignodprfac/mpadtstif/mpar2 unused unused flangl cid_rcf
0 1 0.0 0.0 0.0 0
*SET_PART_LIST_TITLE
SET_PART_0000118103
$# sid da1 da2 da3 da4 solver
7600202 0.0 0.0 0.0 0.0MECH
$# pid1 pid2 pid3 pid4 pid5 pid6 pid7 pid8
7600253 0 0 0 0 0 0 0
*CONTACT_AUTOMATIC_SURFACE_TO_SURFACE_MORTAR_ID
$# cid title
6
$# ssid msid sstyp mstyp sboxid mboxid spr mpr
7600253 7600214 3 2 0 0 1 1
$# fs fd dc vc vdc penchk bt dt
0.2 0.2 0.0 0.0 0.0 0 0.0 0.0
$# sfs sfm sst mst sfst sfmt fsf vsf
0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0
*SET_PART_LIST
$# sid da1 da2 da3 da4 solver
7600214 0.0 0.0 0.0 0.0MECH
$# pid1 pid2 pid3 pid4 pid5 pid6 pid7 pid8
7600214 7600220 7600243 0 0 0 0 0
*CONTACT_AUTOMATIC_SINGLE_SURFACE_MORTAR
$# cid title
$
$
$: Cross-reference summary for SET_PART 7600200
$:---------------------------------------------
$: CONTACT <No label>
$
$# ssid msid sstyp mstyp sboxid mboxid spr mpr
7600200 0 2 0 0 0 0 0
$# fs fd dc vc vdc penchk bt dt
0.2 0.1 0.001 0.0 0.0 0 0.0 0.0
$# sfs sfm sst mst sfst sfmt fsf vsf
0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0
$# soft sofscl lcidab maxpar sbopt depth bsort frcfrq
2 0.0 0 0.0 3.0 0 0 0
$# penmax thkopt shlthk snlog isym i2d3d sldthk sldstf
0.0 0 0 0 0 0 0.0 0.0
$# igap ignodprfac/mpadtstif/mpar2 unused unused flangl cid_rcf
0 1 0.0 0.0 0.0 0
$
$
$: Cross-reference summary for SET_PART 7600200
$:---------------------------------------------
$: CONTACT <No label>
$
*SET_PART_ADD
$# sid da1 da2 da3 da4 solver
7600200 0.0 0.0 0.0 0.0MECH
$ Seat
$# psid1 psid2 psid3 psid4 psid5 psid6 psid7 psid8
7600196 0 0 0 0 0 0 0
*PART
$# title
springs for implicit
$# pid secid mid eosid hgid grav adpopt tmid
1000 1000 1000 0 0 0 0 0
*SECTION_DISCRETE
$# secid dro kd v0 cl fd
1000 0 0.0 0.0 0.0 0.0
$# cdl tdl
0.0 0.0
*MAT_SPRING_ELASTIC
$# mid k
1000 0.01
*PART
$# title
springs for implicit
$# pid secid mid eosid hgid grav adpopt tmid
2000 2000 2000 0 0 0 0 0
*SECTION_DISCRETE
$# secid dro kd v0 cl fd
2000 0 0.0 0.0 0.0 0.0
$# cdl tdl
0.0 0.0
*MAT_SPRING_ELASTIC
$# mid k
2000 10000.00