6盾构管片三维计算命令流-径向弹簧-不用循环语句加载耦合----重合节点模拟纵向螺栓 (1).docx
- 文档编号:159165
- 上传时间:2022-10-04
- 格式:DOCX
- 页数:13
- 大小:33.18KB
6盾构管片三维计算命令流-径向弹簧-不用循环语句加载耦合----重合节点模拟纵向螺栓 (1).docx
《6盾构管片三维计算命令流-径向弹簧-不用循环语句加载耦合----重合节点模拟纵向螺栓 (1).docx》由会员分享,可在线阅读,更多相关《6盾构管片三维计算命令流-径向弹簧-不用循环语句加载耦合----重合节点模拟纵向螺栓 (1).docx(13页珍藏版)》请在冰豆网上搜索。
/TITLE,shieldtunnelinMetro
/NOPR
/COM,Structural
/PREP7
ET,1,BEAM3!
管片
ET,2,link10,,,1,!
地基弹簧1
ET,3,COMBIN14,0,0,!
地基弹簧2
ET,4,COMBIN14,0,6,!
环间抗弯弹簧1外侧受拉
ET,5,COMBIN14,0,6,!
环间抗弯弹簧2内侧受拉
ET,6,COMBIN14,0,1,0!
1环纵向抗剪弹簧径向
ET,7,COMBIN14,0,2,0!
1环纵向剪切弹簧切向
ET,8,COMBIN14,0,1,0!
2环纵向抗剪弹簧径向
ET,9,COMBIN14,0,2,0!
2环纵向剪切弹簧切向
ET,10,link10,,,1,!
地基弹簧3
R,1,0.3,0.00225,0.3,,,,
R,2,0.0497,,,
R,3,1e6,,,
R,4,3e7,
R,5,5e7,
R,6,2.79e10,
R,7,2.79e10,
R,8,2.79e10,
R,9,2.79e10,
R,10,0.0497,,,
MPTEMP,1,0
MPDATA,EX,1,,50e9
MPDATA,PRXY,1,,0.2
MPTEMP,1,0
MPDATA,DENS,1,,2500
MPDATA,EX,2,,170e6
MPDATA,EX,10,,170e6
SAVE
K,1000,0,0,0,
csys,1
K,1,2.85,99,0
K,2,2.85,115,0
K,3,2.85,115,0
K,4,2.85,180,0
K,5,2.85,180,0
K,6,2.85,252,0
K,7,2.85,252,0
K,8,2.85,324,0
K,9,2.85,324,0
K,10,2.85,36,0
K,11,2.85,36,0
K,12,2.85,99,0
SAVE
Larc,1,2,1000,2.85
Larc,3,4,1000,2.85
Larc,5,6,1000,2.85
Larc,7,8,1000,2.85
Larc,9,10,1000,2.85
Larc,11,12,1000,2.85
Lgen,2,1,6,1,,-36,1.5,2000,1,0
Lgen,2,1,6,1,,-36,-1.5,4000,1,0
SAVE
csys,1
lsel,all
LESIZE,all,,1,,,1,,,
TYPE,1
MAT,1
REAL,1
lmesh,1,6,
lsel,all
numstr,node,2001
lmesh,7,12,
lsel,all
numstr,node,4001
lmesh,13,18,
/PNUM,ELEM,1
SAVE
!
生成地弹簧1
csys,1
Nsel,s,loc,x,2.85
ngen,2,1000,all,,,1!
生成节点
TYPE,2
MAT,2
REAL,2
Nsel,s,loc,x,3.85
Nsel,r,loc,y,-45,235
*get,na,node,0,count
*get,nmin,node,,num,min
bnum=nmin
*do,m,1,na,
E,bnum,bnum-1000
bnum=ndnext(bnum)
*ENDDO
TYPE,10
MAT,10
REAL,10
Nsel,s,loc,x,3.85
Nsel,r,loc,y,235,315
*get,na,node,0,count
*get,nmin,node,,num,min
bnum=nmin
*do,m,1,na,
E,bnum,bnum-1000
bnum=ndnext(bnum)
*ENDDO
!
生成地弹簧2
Nsel,s,loc,x,2.85
ngen,2,1500,all,,,0.043965844,10
TYPE,3
REAL,3
NSEL,s,node,,1501,1870
*get,na,node,0,count
*get,nmin,node,,num,min
bnum=nmin
*do,m,1,na,
E,bnum,bnum-1500
bnum=ndnext(bnum)
*ENDDO
NSEL,s,node,,3501,3870
*get,na,node,0,count
*get,nmin,node,,num,min
bnum=nmin
*do,m,1,na,
E,bnum,bnum-1500
bnum=ndnext(bnum)
*ENDDO
NSEL,s,node,,5501,5870
*get,na,node,0,count
*get,nmin,node,,num,min
bnum=nmin
*do,m,1,na,
E,bnum,bnum-1500
bnum=ndnext(bnum)
*ENDDO
!
第一个圆
csys,1
!
生成环向耦合
Nsel,s,loc,x,2.85
Nsel,r,loc,z,0
cpintf,ux,0.01,
cpintf,uy,0.01,
TYPE,4
REAL,4
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,35.9,36.1
NSEL,r,LOC,z,0,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,179.9,180.1
NSEL,r,LOC,z,0,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
TYPE,5
REAL,5
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,98.9,99.1
NSEL,r,LOC,z,0,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,114.9,115.1
NSEL,r,LOC,z,0,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-107.9,-108.1
NSEL,r,LOC,z,0,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-35.9,-36.1
NSEL,r,LOC,z,0,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
!
第二个圆
csys,1
Nsel,s,loc,x,2.85
Nsel,r,loc,z,1.5
cpintf,ux,0.01,
cpintf,uy,0.01,
TYPE,4
REAL,4
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36+35.9,-36+36.1
NSEL,r,LOC,z,1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36+179.9,-36+180.1
NSEL,r,LOC,z,1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
TYPE,5
REAL,5
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36+98.9,-36+99.1
NSEL,r,LOC,z,1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36+114.9,-36+115.1
NSEL,r,LOC,z,1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-107.9-36,-36-108.1
NSEL,r,LOC,z,1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36-35.9,-36-36.1
NSEL,r,LOC,z,1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
!
第三个圆
csys,1
Nsel,s,loc,x,2.85
Nsel,r,loc,z,-1.5
cpintf,ux,0.01,
cpintf,uy,0.01,
TYPE,4
REAL,4
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36+35.9,-36+36.1
NSEL,r,LOC,z,-1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36+179.9,-36+180.1
NSEL,r,LOC,z,-1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
TYPE,5
REAL,5
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36+98.9,-36+99.1
NSEL,r,LOC,z,-1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36+114.9,-36+115.1
NSEL,r,LOC,z,-1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36-107.9,-36-108.1
NSEL,r,LOC,z,-1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
NSEL,S,LOC,x,2.85
NSEL,r,LOC,y,-36-35.9,-36-36.1
NSEL,r,LOC,z,-1.5,
*get,i,node,0,num,max
*get,j,node,0,num,min
E,i,j
!
存储纵向螺栓节点号
csys,1
*dim,q,array,10,3,1
*do,i,1,10
K=18+(i-1)*36
N
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 6盾构管片三维计算命令流-径向弹簧-不用循环语句加载耦合-重合节点模拟纵向螺栓 1 盾构 管片 三维 计算 命令 径向 弹簧 不用 循环 语句 加载 耦合 重合 节点 模拟 纵向 螺栓