~maddevelopers/mg5amcnlo/2.9.4

« back to all changes in this revision

Viewing changes to vendor/StdHEP/example/listPythia.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/example/listPythia.F

 

1

      PROGRAM TSTJET

 

2

C

 

3

C     list jetset particle definitions

 

4

C

 

5

#include "pydat1.inc"

 

6

#include "stdlun.inc"

 

7

 

 

8

      INTEGER NEVT,I,NPRNT,LOK

 

9

C

 

10

      NEVT=100

 

11

      NPRNT=1

 

12

C initialize HEP logical units

 

13

      lnhwrt=23

 

14

      lnhrd=0

 

15

      lnhdcy=0

 

16

      lnhout=22

 

17

      lnhpdf=0

 

18

      lnhdmp=0

 

19

      MSTU(11)=LNHOUT

 

20

      OPEN(UNIT=LNHOUT,FILE='listPythia.lpt',STATUS='NEW')

 

21

C

 

22

C... 

 

23

      write(lnhout,1001)

 

24

      call pylist(11)

 

25

      write(lnhout,1002)

 

26

      call pylist(12)

 

27

c     write(lnhout,1003)

 

28

c     call pylist(13)

 

29

C

 

30

C

 

31

c...close output file

 

32

      CLOSE(UNIT=LNHOUT)

 

33

      STOP

 

34

 1001 format(' ----------------------- pylist(11) -------------------')

 

35

 1002 format(' ----------------------- pylist(12) -------------------')

 

36

 1003 format(' ----------------------- pylist(13) -------------------')

 

37

      END

 

38

 

• Older »

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