请问要怎么修改才能收敛

浏览:106252
/prep7
et,1,solid45
et,2,solid65
r,1
r,2
mp,ex,1,3.3e10
mp,prxy,1,0.17
mp,ex,2,7.14e10
mp,prxy,2,0.21
mp,ex,3,2.1e11
mp,prxy,3,0.333
tb,concr,2
tbdata,,0.6,0.95,1.75e6,-1
tb,bkin,3
tbdata,,345e6,81000e6
cyl4,,,1.25,0,,360,120
cyl4,,,1.25,0,1.32,360,58
cyl4,,,1.32,0,1.4,360,58
nummrg,all
cyl4,,,1.4,0,1.425,360,58
vsel,s,volu,,1
vatt,1,1,1
vsel,s,volu,,2
vatt,1,1,1
vsel,s,volu,,3
vatt,2,1,2
vsel,s,volu,,4
vatt,3,2,1
CSYS,1
allsel,all
lsel,s,loc,z,0
lesize,all,,,10
allsel,all
lsel,s,,,9,10,1
lsel,a,,,27,28,1
lsel,a,,,47,48,1
lsel,a,,,55,56,1
lsel,a,,,53,54,1
lsel,a,,,29,30,1
lesize,all,0.3
allsel,all
vsweep,all
allsel,all
!接触面A13,A14
!目标面A19,A20
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.35
MAT,1
MP,EMIS,1,7.88860905221e-031
R,3
REAL,3
ET,3,170
ET,4,174
R,3,,,0.1,0.1,0,
RMORE,,,1.0E20,0.0,1.0,
RMORE,2e5,0,1.0,,1.0,0.5
RMORE,0,1.0,1.0,0.0,,1.0
KEYOPT,4,4,0
KEYOPT,4,5,0
NROPT,UNSYM
KEYOPT,4,7,0
KEYOPT,4,8,0
KEYOPT,4,9,0
KEYOPT,4,10,1
KEYOPT,4,11,0
KEYOPT,4,12,0
KEYOPT,4,2,0
KEYOPT,3,5,0
! Generate the target surface
ASEL,S,,,19
CM,_TARGET,AREA
TYPE,3
NSLA,S,1
ESLN,S,0
ESURF
CMSEL,S,_ELEMCM
! Generate the contact surface
ASEL,S,,,13
CM,_CONTACT,AREA
TYPE,4
NSLA,S,1
ESLN,S,0
ESURF
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,3
ESEL,A,TYPE,,4
ESEL,R,REAL,,3
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,3
ESEL,A,TYPE,,4
ESEL,R,REAL,,3
CMSEL,A,_NODECM
CMDEL,_NODECM
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM
CMSEL,S,_KPCM
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM
CMSEL,S,_AREACM
CMDEL,_AREACM
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM
/GRES,cwz,gsav
CMDEL,_TARGET
CMDEL,_CONTACT
/COM, CONTACT PAIR CREATION - END
!*
!*
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.35
MAT,1
MP,EMIS,1,7.88860905221e-031
R,4
REAL,4
ET,5,170
ET,6,174
R,4,,,0.1,0.1,0,
RMORE,,,1.0E20,0.0,1.0,
RMORE,2e5,0,1.0,,1.0,0.5
RMORE,0,1.0,1.0,0.0,,1.0
KEYOPT,6,4,0
KEYOPT,6,5,0
NROPT,UNSYM
KEYOPT,6,7,0
KEYOPT,6,8,0
KEYOPT,6,9,0
KEYOPT,6,10,1
KEYOPT,6,11,0
KEYOPT,6,12,0
KEYOPT,6,2,0
KEYOPT,5,5,0
! Generate the target surface
ASEL,S,,,20
CM,_TARGET,AREA
TYPE,5
NSLA,S,1
ESLN,S,0
ESURF
CMSEL,S,_ELEMCM
! Generate the contact surface
ASEL,S,,,14
CM,_CONTACT,AREA
TYPE,6
NSLA,S,1
ESLN,S,0
ESURF
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,5
ESEL,A,TYPE,,6
ESEL,R,REAL,,4
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,5
ESEL,A,TYPE,,6
ESEL,R,REAL,,4
CMSEL,A,_NODECM
CMDEL,_NODECM
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM
CMSEL,S,_KPCM
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM
CMSEL,S,_AREACM
CMDEL,_AREACM
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM
/GRES,cwz,gsav
CMDEL,_TARGET
CMDEL,_CONTACT
/COM, CONTACT PAIR CREATION - END
/MREP,EPLOT
ALLSEL,ALL
asel,s,,,2,6,4
da,all,all
asel,s,,,12,16,4
da,all,all
/SOL
nlgeom,1
autots,1
time,1
nsubst,30
bcsoption,,incoere
CNVTOL,F, ,0.05,2,0.5
outres,erase
outres,all,all
allsel,all
solve
/solu
asel,s,,,15
sfa,all,,pres,9.634e5
nlgeom,1
autots,1
time,2
nsubst,150,1000,50
bcsoption,,incoere
CNVTOL,F, ,0.05,2,0.5
outres,erase
outres,all,all
allsel,all
solve
邀请回答 我来回答

当前暂无回答

回答可获赠 200金币

没解决?试试专家一对一服务

换一批
    App下载
    技术邻APP
    工程师必备
    • 项目客服
    • 培训客服
    • 平台客服

    TOP