*HEADING
 SUPERPLASTIC FORMING OF BOX WITH
 MEMBRANES - AUTOMATIC LOADING
*RESTART, WRITE, FREQUENCY=30
**
** PLATE DEFINITION
**
*NODE
*NGEN, NSET=EDGE3
*NGEN, NSET=EDGE5
*NFILL, NSET=PLATE
EDGE3,EDGE5,22,1
*NSET, NSET=EDGE1, GENERATE
*NSET, NSET=EDGE7, GENERATE
*NSET, NSET=CENTER
*ELEMENT, TYPE=M3D4, ELSET=PLATE1
*ELGEN, ELSET=PLATE1
*NSET,ELSET=PLATE1, NSET=NCONT
*ELEMENT, TYPE=M3D4, ELSET=PLATE2
*ELGEN, ELSET=PLATE2
*ELSET,ELSET=PLATE
PLATE1,PLATE2
*MEMBRANE SECTION, ELSET=PLATE, MATERIAL=SUPRAL
.125,
**
** MATERIAL IS CLOSE TO SUPRAL100 AT 470C
**
*MATERIAL, NAME=SUPRAL
*ELASTIC
10.3E6, .34
*CREEP, LAW=TIME
1.48E-9, 2., 0.
**
** CONTACT surface
**
*NODE, NSET=DIE
*RIGID BODY, ELSET=ERIGID, REFNODE=10000
*NODE, INPUT=superplasticbox_node.inp
*ELEMENT,TYPE=R3D3,ELSET=ERIGID,
INPUT=superplasticbox_element.inp
*SURFACE,NAME=DIE
 ERIGID,SPOS
*SURFACE,type=node,NAME=SLAVES
 NCONT,
*CONTACT PAIR, INTERACTION=DIE_NODE, smooth=0.2
 SLAVES,DIE
*SURFACE INTERACTION,NAME=DIE_NODE
**
** BOUNDARY AND INITIAL CONDITIONS
**
*BOUNDARY
EDGE1,3
EDGE7,2,3
EDGE3,1
EDGE5,1,2
10000,1,6
*INITIAL CONDITIONS, TYPE=STRESS, UNBALANCED STRESS=STEP
PLATE, 1.0, 1.0
*AMPLITUDE,DEFINITION=SOLUTION DEPENDENT,NAME=AUTO
1.,0.1,1000.
*NSET,NSET=NSELECT
**
** STEP 1
**
*STEP, NLGEOM, unsymm=yes
*STATIC
2.E-3,1.0,
*DLOAD
PLATE,P,-0.2
*CONTACT PRINT, FREQUENCY=100
*CONTACT FILE, FREQUENCY=100, NSET=NSELECT
*EL PRINT, ELSET=PLATE , FREQUENCY=100
S, E
CE,
SINV,
*PRINT, CONTACT=YES
*NODE PRINT, NSET=EDGE3, FREQUENCY=100
U,
*NODE FILE, NSET=EDGE3, FREQUENCY=100
U,
*OUTPUT,FIELD, Frequency=100
*NODE OUTPUT,NSET=EDGE3
U,
*END STEP
**
** STEP 2
**
*STEP, INC=500, NLGEOM, unsymm=yes
*VISCO, CETOL=0.005
0.2, 2000.0
*DLOAD,AMPLITUDE=AUTO
PLATE,P,-0.2
*CREEP STRAIN RATE CONTROL, ELSET=PLATE,
AMPLITUDE=AUTO
** TO WRITE THE AUTOMATIC SOLUTION CONTROL
** VARIABLES AMPCU AND RATIO TO THE RESULTS
** FILE EVERY INCREMENT SUCH FILE HAS TO BE
** ACTIVATED
*NODE FILE, NSET=CENTER, FREQUENCY=1
U,
*OUTPUT,FIELD, OP=ADD,Frequency=1
*NODE OUTPUT,NSET=CENTER
U,
*END STEP