*HEADING VERTICAL PULSE LOADING, QUIET BOUND, 16X16 CPE4R + 32 CINPE4 *NODE 1,0.,0. 801,2e-3,0. 17,0.,-2e-3 817,2e-3,-2e-3 *NGEN,NSET=LHS 1,17 *NGEN,NSET=RHS 801,817 *NFILL LHS,RHS,16,50 *NSET,NSET=INTER1,GEN 17, 817, 50 *NSET, NSET=INTER2,GEN 801,816 *NSET, NSET=INTER INTER1, INTER2 *NCOPY,OLD SET=INTER,CHANGE NUMBER=1000,POLE,NEW SET=FAR 1, *NSET,NSET=FILEN 13, 103, 601 *ELEMENT,TYPE=CPE4R,ELSET=FE 1,2,52,51,1 *ELGEN,ELSET=FE 1,16,1,1,16,50,16 *SOLID SECTION,ELSET=FE,MATERIAL=MAT1 *ELEMENT,TYPE=CINPE4,ELSET=IE 257, 67,17,1017,1067 273, 816,817,1817,1816 *ELGEN, ELSET=IE 257, 16, 50, 1 273, 16, -1, 1 *ELSET, ELSET=LOAD,GEN 1,81,16 *SOLID SECTION,ELSET=IE,MATERIAL=MAT1 *MATERIAL,NAME=MAT1 *ELASTIC 7.3E10,.33 *DENSITY 2842.0, *BOUNDARY LHS,1 *AMPLITUDE,NAME=PULSE 0,0,1e-7,1,2e-7,0 ** *STEP,NLGEOM=NO *DYNAMIC,EXPLICIT ,1.5e-6 *BULK VISCOSITY 0,0 *DLOAD,AMPLITUDE=PULSE LOAD,p3,1e+9 *OUTPUT,FIELD,VAR=PRESELECT,NUM=5 *OUTPUT,HISTORY *NODE OUTPUT,NSET=FILEN U,V,A ** ** Output requests for qa testing ** *NSET,NSET=QA_TEST FILEN, *OUTPUT,FIELD,NUM=1 *NODE OUTPUT,NSET=QA_TEST U, *OUTPUT,HISTORY,VAR=PRESELECT,TIME INTERVAL=3.75e-7 *FILE OUTPUT, NUMBER INTERVAL=1 *NODE FILE, NSET=FILEN U, *END STEP