*HEADING EXPLICIT TO STANDARD IMPORT OF ACOUSTIC ELEMENTS *RESTART, WRITE *PARAMETER f=15 T1=0.005 omega=2*3.14159*f *NODE, NSET=BACK_S 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_S 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_S 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=BACK_F 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=FRONT_F 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 60, 4.0, 0.0, 1.0 61, 4.0, 0.0, 0.5 62, 4.0, 0.0, 0.0 63, 4.0, 1.0, 1.0 64, 4.0, 1.0, 0.5 65, 4.0, 1.0, 0.0 *NSET, NSET=NODE2 FRONT_S, *NSET, NSET=SOLID FRONT_S,CENTER_S,BACK_S *NSET, NSET=QA_TEST NODE2 *NSET,NSET=ACOUS BACK_F,FRONT_F *ELEMENT, TYPE=C3D8R, ELSET=SOLID 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=FLUID 5, 22,1040,1400,26,12,1050,1500,16 6,1040,24,28,1400,1050,14,18,1500 7, 12, 1050, 1500, 16, 60,61,64,63 8, 1050,14,18,1500,61,62,65,64 *ELEMENT, TYPE=ACIN3D4, ELSET=INF 9, 60, 61, 64, 63 10, 61, 62, 65, 64 *SOLID SECTION, ELSET=SOLID, MATERIAL=ELAS *MATERIAL, NAME=ELAS *ELASTIC 207E9,0.3 *DENSITY 7800.0 *SOLID SECTION,ELSET=INF, MATERIAL=FLUID 1.0, -100.0, 0.5, 0.5 ***** *SOLID SECTION, ELSET=FLUID, MATERIAL=FLUID *MATERIAL, NAME=FLUID *ACOUSTIC MEDIUM 2.25E9 *DENSITY 1000.0 ** *SURFACE,NAME=SOLID 3,S2 4,S2 *SURFACE,NAME=FLUID 5,S1 6,S1 *TIE,NAME=COUPLE SOLID,FLUID ** *BOUNDARY BACK_S,1,3 ** *AMPLITUDE,NAME=SINE,DEF=PERIODIC 1,,0.0,0.0 0,1,0,0 ** ** Step 1 ** *STEP *DYNAMIC,EXPLICIT , *BOUNDARY, AMP=SINE FRONT_F,8,,1.e3 *output,field,variable=preselect *output,history,variable=preselect ** Output Request for QA Purposes ** *OUTPUT,FIELD,NUMBER INTERVAL=1 *NODE OUTPUT,NSET=QA_TEST U *OUTPUT,HISTORY,TIME INTERVAL=0.1 *ENERGY OUTPUT,VARIABLE=PRESELECT *END STEP