xiaobai234 发表于 2010-1-4 21:41

分步加载接触滑动问题

大家好,我刚开始接触ansys,最近遇到一个问题,要解决一滑块沿轨道滑动的问题,具体如下,非常感谢大家,我第一次在论坛发帖,希望大家指导下,谢谢!模型如图所示:上下为导轨,中间为滑块,导轨固定,目的是施加力使滑块在导轨上沿着x方向移动,本人用的是分步施加力的方法,力是一条曲线,请问怎么实现这个目的?
我试着做的时候,总出现约束不足,或者不收敛的情况,请各位指导下,非常感谢~~
最好可以给出命令流,谢谢!
以下是我做的部分命令流,但是加载步不知哪里不正确,得不到我想要的结果,希望大家给予指正!
建立上述模型的命令流为,
finish
/clear
/filname,armature,1
/title,3D model
/SHOW
/PREP7

ET,1,SOLID45

MP,MURX,1,1.000022
MP,RSVX,1,2.9e-8
MP,EX,1,6.8e8
MP,NUXY,1,0.3
MP,MU,1,0.2

MP,MURX,2,0.99990
MP,RSVX,2,1.7e-8
MP,EX,2,1.25e11
MP,NUXY,2,0.3
MP,MU,2,0.2

k,1,0,0,-10
K,2,0,15,-10
K,3,40,15,-10
K,4,40,0,-10

L,1,2 !2
L,2,3 !3
L,3,4 !4
L,4,1 !5

AL,all
arsym,y,1
aadd,1,2

k,100,1000,15,-10
k,101,1000,25,-10
k,102,0,25,-10
k,103,0,15,-10
a,100,101,102,103
arsym,y,1

MAT,1
VEXT,3,,,0,0,30

MAT,2
VEXT,1,,,0,0,030
VEXT,2,,,0,0,30

aadd,8,9

ESIZE,7,0,

MSHAPE,0,3D
MSHKEY,1

TYPE,1

MAT,2
VMESH,2
VMESH,3

ESIZE,5,0,

MSHAPE,0,3D
MSHKEY,1

ESIZE,5,0,

MSHAPE,0,3D
MSHKEY,1

TYPE,1

MAT,1
VSWEEP,1


施加分步加载荷的命令流为:
finish
/solu
TIMINT,ON,ALL
TIME,1
AUTO,ON

NSUBST,10,
OUTRES,ALL,ALL
SFA,21,1,PRES,1000

KBC,1

ALLSEL,ALL

LSWRITE,1,

TIMINT,ON
TIME,1.5
AUTO,ON
NSUBST,10,
OUTRES,ALL,ALL
SFA,21,1,PRES,1000,

KBC,1
ALLSEL,ALL
LSWRITE,2



LSSOLVE,1,2,1
SAVE

xiaobai234 发表于 2010-1-5 21:21

高手给我指导下吧~~非常感谢!
页: [1]
查看完整版本: 分步加载接触滑动问题