lsdyna中如何定义弹性体绕质心的转动实例Word文件下载.docx

1、MP,EX,1,117e9 MP,NUXY,1,0.362 TB,BISO,1, TBDAT,1,134e6 TBDAT,2,13.4e6 定义工作辊辊身材料模型MP,DENS,2,785000 MP,EX,2,210e9 MP,NUXY,2,0.3 定义支撑辊辊身材料模型*CSET,1,2, 2,3, MPCOPY, ,2,3TBCOPY,ALL,2,3 定义工作辊辊径材料模型EDMP,RIGI,4,7,4 MP,DENS,4,785000 MP,EX,4,210e9 MP,NUXY,4,0.3 定义支撑辊辊径材料模型*CSET,1,2, 4,5, MPCOPY, ,4,5TBCOPY,AL

2、L,4,5 建立轧件材料模型BLOCK,-0.10,-0.60,0.019,0.6, 创建关键点K, ,0.39376,-0.001, K, ,0.39376,0.79, K, ,0.77376,0.79, K, ,0.77376,-0.001, K, ,1.53376,-0.001, K, ,1.53376,0.79, K, ,2.29376,0.79, K, ,2.29376,-0 .001, K, ,0.39376,0.89, K, ,0.62376,0.89, K, ,0.62376,0.79, K, ,1.53376,0.89, K, ,1.99376,0.89, K, ,1.993

3、76,0.79,创建面A,16,15,14,13 A,22,21,20,14A,12,11,10,9A,19,18,17,10面旋转生成体VROTAT,7,8 , , , , ,13,20 ,360, , VROTAT,9,10 , , , , ,9,17 ,360, , 选择体（工作辊）VSEL,S, , ,10,17 在选择的体下体编辑ALLSEL,BELOW,VOLU 对体进行GLUEVGLUE,10,11,12,13,14,15,16,17对面进行ADDAADD,55,74 AADD,63,76 AADD,70,78 AADD,47,71 对线进行ADDLCOMB,70,98 ,0 L

4、COMB,80,99 ,0 LCOMB,90,100 ,0 LCOMB,28,97 ,0 选择所有ALLSEL,ALL 选择体（支撑辊）VSEL,S, , ,2,9, ALLSEL,BELOW,VOLUVGLUE,2,3,4,5,6,7,8,9 AADD,25,66 AADD,33,74 AADD,40,78 AADD,17,52 LCOMB,36,102 ,0 LCOMB,46,103 ,0LCOMB,56,104 ,0LCOMB,20,101 ,0给体定义单元属性（轧件）CM,_Y,VOLU VSEL, , , , 1 CM,_Y1,VOLU CMSEL,S,_Y CMSEL,S,_Y1

5、VATT, 1, , 1, 0 CMDELE,_Y CMDELE,_Y1 给体定义单元属性（工作辊辊身）FLST,5,4,6,ORDE,2 FITEM,5,18 FITEM,5,-21 VSEL, , , ,P51X VATT, 2, , 1, 0 给体定义单元属性（支撑辊辊身）FLST,5,4,6,ORDE,4 FITEM,5,10 FITEM,5,12 FITEM,5,14 FITEM,5,16 VATT, 3, , 1, 0 给体定义单元属性（工作辊辊径）FITEM,5,11 FITEM,5,13 FITEM,5,15 FITEM,5,17 VATT, 4, , 1, 0 给体定义单元属

6、性（支撑辊辊径）FITEM,5,3 FITEM,5,5 FITEM,5,7 FITEM,5,9 VATT, 5, , 1, 0 定义单元尺寸LESIZE,9, , ,20, , , , ,1 LESIZE,10, , ,20, , , , ,1 LESIZE,11, , ,20, , , , ,1LESIZE,12, , ,20, , , , ,1LESIZE,13, , ,20, , , , ,1LESIZE,15, , ,20, , , , ,1LESIZE,21, , ,20, , , , ,1LESIZE,23, , ,20, , , , ,1LESIZE,29, , ,20, , ,

7、 , ,1LESIZE,39, , ,20, , , , ,1LESIZE,49, , ,20, , , , ,1LESIZE,63, , ,20, , , , ,1LESIZE,73, , ,20, , , , ,1LESIZE,83, , ,20, , , , ,1LESIZE,17, , ,1, , , , ,1LESIZE,19, , ,1, , , , ,1 LESIZE,25, , ,1, , , , ,1 LESIZE,27, , ,1, , , , ,1 LESIZE,34, , ,1, , , , ,1 LESIZE,44, , ,1, , , , ,1 LESIZE,54,

8、 , ,1, , , , ,1 LESIZE,68, , ,1, , , , ,1 LESIZE,78, , ,1, , , , ,1 LESIZE,88, , ,1, , , , ,1 LESIZE,2,0.01, , , , , , ,1 LESIZE,1, , ,4, , , , ,1 用MESH 划分轧件VMESH,1 LESIZE,24, , ,10, , , , ,1 LESIZE,65, , ,10, , , , ,1 LESIZE,75, , ,10, , , , ,1 LESIZE,85, , ,10, , , , ,1 LESIZE,66,0.019, , , , , ,

9、,1 LESIZE,76,0.019, , , , , , ,1 LESIZE,86,0.019, , , , , , ,1 LESIZE,93,0.019, , , , , , ,1 用VSWEEP划分工作辊辊身VSWEEP,18VSWEEP,19VSWEEP,20VSWEEP,21选择智能控制SMRT,6 用VSWEEP划分工作辊辊径VSWEEP,11VSWEEP,13VSWEEP,15VSWEEP,17关闭智能控制SMRT,OFF LESIZE,32,0.019*1.9, , , , , , ,1 LESIZE,42,0.019*1.9, , , , , , ,1 LESIZE,52,0

10、.019*1.9, , , , , , ,1 LESIZE,59,0.019*1.9, , , , , , ,1 LESIZE,16, , ,15, , , , ,1 LESIZE,31, , ,15, , , , ,1 LESIZE,41, , ,15, , , , ,1 LESIZE,51, , ,15, , , , ,1 用VSWEEP划分支撑辊辊身VSWEEP,10VSWEEP,12VSWEEP,14VSWEEP,16用SWEEP划分支撑辊辊径VSWEEP,3VSWEEP,5VSWEEP,7VSWEEP,9生成PARTEDPART,CREATE 定义接触EDCGEN,ASTS, 1,

11、2,0.35,0.25,0,0,0, , , , ,0,10000000,0,0 EDCGEN,ASTS, 2, 4,0.35,0.25,0,0,0, , , , ,0,10000000,0,0 选择体（轧件）VSEL,S, , , 1 选择体中的节点NSLV,S,1 创建ComponentCM,SHEET,NODE 选择Y0的节点NSEL,R,LOC,Y,0 定义约束D,ALL, ,0, , , ,UY, , , , , 选择全部选择Z0的节点NSEL,R,LOC,Z,0 D,ALL,UZ ,0选择全部 选择Z-0.001的节点NSEL,R,LOC,Z,-0.001 D,ALL, UZ,0

12、定义初速度EDVE,VELO,SHEET,1.5,0,0,0,0,0, , , , , , 定义时间变量*DIM,TIME,ARRAY,2,1,1, , , 定义速度变量*DIM,VELOCITY,ARRAY,2,1,1, , ,赋值时间变量*SET,TIME（2,1,1） , 10 赋值速度变量*SET,VELOCITY（1,1,1） , 4.21 *SET,VELOCITY（2,1,1） , 4.21 施加荷载EDLOAD,ADD,RBOZ,0, 3,TIME,VELOCITY, 0, , , , , 进入SOLUTIONFINISH /SOL定义输出内存EDSTART,0,8500000

13、0,7, 定义能量模式EDENERGY,1,1,1,1 定义结束时间TIME,0.4, 定义输出格式EDOPT,ADD,blank,BOTH 定义.RST文件输出步数EDRST,20, 定义.HST文件输出步数EDHTIME,100, 输出ASCII文件EDOUT,RCFORC 保存SAVE 求解SOLVE 设置显示比例/DSCALE,1,1.0 进入POST1/POST1 设置观察步数SET,LAST 显示应变分布情况PLNSOL, EPTO,EQV, 0,1.0显示动画过程PLNS,S,EQV ANDATA,0.5, ,0,0,0,1,0,1退出ANSYS/REPLOT /EXIT,NOSAV