** Frictionless One pulley test (for sliprings + retractor)
** The belt material is un-stretchable
** Supported load F = mg = (10 * 1 = 10)
** Tension in Belt is F / 2 = 5.0
** length of rope pulled out (at node 1004) = d = 2.25
** Flow (node 1003) = d  = 2.25
** Flow (node 1002) = d/2 = 1.125
** Flow (node 2002) = d/2 = 1.125
**
*preprint,model=yes, history=yes
*NODE,NSET=NALL3D
1001,0.,0.,0.
1002,0.001,-2.5,0.
1003,0.002,0.0,0.
2001,1.,0.,0.
2002,1.001,-2.5,0.
2003,1.002,0.0,0.
**--------------------------------
** Rope-Pulley system
**--------------------------------
*ELEMENT,TYPE=CONN3D2,ELSET=PULLEY
1,1001,1002
2,1002,1003
3,2001,2002
4,2002,2003
*CONNECTOR SECTION,ELSET=PULLEY,BEHAVIOR=BELT
slipring,

1.2E-6, 90, 1.0, 1.00
**
*CONNECTOR BEHAVIOR,NAME=BELT
**-----------------------------
** Unstretchable belt material
**-----------------------------
*CONNECTOR ELASTICITY,COMPONENT=1
150000.,
**
*ELEMENT, TYPE=MASS, ELSET=MASS
4001, 1002
4002, 2002
*MASS, ELSET=MASS
1.E+01
*amplitude,name=ramp,definition=smooth
0,0,1.0,1.0,10.0,1.0
*amplitude,name=delay,definition=smooth
0,0,2.0,0.0,3.0,1.0,10.0,1.0
**---------------------------------------------
** Fix all nodes except the load bearing node
** Stop inflow of material at 1001
**---------------------------------------------
*boundary
1001,10,10,0
1001,1,3,0
1003,1,3,0
2001,10,10,0
2001,1,3,0
2003,1,1,0
2003,3,3,0
2003,10,10,0
**
*NSET, NSET=QA_TEST
1002,2002,2003
*STEP,NLGEOM=YES
*DYNAMIC, EXP, DIRECT USER CONTROL
1.e-3,10.0
**-----------------------------------------------
** allow the load to settle under gravity before
** pulling out the rope
**-----------------------------------------------
*Dload,amp=ramp
, GRAV, 1.0, 0.0, -1.0, 0.0
**------------------------------------------------
** pull out d=2.25 units of rope after
** a delay of 2.0 seconds
**------------------------------------------------
*boundary, amp=delay, type=vel
1003,10,10,0.3
2003,2,2,0.3
**--------------------------
*OUTPUT,HISTORY, TIME INTERVAL=1.0E-3
*NODE OUTPUT,NSET=NALL3D
U, RF,
*ELEMENT OUTPUT,ELSET=PULLEY
CTF,CEF,CU,CCU,CRF,CP,CV
*OUTPUT, FIELD, NUMBER INTERVAL=10
*NODE OUTPUT, NSET=NALL3D
U,
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=1.0E-3
*********** QA **********
*OUTPUT,FIELD,NUM=10
*NODE OUTPUT,NSET=QA_TEST
U,
*ENDSTEP