*HEADING
 Test to check multiple incidennt wave interaction / undex charge definitions.
*PREPRINT,ECHO=NO,HISTORY=yes,MODEL=YES
*NODE, NSET=ALL
    1, 4.95, -2.35, -2.45
    2, 5.05, -2.35, -2.45
    3, 5.05, -2.45, -2.35
    4, 4.95, -2.45, -2.35
    5,13.660369766932588, -8.4735, -8.4735
    6,13.660369766932588, -8.4735, -8.5735
    7,13.660369766932588, -8.5735, -8.5735
    8,13.660369766932588, -8.5735, -8.4735
*NODE,NSET=STANDOFF
9,5., -2.3999, -2.3999
*NODE,NSET=SOURCE            
10,3., -8.5235, -8.5235    
*NSET,NSET=QA_TEST
1,8
*ELEMENT,TYPE=s4,ELSET=CHANNEL
**NOTE THAT AREA OF ELEMENT 1 IS SQRT(2)/100
**                          2 IS 1/100
 1,  1,2,3,4
 2,  5,6,7,8
*ELSET,ELSET=set1
1,2
*ELSET,ELSET=set2
1,
*ELSET,ELSET=set3
1,2
*ELSET,ELSET=set4
1,
*ELSET,ELSET=set5
1,2
*ELSET,ELSET=set6
1,
**************************
*SURFACE,NAME=IW_LOAD1
set5,sneg
**************************
*shell SECTION,MATERIAL=SOLID,ELSET=CHANNEL
 1.E-2,5
*MATERIAL,NAME=SOLID
*DENSITY
 8.0E3,
*ELASTIC
 2.322585E9,0.3
**************************
*INCIDENT WAVE INTERACTION PROPERTY,NAME=IWPROP04,TYPE=diff
1500.00,1.025E3,4
*INCIDENT WAVE INTERACTION PROPERTY,NAME=IWPROP10,TYPE=diff
1500.00,1.025E3,10
*INCIDENT WAVE INTERACTION PROPERTY,NAME=IWPROP33,TYPE=diff
1500.00,1.025E3,33
*INCIDENT WAVE INTERACTION PROPERTY,NAME=IWPROP99,TYPE=diff
1500.00,1.025E3,99
*amp,def=tab,name=any
0.0,1.0,1000.0,1.0
*BOUNDARY
ALL,ENCASTRE
**************************
*STEP,inc=10,NAME=FOUR
*steadystateDYNAMIC,direct
1.3,
*INCIDENT WAVEINTERACTION,PROPERTY=IWPROP04,pressure=any
IW_LOAD1,source,standoff,1.0
**
*OUTPUT,history, frequency=1
*NODE OUTPUT,nset=qa_test
RF,
** TO RECOVER INCIDENT PRESSURES ON THE ELEMENT FACES FROM THE
** RF'S, USE:
** (ELEMENT 1) RF * 4 /100 = P_INCIDENT
** (ELEMENT 2) RF * 4 /100 = P_INCIDENT
*ENDSTEP
**************************
*STEP,inc=10,name=ten
*steadystateDYNAMIC,direct
1.3,
*INCIDENT WAVEINTERACTION,PROPERTY=IWPROP10,pressure=any
IW_LOAD1,source,standoff,1.0
**
*OUTPUT,history, frequency=1
*NODE OUTPUT,nset=qa_test
RF,
** TO RECOVER INCIDENT PRESSURES ON THE ELEMENT FACES FROM THE
** RF'S, USE:
** (ELEMENT 1) RF * 4 /100 = P_INCIDENT
** (ELEMENT 2) RF * 4 /100 = P_INCIDENT
*ENDSTEP
**************************
*STEP,inc=10,name=thirtythree
*steadystateDYNAMIC,direct
1.3,
*INCIDENT WAVEINTERACTION,PROPERTY=IWPROP33,pressure=any
IW_LOAD1,source,standoff,1.0
**
*OUTPUT,history, frequency=1
*NODE OUTPUT,nset=qa_test
RF,
** TO RECOVER INCIDENT PRESSURES ON THE ELEMENT FACES FROM THE
** RF'S, USE:
** (ELEMENT 1) RF * 4 /100 = P_INCIDENT
** (ELEMENT 2) RF * 4 /100 = P_INCIDENT
*ENDSTEP
**************************
*STEP,inc=10,name=ninetynine
*steadystateDYNAMIC,direct
1.3,
*INCIDENT WAVEINTERACTION,PROPERTY=IWPROP99,pressure=any
IW_LOAD1,source,standoff,1.0
**
*OUTPUT,history, frequency=1
*NODE OUTPUT,nset=qa_test
RF,
** TO RECOVER INCIDENT PRESSURES ON THE ELEMENT FACES FROM THE
** RF'S, USE:
** (ELEMENT 1) RF * 4 /100 = P_INCIDENT
** (ELEMENT 2) RF * 4 /100 = P_INCIDENT
*ENDSTEP