*HEADING
EC3KAFAR: IMPEDANCE PROPERTY  [AC3D20]
*NODE, Nset=ODB_NSET
*NGEN,NSET=NALL1
*NGEN,NSET=NALL2
*NFILL,NSET=NALL
NALL1,NALL2,2,500
*NGEN,NSET=NALL3
*ELEMENT,TYPE=AC3D20,ELSET=EALL
*ELGEN,ELSET=EALL
*ELSET,ELSET=LINER5
*MATERIAL,NAME=AIR
*DENSITY
1.293,
*ACOUSTIC MEDIUM,BULK MODULUS
*SOLID SECTION,MATERIAL=AIR,ELSET=EALL
*IMPEDANCE PROPERTY,NAME=IMPED
*NSET,NSET=QA_TEST,GEN
*NSET,NSET=DRIV
**
*STEP
*STEADY STATE DYNAMIC,DIRECT
*IMPEDANCE
LINER5,I5,IMPED
*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