FINISH
/CLEAR,START
KEYW,PR_STRUC,1
KEYW,LSDYNA,1
/PREP7
ET,1,SOLID164
TYPE,1
MAT,1
MP,ex,1,206e9
MP,nuxy,1,.3
MP,dens,1,7900
EDMP,rigid,1,7,7
K,1,0,575,0
K,2,0,575,220
K,3,0,355,220
K,4,0,355,180
K,5,0,400,0
A,1,2,3,4,5
K,6,0,0,0
K,7,0,0,50
VROTAT,1,,,,,,6,7
LESIZE,36,,,100,,,,,1
LESIZE,11,,,100,,,,,1
LESIZE,21,,,100,,,,,1
LESIZE,31,,,100,,,,,1
LESIZE,4,,,20,,,,,1
LESIZE,29,,,20,,,,,1
LESIZE,19,,,20,,,,,1
LESIZE,9,,,20,,,,,1
LESIZE,3,,,5,,,,,1
LESIZE,28,,,5,,,,,1
LESIZE,18,,,5,,,,,1
LESIZE,8,,,5,,,,,1
LESIZE,2,,,20,,,,,1
LESIZE,7,,,20,,,,,1
LESIZE,17,,,20,,,,,1
LESIZE,27,,,20,,,,,1
VSWEEP,ALL
ET,2,SOLID164
TYPE,2!
MAT,2!
MP,ex,2,206e9!
MP,nuxy,2,.30!
MP,dens,2,7900!
TB,PLAW,2,,,8!
TBDATA,1,207e6!
TBDATA,3,.75!
TBDATA,4,40.0!
TBDATA,5,5.0!
TBDATA,6,1!
*DIM,TruStran,,5!
*DIM,TruStres,,5!
TruStran(1)=0,.08,.16,.4,.75!
TruStres(1)=207e6,250e6,275e6,290e6,300e6!
EDCURVE,ADD,1,TruStran (1),TruStres(1)!
CYL4,0,0,390,,370,,-500
LESIZE,41,,,100,,,,,2
LESIZE,42,,,100,,,,,2
LESIZE,43,,,100,,,,,2
LESIZE,44,,,100,,,,,2
LESIZE,45,,,100,,,,,2
LESIZE,46,,,100,,,,,2
LESIZE,47,,,100,,,,,2
LESIZE,48,,,100,,,,,2
LESIZE,57,,,60,,,,,2
LESIZE,58,,,60,,,,,2
VSWEEP,5
ALLSEL,ALL
EDPART,CREATE
EDCGEN,ASTS,2,1,0.3,0.2,0,0,0,,,,,0,10000000
FINISH
/SOL
ESEL,S,MAT,,2
NSLE,S
CM,GG,NODE
EDVE,VELO,GG,0,0,300,0,0,0,,,,,,
*DIM,TIME,ARRAY,2,1,1,,,
*SET,TIME(2,1,1),1
*DIM,DISP,ARRAY,2,1,1,,,
*SET,DISP(1,1,1),0
*SET,DISP(2,1,1),300
NSEL,S,LOC,Z,-500
CM,ZH,NODE
EDLOAD,ADD,UZ,0,ZH,TIME,DISP,0,,,,,
TIME,1
EDRST,50
EDHTIME,10000
EDENERGY,1,1,1,1
SOLVE
这是我做的模型,哪里不对?我对钢管所有节点施加了一个初速度,选取了钢管尾部端面的所有节点施加时间—位移载荷。请大侠指点。 |