*HEADING
EC3KAFE4: EIGENVALUE ANALYSIS, ACOUSTIC ORGAN PIPE MODES  [AC3D20]
*NODE, Nset=ODB_NSET
*NGEN,NSET=NALL
*NCOPY,CHANGE NUMBER=1000,OLD SET=NALL,SHIFT, New Set=ODB_NSET
*NCOPY,CHANGE NUMBER=500,OLD SET=NALL,SHIFT, New Set=ODB_NSET
*ELEMENT,TYPE=AC3D20,ELSET=EALL
*ELGEN,ELSET=EALL
*MATERIAL,NAME=AIR
*DENSITY
1.293,
*ACOUSTIC MEDIUM,BULK MODULUS
*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=lanczos, SIM=NO
3, , ,1.
*BOUNDARY
1,8
51,8
101,8
501,8
601,8
1001,8
1051,8
1101,8
*NODE PRINT
POR,PPOR
*OUTPUT,FIELD
*NODE OUTPUT
POR,
*OUTPUT,HISTORY
*MODAL OUTPUT,VARIABLE=ALL
*END STEP
*STEP
 OPEN/CLOSED CONDITION
*FREQUENCY, eigensolver=lanczos, SIM=NO
3, , ,1.
*BOUNDARY
1,8
51,8
101,8
501,8
601,8
1001,8
1051,8
1101,8
*NODE PRINT
POR,PPOR
*OUTPUT,FIELD
*MODAL OUTPUT
*OUTPUT,HISTORY
*END STEP