*HEADING
Cylindrical elment testing (CCL12H)
*PREPRINT, ECHO=YES, MODEL=YES, HISTORY=YES
**
**********************************************************
** Parameter definition
**
*PARAMETER
INRAD=10.0
EXRAD=12.0
HEIGHT=1.0
**
MIDHEIGHT=HEIGHT/2
MID=(INRAD+EXRAD)/2
**
***********************************************************
** Model definition
**
*NODE, NSET=SECTION
1, <INRAD>,0,0
2, <EXRAD>,0,0
3, <EXRAD>,0,<HEIGHT>
4, <INRAD>,0,<HEIGHT>
*NCOPY, CHANGE NUMBER=100, OLD SET=SECTION, NEW SET=REST, SHIFT, MULTIPLE=7
0,0,0
0,0,0,0,0,1,45
*NSET, NSET=ALL
REST, SECTION
*NSET, NSET=INT, GENERATE
1,701,100
4,704,100
*NSET, NSET=EX, GENERATE
2,702,100
3,703,100
*NSET, NSET=TOP, GENERATE
3,703,100
4,704,100
*NSET, NSET=BOTTOM, GENERATE
1,701,100
2,702,100
**
*ELEMENT, TYPE=CCL12H, ELSET=FIRST
1, 201,202,203,204,1,2,3,4,101,102,103,104
*ELEMENT, TYPE=CCL12H, ELSET=LAST
4, 1,2,3,4,601,602,603,604,701,702,703,704
*ELGEN, ELSET=FIRST3
1,3,200,1
*ELSET, ELSET=ALL
FIRST3,LAST
*SOLID SECTION, ELSET=ALL, MATERIAL=MYMAT
*MATERIAL, NAME=MYMAT
*HYPERELASTIC,N=2
1.E5,0.5E5,0.5E5,0.8E5,0.75E5,1.E-7,1.E-7
*SURFACE, NAME=PSURF
ALL,S5
************************************************************
** Boundary Condition
*TRANSFORM, TYPE=C, NSET=ALL
0,0,0, 0,0,1
*BOUNDARY
BOTTOM,1,3,0
ALL,2,2,0
************************************************************
** History data
**
*STEP, nlgeom
*STATIC
0.01,1.0
*DSLOAD
PSURF,P,-10e4
*OUTPUT, FIELD, FREQ=1000
*NODE OUTPUT, NSET=TOP
U
*ELEMENT OUTPUT
S,E
*END STEP