*HEADING
EXPLICIT:GLOBAL MODEL
ACOUSTIC TO STRUCTURE SUBMODELING [C3D8R/S4R]
ACOUSTIC PRESSURE APPLIED ON BOTH SIDES OF THE SHELL.
*PARAMETER
F=15
T1=1.0/F
T01=0.1*T1
OMEGA=2*3.14159*F
*NODE, NSET=BACK_F1
 1,  0.0, 0.0, 1.0
 3,  0.0, 0.0, 0.0
 7,  0.0, 1.0, 0.0
 5,  0.0, 1.0, 1.0
1010,0.0, 0.0, 0.5
1100,0.0, 1.0, 0.5
*NODE, NSET=FRONT_F1
 2, 2.0, 0.0, 1.0
 4, 2.0, 0.0, 0.0
 8, 2.0, 1.0, 0.0
 6, 2.0, 1.0, 1.0
1030,2.0, 0.0, 0.5
1300,2.0, 1.0, 0.5
*NODE, NSET = CENTER_F1
 101, 1.0, 0.0, 1.0
 102, 1.0, 0.0, 0.0
 103, 1.0, 1.0, 0.0
 104, 1.0, 1.0, 1.0
1020,1.0, 0.0, 0.5
1200,1.0, 1.0, 0.5
*NODE, NSET=FRONT_F2
 22, 2.0, 0.0, 1.0
 24, 2.0, 0.0, 0.0
 26, 2.0, 1.0, 1.0
 28, 2.0, 1.0, 0.0
1040,2.0, 0.0, 0.5
1400,2.0, 1.0, 0.5
*NODE, NSET=BACK_F2
 12, 3, 0.0, 1.0
 14, 3, 0.0, 0.0
 16, 3, 1.0, 1.0
 18, 3, 1.0, 0.0
1050,3.0, 0.0, 0.5
1500,3.0, 1.0, 0.5
***********************
*NODE,NSET=NSOLID
201,2.0, -0.50, 1.0
202,2.0, -0.50, 0.5
203,2.0, -0.50, 0.0
***
206,2.0, 0.0, 1.0
207,2.0, 0.0, 0.5
208,2.0, 0.0, 0.0
***
211,2.0, 1.0, 1.0
212,2.0, 1.0, 0.5
213,2.0, 1.0, 0.0
***
216,2.0, 1.50, 1.0
217,2.0, 1.50, 0.5
218,2.0, 1.50, 0.0
***
200,2.0,-0.5,1.5
205,2.0,0.0,1.5
210,2,1.0,1.5
215,2,1.5,1.5
******
204,2.0,-0.5,-0.5
209,2.0,0.0,-0.5
214,2.0,1.0,-0.5
219,2.0,1.5,-0.5
****
*NSET,NSET=FIX
200,215,219,204
*ELEMENT,TYPE=S4R,ELSET=ESOLID
11,200,201,206,205
*ELGEN,ELSET=ESOLID
11,4,1,1,3,5,4
*SURFACE, TYPE=ELEMENT, NAME=SHELL1
16,SNEG
17,SNEG
*SURFACE, TYPE=ELEMENT, NAME=SHELL2
16,SPOS
17,SPOS
*NSET, NSET=QA_TEST
NSOLID,
*NSET,NSET=NFLUID
BACK_F1,FRONT_F1,CENTER_F1,
BACK_F2,FRONT_F2
*ELEMENT, TYPE=AC3D8R, ELSET=EFLUID1
1,1,1010,1100,5,101,1020,1200,104
2,1010,3,7,1100,1020,102,103,1200
3,101,1020,1200,104,2,1030,1300,6
4,1020,102,103,1200,1030,4,8,1300
*ELEMENT, TYPE=AC3D8R, ELSET=EFLUID2
5, 22,1040,1400,26,12,1050,1500,16
6,1040,24,28,1400,1050,14,18,1500
*ELSET,ELSET=EFLUID
EFLUID1,EFLUID2
*SHELL SECTION, ELSET=ESOLID, MATERIAL=ELAS
0.2
*MATERIAL, NAME=ELAS
*ELASTIC
207E9,0.3
*DENSITY
7800.0
*****
*SOLID SECTION, ELSET=EFLUID, MATERIAL=FLUID
*MATERIAL, NAME=FLUID
*ACOUSTIC MEDIUM
2.25E9
*DENSITY
1000.0
**
*SURFACE,NAME=FLUID1
3,S2
4,S2
*SURFACE,NAME=FLUID2
5,S1
6,S1
*TIE,NAME=COUPLED1
FLUID1,SHELL1
*TIE,NAME=COUPLED2
FLUID2,SHELL2
**
*BOUNDARY
FIX,1,6
**
*AMPLITUDE,NAME=SINE,DEF=PERIODIC
1,<OMEGA>,0.0,0.0
0,1,0,0
**
** STEP 1
**
*STEP
*DYNAMIC, EXPLICIT
,<T01>
*BOUNDARY, AMP=SINE
BACK_F1,8,,1E10
BACK_F2,8,,1E10
***********************************
*FILE OUTPUT,NUMBER INTERVAL=40
*NODE FILE, NSET=NFLUID
POR,
*NODE FILE, NSET=NSOLID
U,
***********
*OUTPUT,FIELD,NUMBER INTERVAL=10
*NODE OUTPUT,NSET=NFLUID
POR,
*NODE OUTPUT, NSET=NSOLID
U,
**********
*OUTPUT, HISTORY,FREQ=1
*NODE OUTPUT,NSET=NFLUID
POR,
*NODE OUTPUT,NSET=NSOLID
U1,
*****************QA_TEST***********
*OUTPUT, FIELD, NUMBER INTERVAL = 1
*NODE OUTPUT,NSET=QA_TEST
U,
*END STEP