螺栓建模6相关.docx
- 文档编号:4070936
- 上传时间:2023-05-06
- 格式:DOCX
- 页数:17
- 大小:75.38KB
螺栓建模6相关.docx
《螺栓建模6相关.docx》由会员分享,可在线阅读,更多相关《螺栓建模6相关.docx(17页珍藏版)》请在冰点文库上搜索。
螺栓建模6相关
/title,double-screwboltsandflangebymqg
/prep7
et,1,solid95
mptemp,1,0
mpdata,ex,1,,2.06e5
mpdata,prxy,1,,0.3
cyl4,0,0,2607.5,90,2812.5,92,160
cyl4,0,0,2607.5,90,2812.5,92,-160
wpave,0,2712.5,160
cyl4,0,0,22.5,90,,270,-400
vsel,s,,,1,2,,0
cm,falan,volu
allsel,all,all
vsbv,falan,3,sepo,delete,delete
numcmp,all
cyl4,0,0,22.5,90,39,270,8
vsymm,z,3,,,0,1,0
wpave,0,2712.5,168
wprota,90,
rprism,0,26,6,,,32.5
cyl4,0,0,18.5645,,,,100
vsbv,5,6,sepo,delete,delete
numcmp,all
wprota,,90
vsbw,5,sepo
numcmp,all
vdele,6,,,1
vsymm,z,5,,,0,1,0
wprota,,-90
wpave,0,2712.5,205
cyl4,0,0,18.5645,0,,180,-410
numcmp,all
type,1
mat,1
real,1
esys,0
vsel,s,,,7,,,1
allsel,below,volu
lsel,s,line,,97,98
lsel,a,line,,101,102
cm,huafensige7,line
allsel,all,all
lsel,s,line,,103,105
cm,huafenshierge7,line
allsel,all,all
lsel,s,line,,99,100
cm,huafenshige7,line
allsel,all,all
lesize,huafensige7,,,4
lesize,huafenshierge7,,,12,-6
lesize,huafenshige7,,,10
vsweep,7,46,45,0
allsel,all,all
vsel,s,,,5,6,,1
allsel,below,volu
lsel,s,line,,61,64
lsel,a,line,,67,72
lsel,a,line,,75,78
lsel,a,line,,80
lsel,a,line,,82,89
lsel,a,line,,91,93
lsel,a,line,,95,96
cm,huafensange56,line
allsel,all,all
lsel,s,line,,65,66
lsel,a,line,,90
lsel,a,line,,94
cm,huafensige56,line
allsel,all,all
lsel,s,line,,73,74
lsel,a,line,,79
lsel,a,line,,81
cm,huafenshige56,line
allsel,all,all
lesize,huafensange56,,,3
lesize,huafensige56,,,4
lesize,huafenshige56,,,10
lsel,s,line,,61
lsel,a,line,,65
lsel,a,line,,68
cm,lianjiexian51,line
allsel,all,all
lsel,s,line,,62
lsel,a,line,,66
lsel,a,line,,69
cm,lianjiexian52,line
allsel,all,all
lsel,s,line,,89,91
cm,lianjiexian61,line
allsel,all,all
lsel,s,line,,92
lsel,a,line,,94
lsel,a,line,,96
cm,lianjiexian62,line
allsel,all,all
lccat,lianjiexian51
lccat,lianjiexian52
lccat,lianjiexian61
lccat,lianjiexian62
vsweep,5,35,36
vsweep,6,40,44
allsel,all,all
vsel,s,,,3,4,,1
allsel,below,volu
lsel,s,line,,45,48
lsel,a,line,,57,60
cm,huafenerge34,line
allsel,all,all
lsel,s,line,,37
lsel,a,line,,39
lsel,a,line,,42
lsel,a,line,,44
lsel,a,line,,49
lsel,a,line,,51
lsel,a,line,,54
lsel,a,line,,56
cm,huafensange34,line
allsel,all,all
lsel,s,line,,38
lsel,a,line,,40,41
lsel,a,line,,43
lsel,a,line,,50
lsel,a,line,,52,53
lsel,a,line,,55
cm,huafenshige34,line
allsel,all,all
lesize,huafenerge34,,,2
lesize,huafensange34,,,3
lesize,huafenshige34,,,10
vsweep,3,18,17
vsweep,4,24,23
allsel,all,all
vsel,s,,,1,2,,1
allsel,below,volu
lsel,s,line,,1,8
lsel,a,line,,11
lsel,a,line,,14
lsel,a,line,,19,26
lsel,a,line,,29
lsel,a,line,,32
cm,huafensange12,line
allsel,all,all
lsel,s,line,,15,16
lsel,a,line,,33,34
cm,huafensige12,line
allsel,all,all
lsel,s,line,,9,10
lsel,a,line,,12,13
lsel,a,line,,27,28
lsel,a,line,,30,31
cm,huafenliuge12,line
allsel,all,all
lsel,s,line,,17,18
lsel,a,line,,35,36
cm,huafenshige12,line
allsel,all,all
lesize,huafensange12,,,3
lesize,huafensige12,,,4
lesize,huafenliuge12,,,6,0.25
lesize,huafenshige12,,,10
lsel,s,line,,1
lsel,a,line,,5
lsel,a,line,,15
cm,lianjiexian11,line
allsel,all,all
lsel,s,line,,2
lsel,a,line,,6
lsel,a,line,,16
cm,lianjiexian12,line
allsel,all,all
lsel,s,line,,19
lsel,a,line,,23
lsel,a,line,,33
cm,lianjiexian21,line
allsel,all,all
lsel,s,line,,20
lsel,a,line,,24
lsel,a,line,,34
cm,lianjiexian22,line
allsel,all,all
lccat,lianjiexian11
lccat,lianjiexian12
lccat,lianjiexian21
lccat,lianjiexian22
vsweep,1,8,7
vsweep,2,15,16
/com,contactpaircreation-start!
进入创建接触对。
mp,mu,1,0.5!
定义接触摩擦系数。
每个接触对都要分别创建。
mat,1!
为将要生成的单元指定材料属性。
r,3!
设置实常数,编号为3。
real,3!
为将要生成的单元指定实常数,因为同一个接触对的两种单元共用一个实常数。
et,2,170!
建立目标单元。
et,3,174!
建立接触单元。
keyopt,3,10,2!
设置174单元的第10个关键选项
keyopt,3,12,5!
设置174单元的第12个关键选项,这里是设置接触类型为“绑定接触(始终)”。
r,3,,,1.0,0.1,0,!
设置实常数3中的数据,第一个1.0表示正则处罚刚度,第二个0.1表示渗透公差。
asel,s,,,47!
选择一组面的子集,即选择面体47。
cm,_target,area!
把上面选的面体47创建成一个名为_target的元件,即目标面。
type,2!
为将要生成的目标单元指定单元类型为170单元。
nsla,s,1!
选中面体47上的所有节点。
esln,s,0!
选中依附于面体47上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的170单元。
asel,s,,,32!
选择一组面的子集,即选择面体32。
cm,_contact,area!
把上面选的面体32创建成一个名为_contact的元件,即接触面。
type,3!
为将要生成的目标单元指定单元类型为174单元。
nsla,s,1!
选中面体32上的所有节点。
esln,s,0!
选中依附于面体32上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的174单元。
cmdele,_target!
删除目标面元件。
cmdele,_contact!
删除接触面元件。
allsel,all,all!
选择所有元素。
eplot!
显示所有选择的单元网格。
/com,contactpaircreation-start!
进入创建接触对。
mp,mu,1,0.5!
定义接触摩擦系数。
每个接触对都要分别创建。
mat,1!
为将要生成的单元指定材料属性。
r,4!
设置实常数,编号为4。
real,4!
为将要生成的单元指定实常数,因为同一个接触对的两种单元共用一个实常数。
et,4,170!
建立目标单元。
et,5,174!
建立接触单元。
keyopt,5,10,2!
设置174单元的第10个关键选项
keyopt,5,12,5!
设置174单元的第12个关键选项,这里是设置接触类型为“绑定接触(始终)”。
r,4,,,1.0,0.1,0,!
设置实常数4中的数据,第一个1.0表示正则处罚刚度,第二个0.1表示渗透公差。
asel,s,,,47!
选择一组面的子集,即选择面体47。
cm,_target,area!
把上面选的面体47创建成一个名为_target的元件,即目标面。
type,4!
为将要生成的目标单元指定单元类型为170单元。
nsla,s,1!
选中面体47上的所有节点。
esln,s,0!
选中依附于面体47上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的170单元。
asel,s,,,37!
选择一组面的子集,即选择面体37。
cm,_contact,area!
把上面选的面体37创建成一个名为_contact的元件,即接触面。
type,5!
为将要生成的目标单元指定单元类型为174单元。
nsla,s,1!
选中面体37上的所有节点。
esln,s,0!
选中依附于面体37上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的174单元。
cmdele,_target!
删除目标面元件。
cmdele,_contact!
删除接触面元件。
allsel,all,all!
选择所有元素。
eplot!
显示所有选择的单元网格。
/com,contactpaircreation-start!
进入创建接触对。
mp,mu,1,0.14!
定义接触摩擦系数。
每个接触对都要分别创建。
mat,1!
为将要生成的单元指定材料属性。
r,5!
设置实常数,编号为5。
real,5!
为将要生成的单元指定实常数,因为同一个接触对的两种单元共用一个实常数。
et,6,170!
建立目标单元。
et,7,174!
建立接触单元。
keyopt,7,10,2!
设置174单元的第10个关键选项
keyopt,7,12,0!
设置174单元的第12个关键选项,这里是设置接触类型为“标准接触”。
r,5,,,1.0,0.1,0,!
设置实常数5中的数据,第一个1.0表示正则处罚刚度,第二个0.1表示渗透公差。
asel,s,,,18!
选择一组面的子集,即选择面体18。
cm,_target,area!
把上面选的面体18创建成一个名为_target的元件,即目标面。
type,6!
为将要生成的目标单元指定单元类型为170单元。
nsla,s,1!
选中面体18上的所有节点。
esln,s,0!
选中依附于面体18上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的170单元。
asel,s,,,36!
选择一组面的子集,即选择面体36。
cm,_contact,area!
把上面选的面体36创建成一个名为_contact的元件,即接触面。
type,7!
为将要生成的目标单元指定单元类型为174单元。
nsla,s,1!
选中面体36上的所有节点。
esln,s,0!
选中依附于面体36上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的174单元。
cmdele,_target!
删除目标面元件。
cmdele,_contact!
删除接触面元件。
allsel,all,all!
选择所有元素。
eplot!
显示所有选择的单元网格。
/com,contactpaircreation-start!
进入创建接触对。
mp,mu,1,0.14!
定义接触摩擦系数。
每个接触对都要分别创建。
mat,1!
为将要生成的单元指定材料属性。
r,6!
设置实常数,编号为6。
real,6!
为将要生成的单元指定实常数,因为同一个接触对的两种单元共用一个实常数。
et,8,170!
建立目标单元。
et,9,174!
建立接触单元。
keyopt,9,10,2!
设置174单元的第10个关键选项
keyopt,9,12,0!
设置174单元的第12个关键选项,这里是设置接触类型为“标准接触”。
r,6,,,1.0,0.1,0,!
设置实常数6中的数据,第一个1.0表示正则处罚刚度,第二个0.1表示渗透公差。
asel,s,,,24!
选择一组面的子集,即选择面体24。
cm,_target,area!
把上面选的面体24创建成一个名为_target的元件,即目标面。
type,8!
为将要生成的目标单元指定单元类型为170单元。
nsla,s,1!
选中面体24上的所有节点。
esln,s,0!
选中依附于面体24上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的170单元。
asel,s,,,44!
选择一组面的子集,即选择面体44。
cm,_contact,area!
把上面选的面体44创建成一个名为_contact的元件,即接触面。
type,9!
为将要生成的目标单元指定单元类型为174单元。
nsla,s,1!
选中面体44上的所有节点。
esln,s,0!
选中依附于面体44上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的174单元。
cmdele,_target!
删除目标面元件。
cmdele,_contact!
删除接触面元件。
allsel,all,all!
选择所有元素。
eplot!
显示所有选择的单元网格。
/com,contactpaircreation-start!
进入创建接触对。
mp,mu,1,0.3!
定义接触摩擦系数。
每个接触对都要分别创建。
mat,1!
为将要生成的单元指定材料属性。
r,7!
设置实常数,编号为7。
real,7!
为将要生成的单元指定实常数,因为同一个接触对的两种单元共用一个实常数。
et,10,170!
建立目标单元。
et,11,174!
建立接触单元。
keyopt,11,10,2!
设置174单元的第10个关键选项
keyopt,11,12,0!
设置174单元的第12个关键选项,这里是设置接触类型为“标准接触”。
r,7,,,1.0,0.1,0,!
设置实常数7中的数据,第一个1.0表示正则处罚刚度,第二个0.1表示渗透公差。
asel,s,,,8!
选择一组面的子集,即选择面体8。
cm,_target,area!
把上面选的面体8创建成一个名为_target的元件,即目标面。
type,10!
为将要生成的目标单元指定单元类型为170单元。
nsla,s,1!
选中面体8上的所有节点。
esln,s,0!
选中依附于面体8上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的170单元。
asel,s,,,17!
选择一组面的子集,即选择面体17。
cm,_contact,area!
把上面选的面体17创建成一个名为_contact的元件,即接触面。
type,11!
为将要生成的目标单元指定单元类型为174单元。
nsla,s,1!
选中面体17上的所有节点。
esln,s,0!
选中依附于面体17上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的174单元。
cmdele,_target!
删除目标面元件。
cmdele,_contact!
删除接触面元件。
allsel,all,all!
选择所有元素。
eplot!
显示所有选择的单元网格。
/com,contactpaircreation-start!
进入创建接触对。
mp,mu,1,0.3!
定义接触摩擦系数。
每个接触对都要分别创建。
mat,1!
为将要生成的单元指定材料属性。
r,8!
设置实常数,编号为8。
real,8!
为将要生成的单元指定实常数,因为同一个接触对的两种单元共用一个实常数。
et,12,170!
建立目标单元。
et,13,174!
建立接触单元。
keyopt,13,10,2!
设置174单元的第10个关键选项
keyopt,13,12,0!
设置174单元的第12个关键选项,这里是设置接触类型为“标准接触”。
r,8,,,1.0,0.1,0,!
设置实常数8中的数据,第一个1.0表示正则处罚刚度,第二个0.1表示渗透公差。
asel,s,,,15!
选择一组面的子集,即选择面体15。
cm,_target,area!
把上面选的面体15创建成一个名为_target的元件,即目标面。
type,12!
为将要生成的目标单元指定单元类型为170单元。
nsla,s,1!
选中面体15上的所有节点。
esln,s,0!
选中依附于面体15上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的170单元。
asel,s,,,23!
选择一组面的子集,即选择面体23。
cm,_contact,area!
把上面选的面体23创建成一个名为_contact的元件,即接触面。
type,13!
为将要生成的目标单元指定单元类型为174单元。
nsla,s,1!
选中面体23上的所有节点。
esln,s,0!
选中依附于面体23上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的174单元。
cmdele,_target!
删除目标面元件。
cmdele,_contact!
删除接触面元件。
allsel,all,all!
选择所有元素。
eplot!
显示所有选择的单元网格。
/com,contactpaircreation-start!
进入创建接触对。
mp,mu,1,0.35!
定义接触摩擦系数。
每个接触对都要分别创建。
mat,1!
为将要生成的单元指定材料属性。
r,9!
设置实常数,编号为9。
real,9!
为将要生成的单元指定实常数,因为同一个接触对的两种单元共用一个实常数。
et,14,170!
建立目标单元。
et,15,174!
建立接触单元。
keyopt,15,10,2!
设置174单元的第10个关键选项
keyopt,15,12,0!
设置174单元的第12个关键选项,这里是设置接触类型为“标准接触”。
r,9,,,1.0,0.1,0,!
设置实常数9中的数据,第一个1.0表示正则处罚刚度,第二个0.1表示渗透公差。
asel,s,,,16!
选择一组面的子集,即选择面体16。
cm,_target,area!
把上面选的面体16创建成一个名为_target的元件,即目标面。
type,14!
为将要生成的目标单元指定单元类型为170单元。
nsla,s,1!
选中面体16上的所有节点。
esln,s,0!
选中依附于面体16上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的170单元。
asel,s,,,7!
选择一组面的子集,即选择面体7。
cm,_contact,area!
把上面选的面体7创建成一个名为_contact的元件,即接触面。
type,15!
为将要生成的目标单元指定单元类型为174单元。
nsla,s,1!
选中面体7上的所有节点。
esln,s,0!
选中依附于面体7上的所有节点的单元。
esurf!
在已选择单元的自有面上生成重叠的174单元。
cmdele,_target!
删除目标面元件。
cmdele,_contact!
删除接触面元件。
allsel,all,all!
选择所有元素。
eplot!
显示所有选择的单元网格。
psmesh,1,yujinli,,volu,7,0,z,,656,,,!
在体7(螺柱)垂直于全球直角坐标z轴坐标并从节点656处创建预紧截面1。
da,16,all!
在面体16(即两法兰接触面)上施加全部约束。
asel,s,area,,3,4
asel,a,area,,11,12
asel,a,area,,21,22
asel,a,area,,27,28
asel,a,area,,33,34
asel,a,area,,38,39
asel,a,area,,48,49
da,all,symm!
在以上面体上施加对称约束。
fini
/solu
sload,1,pl01,tiny,force,356215,1,2!
因为是一半模型,在预紧截面1上施加预紧力为(712430/2)n。
solve!
求解
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 螺栓 建模 相关