Embedded FSI example

This examples features a simple immersed FSI example. The active structure needs to be entirely embedded in the fluid for the immersed method. Interfaces are tracked automatically. It is advised to use a finer mesh for the fluid than for the solid. For FSI problems, the two solvers will use a synchronized timestep i.e the smallest value computed from their respective domains (CFL condition). No leakage can occur.

*BOUNDARY_SPC_SET
*CESE_BOUNDARY_NON_REFLECTIVE_SET
*CESE_BOUNDARY_PRESCRIBED_SET
*CESE_BOUNDARY_SOLID_WALL_SET
*CESE_CONTROL_LIMITER
*CESE_CONTROL_SOLVER
*CESE_CONTROL_TIMESTEP
*CESE_EOS_IDEAL_GAS
*CESE_INITIAL
*CESE_PART
*CONTACT_AUTOMATIC_SINGLE_SURFACE_ID
*CONTROL_CONTACT
*CONTROL_TERMINATION
*DATABASE_BINARY_D3PLOT
*DEFINE_CURVE
*ELEMENT_SOLID
*KEYWORD
*HOURGLASS
*LOAD_BODY_PARTS
*LOAD_BODY_Z
*MAT_ELASTIC
*NODE
*PARAMETER
*PART
*TITLE
*SECTION_SHELL
*SECTION_SOLID
*SET_PART_LIST
*SET_SEGMENT

$-----------------------------------------------------------------------------
$
$ Example provided by Iñaki (LSTC)
$
$ E-Mail: info@dynamore.de
$ Web: http://www.dynamore.de
$
$ Copyright, 2015 DYNAmore GmbH
$ Copying for non-commercial usage allowed if
$ copy bears this notice completely.
$
$X------------------------------------------------------------------------------
$X
$X 1. Run file as is.
$X    Requires LS-DYNA MPP R8.0.0 (or higher) with double precision 
$X
$X------------------------------------------------------------------------------
$# UNITS: (kg/m/s)
$X------------------------------------------------------------------------------
$X
*KEYWORD
*TITLE
CESE Embedded FSI example
$---+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
$                                                                              $
$                             PARAMETERS                                       $
$                                                                              $
$---+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
*PARAMETER
R    T_end      0.02
R  dt_plot      1e-3
$
$--- Fluid
$
R dt_fluid    0.0001
Rcfl_fluid       0.9
R ro_1          1.22
R P_1       1.013e+5
R P_2     1.51988e+5
R cv           713.5
R cp          1001.5
*CONTROL_TERMINATION
$   endtim    endcyc     dtmin     endeng   endmas
    &T_end   
*INCLUDE
struc.k
*INCLUDE
cese.k
$---+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
$                                                                              $
$                             DATABASE (OUTPUT)                                $
$                                                                              $
$---+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
*DATABASE_BINARY_D3PLOT
&dt_plot
*END