*HEADING
 MLTF ELBOW: IN-PLANE BENDING. SYM. HALF S8R5 MODEL,LAMDA=.167
*NSET,NSET=N100
100, 
*NODE
 100,0.,24.,-24.
 101,0.,31.808,-24.
 117,0.,16.192,-24.
1300,0.,24.0,0.
1301,0.,31.808,0.
1317,0.,16.192,0.
3100,0.,0.,24.
3101,0.,0.,31.808
3117,0.,0.,16.192
6700,0.,-72.,24.
6701,0.,-72.,31.808
6717,0.,-72.,16.192
*NGEN,NSET=PYZ
100,1300,100
101,1301,100
117,1317,100
3100,6700,100
3101,6701,100
3117,6717,100
*NGEN,LINE=C,NSET=PYZ
 1300,3100,100,0,0.,0.,0.,1.
 1301,3101,100,0,0.,0.,0.,1.
 1317,3117,100,0,0.,0.,0.,1.
*NGEN,LINE=C,NSET=LOADEND
101,117,1,0,0.,24.,-24.,0.,0.,-1.
*NGEN,LINE=C ,NSET=END2
1301,1317,1,0,0.,24.,  0.0,0.,0.,-1.
*NGEN,LINE=C,NSET=END3
3101,3117,1,0,0.,0.,24., 0.,1.,0.
*NGEN,LINE=C ,NSET=FIXEDEND
6701,6717,1,0,0.,-72.,24., 0.,1.,0.
*NFILL
LOADEND,END2,12,100
END3,FIXEDEND,36,100
*NGEN,LINE=C
1401,1417,1,1400,,,,0., .087155743,-.9961947
1501,1517,1,1500,,,,0., .173648178,-.9848078
1601,1617,1,1600,,,,0., .258819045,-.9659258
1701,1717,1,1700,,,,0., .342020143,-.9396926
1801,1817,1,1800,,,,0., .422618262,-.9063078
1901,1917,1,1900,,,,0., .500000000,-.8660254
2001,2017,1,2000,,,,0., .573576436,-.8191520
2101,2117,1,2100,,,,0., .642787610,-.7660444
2201,2217,1,2200,,,,0., .707106781,-.7071068
2301,2317,1,2300,,,,0., .766044443,-.6427876
2401,2417,1,2400,,,,0., .819152044,-.5735764
2501,2517,1,2500,,,,0., .866025404,-.5000000
2601,2617,1,2600,,,,0., .906307787,-.4226183
2701,2717,1,2700,,,,0., .939692621,-.3420201
2801,2817,1,2800,,,,0., .965925826,-.2588190
2901,2917,1,2900,,,,0., .984807753,-.1736482
3001,3017,1,3000,,,,0., .996194698,-.0871557
*ELEMENT,TYPE=S8R5
101,101,301,303,103,201,302,203,102
1601,3101,3301,3303,3103,3201,3302,3203,3102
*ELGEN,ELSET=LEG
101,8,2,1,6,200,100
1601,8,2,1,18,200,100
*ELEMENT,TYPE=S8R5
701,1301,1501,1503,1303,1401,1502,1403,1302
*ELGEN,ELSET=LBOW
701,8,2,1,9,200,100
*ELSET,ELSET=ALL
 LEG,LBOW
*MATERIAL ,NAME=PIPE
*ELASTIC
28.1E6,.2642
*PLASTIC
39440.,0.
50170.,.00473
54950.,.01264
58540.,.02836
61520.,.0491
76520.,.105
*SHELL SECTION,ELSET=LEG,MATERIAL=PIPE
.37,7
*SHELL SECTION,ELSET=LBOW,MATERIAL=PIPE
.41,7
*BOUNDARY
PYZ,1
PYZ,5,6
FIXEDEND,1,6
*NSET,NSET=COUPLED_END,GENERATE
101,117,1
*KINEMATIC COUPLING, REF NODE = 100
COUPLED_END,
*NSET,NSET=NOUT
N100,LOADEND,END2,END3,FIXEDEND
***RESTART,WRITE,FREQUENCY=10
*STEP,NLGEOM
HOLD PRESSURE CONSTANT, APPLY BENDING ACTION
*STATIC,RIKS
 .05, 1.,.01,.5,2.0,100,4,-.2
*BOUNDARY
100,4,4,-.2
*EL PRINT,FREQUENCY=0
PE, 
*NODE PRINT,NSET=N100
U, 
RF, 
*NODE FILE,NSET=NOUT
U,RF
*END STEP