**Test for retractor type connector
**Rotation theta = flow 
**scaling factor = 1
**Case 1 specifed flow
**Case 2 specified rotation
*preprint,model=no, history=no
*NODE,NSET=NALL3D
1001,0.,0.,0.
1002,0.,0.,0.
2001,1.,0.,0.
2002,1.,0.,0.
**--------------------------------
*orientation, name=origlob
1,0,0,0,1,0
3,
*ELEMENT,TYPE=CONN3D2,ELSET=FLOW
1,1001,1002
2,2001,2002
*CONNECTOR SECTION,ELSET=FLOW
retractor,
origlob,
**
*ELEMENT, TYPE=ROTARYI, ELSET=ROTARY
4002, 1001
4003, 2001
*ROTARY, ELSET=ROTARY
1.E-01,1.E-01,1.E-01
*amplitude,name=ramp,definition=smooth
0,0,0.2,1.0,1.0,1.0
**---------------------------------------------
** Fix all nodes except the load bearing node
** Stop inflow of material at 1001
**---------------------------------------------
*boundary
1001,1,5
2001,1,5
**
*NSET, NSET=QA_TEST
1001,
*STEP,NLGEOM=YES
*STATIC
1.e-2,1.0
**----------------------------------
** pull out d=2pi units of material
**----------------------------------
*boundary, amp=ramp, type=vel
1002,10,10,6.2831835
2001,6,6,6.2831835
**--------------------------
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=NALL3D
U,
*ELEMENT OUTPUT,ELSET=FLOW
CU,CCU,CP,CV
*OUTPUT, FIELD
*NODE OUTPUT, NSET=NALL3D
U,
*ENDSTEP