*HEADING
EC3KAFE4: EIGENVALUE ANALYSIS, ACOUSTIC ORGAN PIPE MODES  [AC3D20]
*NODE, Nset=ODB_NSET
1, 
21,,165.8
51,.5
71,.5,165.8
101,1.
121,1.,165.8
*NGEN,NSET=NALL
1,21
51,71
101,121
*NCOPY,CHANGE NUMBER=1000,OLD SET=NALL,SHIFT, New Set=ODB_NSET
0.,0.,1.

*NCOPY,CHANGE NUMBER=500,OLD SET=NALL,SHIFT, New Set=ODB_NSET
0.,0.,.5

*ELEMENT,TYPE=AC3D20,ELSET=EALL
1,1,101,103,3,1001,1101,1103,1003,51,102,53,2,1051,1102,1053,
1002,501,601,603,503
*ELGEN,ELSET=EALL
1,10,2
*MATERIAL,NAME=AIR
*DENSITY
1.293, 
*ACOUSTIC MEDIUM,BULK MODULUS
1.42176E5, 
*SOLID SECTION,MATERIAL=AIR,ELSET=EALL
**
** Sets added by addodb
**
*Elset,Elset=ODB_ESET
EALL,
**
**
*Nset, Nset=ODB_NSET
ODB_NSET, NALL
**
**
*STEP
 OPEN/OPEN CONDITION
*FREQUENCY,EIGENSOLVER=AMS
14,,2000.,10.0,4.0,3.0
*OUTPUT,FIELD,FREQUENCY=0
*BOUNDARY
1,8
51,8
101,8
501,8
601,8
1001,8
1051,8
1101,8
21,8
71,8
121,8
521,8
621,8
1021,8
1071,8
1121,8
*NODE PRINT
POR,PPOR
*OUTPUT,HISTORY,freq=0
*MODAL OUTPUT,VARIABLE=ALL
*END STEP
*************************
*STEP
 OPEN/CLOSED CONDITION
*FREQUENCY,EIGENSOLVER=AMS
14,,2000.,12.0,6.0,5.0
*OUTPUT,FIELD,FREQUENCY=0
*BOUNDARY
1,8
51,8
101,8
501,8
601,8
1001,8
1051,8
1101,8
*NODE PRINT
POR,PPOR
*OUTPUT,HISTORY,freq=0
*MODAL OUTPUT,VARIABLE=ALL
*END STEP