Underwater B

This is a plane strain model of a high explosive detonation in water. File underwater_B.k is Lagrangian with a fine mesh.

*CONTROL_ENERGY
*CONTROL_TERMINATION
*DATABASE_BINARY_D3PLOT
*DATABASE_GLSTAT
*END
*EOS_GRUNEISEN
*EOS_JWL
*INCLUDE
*INITIAL_DETONATION
*KEYWORD
*MAT_HIGH_EXPLOSIVE_BURN
*MAT_NULL
*PART
*SECTION_SOLID

  *KEYWORD
  *INCLUDE
  fine.inc
  *CONTROL_TERMINATION
       100.0
  *DATABASE_BINARY_D3PLOT
         1.0 
  *DATABASE_GLSTAT
         0.1
  *INITIAL_DETONATION
           1 0.000E+00 0.000E+00 0.000E+00 0.000E+00
  *CONTROL_ENERGY
           2         1         2         2
  *MAT_NULL
           1  1.000000 0.000E+00 0.000E+00 0.000E+00 0.000E+00
  *EOS_GRUNEISEN
           1  1.500000 
  
  *INITIAL_DETONATION
           2
  *MAT_HIGH_EXPLOSIVE_BURN
           2      1.63     0.784     0.260 0.000E+00
  *EOS_JWL
           2      3.71 3.230E-02      4.15     0.950     0.300 4.300E-02      1.00
  *SECTION_SOLID
           1         1
  *SECTION_SOLID
           2         1 
  *PART
  
           1         1         1         1
  *PART
  
           2         2         2         2
  *END