*HEADING
.inp: membrane patch test [S3RS]
driven submodel: substs_s_shel_c3d8r_p_xpl.inp [C3D8R]
displacement field applied:
U_x = A (x + y/2), U_y = A (y + x/2), U_z = 0
**
*PREPRINT,ECHO=NO,HISTORY=NO,MODEL=NO
*RESTART,WRITE
*NODE,NSET=NALL
10,0,0
20,.24,0.
30,.24,.12
40,0.,.12
50,.12,0.
60,.24,.06
70,.12,.12
80,.0,.06
102,.04,.02
104,.18,.03
204,.16,.08
202,.08,.08
*ELEMENT,TYPE=S3RS, ELSET=EALL
1,10,104,102
2,10,20,104
3,10,102,40
4,102,204,202
5,104,20,204
6,20,30,204
7,102,202,40
8,102,104,204
9,202,30,40
10,202,204,30
*SHELL SECTION,MATERIAL=A1, ELSET=EALL
.0125, 
*MATERIAL,NAME=A1
*ELASTIC,TYPE=ISOTROPIC
1.E6,.25
*DENSITY
1., 
*NSET,NSET=SIDES,GENERATE
10,80,10
**
*NSET, NSET=QA_TEST
NALL,
**
*AMPLITUDE, NAME=QSTATIC, SMOOTH=0.25, TIME=TOTAL TIME
0.0,0.0,0.01,1.0,0.02,2.0,0.03,1.0
**
** STEP 1 - GENERAL QUASI-STATIC STEP
**
*STEP, NLGEOM=NO
*DYNAMIC, EXPLICIT
,0.01
*BOUNDARY, AMPLITUDE=QSTATIC
NALL,3,5
10,1,1,0.
20,1,1,0.00024
30,1,1,0.00030
40,1,1,0.00006
10,2,2,0.
20,2,2,0.00012
30,2,2,0.00024
40,2,2,0.00012
**
** output requests for submodeling
**
*FILE OUTPUT, NUMBER INTERVAL=20
*NODE FILE
U,
**
** output requests
**
*OUTPUT, FIELD, NUMBER INTERVAL=10
*NODE OUTPUT
U,RF
*ELEMENT OUTPUT
S,LE
*OUTPUT, HISTORY, TIME INTERVAL=0.01
*ENERGY OUTPUT, VARIABLE=PRESELECT
**
**output for QA
**
*OUTPUT, FIELD, NUMBER INTERVAL=1
*NODE OUTPUT, NSET=QA_TEST
U, 
*END STEP
**
** STEP 2 - GENERAL QUASI-STATIC STEP
**          DISPLACEMENT BC'S OF STEP 1 DOUBLED
**
*STEP, NLGEOM=NO
*DYNAMIC, EXPLICIT
,0.01
*BOUNDARY, AMPLITUDE=QSTATIC
NALL,3,5
10,1,1,0.
20,1,1,0.00024
30,1,1,0.00030
40,1,1,0.00006
10,2,2,0.
20,2,2,0.00012
30,2,2,0.00024
40,2,2,0.00012
*END STEP
**
** STEP 3 - GENERAL QUASI-STATIC STEP
**          DISPLACEMENT BC'S SAME AS STEP 1 
**
*STEP, NLGEOM=NO
*DYNAMIC, EXPLICIT
,0.01
*BOUNDARY, AMPLITUDE=QSTATIC
NALL,3,5
10,1,1,0.
20,1,1,0.00024
30,1,1,0.00030
40,1,1,0.00006
10,2,2,0.
20,2,2,0.00012
30,2,2,0.00024
40,2,2,0.00012
*END STEP