*HEADING EXAMPLE: Wave Propagation in an Infinite Medium - CPE4R Elements *NODE, NSET=QA_TEST_ALLNODES 1,0.0,0.0 181,.008,0.0 *NGEN,NSET=TOP 1,181 *NODE, NSET=QA_TEST_ALLNODES 21401,.000, -4.7555555E-3 21581,.008, -4.7555556E-3 *NGEN,NSET=BOTTOM 21401,21581 *NFILL,NSET=NALL TOP,BOTTOM,107,200 *NSET,NSET=CLINE,GENERATE 1,21401,200 *NSET,NSET=TRANS,GENERATE 1,73,1 *NSET,NSET=NOUT,GENERATE 9074,14474,1800 *ELEMENT,TYPE=CPE4R 1,201,202,2,1 *ELGEN,ELSET=EALL 1,179,1,1,106,200,200 *ELSET,ELSET=TRANS,GEN 1,73,1 *ELEMENT,TYPE=CINPE4 300001,21202,21201,21401,21402 400001,180,380,381,181 *ELGEN,ELSET=INFIN 300001,178,1,1 400001,105,200,1 *ELEMENT,TYPE=CINPE4,ELSET=INFIN 300179,21380,21379,21579,21581 ** *ELSET,ELSET=ALL EALL,INFIN ** *SECTION CONTROLS, NAME=HG, HOURGLASS=STIFFNESS *SOLID SECTION,ELSET=ALL,MATERIAL=MAT1,CONTROLS=HG *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