*HEADING
DUCT_ACIN3D3 [AC3D6]
*PREPRINT,MODEL=NO,HISTORY=NO
*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
*NGEN,NSET=NALL
1,41
1001,1041
2001,2041
3001,3041
*ELEMENT,TYPE=AC3D6,ELSET=EALL
1,1,2001,1001,  3,2003,1003
*ELGEN,ELSET=EALL
1,20,2,2
*NCOPY,CHANGENUMBER=500,OLDSET=NALL,NEWSET=INF,SHIFT
2,0,0
1,0,0,  0,1,0, 0
*ELCOPY,ELEMENTSHIFT=500,OLDSET=EALL,NEWSET=INF,SHIFTNODES=500
*ELEMENT,TYPE=ACIN3D3,ELSET=INF
601,541,2541,1541
*ELSET,ELSET=LINER
39,
********************************
*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
501,541
1541,1541
2541,2541
*NSET,NSET=DRIV
1,1001,2001,3001
501,1501,2501,3501
*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
*CLOAD
DRIV,8,0.6666666666666
*IMPEDANCE,OP=NEW
LINER,I2
*NODE PRINT,NSET=QA_TEST
POR,
*OUTPUT,FIELD
*NODE OUTPUT
POR,
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=QA_TEST
POR,
*END STEP
***************************************
*STEP,INC=200
*DYNAMIC,DIRECT
1.0e-5,1.0e-3
*CLOAD,OP=NEW,AMPLITUDE=COSINE
DRIV,8,0.666666666666666
*IMPEDANCE,OP=NEW
LINER,I2
*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