This commit was generated by cvs2svn to compensate for changes in r2,
[u/mrichter/AliRoot.git] / GEANT321 / guser / guphad.F
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.1  1995/10/24 10:21:46  cernlib
6 * Geant
7 *
8 *
9 #include "geant321/pilot.h"
10 *CMZ :  3.21/03 07/10/94  18.38.33  by  S.Giani
11 *-- Author :
12       SUBROUTINE GUPHAD
13 C.
14 C.    ******************************************************************
15 C.    *                                                                *
16 C.    *       User routine to compute Hadron. inter. probabilities     *
17 C.    *                                                                *
18 C.    *    ==>Called by : GTHADR,GTNEUT                                *
19 C.    *                                                                *
20 C.    ******************************************************************
21 C.
22 *======================================================================*
23 *                                                                      *
24 *   An interface with a part of the FLUKA shower code is available in  *
25 *   GEANT 3.21. The following conditions and warnings must be taken    *
26 *   into account when using the FLUKA routines.                        *
27 *                                                                      *
28 *======================================================================*
29 *======================================================================*
30 *                                                                      *
31 *                   FFFF   L      U  U  K  K   AA                      *
32 *                   F      L      U  U  K K   A  A                     *
33 *                   FFF    L      U  U  KK    AAAA                     *
34 *                   F      L      U  U  K K   A  A                     *
35 *                   F      LLLL    UU   K  K  A  A                     *
36 *                                                                      *
37 *                   (C) Copyright of the authors                       *
38 *                                                                      *
39 *             A. Fasso'*, A. Ferrari#, J. Ranft$, P.R. Sala#           *
40 *                                                                      *
41 *               *: CERN, #: INFN -Milan, $: CERN/Frascati              *
42 *                                                                      *
43 *                (e-mail: FERRARIA@CERNVM.CERN.CH)                     *
44 *                                                                      *
45 *======================================================================*
46 *                                                                      *
47 *   - All the rights concerning FLUKA or parts of it are only of the   *
48 *     authors and are independent from those of the GEANT code         *
49 *                                                                      *
50 *   - FLUKA [1-6] is a standalone code capable of simulating the inter-*
51 *     action and transport of all components of EM and hadronic cas-   *
52 *     cades up to several TeV. However, only cross sections and        *
53 *     models for hadronic elastic and inelastic interactions (end 1992 *
54 *     status) are included in this GEANT version.                      *
55 *                                                                      *
56 *   - The most recent FLUKA model [4,6] for nucleon and pion interac-  *
57 *     tions in the intermediate energy range is not fully implemented  *
58 *     in GEANT. Only a simplified version, limited to p and n below    *
59 *     250 MeV, is available in GEANT 3.21. A coarser model is used for *
60 *     other projectiles in this energy range. However the implemented  *
61 *     parts should be adequate for most detector simulations and sim-  *
62 *     ilar applications for which GEANT is generally used. Their accu- *
63 *     racy could be insufficient for some nuclear physics studies or   *
64 *     demanding simulations at low energies, where the more sophistic- *
65 *     ated models [4,6] could be required.                             *
66 *                                                                      *
67 *   - The performances of GEANT-FLUKA are therefore not representative *
68 *     of those of FLUKA standalone and should be referenced as such    *
69 *     rather than simply GEANT or FLUKA.                               *
70 *                                                                      *
71 *   - The authors reserve the right of publishing about the physical   *
72 *     models developed for FLUKA. Running the FLUKA routines in isol-  *
73 *     ation for benchmarks (or equivalent use) is not permitted,       *
74 *     except after consultations or in collaboration with the authors. *
75 *                                                                      *
76 *   - The FLUKA routines are supposed to be included and used in       *
77 *     GEANT only. Any other use must be authorized by the authors.     *
78 *                                                                      *
79 *   - References: at least reference [5] should be always quoted when  *
80 *                 reporting results obtained with GEANT-FLUKA          *
81 *                                                                      *
82 * [1] A. Fasso', A. Ferrari, J. Ranft, P. R. Sala, G. R. Stevenson and *
83 *     J. M. Zazula, "FLUKA92", presented at the workshop on "Simulat-  *
84 *     ing Accelerator Radiation Environment", SARE, Santa Fe, 11-15    *
85 *     january (1993), Proceedings in press.                            *
86 *                                                                      *
87 * [2] P.A. Aarnio, A. Fasso', A. Ferrari, J.-H. Moehring, J. Ranft,    *
88 *     P.R. Sala, G.R. Stevenson and J.M. Zazula, Proc. MC93 Int. Conf. *
89 *     on Monte-Carlo Simulation in High-Energy and Nuclear Physics,    *
90 *     Tallahassee, Florida, 22-26 february (1993), World Scientific,   *
91 *     p. 88 (1994).                                                    *
92 *                                                                      *
93 * [3] P.A. Aarnio, A. Fasso', A. Ferrari, J.-H. Moehring, J. Ranft,    *
94 *     P.R. Sala, G.R. Stevenson and J.M. Zazula, ibidem, p. 100 (1994) *
95 *                                                                      *
96 * [4] A. Ferrari and P.R. Sala, ibidem, p. 277 (1994).                 *
97 *                                                                      *
98 * [5] A. Fasso', A. Ferrari, J. Ranft and P.R. Sala, "FLUKA: present   *
99 *     status and future developments", presented at the IV Int. Conf.  *
100 *     on Calorimetry in High Energy Physics, La Biodola (Elba),        *
101 *     September 19-25 1993, Proceedings in press.                      *
102 *                                                                      *
103 * [6] A. Fasso', A. Ferrari, J. Ranft, and P.R. Sala, "FLUKA: Perf-    *
104 *     ormances and Applications in the Intermediate Energy Range",     *
105 *     presented at the "Specialists' Meeting on Shielding Aspects of   *
106 *     Accelerators, Targets & Irradiation Facilities", Arlington,      *
107 *     April 28-29 1994, Proceedings in press.                          *
108 *                                                                      *
109 *======================================================================*
110 C.
111 C.    ------------------------------------------------------------------
112 C.
113 C             GPGHEI for GHEISHA
114 C
115       CALL GPGHEI
116       END