*HEADING
 Basic verification for *COUPLING
 Test WEIGHTING METHOD=QUADRATIC
*PREPRINT, MODEL=YES
*PART, NAME=BLOCK
*NODE, NSET=NBASE
  1,  0.0, 0.0, 0.0
 21, 20.0, 0.0, 0.0
*NGEN, NSET=NBASE
  1, 21, 1
*NCOPY, CHANGE NUMBER=100, OLD SET=NBASE, SHIFT, NEW SET=NMID
 0.0, 1.0, 0.0

*NCOPY, CHANGE NUMBER=200, OLD SET=NBASE, SHIFT, NEW SET=NTOP
 0.0, 2.0, 0.0

*NODE, NSET=NREF
 9999, 10.0, 2.0, 0.0
*ELSET, ELSET=ETOP, GEN
 21, 40, 1
*SURFACE, NAME=TOP, TRIM=YES
 ETOP,
*ELEMENT, TYPE=CPE4R, ELSET=EALL
 1, 1, 2, 102, 101
*ELGEN, ELSET=EALL
 1, 20, 1, 1, 2, 100, 20
*SOLID SECTION, ELSET=EALL, MATERIAL=ELASTIC
*END PART
*MATERIAL, NAME=ELASTIC
*ELASTIC
 30.0e6, 0.3
**
*ASSEMBLY, NAME=ASSEMBLY
*INSTANCE, NAME=BLOCK_A, PART=BLOCK
 0.0, 0.0, 0.0
*END INSTANCE
*COUPLING, CONSTRAINT NAME=COUPLING_A, REF NODE=BLOCK_A.NREF, SURFACE=BLOCK_A.TOP
*DISTRIBUTING, WEIGHTING METHOD=QUADRATIC
*INSTANCE, NAME=BLOCK_B, PART=BLOCK
 0.0, 5.0, 0.0
*END INSTANCE
*COUPLING, CONSTRAINT NAME=COUPLING_B, REF NODE=BLOCK_B.NREF, SURFACE=BLOCK_B.TOP, INFLUENCE RADIUS=5.5
*DISTRIBUTING, WEIGHTING METHOD=QUADRATIC
*INSTANCE, NAME=BLOCK_C, PART=BLOCK
 0.0, 10.0, 0.0
*END INSTANCE
*COUPLING, CONSTRAINT NAME=COUPLING_C, REF NODE=BLOCK_C.NREF, SURFACE=BLOCK_C.TOP, INFLUENCE RADIUS=0.5
*DISTRIBUTING, WEIGHTING METHOD=QUADRATIC
*END ASSEMBLY
*STEP
*STATIC
*BOUNDARY
 ASSEMBLY.BLOCK_A.NBASE, 1, 2, 0.0
 ASSEMBLY.BLOCK_B.NBASE, 1, 2, 0.0
 ASSEMBLY.BLOCK_C.NBASE, 1, 2, 0.0
*CLOAD
 ASSEMBLY.BLOCK_A.NREF, 2, 2, -10.0
 ASSEMBLY.BLOCK_B.NREF, 2, 2, -10.0
 ASSEMBLY.BLOCK_C.NREF, 2, 2, -10.0
*NODE PRINT, FREQ=1000
 U,
 RF,
*NODE FILE, FREQ=1000
 U,
 RF,
*OUTPUT, FIELD, FREQ=1000
*NODE OUTPUT
 U,
 RF,
*END STEP