*HEADING
ABAQUS/Explicit: SUBMODEL [AC3D6]
**********************************************
** The speed of sound c=sqrt(K/rho)=330m/s  
** The pressure wave will reach the bottom nodes
** (and it will drive the pressure wave farther)
** in about t=8.0/c=0.024 sec
**********************************************
*PARAMETER
f=25.0
T=1.0/f
out_hist=T/100
omega=2*3.14159*f
******************
*NODE,NSET=BOT
1,0.0,8.5
101,0.5,8.5
201,1.0,8.5
1001,0.0,8.5,0.5
1101,0.5,8.5,0.5
1201,1.0,8.5,0.5
2001,0.0,8.5,1.0
2101,0.5,8.5,1.0
2201,1.0,8.5,1.0
*NODE,NSET=TOP
7,0.0,10.0
107,0.5,10.
207,1.0,10.
1007,0.0,10.0,0.5
1107,0.5,10.0,0.5
1207,1.0,10.0,0.5
2007,0.0,10.0,1.0
2107,0.5,10.0,1.0
2207,1.0,10.0,1.0
*NSET,NSET=QA_TEST
TOP,BOT
*NFILL,NSET=ALL
BOT,TOP,6,1
*NSET,NSET=RECRD
1,2,3,4,5,6,7
*ELSET,ELSET=LINER5
12,24,36,48
*ELEMENT,TYPE=AC3D6,ELSET=EALL
1,1,101,102,1001,1101,1102
2,1,102,2,1001,1102,1002
*ELGEN,ELSET=EALL
1,6,1,2,2,100,12,2,1000,24
2,6,1,2,2,100,12,2,1000,24
*MATERIAL,NAME=AIR
*DENSITY
1.293, 
*ACOUSTIC MEDIUM,BULK MODULUS
1.42176E5, 
*SOLID SECTION,MATERIAL=AIR,ELSET=EALL
*SUBMODEL,EXT=0.025
BOT, 
**
*STEP
*DYNAMIC,EXPLICIT
,<T>
*IMPEDANCE,NON=PLAN
LINER5,I4
*BOUNDARY,SUBMODEL,STEP=1
BOT,8,8
*********************
*FILE OUTPUT,NUM=1
*NODE FILE
POR,
*********************
*OUTPUT,FIELD,NUM=1
*NODE OUTPUT,NSET=QA_TEST
POR,
*********************
*OUTPUT,FIELD,NUM=4
*NODE OUTPUT
POR,
*********************
*OUTPUT,HISTORY,TIME INTERVAL=<out_hist>
*NODE OUTPUT,NSET=ALL
POR,
*********************
*END STEP