← Back to branch summary

~maddevelopers/mg5amcnlo/3.0.1

« back to all changes in this revision

Viewing changes to vendor/CutTools/src/cts/cts_cuttools.f90

  • Committer: Marco Zaro
  • Date: 2014-01-27 16:54:10 UTC
  • mfrom: (78.124.55 MG5_aMC_2.1)
  • Revision ID: marco.zaro@gmail.com-20140127165410-5lma8c2hzbzm426j
merged with lp:~maddevelopers/madgraph5/MG5_aMC_2.1 r 267

Show diffs side-by-side

added added

removed removed

Lines of Context:
vendor/CutTools/src/cts/cts_cuttools.f90
37
37
    :: thrsin
38
38
   include 'cts_mpr.h' 
39
39
    :: one
 
40
   logical, intent(in) :: ext_num_for_r1in
40
41
   include 'cts_mpinit.h'
41
 
   logical, intent(in) :: ext_num_for_r1in
42
42
   limit= limitvalue ! limit of precision below which the mp routines activate
43
43
   call ctscountdigits(ncountd)
44
44
   write (*,*) ' '
45
45
   write (*,'(a72)') '------------------------------------------------------------------------'
46
 
   write (*,'(a72)') '|              You are using CutTools - Version 1.9.0                  |'  
 
46
   write (*,'(a72)') '|              You are using CutTools - Version 1.9.3                  |'  
47
47
   write (*,'(a72)') '|              Authors: G. Ossola, C. Papadopoulos, R. Pittau          |' 
48
48
   write (*,'(a72)') '|              Published in JHEP 0803:042,2008                         |'
49
49
   write (*,'(a72)') '|              http://www.ugr.es/~pittau/CutTools                      |'