*HEADING
EXPLICIT: SUBMODEL from ac2solid_g_sax1_acax4r_xpl
ACOUSTIC TO STRUCTURE SUBMODELING [SAX1]
ACOUSTIC PRESSURE DRIVES BOTH SIDEs OF THE SHELL;
*PREPRINT,ECHO=YES,MODEL=YES,HISTORY=YES
*PARAMETER
F=15.0
T=1.0/F
T10=10*T
T2=2*T
T4=4*T
T6=6*T
T03=0.3*T
OUT_HIST=T/1000
*NODE,NSET=SHELL
21,1.0,1.0
22,2.0,1.0
23,2.25,1.0
24,2.5,1.0
25,2.75,1.0
26,3.0,1.0
27,4.0,1.0
*NSET,NSET=QA_TEST
SHELL,
*ELEMENT,TYPE=SAX1,ELSET=SHELL
4,21,22
5,22,23
6,23,24
7,24,25
8,25,26
9,26,27
*ELSET,ELSET=SHELL1
5,6,7,8
*SHELL SECTION, MATERIAL=STEEL,ELSET=SHELL
0.2,
*MATERIAL,NAME=STEEL
*DENSITY
7800.0,
*ELASTIC
207E9,0.3
*SURFACE,TYPE=ELEMENT,NAME=SHELL_B
SHELL1,SNEG
*SURFACE,TYPE=ELEMENT,NAME=SHELL_T
SHELL1,SPOS
*SUBMODEL,ACOUSTIC TO STRUCTURE,ABSOLUTE=0.6, GLOBAL ELSET=ACOUS_TOP
SHELL_T,
*SUBMODEL,ACOUSTIC TO STRUCTURE,ABSOLUTE=0.6, GLOBAL ELSET=ACOUS_BOT
SHELL_B,
*BOUNDARY
21,1,6
27,1,6
*NSET,NSET=DRIV
22,23,24,25,26
*STEP
*DYNAMIC,EXPLICIT
,<T03>
*BOUNDARY,SUBMODEL,STEP=1
DRIV,8,8
**********************
*OUTPUT,FIELD,NUM=20
*NODE OUTPUT,NSET=SHELL
U,RF
*ELEMENT OUTPUT,ELSET=SHELL
S,
********************
*OUTPUT,HISTORY,TIME INTERVAL=<OUT_HIST>
*NODE OUTPUT,NSET=SHELL
U,RF
*ELEMENT OUTPUT, ELSET=SHELL
S,
***************QA_TEST********
*OUTPUT,FIELD,NUM = 1
*NODE OUTPUT,NSET = QA_TEST
U
*END STEP