*HEADING [ACINAXN, edge-surface impedances, transient] *preprint,model=yes,history=yes,echo=yes ******************************** *part,name=plates *NODE, NSET=first 1, 1., 0., 0., 1,0,0 2, 1., 1., 0., 1,0,0 3, 1., 2., 0., 1,0,0 4, 1., 3., 0., 1,0,0 5, 1., .5, 0., 1,0,0 6, 1.,1.5, 0., 1,0,0 7, 1.,2.5, 0., 1,0,0 ********************************* *NSET,NSET=ALLNODES FIRST, *element,type=sax1,elset=mass 201,1,2 *element,type=sax2,elset=mass 202,3,7,4 *surface,name=sm1 201,sneg *surface,name=sm2 202,sneg *SHELLSECTION,MATERIAL=METAL,ELSET=MASS 0.05, *end part ******************************** *part,name=aco *NODE, NSET=first 1, 1., 0., 0., 2,-.50,0 2, 1., 1., 0., 2,0.50,0 3, 1., 2., 0., 2,-.50,0 4, 1., 3., 0., 2,0.50,0 5, 1., .5, 0., 1,0,0 6, 1.,1.5, 0., 1,0,0 7, 1.,2.5, 0., 1,0,0 *ncopy,changenumber=10,oldset=first,newset=second,shift 0.5,0,0 1,0,0, 0,1,0 *ncopy,changenumber=20,oldset=first,newset=third,shift 1,0,0 1,0,0, 0,1,0 *NSET,NSET=ALLNODES FIRST,second,third *NSET,NSET=QA_TEST,generate 1,7 *element,elset=inf2,type=acax4 11, 2,1,21,22 *element,elset=inf3,type=acax8 12, 4,3,23,24, 7,13,27,14 *element,type=acinax2,elset=inf2 1, 22,21 *element,type=acinax3,elset=inf3 2, 24,23,27, *surface,name=acinS2 11,s1 *surface,name=acins3 12,s1 *surface,name=acine2 1,e1 **1,s3 *surface,name=acine3 2,e1 **2,s3 *surface,name=ac4_s2 11,s2 11,s4 *surface,name=ac8_s2 12,s2 12,s4 *************************************** *SOLID SECTION,MATERIAL=AIR320,ELSET=INF2 1.0, 0.0,0.5,.0 *SOLID SECTION,MATERIAL=AIR320,ELSET=INF3 1.0, 0.0,2.5,.0 *endpart *************************************** *assembly,name=assy1 *instance,name=PEdgeZ,part=plates 0.0,0.0,0.0 *end instance *instance,name=EdgeZ,part=aco 0.0,0.0,0.0 *end instance *instance,name=PnoneEdgeZ,part=plates 0.0,-4,0.0 *end instance *instance,name=noneEdgeZ,part=aco 0.0,-4,0.0 *end instance *tie,name=quad4 noneEdgeZ.acins2,PnoneEdgeZ.sm1 noneEdgeZ.acins3,PnoneEdgeZ.sm2 EdgeZ.acins2,PEdgeZ.sm1 EdgeZ.acins3,PEdgeZ.sm2 *end assembly ************************************* ** MATERIAL IMPEDANCE FOR AIR320 IS 400.0 ** THE ADMITTANCE FOR HALF THIS VALUE IS USED ** *impedance property,name=Half_Zmat 0.0, 0.005 *MATERIAL,NAME=AIR320 *DENSITY 1.25, *ACOUSTIC MEDIUM,BULK MODULUS 1.28E5, *material,name=metal *density 7800.0, *elastic 200.0e9,0.3 *amplitude,definition=perio,name=TenPiHz 1, 5.0, 0.0, 0.0 0.0,1.0,0.0,0.0 ************************************* *STEP,inc=1000 *dynamic,direct 5.e-2,50.e-1 ASSY1.EDGEZ.ACINE2, ASSY1.EDGEZ.ACINE3, ASSY1.EDGEZ.AC4_s2, ASSY1.EDGEZ.AC8_s2, *BOUNDARY,type=acceleration,amplitude=tenpihz ASSY1.PNONEEDGEZ.ALLNODES,1,1,1.0e-4 ASSY1.PEDGEZ.ALLNODES, 1,1,1.0e-4 *BOUNDARY ASSY1.PNONEEDGEZ.ALLNODES,2,6,0.0 ASSY1.PEDGEZ.ALLNODES, 2,6,0.0 *OUTPUT,HISTORY,FREQUENCY=1 *NODE OUTPUT,NSET=NONEEDGEZ.QA_TEST POR, *NODE OUTPUT,NSET=EDGEZ.QA_TEST POR, *OUTPUT,FIELD,FREQUENCY=99999 *ELEMENT OUTPUT *END STEP