*HEADING
EC3KAFAR: IMPEDANCE PROPERTY  [AC3D20]
*NODE, Nset=ODB_NSET
1, 
41,,10.
1001,1.
1041,1.,10.
2001,,,1.
2041,,10.,1.
3001,1.,,1.
3041,1.,10.,1.
4001,,,.5
4041,,10.,.5
5001,1.,,.5
5041,1.,10.,.5
*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
*ELEMENT,TYPE=AC3D20,ELSET=EALL
1,1,1001,1005,5,2001,3001,3005,2005,501,1003,505,3,2501,3003,2505,
2003,4001,5001,5005,4005
*ELGEN,ELSET=EALL
1,10,4,1
*ELSET,ELSET=LINER5
10, 
*MATERIAL,NAME=AIR
*DENSITY
1.293, 
*ACOUSTIC MEDIUM,BULK MODULUS
1.42176E5, 
*SOLID SECTION,MATERIAL=AIR,ELSET=EALL
*IMPEDANCE PROPERTY,NAME=IMPED
0.0,2.332317E-3
*NSET,NSET=QA_TEST,GEN
1,41
*NSET,NSET=DRIV
1,501,1001,2001,2501,3001,4001,5001
**
*STEP
*STEADY STATE DYNAMIC,DIRECT
1., 
5., 
10., 
15., 
20., 
25., 
50., 
75., 
100., 
*IMPEDANCE,prop=imped
LINER5,I5,
*BOUNDARY
DRIV,8,,1.
*NODE PRINT,NSET=QA_TEST
POR,
*OUTPUT,FIELD, OP=NEW
*NODE OUTPUT,NSET=QA_TEST
POR,
*OUTPUT,HISTORY,OP=ADD
*NODE OUTPUT,NSET=QA_TEST
POR,
*END STEP