Forging A

This is a Lagrangian model of a forging operation in plane strain. Calculation aborts with error due to negative volume of some elements.

*BOUNDARY_PRESCRIBED_MOTION_RIGID
*CONTACT_SURFACE_TO_SURFACE
*CONTACT_SURFACE_TO_SURFACE
*CONTROL_TERMINATION
*DATABASE_BINARY_D3PLOT
*DATABASE_BNDOUT
*DEFINE_CURVE
*ELEMENT_SHELL
*ELEMENT_SOLID
*END
*KEYWORD
*MAT_INV_HYPERBOLIC_SIN
*MAT_RIGID
*NODE
*PART
*SECTION_SHELL
*SECTION_SOLID

  *KEYWORD
  *DATABASE_BNDOUT
   0.01
  *CONTROL_TERMINATION
   2.0000000
  *DATABASE_BINARY_D3PLOT
   0.1000000
  *MAT_INV_HYPERBOLIC_SIN
  1,    3.14e-1,     1.0e+4,     3.0e-1,  1260.0e+0,    4.55e+0
  0.17237, 3.8, 3.45e+8, 1.188e+6, 40.8825, 1.0e-6
  *SECTION_SOLID
  1,1
  *PART
  
  1, 1, 1, 0, 0, 0, 2, 0
  *MAT_RIGID
  2,    3.14e-1,     1.0e+4,     3.0e-1
  1.0,     1.0e+0, 7.0
  
  *SECTION_SHELL
  2, 1
  1.0, 1.0, 1.0, 1.0
  *PART
  
  3, 2, 2, 0, 0, 0, 0, 0
  *PART
  
  4, 2, 2, 0, 0, 0, 0, 0
  *DEFINE_CURVE
  1, 0, 1.0, 1.0, 0.0, 0.0, 0
  0.0,    -1.0e+0
  10.0,   -1.0e+0
  *BOUNDARY_PRESCRIBED_MOTION_RIGID
  3, 2, 0, 1, 1.0, 0
  *BOUNDARY_PRESCRIBED_MOTION_RIGID
  4, 2, 0, 1, 1.0e-9, 0
  *CONTACT_SURFACE_TO_SURFACE
  3,1,3,3
  
  
  *CONTACT_SURFACE_TO_SURFACE 
  4,1,3,3
  
  
  *NODE
  $
  *ELEMENT_SOLID
  $
  *ELEMENT_SHELL
  $
  *END