CMS 3D CMS Logo

HYJET_COMMONS.h
Go to the documentation of this file.
1 #ifndef HYJETCOMMON
2 #define HYJETCOMMON
3 
4 extern "C" {
5 
6 #define f2cFortran
7 #include "cfortran.h"
8 
9 
10  //----------------------------------------------------------------
11  // common /hyipar/ bminh,bmaxh,AW,RA,npar0,nbco0,Apb,Rpb,np,init,ipr
12  typedef struct //HYIPAR
13  {
14  double bminh;
15  double bmaxh;
16  double AW;
17  double RA;
18  double npar0;
19  double nbco0;
20  double Apb;
21  double Rpb;
22  double np;
23  int init;
24  int ipr;
25  }HYIPARCommon;
26 
27 #define HYIPAR COMMON_BLOCK(HYIPAR,hyipar)
29  //----------------------------------------------------------------
30 
31  // common/service/iseed_fromC,iPythDecay,parPYTH(100)
32  typedef struct //SERVICE
33  {
36  double charm;
38 
39 #define SERVICE COMMON_BLOCK(SERVICE,service)
41  //----------------------------------------------------------------
42 
43  // common/SERVICEEV/ipdg,delta
44 
45  typedef struct //SERVICEEV
46  {
47  float psiv3;
48  float delta;
49  int KC;
50  int ipdg;
52 
53 #define SERVICEEV COMMON_BLOCK(SERVICEEV,serviceev)
55 
56  //----------------------------------------------------------------
57 
58  // common /hyjpar/ ptmin,sigin,sigjet,nhsel,iPyhist,ishad,njet
59  typedef struct //HYJPAR
60  {
61  double ptmin;
62  double sigin;
63  double sigjet;
64  int nhsel;
65  int iPyhist;
66  int ishad;
67  int njet;
68  }HYJPARCommon;
69 
70 #define HYJPAR COMMON_BLOCK(HYJPAR,hyjpar)
72  //----------------------------------------------------------------
73 
74 
75  // common /hypyin/ ene,rzta,rnta,bfix,ifb,nh
76  typedef struct //HYPYIN
77  {
78  double ene;
79  double rzta;
80  double rnta;
81  double bfix;
82  int ifb;
83  int nh;
84  }HYPYINCommon;
85 
86 #define HYPYIN COMMON_BLOCK(HYPYIN,hypyin)
88 
89 
90  //----------------------------------------------------------------
91  // common /hyfpar/ bgen,nbcol,npart,npyt,nhyd,npart0
92  typedef struct //HYFPAR
93  {
94  double bgen;
95  double nbcol;
96  double npart;
97  double npart0;
98  int npyt;
99  int nhyd;
100  }HYFPARCommon;
101 
102 #define HYFPAR COMMON_BLOCK(HYFPAR,hyfpar)
104 
105  //----------------------------------------------------------------
106  typedef struct //HYPART
107  {
108  double ppart[150000][20];
109  double bmin;
110  double bmax;
111  int njp;
112  }HYPARTCommon;
113 
114 #define HYPART COMMON_BLOCK(HYPART,hypart)
116  //----------------------------------------------------------------
117 
118  // common /pyqpar/ T0,tau0,nf,ienglu,ianglu
119 
120  typedef struct //PYQPAR
121  {
122  double T0;
123  double tau0;
124  int nf;
125  int ienglu;
126  int ianglu;
127  }PYQPARCommon;
128 
129 #define PYQPAR COMMON_BLOCK(PYQPAR,pyqpar)
131 
132 }
133 #endif
#define HYPYIN
Definition: HYJET_COMMONS.h:86
#define HYJPAR
Definition: HYJET_COMMONS.h:70
#define PYQPAR
COMMON_BLOCK_DEF(HYIPARCommon, COMMON_BLOCK(HYIPAR, hyipar))
#define HYPART
#define SERVICEEV
Definition: HYJET_COMMONS.h:53
#define HYFPAR
#define HYIPAR
Definition: HYJET_COMMONS.h:27
#define SERVICE
Definition: HYJET_COMMONS.h:39