*heading
 Test of 2-D slip ring connectors

           2 
           O  -----------3
          |              
          | 
          | 
       1  M 
*preprint, model=yes, echo=yes, history=yes
*parameter
** User input data defining the pulley properties
 stiff = 1500.
 Tp    = 1.2E-6
 R1    = 1.0
 R2    = 1.0
 R3    = 1.0
 R4    = 1.0
 xmu   = 0.1
 pi    = 3.141592653589
 alpha = pi/2.0
 zero  = 0.0
*node, nset=nall
 1,    0.,   0.
 2,    0.,   2.
 3,    3.,   2.
 4,    3.,   0.
*****************************************
*ELEMENT, TYPE=CONN2D2, elset=belt1
 101, 1,2
*CONNECTOR SECTION,ELSET=BELT1,BEHAVIOR=BELT_FRIC
slipring,

 <Tp>, <alpha>
*ELEMENT, TYPE=CONN2D2, elset=belt2
 102, 2,3
*CONNECTOR SECTION,ELSET=BELT2,BEHAVIOR=BELT_FRIC
slipring,

 <Tp>, <alpha>
*ELEMENT, TYPE=CONN2D2, elset=belt3
 103, 3,4
*CONNECTOR SECTION,ELSET=BELT3,BEHAVIOR=BELT_FRIC
slipring,

 <Tp>, <pi>
*CONNECTOR BEHAVIOR,NAME=BELT_FRIC
*CONNECTOR ELASTICITY,COMPONENT=1
<stiff>,
*connector friction, predefined, stickstiffness=100.0
*friction
<xmu>,
*elset, elset=belt
belt1,belt2,belt3
*****************************************
*ELEMENT, TYPE=MASS, ELSET=MASS
4001, 1
4002, 2
4003, 3
4004, 4
*MASS, ELSET=MASS
0.01,
*boundary
 1, 1,1
 1, 10,10
**
 2, 1,2
 3, 1,2
**
 4, 1,1
 4, 10,10
**
*amplitude, name=amp, definition=smooth
0.0,0.0,0.25,1.0,0.5,0.5,0.75,0.5
*amplitude, name=amp1, definition=smooth
0.0,0.0,0.5,1.0,0.75,1.0,1.0,0.0
*step, nlgeom=yes, inc=10000
*dynamic, haftol=100.0
 0.0025, 1.0, 1.0d-5,0.0025
*cload,amp=amp1
1,2,-1.0
*cload,amp=amp
4,2,-1.0
*output,field, freq=1
*node output
 u, rf
*output,history
*element output, elset=belt
CEF1,CSF2,CASU2,CP2,
*end step