← Back to branch summary

~maddevelopers/mg5amcnlo/new_clustering

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/long_ML_SMQCD_optimized/gg_wmtbx/%..%..%Source%MODEL%rw_para.f

  • Committer: Rikkert Frederix
  • Date: 2021-09-09 15:51:40 UTC
  • mfrom: (78.75.502 3.2.1)
  • Revision ID: frederix@physik.uzh.ch-20210909155140-rg6umfq68h6h47cf
merge with 3.2.1

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/input_files/IOTestsComparison/long_ML_SMQCD_optimized/gg_wmtbx/%..%..%Source%MODEL%rw_para.f
24
24
      integer npara
25
25
      character*20 param(maxpara),value(maxpara)
26
26
 
 
27
      logical updateloop
 
28
      common /to_updateloop/updateloop
 
29
      data updateloop /.true./
 
30
 
27
31
      call LHA_loadcard(param_name,npara,param,value)
28
 
      include 'param_read.inc'
29
 
      call coup()
30
 
 
 
32
      ! also loop parameters should be initialised here
 
33
      if (updateloop) then
 
34
         include 'param_read.inc'
 
35
         call coup()         
 
36
      else   
 
37
         updateloop=.true.
 
38
         include 'param_read.inc'
 
39
         call coup()
 
40
         updateloop=.false.
 
41
      endif
31
42
      return
32
43
 
33
44
      end