*IMPORT,UPDATE=NO,STATE=YES
ONE
*RESTART,WRITE,NUMBER INTERVAL=40,TIME MARKS=YES 
*EQUATION
** Since the S11 output is Cauchy or true stress, we need to
** determine the nominal stress for post-processing.
** Nodes 3,6,7 are tied to node 2 in dof 1 so that:
** Nominal stress (dof 1) = RF1 (@ node 2) / Original area
** (w/c is 1 x 1 = 1)
2
FACE42,1,1, 2,1,-1
*EQUATION
2
FACE52,2,1,3,2,-1
*PREPRINT, MODEL=YES
*BOUNDARY,TYPE=VELOCITY
FACE1,3
FACE3,2
FACE6,1
*STEP
*DYNAMIC,EXPLICIT
,1.
*BOUNDARY,TYPE=VELOCITY
FACE4,1,1,1.5
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=FACE4
U,RF
*ELEMENT OUTPUT,ELSET=ONE
S,
DMENER,
SENER
*END STEP
*STEP
*DYNAMIC,EXPLICIT
,1.
*BOUNDARY,TYPE=VELOCITY
FACE4,1,1,-1.5
*END STEP