*HEADING
 Substructure patch test containing degenerate elements
 Uses substructure generation file psupdgn1_gen.inp
*NODE
1,0.,1.
2,0.,0.5
3,0.,0.
4,1.,1.
5,1.,0.5
6,1.,0.
*NSET,NSET=PINNED
3, 
*NSET,NSET=XFIXED
1,2
*NSET,NSET=XDISPL
4,5,6
*ELEMENT,TYPE=Z101,ELSET=EALL,FILE=psupdgn1_gen
1,1,2,3,4,5,6
*SUBSTRUCTURE PROPERTY,ELSET=EALL
*STEP
*STATIC
*BOUNDARY
PINNED,1,2,0.
XFIXED,1,,0.
XDISPL,1,,0.2
*NODE FILE
U, 
*NODE PRINT
U, 
*OUTPUT,FIELD,VAR=PRESELECT
*SUBSTRUCTURE PATH,ENTER ELEMENT=1
*OUTPUT,FIELD,VAR=PRESELECT
*NODE FILE
U, 
*EL FILE
S, 
E, 
*NODE PRINT
U, 
*EL PRINT
S, 
E, 
*SUBSTRUCTURE PATH,LEAVE
*END STEP