*heading
 Substructure rotation activating non-retained DOF
 Uses substructure generation file psuptr1_gen.inp
*restart,write
*node
1,1.,0.
2,1.70711,0.70711
*element,type=z1,elset=eall,file=psuptr1_gen
1,1,2
*substructure property,elset=eall

1.0,0.0,0.0, 1.0,0.0,1.0,45.0
*step
*static
*boundary
1,1,2
2,1,1,0.1
2,2,2,0.1
*node print,freq=999,summ=no
u,
rf,
*el print,freq=999,summ=no
s,
*node file
u,rf
*output,field,var=preselect
*substructure path,enter element=1
*OUTPUT,FIELD,VAR=PRESELECT
*node file,freq=1
u,
rf,
*substructure path,leave
*end step