Bugfix in AliPoints2Memory
[u/mrichter/AliRoot.git] / GEANT321 / geant321 / qquark.inc
CommitLineData
fe4da5cc 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