113 lines
2.6 KiB
Text
113 lines
2.6 KiB
Text
**________unite : mm, MPa________
|
|
*HEADING
|
|
Joint GEM
|
|
**PREPRINT,ECHO=YES, MODEL=YES, HISTORY=YES, CONTACT=YES
|
|
*PARAMETER
|
|
**Joint
|
|
Bas_joint=14.
|
|
Hauteur=7.81+Bas_joint
|
|
Dint=29.98
|
|
Dext=45.93
|
|
Rint=Dint/2.
|
|
Rext=Dext/2.
|
|
Pt_milieu=Rint+((Rext-Rint)/2)
|
|
**Chemise
|
|
Epaisseur=3.9
|
|
Hauteur_chemise=45.
|
|
**--------------------------------------------------------------------
|
|
**________maillage du joint________
|
|
*NODE
|
|
1, <Rint>, <Bas_joint>
|
|
9, <Rext>, <Bas_joint>
|
|
81, <Rint>, <Hauteur>
|
|
85, <Pt_milieu>, <Hauteur>
|
|
89, <Rext>, <Hauteur>
|
|
*NGEN,NSET=BAS_JOINT
|
|
1,9
|
|
*NGEN,NSET=HAUT_JOINT
|
|
81,89
|
|
*NSET,NSET=INT_JOINT,GENERATE
|
|
1,81,10
|
|
*NSET,NSET=EXT_JOINT,GENERATE
|
|
9,89,10
|
|
*NFILL,NSET=ALL_JOINT
|
|
BAS_JOINT,HAUT_JOINT,8,10
|
|
**________section________
|
|
*SOLID SECTION,MATERIAL=GEM,ELSET=JOINT_GEM
|
|
**________element axisymetrique a 8 noeuds________
|
|
*ELEMENT,TYPE=CAX8
|
|
1,1,3,23,21,2,13,22,11
|
|
*ELGEN,ELSET=JOINT_GEM
|
|
1,4,2,1,4,20,10
|
|
**________surface pour contact________
|
|
*ELSET,ELSET=SURFACE_ELEMENT_JOINT,GENERATE
|
|
4,34,10
|
|
*SURFACE,TYPE=ELEMENT,NAME=SURFACE_JOINT
|
|
SURFACE_ELEMENT_JOINT
|
|
*ELSET, ELSET=ELT_14
|
|
14
|
|
**--------------------------------------------------------------------
|
|
**________maillage de la chemise________
|
|
*NODE
|
|
101, 22.975, 0.
|
|
105, 26.875, 0.
|
|
2101, 22.975, 45.
|
|
2105, 26.875, 45.
|
|
*NGEN,NSET=BAS_CHEMISE
|
|
101,105
|
|
*NGEN,NSET=HAUT_CHEMISE
|
|
2101,2105
|
|
*NSET,NSET=INT_CHEMISE,GENERATE
|
|
101,2101,50
|
|
*NSET,NSET=EXT_CHEMISE,GENERATE
|
|
105,2105,50
|
|
*NFILL,NSET=ALL_CHEMISE
|
|
BAS_CHEMISE,HAUT_CHEMISE,40,50
|
|
*NSET,NSET=BAS_INT_CHEMISE
|
|
101
|
|
**________section________
|
|
*SOLID SECTION,MATERIAL=ACIER,ELSET=CHEMISE
|
|
**________element axisymetrique a 8 noeuds________
|
|
*ELEMENT,TYPE=CAX8,ELSET=CHEMISE
|
|
101,101,103,203,201,102,153,202,151
|
|
*ELGEN,ELSET=CHEMISE
|
|
101,2,2,1,20,100,10
|
|
**________surface pour contact________
|
|
*ELSET,ELSET=SURFACE_ELEMENT_CHEMISE,GENERATE
|
|
101,291,10
|
|
*SURFACE,TYPE=ELEMENT,NAME=SURFACE_CHEMISE
|
|
SURFACE_ELEMENT_CHEMISE
|
|
*ELSET, ELSET=ELT_16
|
|
171
|
|
**--------------------------------------------------------------------
|
|
**________proprietes du materiau________
|
|
*MATERIAL,NAME=GEM
|
|
*ELASTIC
|
|
2100.,0.3
|
|
*MATERIAL,NAME=ACIER
|
|
*ELASTIC
|
|
210000.,0.3
|
|
**--------------------------------------------------------------------
|
|
**________contact________
|
|
*SURFACE INTERACTION, NAME=JOINT_CHEMISE
|
|
*CONTACT PAIR, INTERACTION=JOINT_CHEMISE,TYPE=SURFACE TO SURFACE
|
|
**surface esclave,surface maitre
|
|
SURFACE_CHEMISE,SURFACE_JOINT
|
|
**________conditions aux limites________
|
|
*BOUNDARY
|
|
BAS_JOINT,2
|
|
INT_JOINT,1
|
|
BAS_INT_CHEMISE,2
|
|
**________pilotage________
|
|
*STEP,NAME=charge,NLGEOM=YES,INC=1000000
|
|
*STATIC
|
|
0.1,1.,1.e-10,0.1
|
|
*BOUNDARY
|
|
HAUT_JOINT,2,2,-0.30
|
|
*OUTPUT,FIELD
|
|
*NODE OUTPUT
|
|
U, RF, COORD
|
|
*ELEMENT OUTPUT
|
|
S, LE, COORD
|
|
*CONTACT OUTPUT, VARIABLE=ALL
|
|
*END STEP
|