*HEADING
EXAMPLE PROBLEM: MODE 0 SPHERE USING ACINAX2. FINE MESH.
*PREPRINT,MODEL=YES,ECHO=YES,HISTORY=YES
*NODE,NSET=INNER,SYSTEM=S
      1, 1, 90,0, 1, 90,0
     71, 1,-90,0, 1,-90,0
    302, 0, 0, 0, 1, 0, 0
*NGEN,LINE=C,NSET=INNER,SYSTEM=S
1,71,1,302,,,, 0,0,-1
*ELEMENT, TYPE=ACINAX2,ELSET=EALL
1,   1,2
*ELGEN, ELSET=EALL
1,70,1,1
*ELEMENT,TYPE=ASI2A,ELSET=COUPLING
1001, 1,2
*ELGEN,ELSET=COUPLING
1001,70,1,1
**
** FLUID MATERIAL PROPERTIES; ARTIFICIAL MEDIUM FOR CONVENIENCE
** USING RHO = 1, BULKMOD = (2*PI)^2, WE HAVE C = 2*PI AND K = F.
**
*MATERIAL,NAME=AETHER
*DENSITY
1.000000, 
*ACOUSTIC MEDIUM,BULK MODULUS
39.4784176,
*SOLID SECTION,MATERIAL=AETHER,ELSET=EALL
1.0, 0.,0.,0.
*INTERFACE,ELSET=COUPLING
**
*NSET,NSET=QA_TEST
11, 16, 21, 31, 41,51,61
*TRANSFORM,NSET=INNER,TYPE=C
0.,0.,0.,  0.,0.,1.
*STEP
*STEADY STATE DYNAMIC,DIRECT
00.01, 
0.05, 
0.1, 
0.13, 
0.16, 
0.2, 
0.3, 
0.4, 
0.5, 
0.6, 
0.7, 
0.8, 
0.9, 
1.0, 
1.1, 
1.2, 
1.3, 
1.4, 
1.5, 
1.6, 
1.7, 
1.8, 
1.9, 
2.0, 
2.3, 
2.5, 
3.0, 
4.0, 
5.0, 
6.0, 
7.0, 
8.0, 
9.0, 
10.0, 
12.0, 
15.0, 
20.0, 
**
** SURFACE RADIAL ACCELERATION OF 1/(RHO C) MAGNITUDE
**
*BOUNDARY,TYPE=VELOCITY
INNER,1,1,0.159154943
INNER,2,2,0.0
*NODE PRINT,NSET=QA_TEST,FREQUENCY=10000
POR,v
*NODE FILE,NSET=QA_TEST,FREQUENCY=10000
POR,v
*OUTPUT,FIELD
*NODE OUTPUT
POR,v
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=QA_TEST
POR,v
*END STEP
*****************************