← Back to branch summary

~maddevelopers/mg5amcnlo/2.6.5_ewa

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/IOExportV4IOTest/export_matrix_element_v4_madevent_nogroup/matrix.f

  • Committer: olivier-mattelaer
  • Date: 2020-08-13 08:01:25 UTC
  • mfrom: (281.3.23 2.7.4)
  • Revision ID: olivier-mattelaer-20200813080125-dvgl90l47g9jekf1
merge with 2.7.4

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/input_files/IOTestsComparison/IOExportV4IOTest/export_matrix_element_v4_madevent_nogroup/matrix.f
391
391
C     BEGIN CODE
392
392
C     
393
393
      DO I=1,NSO
394
 
        SQORDERS(I)=AMPSPLITORDERS(ORDERINDEXA,I)+AMPSPLITORDERS(ORDERI
395
 
     $NDEXB,I)
 
394
        SQORDERS(I)=AMPSPLITORDERS(ORDERINDEXA,I)
 
395
     $   +AMPSPLITORDERS(ORDERINDEXB,I)
396
396
      ENDDO
397
397
      SQSOINDEX=SOINDEX_FOR_SQUARED_ORDERS(SQORDERS)
398
398
      END
486
486
        RETURN
487
487
      ENDIF
488
488
 
489
 
      WRITE(*,*) 'ERROR:: Stopping function GET_SQUARED_ORDERS_FOR_SOIN'
490
 
     $ //'DEX'
 
489
      WRITE(*,*) 'ERROR:: Stopping function'
 
490
     $ //' GET_SQUARED_ORDERS_FOR_SOINDEX'
491
491
      WRITE(*,*) 'Could not find squared orders index ',SOINDEX
492
492
      STOP
493
493