*HEADING
 xtie_xpl_ac2d3: AC2D3 AND CPS4 ELEMENTS
 Tube with nonreflective end condtion and *TIE constraint.
 Part of the air in the tube is modelled with continuum elements
 with air properties.
********************
 TEST 9-DIGIT LABELS
*PREPRINT,ECHO=YES,HIST=YES,MODEL=YES
*NODE, Nset=ODB_NSET
900000001,1000.0,0.0
900000021,1000.5,0.0
900000101,1000.0,0.025
900000121,1000.5,0.025
*NGEN,NSET=NALL
900000001,900000021
900000101,900000121
*NCOPY,OLDSET=NALL,NEWSET=NSOL,CHANGENUMBER=10000,SHIFT
0.0,0.0,0.0
1.0,0.0,0.0,0.0,1.0,0.0
*NSET,NSET=SAMPLE,GENERATE
900000001,900000041
*NSET,NSET=LOAD
900000001,900000101
** First 10 elements are acoustic
*ELEMENT,TYPE=AC2D3
900000001,900000001,900000002,900000102
900000002,900000102,900000101,900000001
*ELGEN,ELSET=ACOU
900000001,5,1,2
900000002,5,1,2
** Then 5 continuum elements
*ELEMENT,TYPE=CPS4R
900001006,900010006,900010007,900010107,900010106
*ELGEN,ELSET=STRUCT
900001006,5,1,1
** Next 20 elements are acoustic
*ELEMENT,TYPE=AC2D3
900000031,900000011,900000012,900000112
900000032,900000112,900000111,900000011
*ELGEN,ELSET=ACOU
900000031,10,1,2
900000032,10,1,2
*ELSET,ELSET=NONREF
900000049
************************************************
*SURFACE,TYPE=ELEMENT,NAME=ACR
900000009,S2
*SURFACE,TYPE=ELEMENT,NAME=SOL
900001006,S4
*SURFACE,TYPE=ELEMENT,NAME=SOR
900001010,S2
*SURFACE,TYPE=ELEMENT,NAME=ACL
900000032,S2
*TIE,NAME=CRAVAT
SOL,ACR
ACL,SOR
************************************************
**
**  Acoustic Element Properties
**
*SOLID SECTION,MATERIAL=AIR,ELSET=ACOU
40.
*MATERIAL,NAME=AIR
*DENSITY
 1.21,
*ACOUSTIC MEDIUM,BULK MODULUS
 0.1424E6,
************************************************
**
**  Continuum Element Properties
**
*SOLID SECTION,MATERIAL=AIRSOLID,ELSET=STRUCT
40.
*MATERIAL,NAME=AIRSOLID
*DENSITY
 1.21,
*ELASTIC
 0.1424E6,
************************************************  
*Elset,Elset=ODB_ESET
ACOU, STRUCT
*Nset, Nset=ODB_NSET
ODB_NSET, NALL, SAMPLE, LOAD
************************************************  
*STEP
*DYNAMIC,EXPLICIT,ELEMENT BY ELEMENT
,.01
*IMPEDANCE
 NONREF,I2
*CLOAD
LOAD, 8,314.1592654
** simulation of uniaxial condition
*BOUNDARY
NSOL,2,2
*OUTPUT,FIELD,NUMBER=5
*ELEMENT OUTPUT,ELSET=STRUCT
S
*NODE OUTPUT,NSET=SAMPLE
POR,
**OUTPUT,HISTORY,FREQUENCY=1
***NODE OUTPUT,NSET=SAMPLE
**POR,
***ELEMENT OUTPUT,ELSET=STRUCT
**S11,
*END STEP