AaronSpark 发表于 2006-4-22 08:05

[转帖]Ansys排水管道计算

埋设在地下的排水管道
rpc管道混凝土管道用solid45单元模拟,link8模拟纵向钢筋和箍筋,直接建立单元,采用复制的方式直接生成实体。让link单元和solid单元共用节点,(nummrg和numcmp命令)这样就省去了耦合和添加约束方程,预应力采用施加初始应变的方式。约束采用简直方式。计算以后在支座处有比较名显的应力集中现象。/prep7
et,1,solid45
mp,ex,1,4.5e10
mp,prxy,1,0.25
et,2,link8
mp,ex,2,2.0e11
mp,prxy,2,0.3
R,1,137.4e-6, ,
csys,1
n,1,0.52
n,2,0.56
n,3,0.6
NGEN,2,3,1,3,1,0,18,0,1,
NGEN,2,6,1,6,1,0,0,0.05,1,
type,1
mat,1
e,1,2,5,4,7,8,11,10
e,2,3,6,5,8,9,12,11
eplot
egen,20,12,1,2,1,,,,,,,18,,
nummrg,all
numcmp,all
egen,100,120,1,40,1,,,,,,,,0.05
nummrg,all
numcmp,all
type,2
mat,2

*dim,nOne,array,21
*do,i,1,16
*do,j,1,21
nsel,s,loc,x,0.56
nsel,r,loc,z,0.25+0.3*(i-1)
nsel,r,loc,y,18*(j-1)
*get,nOne(j),node,,num,max
*enddo
*do,j,1,20
e,nOne(j),nOne(j+1)
*enddo
*enddo

*dim,nTwo,array,101
*do,i,1,10
*do,j,1,101
nsel,s,loc,x,0.56
nsel,r,loc,y,36*(i-1)
nsel,r,loc,z,0.05*(j-1)
*get,nTwo(j),node,,num,max
*enddo
*do,j,1,100
e,nTwo(j),nTwo(j+1)
*enddo
*enddo

alls
nummrg,all
numcmp,all
ESEL,S,TYPE,,2
BFE,all,TEMP,1,-375, , ,
/view,1,1,1,1
/replot
save
页: [1]
查看完整版本: [转帖]Ansys排水管道计算