*HEADING
 SUBSTRUCTURE ANALYSIS WITH UNSORTED NSET AND RETAINED DOFS
Requires substructure generation file
hertzcontact_2d_unsorted_gen1.inp
*NODE
*NODE,SYSTEM=C
*NGEN,LINE=C
*NSET,NSET=DBODY,GENERATE
*surface,type=node,NAME=DSURF
DBODY,
*NODE,NSET=FIX
*NODE,NSET=REF
*ELEMENT,TYPE=R2D2,ELSET=SURFACE
*ELGEN,ELSET=SURFACE
*RIGID BODY,ELSET=SURFACE,REFNODE=999
*surface,NAME=RSURF
SURFACE,SPOS
*ELEMENT,TYPE=Z1001,ELSET=SUPER, FILE=hertzcontact_2d_unsorted_gen1
*SUBSTRUCTURE PROPERTY,ELSET=SUPER,POSITION TOL=0.
*CONTACT PAIR,INTERACTION=RDINT1,SMALL SLIDING
DSURF,RSURF
*SURFACE INTERACTION,NAME=RDINT1
1.,
*BOUNDARY
 REF,1,2
 REF,6,6
 201,1
*STEP
*STATIC,DIRECT
 1.,
*BOUNDARY
 1,2,2,-.4
*EL FILE,ELSET=SURFACE
S,E
*PRINT,CONTACT=YES,SOLVE=YES
*CONTACT FILE,SLAVE=DSURF,FREQ=999
*CONTACT PRINT,SLAVE=DSURF,FREQ=999
*NODE PRINT
U,
*OUTPUT,VAR=PRESELECT,FIELD
*SUBSTRUCTURE PATH,ENTER ELEMENT=99
*OUTPUT,VAR=PRESELECT,FIELD
*EL PRINT
 S ,
*NODE PRINT
 U,
*SUBSTRUCTURE PATH,LEAVE
*SUBSTRUCTURE PATH,ENTER ELEMENT=99
*OUTPUT,VAR=PRESELECT,FIELD
*EL PRINT,ELSET=TOP
E,
*EL FILE,ELSET=BOT
S,E
*NODE PRINT,NSET=CYLSURF
RF,
*SUBSTRUCTURE PATH,LEAVE
*END STEP