HERWIG/src/decadd.f

   1 C-----------------------------------------------------------------------
   2
   3 C                           H E R W I G
   4
   5 C
   6
   7 C            a Monte Carlo event generator for simulating
   8
   9 C        +---------------------------------------------------+
  10
  11 C        | Hadron Emission Reactions With Interfering Gluons |
  12
  13 C        +---------------------------------------------------+
  14
  15 C I.G. Knowles(*), G. Marchesini(+), M.H. Seymour($) and B.R. Webber(#)
  16
  17 C-----------------------------------------------------------------------
  18
  19 C with Minimal Supersymmetric Standard Model Matrix Elements by
  20
  21 C                  S. Moretti($) and K. Odagiri($)
  22
  23 C-----------------------------------------------------------------------
  24
  25 C R parity violating Supersymmetric Decays and Matrix Elements by
  26
  27 C                          P. Richardson(&)
  28
  29 C-----------------------------------------------------------------------
  30
  31 C matrix element corrections to top decay and Drell-Yan type processes
  32
  33 C                         by G. Corcella(+)
  34
  35 C-----------------------------------------------------------------------
  36
  37 C Deep Inelastic Scattering and Heavy Flavour Electroproduction by
  38
  39 C                  G. Abbiendi(@) and L. Stanco(%)
  40
  41 C-----------------------------------------------------------------------
  42
  43 C and Jet Photoproduction in Lepton-Hadron Collisions by J. Chyla(~)
  44
  45 C-----------------------------------------------------------------------
  46
  47 C(*)  Department of Physics & Astronomy, University of Edinburgh
  48
  49 C(+)  Dipartimento di Fisica, Universita di Milano
  50
  51 C($)  Rutherford Appleton Laboratory
  52
  53 C(#)  Cavendish Laboratory, Cambridge
  54
  55 C(&)  Department of Physics, University of Oxford
  56
  57 C(@)  Dipartimento di Fisica, Universita di Bologna
  58
  59 C(%)  Dipartimento di Fisica, Universita di Padova
  60
  61 C(~)  Institute of Physics, Prague
  62
  63 C-----------------------------------------------------------------------
  64
  65 C                  Version 6.100 - 16th December 1999
  66
  67 C-----------------------------------------------------------------------
  68
  69 C Main reference:
  70
  71 C    G.Marchesini,  B.R.Webber,  G.Abbiendi,  I.G.Knowles,  M.H.Seymour,
  72
  73 C    and L.Stanco, Computer Physics Communications 67 (1992) 465.
  74
  75 C-----------------------------------------------------------------------
  76
  77 C Please send e-mail about  this program  to one of the  authors at the
  78
  79 C following Internet addresses:
  80
  81 C    I.Knowles@ed.ac.uk        Giuseppe.Marchesini@mi.infn.it
  82
  83 C    M.Seymour@rl.ac.uk        webber@hep.phy.cam.ac.uk
  84
  85 C-----------------------------------------------------------------------
  86
  87 CDECK  ID>, DECADD.
  88
  89 *CMZ :-        -28/01/92  12.34.44  by  Mike Seymour
  90
  91 *-- Author :    Luca Stanco
  92
  93 C-----------------------------------------------------------------------
  94
  95       SUBROUTINE DECADD(LOGI)
  96
  97 C-----------------------------------------------------------------------
  98
  99 C     DUMMY SUBROUTINE: DELETE AND SET BDECAY='CLEO'
 100
 101 C     IN MAIN PROGRAM IF YOU USE CLEO DECAY PACKAGE
 102
 103 C-----------------------------------------------------------------------
 104
 105       LOGICAL LOGI
 106
 107       WRITE (6,10)
 108
 109    10 FORMAT(/10X,'DECADD CALLED BUT NOT LINKED')
 110
 111       STOP
 112
 113       END