- 积分
- 0
- 注册时间
- 2012-2-27
- 仿真币
-
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2012-5-16 09:55:23
|
显示全部楼层
来自 天津
本帖最后由 xiaaiyin 于 2012-5-16 11:10 编辑
htbbzzg 发表于 2012-5-16 09:03
不了解你的具体情况,很难发表什么看法。
不过,从你给出的几句命令来看,每一个新的 Time,你都对约束条件 ...
前辈您好,我建立了一个简单的模型,进行对比,发现这个D命令对结果是没有影响的。
将文件设置为test
finish
/clear
/title,connection
/prep7
/view,1,1,1,1 !设置所有窗口的视图方式
/nerr,0
!采用mm-MPA-N单位制度 !在MPA单位下,力为N,长度为mm,弹模为MPA,质量为t(吨),重力加速度!为9815
et,1,solid65 !定义钢材的单元为solid45
!钢梁H型钢腹板(材料1)
MP,EX,1,2.06e5
MP,PRXY,1,0.3
r,45
tb,bkin,1 !采用双线性随动强化,材料1
TBTEMP,0
tbdata,,270,2.06e4 !定义屈服强度和切向模量
!BLOCK, X1, X2, Y1, Y2, Z1, Z2
block,20,-20,50,-50,20,-20,
esizie,10
mshape,0,3d
mshkey,1
vatt,1,45,1 !材料7,单元类型2
vmesh,all
!!!!!!!!!!!求解!!!!!!!!!!!!!!!!
/solu
allsel
!lsclear,all !清空所有载荷
antype,static !静力分析
nlgeom,on !打开大变形选项
!lnsrch,on !打开线性搜索,与自适应下降互斥
neqit,10000 !每一子步中方程的迭代次数限值
cnvtol,f,,0.05,2,10 !力收敛准则设定
sstif,off
eqslv,pcg,1.0e-8,2.0 !使用预条件共轭梯度法,内存需求大,硬盘需求小
nropt,full,,on !采用完全的newton-raphson法,采用自适应下降
outpr,basic,all
outres,basic,all
autots,off !打开自动时间步,以利于采用较少资源获得有效解
kbc,0 !荷载设置为斜坡荷载
!将顶面的uz方向耦合在一起(耦合到边节点)
nsel,s,loc,y,50
cp,200,uz,all !耦合到1点
nsel,s,node,,1
cm,jiazaidian,node
!底面施加约束,形成一个铰
nsel,s,loc,y,-50
d,all,all,0
施加顶面面荷载
/psymb,adir,1 !查看面法线方向,press是指压力,以面的方向为正,
/pbc,all,,1
allsel
TIME,1
kbc=0
NSUBST,5
nsel,s,loc,y,50
sf,all,pres,50
alls
LSWRITE,1
solve
save
TIME,2
D,jiazaidian,uz,5
kbc=0
NSUBST,5
alls
LSWRITE,2
solve
save
TIME,3
D,jiazaidian,uz,-5
kbc=0
NSUBST,5
alls
LSWRITE,3
solve
save
TIME,4
D,jiazaidian,uz,10
kbc=0
NSUBST,5
alls
LSWRITE,4
solve
save
TIME,5
D,jiazaidian,uz,-10
kbc=0
NSUBST,5
alls
LSWRITE,5
solve
save
清楚刚才的结果,保存一些图片进行对比,仍然文件名为test
finish
/clear
/title,connection
/prep7
/view,1,1,1,1 !设置所有窗口的视图方式
/nerr,0
!采用mm-MPA-N单位制度 !在MPA单位下,力为N,长度为mm,弹模为MPA,质量为t(吨),重力加速度!为9815
et,1,solid65 !定义钢材的单元为solid45
!钢梁H型钢腹板(材料1)
MP,EX,1,2.06e5
MP,PRXY,1,0.3
r,45
tb,bkin,1 !采用双线性随动强化,材料1
TBTEMP,0
tbdata,,270,2.06e4 !定义屈服强度和切向模量
!BLOCK, X1, X2, Y1, Y2, Z1, Z2
block,20,-20,50,-50,20,-20,
esizie,10
mshape,0,3d
mshkey,1
vatt,1,45,1 !材料7,单元类型2
vmesh,all
!!!!!!!!!!!求解!!!!!!!!!!!!!!!!
/solu
allsel
!lsclear,all !清空所有载荷
antype,static !静力分析
nlgeom,on !打开大变形选项
!lnsrch,on !打开线性搜索,与自适应下降互斥
neqit,10000 !每一子步中方程的迭代次数限值
cnvtol,f,,0.05,2,10 !力收敛准则设定
sstif,off
eqslv,pcg,1.0e-8,2.0 !使用预条件共轭梯度法,内存需求大,硬盘需求小
nropt,full,,on !采用完全的newton-raphson法,采用自适应下降
outpr,basic,all
outres,basic,all
autots,off !打开自动时间步,以利于采用较少资源获得有效解
kbc,0 !荷载设置为斜坡荷载
rescontrol,,3,last
!将顶面的uz方向耦合在一起(耦合到边节点)
nsel,s,loc,y,50
cp,200,uz,all !耦合到1点
nsel,s,node,,1
cm,jiazaidian,node
!底面施加约束,形成一个铰
nsel,s,loc,y,-50
d,all,all,0
施加顶面面荷载
/psymb,adir,1 !查看面法线方向,press是指压力,以面的方向为正,
/pbc,all,,1
allsel
TIME,1
kbc=0
NSUBST,5
nsel,s,loc,y,50
sf,all,pres,50
alls
LSWRITE,1
solve
save
TIME,2
D,jiazaidian,uz,5
kbc=0
NSUBST,5
alls
LSWRITE,2
solve
save
TIME,3
D,jiazaidian,uz,-5
kbc=0
NSUBST,5
alls
LSWRITE,3
solve
save
finish
/clear
/filename,test
/solu
antype,,rest,3,last
TIME,4
D,jiazaidian,uz,10
kbc=0
NSUBST,5
alls
LSWRITE,4
solve
save
TIME,5
D,jiazaidian,uz,-10
kbc=0
NSUBST,5
alls
LSWRITE,5
solve
save
|
|