📄 e8.27.txt
字号:
!------------------------------------------------------
!EX8.27 钢筋混凝土简支梁数值分析
!整体式模型,打开压碎,keyopt(1)=0,keyopt(7)=1
!力加载,位移收敛准则,误差1.5%,1/4模型分析
!--------------------------------------------
finish
/clear
/config,nres,2000
/prep7
!1.定义单元与材料性质--------------------
et,1,solid65,,,,,,,1
mp,ex,1,13585
mp,prxy,1,0.2
mp,ex,2,2.0e5
mp,prxy,2,0.3
fc=14.3
ft=1.43
tb,concr,1
tbdata,,0.5,0.95,ft,fc
tb,miso,1,,11
tbpt,,0.0002,fc*0.19
tbpt,,0.0004,fc*0.36
tbpt,,0.0006,fc*0.51
tbpt,,0.0008,fc*0.64
tbpt,,0.001,fc*0.75
tbpt,,0.0012,fc*0.84
tbpt,,0.0014,fc*0.91
tbpt,,0.0016,fc*0.96
tbpt,,0.0018,fc*0.99
tbpt,,0.002,fc
tbpt,,0.0033,fc*0.85
tb,biso,2
tbdata,,300,0
pi=acos(-1)
v1=0.25*pi*22*22*1.5/(75*60)
v2=0.25*pi*10*10/(75*60)
v3=0.25*pi*10*10*9.5/(1000*75)
v4=0.25*pi*10*10*9.5/(1000*60)
r,1,2,v1,0,90,2,v4
rmore,0,0,2,v3,90,0
r,2,2,v2,0,90,2,v4
rmore,0,0,2,v3,90,0
r,3,2,v3,90,0
!2.创建几何模型
blc4,,,150/2,300,2000/2
wprota,,-90
wpoff,,,60
vsbw,all
wpoff,,,180
vsbw,all
wpcsys,-1
wpoff,,,50
vsbw,all
wpoff,,,850
vsbw,all
wpcsys,-1
!3.定义属性划分网格
elemsiz=50
vsel,s,loc,y,0,60
vatt,1,1,1
vsel,s,loc,y,240,300
vatt,1,2,1
vsel,s,loc,y,60,240
vatt,1,3,1
vsel,all
mshkey,1
esize,elemsiz
vmesh,all
!device,vector,on
!/eshape,1
!eplot
!4.施加荷载和约束
lsel,s,loc,y,0
lsel,r,loc,z,900
dl,all,,uy
asel,s,loc,z,0
da,all,symm
asel,s,loc,x,75
da,all,symm
!-----------------
p0=180000
q0=p0/150/100
asel,s,loc,z,0,50
asel,r,loc,y,300
sfa,all,1,pres,q0
allsel,all
!5.求解控制设置
/solu
antype,0
nsubst,50
outres,all,all
autos,on
neqit,50
cnvtol,u,,0.015
solve
!6.进入POST1查看结果
/post1
set,last
pldisp,1
etable,reb1,smisc,2
pletab,reb1
/device,vector,on
plcrack
!7.进入时程后处理
/post26
nsol,2,69,u,y
prod,3,2,,,,,,-1
prod,4,1,,,,,,p0/1000
xvar,3
plvar,4
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -