*HEADING
.inp: membrane patch test [S3R]
driven submodels: psc38simp1.inp [C3D8I] and psc3ksrmp1.inp [C3D20R]
**
*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=S3R, 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
**
** STEP 1 - GENERAL STATIC STEP
**
*STEP
*STATIC
0.25,1.
*BOUNDARY
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
*EL FILE,ELSET=EALL,FREQ=999,POSITION=INTEGRATION POINTS
SINV,
*EL PRINT,ELSET=EALL,FREQ=999,POSITION=INTEGRATION POINTS
SINV,
*NODE FILE,FREQ=999
U,
RF,
*NODE PRINT,FREQ=999
U,
RF,
*END STEP
**
** STEP 2 - GENERAL STATIC STEP
**          DISPLACEMENT BC'S OF STEP 1 DOUBLED
**
*STEP
*STATIC
0.25,1.0
*BOUNDARY
NALL,3,5
10,1,1,0.
20,1,1,0.00048
30,1,1,0.00060
40,1,1,0.00012
10,2,2,0.
20,2,2,0.00024
30,2,2,0.00048
40,2,2,0.00024
*END STEP
**
** STEP 3 - PERTURBATION STEP
**          APPLYING SAME BC'S AS STEP 1 
**
*STEP,PERTURBATION
*STATIC
*BOUNDARY
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
*EL FILE,ELSET=EALL,FREQ=999,POSITION=INTEGRATION POINTS
SINV,
*EL PRINT,ELSET=EALL,FREQ=999,POSITION=INTEGRATION POINTS
SINV,
*NODE FILE,FREQ=999
U,
RF,
*NODE PRINT,FREQ=999
U,
RF,
*END STEP
**
** STEP 4 - STEADY STATE DYNAMIC STEP
**          APPLYING SAME BC'S AS STEP 1 
**
*STEP
*STEADY STATE DYNAMIC, DIRECT
10.0,
*BOUNDARY
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
*NODE FILE,FREQ=999
U,
RF,
PU,
*NODE PRINT,FREQ=999
U,
RF,
PU,
*EL FILE,FREQ=0
*EL PRINT,FREQ=0
*END STEP