*HEADING
IMPEDANCE PROPERTY  [AC2D3]
***************************
*PARAMETER
f=100.0
T=5/f
omega=2*3.14159*f
***************************
*NODE, Nset=ODB_NSET
1, 
41,,10.
1001,1.
1041,1.,10.
*NGEN,NSET=NALL
1,41
1001,1041
*ELEMENT,TYPE=AC2D3,ELSET=EALL
  200,    1, 1001, 1003,
  201, 1003,    3,    1,
  202,    3, 1003, 1005,
  203, 1005,    5,    3,
  204,    5, 1005, 1007,
  205, 1007,    7,    5,
  206,    7, 1007, 1009,
  207, 1009,    9,    7,
  208,    9, 1009, 1011,
  209, 1011,   11,    9,
  210,   11, 1011, 1013,
  211, 1013,   13,   11,
  212,   13, 1013, 1015,
  213, 1015,   15,   13,
  214,   15, 1015, 1017,
  215, 1017,   17,   15,
  216,   17, 1017, 1019,
  217, 1019,   19,   17,
  218,   19, 1019, 1021,
  219, 1021,   21,   19,
  220,   21, 1021, 1023,
  221, 1023,   23,   21,
  222,   23, 1023, 1025,
  223, 1025,   25,   23,
  224,   25, 1025, 1027,
  225, 1027,   27,   25,
  226,   27, 1027, 1029,
  227, 1029,   29,   27,
  228,   29, 1029, 1031,
  229, 1031,   31,   29,
  230,   31, 1031, 1033,
  231, 1033,   33,   31,
  232,   33, 1033, 1035,
  233, 1035,   35,   33,
  234,   35, 1035, 1037,
  235, 1037,   37,   35,
  236,   37, 1037, 1039,
  237, 1039,   39,   37,
  238,   39, 1039, 1041,
  239, 1041,   41,   39,
*ELSET,ELSET=LINER3
239, 
*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=RECRD,GEN
1,41,4
1001,1041,4
*NSET,NSET=DRIV
1,1001
*NSET, NSET=MID
23, 1023, 33, 1033, 13, 1013
*NSET, NSET=ODB_NSET
ODB_NSET, MID
*NSET, NSET=QA_TEST
ODB_NSET,
**
*AMPLITUDE,NAME=SINE,DEF=PERIODIC
1,<omega>,0.0,0.0
0,1,0,0
*STEP
*DYNAMIC,EXPLICIT
,<T>
*BULK VISCOSITY
0.000,
*IMPEDANCE,prop=IMPED
LINER3,I1
*BOUNDARY, AMP=SINE
DRIV,8,,1.
*OUTPUT,FIELD,NUMBER INTERVAL=1
*NODE OUTPUT
POR,
*NODE OUTPUT,NSET=QA_TEST
POR,
***OUTPUT,HISTORY,FREQ=1
***NODE OUTPUT,NSET=ODB_NSET
** POR,
*ENDSTEP