Pemf generation option is obsolete. Removed.
[u/mrichter/AliRoot.git] / TFluka / Fstepsz.h
1 #include "Fdimpar.h"
2 extern "C" {
3 /*
4 *$ CREATE STEPSZ.ADD
5 *COPY STEPSZ
6 *
7 *=== stepsz ===========================================================*
8 *
9 *----------------------------------------------------------------------*
10 *                                                                      *
11 *   Common stepsz for setting the minimum and maximum step sizes on a  *
12 *                 a region by region basis: very useful for vacuum re- *
13 *                 gions with magnetic filed and for saving time ( and  *
14 *                 accuracy ) with the new plc and lca algorithm in     *
15 *                 Emf and Fluka                                        *
16 *                                                                      *
17 *          W A R N I N G !!!!! At the moment implemented only for      *
18 *          electron and positron transport in Emf and for charged      *
19 *          particles transport in Fluka with the new multiple scat-    *
20 *          tering module!!!!!!                                         *
21 *                                                                      *
22 *                  created by A. Ferrari & P. Sala on 14-jan-1990      *
23 *                                                                      *
24 *          included in:                                                *
25 *                        fiprou                                        *
26 *                        flukam (main)                                 *
27 *                        kashea                                        *
28 *                        kaskad                                        *
29 *                        electr (new version)                          *
30 *                        mageas                                        *
31 *                        magnew                                        *
32 *                        zeroin                                        *
33 *                                                                      *
34 *                        Stepmn  = minimum step size (cm)              *
35 *                        Stepmx  = maximum step size (cm)              *
36 *                        Mxxrgn = maximum number of regions            *
37 *                                                                      *
38 *----------------------------------------------------------------------*
39 */
40
41 //      COMMON / STEPSZ / STEPMN ( MXXRGN ), STEPMX ( MXXRGN )
42 typedef struct {
43     Double_t stepmn[mxxrgn];
44     Double_t stepmx[mxxrgn];
45 } stepszCommon;
46
47 #define STEPSZ COMMON_BLOCK(STEPSZ,stepsz)
48 COMMON_BLOCK_DEF(stepszCommon,STEPSZ);
49  
50 }
51