想让一个点推着一个beam弯曲,可是结果显示根本没有接触。求指导!
FINISH ! Make sure we are at BEGIN level
/CLEAR,NOSTART ! Clear model since no SAVE found
/PREP7 !********************************************
!* -------Element
ET,1,BEAM188
!* -------Material
Mp,ex,1,30e6
mp,PRXY,1,0.3
!* -------Section
SECTYPE, 1, BEAM, CTUBE, Bar, 0
SECOFFSET, CENT
SECDATA,8.472,8.866,16,0,0,0,0,0,0,0,0,0
!* -------Model
K,101,8.268,0,0
K,102,418.716,0,0
LSTR,101,102
!* -------Mesh
alls
LESIZE,all, , ,10, , , , ,1
LATT,all, 1,1, , , ,1
LMESH, all
!* -------Contact
ET,2,169
KEYOPT,2,1
KEYOPT,2,4,11
ET,3,172
KEYOPT,3,12,0 !0 standard, 5 bond
KEYOPT,3,4,1 !0 gauss point, 1 nodal point
KEYOPT,3,2,0 !0 larglange, 2 mpc
K,221,383.324,-0.01,0
! Generate the contact surface
MAT,1
R,221
REAL,221
TYPE,2
KMESH,221
LSEL,S,,,all
TYPE,3
NSLL,S,1
ESLN,S,0
ESURF,,bottom
FINISH
/SOL !********************************************
!* -------Setting
ANTYPE,0
NLGEOM,1
NSUBST,10,100,10
OUTRES,ERASE
OUTRES,ALL,-10
!* -------BC & Loading
alls
!DK on Both and contact
DK,101,,,,0,all
DK,221,,0,,0,ux
DK,221,,0,,0,rotz
DK,221,,4.2287,,0,uy
alls
SOLVE
FINISH
save
PARSAV
/POST1 !********************************************
pldisp,2
!*
|