*HEADING
  BASIC VERIFICATION - MPC TYPE=ELBOW
  ELEMENT: ELBOW31, TEST TYPE:  DYNAMIC ANALYSIS  TEST NUMBER:
**
** STEP 1: BENDING LOAD APPLIED - STATIC
** STEP 2: BENDING LOAD REMOVED - DYNAMIC
**
** CASE: 1 (NO MPC)
*NODE, NSET=ALL
 1, 0.0E+0, 0.0E+0, 0.0E+0
 2, 10.0E+0, 0.0E+0, 0.0E+0
 4, 20.0E+0, 0.0E+0, 0.0E+0
**
*ELEMENT, TYPE=ELBOW31, ELSET=ALL1
 1,   1, 2
 2,   2, 4
**
*BEAM SECTION,  SECTION=ELBOW,  ELSET=ALL1,  MATERIAL=MAT
 5.0E+0, 0.25E+00
 0.E+00, 10.0E+01, 0.000E+00
 3, 16, 5
************************************************************
** CASE: 2 
*NODE, NSET=ALL
 101, 0.0E+0, 0.0E+0, 0.0E+0
 102, 10.0E+0, 0.0E+0, 0.0E+0
 103, 10.0E+0, 0.0E+0, 0.0E+0
 104, 20.0E+0, 0.0E+0, 0.0E+0
**
*ELEMENT, TYPE=ELBOW31, ELSET=SEC101
 101,   101, 102
*ELEMENT, TYPE=ELBOW31, ELSET=SEC102
 102,   103, 104
**
*BEAM SECTION,  SECTION=ELBOW,  ELSET=SEC101,  MATERIAL=MAT
 5.0E+0, 0.25E+00, 0.0E+0
 0.00E+00, 100.0E+00, 0.000E+00
 3, 16, 5
*BEAM SECTION,  SECTION=ELBOW,  ELSET=SEC102,  MATERIAL=MAT
 5.0E+0, 0.25E+00, 0.0E+0
 0.00E+00, -100.0E+00, 0.000E+00
 3, 16, 5
**
*MPC
ELBOW, 102, 103
*ELSET,ELSET=elout
1,101
************************************************************
*MATERIAL,  NAME=MAT
*ELASTIC
 2.1E11,  0.3
*DENSITY
 7800.0,
**
** COMPLETELY FIX NODE 1, 101
*BOUNDARY
 1,  1,6
 101,  1,6
 ALL, NODEFORM
**
*****************************************************
*STEP, NLGEOM, INC=20
 STEP 1: NON LINEAR BENDING LOAD APPLIED (STATIC)
**
*STATIC
 0.1, 1.0
**
*CLOAD, OP=NEW
 4,    2,  1.0E+05
 104,  2,  1.0E+05
**
**
*EL PRINT, FREQ=10
S, 
SF, 
*NODE PRINT, FREQ=10
U, 
RF, 
*EL FILE,FREQ=10,ELSET=elout
S, 
SF, 
**SINV, 
COORD, 
*NODE FILE, FREQ=10
U, 
RF, 
*END STEP
*****************************************************
*STEP, NLGEOM, INC=500
 STEP 2: NON LINEAR BENDING LOAD REMOVED (DYNAMIC)
**
*DYNAMIC,HAFTOL=1.0E6
 0.001, 0.1,, 0.001
**
*CLOAD, OP=NEW
 4,    2,  0.0
 104,  2,  0.0
**
**
*EL PRINT, FREQ=50
S, 
*NODE PRINT, FREQ=50
U, 
RF, 
*EL FILE,FREQ=50,ELSET=elout
S, 
SF, 
**SINV, 
COORD, 
*NODE FILE, FREQ=50
U, 
RF, 
*END STEP