- 积分
- 0
- 注册时间
- 2010-6-11
- 仿真币
-
- 最后登录
- 1970-1-1
|
求助!关于节点位移后处理的问题
因为论文需要,最近摸索着学习ANSYS/LS-DYNA,在计算一个柔性网发射时,通过POST26发现明明节点1的位移已经很远了(图1),可是在POST1中的动画显示中却无法表现出来(图2),图2中各点的距离非常小,只有厘米级,恳请明白人指点一下,非常感谢。以下是我的APDL命令,有些参数是假设的,也恳请大家帮忙看看。
FINISH
/CLEAR
/COM, Structural with LS-DYNA Explicit
/PREP7 !进入前处理
!(1)定义单元属性 材料
ET,1,Link167 !定义单元类型1,Link167绳索单元
R,1,1e-6,-20 !定义实常数,横截面积为1e-6平方米,偏置量为-20米
EDMP,CABLE,1 !定义材料1
MP,DENS,1,1e3 !定义材料密度 单位kg/m3
MP,EX,1,1e7 !选取材料模型为Cable,定义弹性模量一千万 单位Pa
MP,NUXY,1,0.3 !定义泊松比为0.3 无量纲
ET,2,Mass166 !定义单元类型2,Mass166质点质量单元
KEYOPT,2,1,0 !定义单元2的主要选项设置
R,2,1 !定义Mass的质量 1千克
EDMP,RIGID,2 !定义材料2
MP,DENS,2,7850 !定义材料密度 单位kg/m3
MP,EX,2,2e11 !定义弹性模量 单位Pa
MP,NUXY,2,0.3 !定义泊松比为0.3 无量纲
!(2)计算节点坐标值并定义节点
*SET,MinL,0.1 !定义最小长度
*SET,m,5 !定义m*m节点,一定为单数
*SET,lx,MinL/m !定义坐标宽度
*SET,InitXY,-MinL*(m-1)/2/m !定义起始坐标
*DO,i,1,m !循环定义m*m个节点,行距lx,
*DO,j,m*(i-1)+1,m*i
N,j,(j-1-m*(i-1))*lx+InitXY,(i-1)*lx+InitXY,0
*ENDDO
*ENDDO
N,m*m+1,0,0,-0.01
!(3)定义单元连接
TYPE,1 !定义网面单元类型为1 Link167
MAT,1 !定义材料为1 Cable
REAL,1 !定义实常数为1
!循环连接各点构成网体
*DO,j,1,(m-1)*m !循环连接各列
E,j,j+m
*ENDDO
*DO,i,1,m !循环连接各行
*DO,j,(i-1)*m+1,i*m-1
E,j,j+1
*ENDDO
*ENDDO
!连接网体与发射点的绳
E,(m*m+1)/2,m*m+1
TYPE,2 !定义重物单元类型为2 mass166
MAT,2 !定义材料为2 刚体
REAL,2 !定义实常数为2
E,1
E,m
E,m*m
E,m*(m-1)+1
!(4)保存模型文件
SAVE,MODE,DB,,ALL
FINISH
!(5)添加约束 初速度
/SOLU !进入求解器设置
EDVE,VELO,1,0,0,10,0,0,0, , , , , ,!为四个重物设置出速度,(0,0,10)m/s
EDVE,VELO,m,0,0,10,0,0,0, , , , , ,!为四个重物设置出速度,(0,0,10)m/s
EDVE,VELO,m*m,0,0,10,0,0,0, , , , , ,!为四个重物设置出速度,(0,0,10)m/s
EDVE,VELO,m*(m-1)+1,0,0,10,0,0,0, , , , , ,!为四个重物设置出速度,(0,0,10)m/s
FLST,2,1,1,ORDE,1!2为下一条命令的条件,1为选择目标类型(节点),1为选择个数,1为下面有几个命令
FITEM,2,m*m+1 !2?好像就是和上面一样,1为节点号
/GO !执行
D,P51X, , , , , ,UX,UY,UZ, , ,!按照上面的选择,约束节点1 的XYZ方向的位移
TIME,40, !时间长度,单位s
EDCTS,-0.00001,0.9, !时间步长,因子
SOLVE !求解
FINISH |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?注册
×
|