*HEADING
DUCT_ACIN3D6  [AC3D10]
*NODE, NSET=ODB_NSET
1, 
41,  0.,10.,0.,  0,1,0
1001,1.
1041,1.,10.,0.,  0,1,0
2001,0., 0.,1.
2041,0.,10.,1.,  0,1,0
3001,1.,,1.
3041,1.,10.,1.,  0,1,0
4001,,,.5
4041,0.,10.,.5,  0,1,0
5001,1.,,.5
5041,1.,10.,.5,  0,1,0
6001,0.5,,0.5
6041,0.5,10,0.5, 0,1,0
*NGEN,NSET=NALL1
1,41
2001,2041
*NGEN,NSET=NALL2
1001,1041
3001,3041
*NFILL,NSET=NALL
NALL1,NALL2,2,500
*NGEN,NSET=NALL3
4001,4041
5001,5041
6001,6041
*NSET,NSET=NALL
ODB_NSET,NALL1,NALL2,NALL3
*ELEMENT,TYPE=AC3D10,ELSET=EALL
    1,    1, 2001, 1001,    5, 4001, 6001,  501,
            3, 4003,  503,
    2, 2001, 1001,    5, 2005, 6001,  503, 4003,
         2003, 6003, 4005,
    3, 1001,    5, 2005, 1005,  503, 4005, 6003,
         1003,  505, 6005,
    4, 1001, 2001, 3001, 1005, 6001, 2501, 5001,
         1003, 6003, 5003,
    5, 2001, 3001, 1005, 2005, 2501, 5003, 6003,
         2003, 2503, 6005,
    6, 3001, 1005, 2005, 3005, 5003, 6005, 2503,
         3003, 5005, 2505,
*ELGEN,ELSET=EALL
1,10,4,6
2,10,4,6
3,10,4,6
4,10,4,6
5,10,4,6
6,10,4,6
*ELSET,ELSET=LINER3
57,60
*NCOPY,CHANGENUMBER=10000,OLDSET=NALL,NEWSET=INF,SHIFT
2,0,0
1,0,0,  0,1,0,0
*ELCOPY,ELEMENTSHIFT=10000,OLDSET=EALL,NEWSET=INF,SHIFTNODES=10000
*ELEMENT,TYPE=ACIN3D6,ELSET=INF
99998,11041,12041,13041,16041,12541,15041
99999,11041,10041,12041,10541,14041,16041
******************************************
*MATERIAL,NAME=AIR320
*DENSITY
1.25, 
*ACOUSTIC MEDIUM,BULK MODULUS
1.28E5, 
*SOLID SECTION,MATERIAL=AIR320,ELSET=EALL
*SOLIDSECTION,MATERIAL=AIR320,ELSET=INF
1.0, 2.5, -100.0, 0.5
*NSET,NSET=QA_TEST,GEN
    1,   41
10001,10041
*NSET,NSET=QA_TEST
11041,12041,13041,16041,12541,15041
10041,10541,14041
*NSET,NSET=DRIV
    1,  501, 1001, 2001, 2501, 3001, 4001, 5001, 6001
10001,10501,11001,12001,12501,13001,14001,15001,16001
*AMPLITUDE,DEFINITION=PERIO,NAME=COSINE
1,10.00,0.0,0.0
0.0,1.0,
***************************************
*STEP
*STEADY STATE DYNAMIC,DIRECT
1.,10.0,2
*BOUNDARY
DRIV,8,8,1.
*IMPEDANCE,OP=NEW
LINER3,I3
*NODE PRINT,NSET=QA_TEST
POR,
*OUTPUT,FIELD, OP=NEW
*NODE OUTPUT
POR,
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=QA_TEST
POR,
*END STEP
***************************************
*STEP,INC=200
*DYNAMIC,DIRECT
1.0e-5,1.0e-3
*BOUNDARY,OP=NEW,AMPLITUDE=COSINE
DRIV,8,8,1.0
*IMPEDANCE,OP=NEW
LINER3,I3
*NODE PRINT,NSET=QA_TEST,FREQ=40
POR,
*OUTPUT,FIELD,FREQUENCY=40
*NODE OUTPUT
POR,
*OUTPUT,HISTORY,OP=NEW,FREQ=40
*NODE OUTPUT,NSET=QA_TEST
POR,
*END STEP