LS-DYNA 滑动接触问题
浏览:74019
LS-DYNA中模拟质点在平面上滑动,用的是shell163来模拟平面,采用自动点面接触,为什么接触不上呢?下面是命令流,请各位大虾们帮忙查看一下,非常感谢:
finish
/clear
/filnam,node-beam(dyna)
KEYW,PR_SET,1
KEYW,PR_STRUC,1
KEYW,LSDYNA,1
KEYW,PR_DYNA,1
/PREP7
!定义参数
L=25
B=1
V=27.78
!建立模型
mp,ex,1,2.87e9
mp,dens,1,2303
mp,prxy,1,0.2
ET,1,163
R,1,5/6,,0.25,0.25,0.25,0.25
ET,2,166
R,2,5750
K,1,0
K,2,0,L
K,3,B,L
K,4,B,0
A,1,2,3,4
REAL,1
TYPE,1
MAT,1
ESIZE,0.05
AMESH,ALL
NSEL,ALL
CM,SHELL_NODE,NODE
NSEL,NONE
N,100000,0.5*B,,0.001*B
REAL,2
TYPE,2
E,100000
CM,NODE_NODE,NODE
EDCGEN,ANTS,NODE_NODE,SHELL_NODE,0.2,0.02,0.01,0,0, , , , ,0,10000000,0,0
NSEL,S,LOC,Y,0
NSEL,R,LOC,Z,0
D,ALL,UZ,,,,,UX,UY
ALLSEL
NSEL,S,LOC,Y,L
D,ALL,UZ,,,,,UX
ALLSEL
*DIM,NG,,125
*VFILL,NG,RAMP,9.8
*DIM,VTIME,,125
*VFILE,VTIME,RAMP,0,L/V/125
*DIM,VV,,125
*VFILL,VV,RAMP,V
EDLOAD,ADD,VY,,NODE_NODE,VTIME,VV
EDLOAD,ADD,ACLZ,,NODE_NODE,VTIME,NG
/SOLU
TIME,L/V
edrst,30
edhtime,30
edenergy,1,1,1,1
finish
/solu
edwrite,lsdyna,'NODE_SHELL','k'
finish
/clear
/filnam,node-beam(dyna)
KEYW,PR_SET,1
KEYW,PR_STRUC,1
KEYW,LSDYNA,1
KEYW,PR_DYNA,1
/PREP7
!定义参数
L=25
B=1
V=27.78
!建立模型
mp,ex,1,2.87e9
mp,dens,1,2303
mp,prxy,1,0.2
ET,1,163
R,1,5/6,,0.25,0.25,0.25,0.25
ET,2,166
R,2,5750
K,1,0
K,2,0,L
K,3,B,L
K,4,B,0
A,1,2,3,4
REAL,1
TYPE,1
MAT,1
ESIZE,0.05
AMESH,ALL
NSEL,ALL
CM,SHELL_NODE,NODE
NSEL,NONE
N,100000,0.5*B,,0.001*B
REAL,2
TYPE,2
E,100000
CM,NODE_NODE,NODE
EDCGEN,ANTS,NODE_NODE,SHELL_NODE,0.2,0.02,0.01,0,0, , , , ,0,10000000,0,0
NSEL,S,LOC,Y,0
NSEL,R,LOC,Z,0
D,ALL,UZ,,,,,UX,UY
ALLSEL
NSEL,S,LOC,Y,L
D,ALL,UZ,,,,,UX
ALLSEL
*DIM,NG,,125
*VFILL,NG,RAMP,9.8
*DIM,VTIME,,125
*VFILE,VTIME,RAMP,0,L/V/125
*DIM,VV,,125
*VFILL,VV,RAMP,V
EDLOAD,ADD,VY,,NODE_NODE,VTIME,VV
EDLOAD,ADD,ACLZ,,NODE_NODE,VTIME,NG
/SOLU
TIME,L/V
edrst,30
edhtime,30
edenergy,1,1,1,1
finish
/solu
edwrite,lsdyna,'NODE_SHELL','k'