← Back to branch summary

~maddevelopers/mg5amcnlo/2.6.5_ewa

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/short_ML_SMQCD_optimized/ddx_ttx/CT_interface.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/short_ML_SMQCD_optimized/ddx_ttx/CT_interface.f
395
395
C     Determine it uses qp or not
396
396
      DOING_QP = (CTMODE.GE.4)
397
397
 
398
 
      IF (CHECKPHASE.OR.(.NOT.HELDOUBLECHECKED).OR.GOODAMP(SQUAREDSOIND
399
 
     $EX,LOOPNUM)) THEN
 
398
      IF (CHECKPHASE.OR.(.NOT.HELDOUBLECHECKED)
 
399
     $ .OR.GOODAMP(SQUAREDSOINDEX,LOOPNUM)) THEN
400
400
        WE(1)=W1
401
401
        WE(2)=W2
402
402
        WE(3)=W3
531
531
C     Determine it uses qp or not
532
532
      DOING_QP = (CTMODE.GE.4)
533
533
 
534
 
      IF (CHECKPHASE.OR.(.NOT.HELDOUBLECHECKED).OR.GOODAMP(SQUAREDSOIND
535
 
     $EX,LOOPNUM)) THEN
 
534
      IF (CHECKPHASE.OR.(.NOT.HELDOUBLECHECKED)
 
535
     $ .OR.GOODAMP(SQUAREDSOINDEX,LOOPNUM)) THEN
536
536
        WE(1)=W1
537
537
        WE(2)=W2
538
538
        WE(3)=W3
665
665
C     Determine it uses qp or not
666
666
      DOING_QP = (CTMODE.GE.4)
667
667
 
668
 
      IF (CHECKPHASE.OR.(.NOT.HELDOUBLECHECKED).OR.GOODAMP(SQUAREDSOIND
669
 
     $EX,LOOPNUM)) THEN
 
668
      IF (CHECKPHASE.OR.(.NOT.HELDOUBLECHECKED)
 
669
     $ .OR.GOODAMP(SQUAREDSOINDEX,LOOPNUM)) THEN
670
670
        WE(1)=W1
671
671
        WE(2)=W2
672
672
        M2L(1)=M2**2