~maddevelopers/mg5amcnlo/2.9.4

« back to all changes in this revision

Viewing changes to vendor/StdHEP/src/stdhep/stdzeroqq.F

• browse files at revision 249
• compare with another revision
• download diff
• download tarball
• view history from revision 249

Show diffs side-by-side

added

removed

vendor/StdHEP/src/stdhep/stdzeroqq.F

 

1

 

 

2

      subroutine STDZEROQQ

 

3

C

 

4

C... zero elements of QQTRAK, etc.

 

5

 

 

6

      IMPLICIT NONE

 

7

 

 

8

#include "qqpars.inc"

 

9

#include "qqtrak.inc"

 

10

#include "qqvrtx.inc"

 

11

#include "qqmxcp.inc"

 

12

#include "qqipcd.inc"

 

13

 

 

14

       NTRKQQ = 0

 

15

       NSTBQQ = 0

 

16

       NCHGQQ = 0

 

17

       call VZERO(IPCDQQ,MCTRK)

 

18

       call VZERO(IPRNTV,MCTRK)

 

19

       call VZERO(IVPROD,MCTRK)

 

20

       call VZERO(IVDECA,MCTRK)

 

21

       call VZERO(ITRKOU,MCTRK)

 

22

       call VFILL(HELCQQ,MCTRK,-100.)

 

23

       call VZERO(ILDECA,250)

 

24

       call VZERO(CTTAU,250)

 

25

       return

 

26

       end

• Older »

Loggerhead is a web-based interface for Breezy
Version: 2.0.1