24小时热门版块排行榜    

查看: 1222  |  回复: 0

gao326159487

新虫 (初入文坛)

[求助] 求ANSYS用195单元做垫片接触分析的实例

/COM,ANSYS MEDIA REL. 150 (11/8/2013) REF. VERIF. MANUAL: REL. 150
/VERIFY,VM250
/TITLE,VM250, GASKET MATERIAL UNDER UNIAXIAL COMPRESSION LOAD
/COM,   REF: ANY NONLINEAR MATERIAL VERIFICATION TEXT
/COM,   USING 3D 8-NODE INTER195 GASKET ELEMENTS
/PREP7
MP, EX, 1,15.2E6*6890
MP,NUXY, 1, 0.21
MP,DENS,1,7203
TB,GASKET,2,,13,COMP             !* COMPRESSION CURVE
TBPT,,0.508000E-04, 0.161226E+07
TBPT,,0.101600E-03, 0.520884E+07
TBPT,,0.152400E-03, 0.113134E+08
TBPT,,0.203200E-03, 0.200499E+08
TBPT,,0.254000E-03, 0.259960E+08
TBPT,,0.304800E-03, 0.290345E+08
TBPT,,0.355600E-03, 0.357453E+08
TBPT,,0.406400E-03, 0.440064E+08
TBPT,,0.457200E-03, 0.563189E+08
TBPT,,0.508000E-03, 0.748254E+08
TBPT,,0.558800E-03, 0.967287E+08
TBPT,,0.609600E-03, 0.129001E+09
TBPT,,0.683260E-03, 0.157147E+09
TB,GASKET,2,,5,LUNL              !* COMPRESSION CURVE
TBPT,,0.152400E-03, 2.430000E+11
TBPT,,0.304800E-03, 3.565000E+11
TBPT,,0.406400E-03, 5.923000E+11
TBPT,,0.558800E-03, 1.088000E+12
TBPT,,0.683260E-03, 1.490000E+12
/PREP7
ET,1,185                         !* 3D 8-NODE STRUCTURAL SOLID ELEMENT
ET,2,195,,0                      !* 3D 8-NODE GASKET ELEMENT
BLOCK,0,1,0,1,0,1
BLOCK,0,1,0,1,1.02,2.02
BLOCK,0,1,0,1,1,1.02
VSEL,S,LOC,Z,1,2.02
ASLV
VGLUE,ALL

ALLS
ESIZE,1/4
TYPE,1
MAT, 1
VMESH,1
VMESH,2
VMESH,4
TYPE,2
MAT,2
VSEL,S,,,4
ESLV
EMODIFY,ALL,0

VSEL,S,,,4
ASLV
ASEL,R,LOC,Z,1
NSLA,,1
CM,N_TARGET,NODE

VSEL,S,,,1
ASLV
ASEL,R,LOC,Z,1
NSLA,,1
CM,N_CONTACT,NODE

MP,MU,1,
MAT,1   
R,3
REAL,3  
ET,3,170
ET,4,174
KEYOPT,4,9,0
KEYOPT,4,10,2   
R,3,
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
NSEL,S,,,N_TARGET   
CM,_TARGET,NODE
TYPE,3  
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
NSEL,S,,,N_CONTACT  
CM,_CONTACT,NODE
TYPE,4  
ESLN,S,0
ESURF

ALLS
NSEL,S,LOC,X,0
D,ALL,UX
NSEL,S,LOC,Y,0
D,ALL,UY
NSEL,S,LOC,Z,0
D,ALL,UZ
Asel,s,loc,z,1
Vsel,s,,,4
Aslv,r
Nsla,,1
D,all,ux
D,all,uy                !为什么约束195单元接触面的横向位移以后才能计算?
alls
NSEL,ALL
FINISH
/out,scratch
/SOLU
NLGEOM,ON
NSUBST,50,50,50
OUTRES,ALL,-10
NSEL,S,LOC,Z,2.02
SF,ALL,PRES,44006400         !* 1ST LOAD STEP -- LOAD THE MODEL
NSEL,ALL
SOLVE
NSEL,S,LOC,Z,2.02
SF,ALL,PRES,0                !* 2ND LOAD STEP -- UNLOAD THE MODEL
NSEL,ALL
SOLVE
NSEL,S,LOC,Z,2.02            !* 3RD LOAD STEP -- RELOAD THE MODEL
SF,ALL,PRES,157147000
NSEL,ALL
SOLVE
NSEL,S,LOC,Z,2.02
SF,ALL,PRES,0                !* 4TH LOAD STEP -- UNLOAD THE MODEL
NSEL,ALL
SOLVE
FINISH
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 gao326159487 的主题更新
信息提示
请填处理意见