*HEADING
EXAMPLE: Wave Propagation in an Infinite Medium - CPE3 Elements
*NODE, NSET=QA_TEST_ALLNODES
*NGEN,NSET=TOP
*NODE, NSET=QA_TEST_ALLNODES
*NGEN,NSET=BOTTOM
*NFILL,NSET=NALL
TOP,BOTTOM,107,200
*NSET,NSET=CLINE,GENERATE
*NSET,NSET=TRANS,GENERATE
*NSET,NSET=NOUT,GENERATE
*ELEMENT,TYPE=CPE3
*ELGEN,ELSET=EALL
*ELSET,ELSET=TRANS,GEN
*ELEMENT,TYPE=CINPE4
*ELGEN,ELSET=INFIN
*ELEMENT,TYPE=CINPE4,ELSET=INFIN
*ELSET,ELSET=ALL
EALL,INFIN
**
*SOLID SECTION,ELSET=ALL,MATERIAL=MAT1
*MATERIAL,NAME=MAT1
*ELASTIC
7.3E10,.33
*DENSITY
2842.0,
**
** 10 MegaHertz Raised Cosine Function
** f(t) = (1-cos(wt/3))cos(wt) where w=2*pi MRad/s and 0<t<6*pi/w
*AMPLITUDE,NAME=GAUSS,INPUT=waveprop_ef1.inp
*NSET, NSET=QA_TEST_ALLNODES
QA_TEST_ALLNODES, TOP, BOTTOM, NALL
CLINE, TRANS, NOUT
**
*STEP,NLGEOM=NO, INC=400
*DYNAMIC, NOHAF,DIRECT
1e-8,4.0E-6
**
*BOUNDARY
CLINE,1,
*DLOAD,OP=NEW,AMPLITUDE=GAUSS
TRANS,P2,1.0E9
*OUTPUT,FIELD,VARIABLE=PRESELECT, FREQUENCY=200
*OUTPUT,HISTORY,FREQUENCY=100
*NODE OUTPUT,NSET=NOUT
U,
*ENERGY OUTPUT
ALLKE,ALLSE,ALLWK,ALLVD,ALLAE,ETOTAL
*NODE FILE, NSET=NOUT, FREQUENCY=200
U
*END STEP