~maddevelopers/mg5amcnlo/2.7.1.3

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/IOExportV4IOTest/export_matrix_element_v4_madevent_group/matrix1.f

  • Committer: olivier Mattelaer
  • Date: 2017-12-12 21:11:08 UTC
  • mfrom: (274.1.52 2.6.1)
  • Revision ID: olivier.mattelaer@uclouvain.be-20171212211108-xfh9rt0j9c9m6nxp
pass to 2.6.1

Show diffs side-by-side

added added

removed removed

Lines of Context:
233
233
        ENDDO
234
234
        IF (XTOT.NE.0D0) THEN
235
235
          ANS=ANS*AMP2(SUBDIAG(1))/XTOT
236
 
        ELSE
237
 
          ANS=0D0
 
236
        ELSE IF(ANS.NE.0D0) THEN
 
237
          WRITE(*,*) 'Problem in the multi-channeling. All amp2 are'
 
238
     $     //' zero but not the total matrix-element'
 
239
          STOP 1
238
240
        ENDIF
239
241
      ENDIF
240
242
      ANS=ANS/DBLE(IDEN)