马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
您需要 登录 才可以下载或查看，没有账号？我要加入
x
!!!!!!!!!!矿石重量4617.2*2kg
!矿石速度 8.3m/s
!缓冲垫刚度6e6 N/m
!矿石沿车厢长度方向位置坐标aaa=3
fini
/clear
/filnam,zhxqch
RESUME, chexiang,db
high=0.02 !矿石距离底板高度
aaa=3 !矿石沿车厢长度方向位置坐标
bbb=0 !矿石沿车厢 宽度方向位置坐标
rrr=0.9 !圆柱体半径
/prep7
asel,s,loc,y,0
nsla,s,1
nsel,r,loc,x,aaa-2,aaa+2
esln,s,1
EMODIF, all,mat,3
nsel,s,loc,x,aaa-2,aaa+2
esln,s,1
ESEL,u,MAT,,3
EMODIF, all,mat,1
alls
Csys,0
Wpcsys,-1
Wprot,-11.47
K,20000,aaa+0 , high+0,bbb
K,20001,aaa+0.2 , high+0,bbb
K,20002,aaa+0.2 , high+0.3,bbb
K,20003,aaa+rrr , high+0.3,bbb
K,20004,aaa+rrr, high+1.4,bbb
K,20005,aaa+0 , high+1.4,bbb
lsel,none
lstr,20000,20001
lstr,20001,20002
lstr,20002,20003
lstr,20003,20004
lstr,20004,20005
lstr,20005,20000
LFILLT,43,89,0.2
Al,all
type,2
mat,2
VROTAT,62,,,, , ,20000,20005,360
esize,0.2
SMRTSIZE,8
asel,s,,,106
asel,a,,,72
asel,a,,,97
asel,a,,,82
lsla,s,1
LESIZE,all,0.02
alls
vmesh,all
ALLSEL,BELOW,VOLU
CM,n_BLOCK,NODE
CM,E_BLOCK,Elem
CSWPLA,11,0,1,1
NROTAT,all
d,all,ux
d,all,uz
alls
csys,0
kgen,2,20004,,,,0.5
kgen,2,351,,,,0.5
kgen,2,573,,,,0.5
kgen,2,577,,,,0.5
lsel,none
lstr,578,20004
lstr,351,579
lstr,573,580
lstr,577,581
ET,8,14
R,13,1e-3
TYPE,8
REAL,13
MAT,3
lesize,all,,,1
lmesh,all
dk,578,all
dk,581,all
dk,579,all
dk,580,all
alls
R,14,6e6 !缓冲垫刚度6e6*10
real,14
n, 133880, -0.278629239911, -1, -1.47260060709
n, 133890, -0.278629239911, -1, -1.12431044604
n, 133920, -0.278629239911, -1, 1.12431044604
n, 133940, -0.278629239911, -1, 1.47260060709
n, 134030, 0.525579015657, -1, -1.06909017738
n, 134080, 1.32804126914, -1, -1.01398979644
n, 134130, 2.13050352262, -1, -0.958889415508
n, 134180, 2.93296577610, -1, -0.903789034574
n, 134270, 0.525579015657, -1, 1.06909017738
n, 134320, 1.32804126914, -1, 1.01398979644
n, 134370, 2.13050352262, -1, 0.958889415508
n, 134420, 2.93296577610 , -1, 0.903789034574
n, 134500, 2.96982595555, -1, 1.24954822308
n, 134550, 2.15612422209, -1, 1.30542035325
n, 134600, 1.34242248863, -1, 1.36129248341
n, 134650, 0.528720755164, -1, 1.41716461358
n, 134760, 2.96982595555, -1, -1.24954822308
n, 134810, 2.15612422209, -1, -1.30542035325
n, 134860, 1.34242248863, -1, -1.36129248341
n, 134910, 0.528720755164, -1, -1.41716461358
e, 133880, 13388
e, 133890, 13389
e, 133920, 13392
e, 133940, 13394
e, 134030, 13403
e, 134080, 13408
e, 134130, 13413
e, 134180, 13418
e, 134270, 13427
e, 134320, 13432
e, 134370,13437
e, 134420, 13442
e, 134500, 13450
e, 134550,13455
e, 134600, 13460
e, 134650,13465
e, 134760, 13476
e, 134810, 13481
e, 134860,13486
e, 134910, 13491
alls
nsel,s,,,130000,160000,1
d,all,all
alls
ksel,s,,,116,119
ksel,a,,,786,789
kgen,2,all,,,,-.5
lsel,none
lstr,116,582
lstr,117,583
lstr,118,584
lstr,119,585
lstr,587,786
lstr,588,787
lstr,589,788
lstr,590,789
R,15,20e6 !支点刚度 ----2e7
real,15
lesize,all,,,1
lmesh,all
dk,all,ux
dk,all,uz
dk,582,uy
dk,583,uy
dk,584,uy
dk,585,uy
dk,587,uy
dk,588,uy
dk,589,uy
dk,590,uy
alls
ET,4,TARGE170
ET,5,CONTA175
r,10,1e8
r,11,1e8
asel,s,loc,y,0
nsla,s,1
nsel,r,loc,x,aaa-0.8,aaa+0.8
nsel,r,loc,z,bbb-0.8,bbb+0.8
REAL,10
TYPE,4
ESURF
alls
asel,s,,,106
asel,a,,,72
asel,a,,,97
asel,a,,,82
nsla,s,1
REAL,10
TYPE,5
ESURF
ALLS
csys,0
FINI
/solu
Nsel,s,loc, z,0
D,all,uz
CMSEL,s,n_BLOCK,node
ACEL, ,9.8
d,all,ux
d,all,uz
ic,all,uy,,-9.3
alls
antype,TRANS
neqit,100
lnsrch,on
nlgeom,on
TIME,0.028
autot,on
nsubst,80,100,50
kbc,1
outres,basic,all
!CNVTOL,F,1,1e-1
solve
save
fini
/POST1
!PLNSOL, U,SUM, 0,1.0
fini
/post26
NSOL,2,16684,U,y,DISPY
DERIV,3,2,1
DERIV,4,3,1
NSOL,5,15582,U,y,combin_zhidian !支点弹簧
NSOL,6,13418,U,y,combin_huanch !缓冲垫
NSOL,7,9,U,y,DISPY !撞击点
PLVAR,2
save
在ansys运行的时候，老是出现空间不够的提示。我想把节点减少，网格划大点不知道怎么画？ |
发表于 2009-11-22 10:02
提升卡
变色卡
显身卡