VibInfo 发表于 2005-10-20 08:25

[分享]LS-DYNA实例

<DIV >/PREP7 <BR>/INPUT,'MIDCUBE','INP','D:\Program Files\ansysfile\',, 0 <BR>/REPLOT,RESIZE <BR>ESEL,S,ENAME,,164 <BR>NSLE,S <BR>CM,ncube,NODE <BR>FINISH <BR>/SOL <BR>!* <BR>EDVE,VELO,NCUBE,0,0,-1000,0,0,0, , , , , , <BR>NSEL,S,LOC,Z,2 <BR>CM,ncont,NODE <BR>NSEL,S,LOC,Z,0 <BR>CM,ntarg,NODE <BR>FINISH <BR>/PREP7 <BR>!* <BR>EDCGEN,NTS,NCONT,NTARG,0,0,0,0,0, , , , ,0,10000000 <BR>EDCONTACT,0.1,0,2,0,1,1,1,4,0 <BR>EDSP,OFF,' ',' ',1, <BR>!* <BR>ALLSEL,ALL <BR>ALLSEL,ALL <BR>SAVE <BR>FINISH <BR>/SOL <BR>/STATUS,SOLU <BR>SOLVE <BR>FINISH <BR>/POST1 <BR>SET,LAST <BR>SET,LAST <BR>!* <BR>PLDI, , <BR>ANDATA,0.5, ,0,1,21,1,0,0 <BR>!* <BR>SAVE,zhuangji,,D:\PROGRA~1\ANSYSF~1\ <BR>SAVE <BR>/EFACE,1 <BR>AVPRIN,0, , <BR>!* <BR>PLNSOL,S,EQV,0,1 <BR>/EFACE,1 <BR>AVPRIN,0, , <BR>!* <BR>PLNSOL,S,EQV,1,1 <BR>AVPRIN,0, , <BR>!* <BR>PLESOL,S,EQV,0,1 <BR>!* <BR>PLNS,S,EQV <BR>ANMODE,10,0.5, ,0 <BR>!* <BR>SAVE</DIV><!-- / message -->

mzj5000 发表于 2010-5-24 21:14

meiwenjian

maizi19880109 发表于 2012-7-9 15:08

啥乱七八糟的东西啊
页: [1]
查看完整版本: [分享]LS-DYNA实例