*HEADING
 1D transient wave propagation, solid-acoustic coupling 
 (between AC2D8 and B22H elements), 
 incident wave load, spherical and defined through bubble-load amplitude
**
*PREPRINT,ECHO=NO,HISTORY=NO,MODEL=YES
*NODE,NSET=ACOUSTIC
 1, 0. , 0.
 2, 0.5, 0.
 3, 1. , 0.
 4, 1. , 0.5
 5, 1. , 1.
 6, 0.5, 1.
 7, 0. , 1.
 8, 0. , 0.5
*NODE, NSET=SOLID
 1001, 1. , 0.
 1002, 1. , 0.5
 1003, 1. , 1.
*ELEMENT,TYPE=AC2D8,ELSET=ACOUSTIC
 1,1,3,5,7,2,4,6,8
*ELEMENT,TYPE=B22H,ELSET=SOLID
 1001, 1001,1002,1003
**************************
*SURFACE,NAME=IW_LOAD_ACOUSTIC
1,S2
*SURFACE,NAME=IW_LOAD_SOLID
1001,SPOS
*SURFACE,NAME=TIE_ACOUSTIC
1,S2
*SURFACE,NAME=TIE_SOLID
1001,SPOS
**************************
** CROSS-SECTION IS 1.E-4  
*SOLID SECTION,MATERIAL=WATER,ELSET=ACOUSTIC
 1.E-4, 
**
*MATERIAL,NAME=WATER
*DENSITY
 1.0E3,
*ACOUSTIC MEDIUM,BULK MODULUS
 2.25E9,
**
*BEAM SECTION,SECTION=RECT,MATERIAL=SOLID,ELSET=SOLID
 1.E-2,1.E-2
 0.,0.,-1.
 3,
**
*MATERIAL,NAME=SOLID
*DENSITY
 1.E3,
*ELASTIC
 1.E6,0.0
**
**************************
*INCIDENT WAVE PROPERTY,NAME=IWPROP,TYPE=SPHERE
1.0,0.5,
-10.0E04,0.5,
*INCIDENT WAVE FLUID PROPERTY
2.25E9,1.0E3,0.0
*AMPLITUDE,DEFINITION=BUBBLE,NAME=BUBBLE-LOAD
52.1E6, 0.09E-3, 0.18, 0.185, 839.6E6, 1.27, 1.5E3, 226.8, 37.16
1.0E3, 1.5E3, 1.0, 0.0, 0.0
9.8E0, 9.8E4,0.0
2.5,1500,1e-12,1e-12,0.2
**************************
*BOUNDARY
SOLID,ENCASTRE
**************************
**
*TIE,NAME=COUPLING
TIE_ACOUSTIC,TIE_SOLID
**************************
*RESTART,WRITE,FREQUENCY=1000
**
*STEP,INC=10000
*DYNAMIC,ALPHA=0.0
.0005,.5
**
*IMPEDANCE
 1,I4
*INCIDENT WAVE,PRESSUREAMPLITUDE=BUBBLE-LOAD,PROPERTY=IWPROP
IW_LOAD_ACOUSTIC,1.0
IW_LOAD_SOLID,1.0
**
*NODE PRINT,NSET=ACOUSTIC,FREQ=1000
 POR,
*NODE PRINT,NSET=SOLID,FREQ=1000
 RF,
*OUTPUT,FIELD,VAR=PRESELECT
*OUTPUT,FIELD,FREQ=1000
*NODE OUTPUT,NSET=ACOUSTIC
 POR,
*NODE OUTPUT,NSET=SOLID
 RF,
*OUTPUT,HISTORY,FREQ=20
*NODE OUTPUT,NSET=ACOUSTIC
 POR,
*NODE OUTPUT,NSET=SOLID
 RF,
*ENDSTEP