This commit was generated by cvs2svn to compensate for changes in r2,
[u/mrichter/AliRoot.git] / GEANT321 / geant321 / qquark.inc
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.1  1995/10/24 10:20:42  cernlib
6 * Geant
7 *
8 *
9 #ifndef CERNLIB_GEANT321_QQUARK_INC
10 #define CERNLIB_GEANT321_QQUARK_INC
11 *
12 *
13 * qquark.inc
14 *
15 *
16 *=== qquark ===========================================================*
17 *
18 *----------------------------------------------------------------------*
19 *                                                                      *
20 *     Created on    6 february 1991    by        Alfredo Ferrari       *
21 *                                                  INFN - Milan        *
22 *                                                                      *
23 *     Last change  on  6 february 1991  by       Alfredo Ferrari       *
24 *                                                                      *
25 *     Included in the following routines :                             *
26 *                                                                      *
27 *                     COREVT                                           *
28 *                     CORRIN                                           *
29 *                     HADEVV                                           *
30 *                     HADEVT                                           *
31 *                     NUCEVV                                           *
32 *                     NUCEVT                                           *
33 *                                                                      *
34 *     Quark content of particles:                                      *
35 *          index   quark   el. charge  bar. charge  isospin  isospin3  *
36 *              1 = u          2/3          1/3        1/2       1/2    *
37 *             -1 = ubar      -2/3         -1/3        1/2      -1/2    *
38 *              2 = d         -1/3          1/3        1/2      -1/2    *
39 *             -2 = dbar       1/3         -1/3        1/2       1/2    *
40 *              3 = s         -1/3          1/3         0         0     *
41 *             -3 = sbar       1/3         -1/3         0         0     *
42 *              4 = c          2/3          1/3         0         0     *
43 *             -4 = cbar      -2/3         -1/3         0         0     *
44 *              5 = b         -1/3          1/3         0         0     *
45 *             -5 = bbar       1/3         -1/3         0         0     *
46 *              6 = t          2/3          1/3         0         0     *
47 *             -6 = tbar      -2/3         -1/3         0         0     *
48 *                                                                      *
49 *         Mquark = particle quark composition (Paprop numbering)       *
50 *         Iqechr = electric charge ( in 1/3 unit )                     *
51 *         Iqbchr = baryonic charge ( in 1/3 unit )                     *
52 *         Iqichr = isospin ( in 1/2 unit ), z component                *
53 *         Iqschr = strangeness                                         *
54 *         Iqcchr = charm                                               *
55 *         Iquchr = beauty                                              *
56 *         Iqtchr = ......                                              *
57 *                                                                      *
58 *----------------------------------------------------------------------*
59 *
60       COMMON / FKQUAR / IQECHR (-6:6), IQBCHR (-6:6), IQICHR (-6:6),
61      &                  IQSCHR (-6:6), IQCCHR (-6:6), IQUCHR (-6:6),
62      &                  IQTCHR (-6:6), MQUARK (3,39)
63  
64
65 #endif