5 //*=== scohlp ===========================================================*
7 //*----------------------------------------------------------------------*
9 //* Copyright (C) 1991-2005 by Alfredo Ferrari & Paola Sala *
10 //* All Rights Reserved. *
13 //* Created on 05 august 1991 by Alfredo Ferrari & Paola Sala *
16 //* Last change on 29-oct-94 by Alfredo Ferrari *
18 //* Energy/Star binnings/scorings (Comscw): *
19 //* ISCRNG = 1 --> Energy density binning *
20 //* ISCRNG = 2 --> Star density binning *
21 //* ISCRNG = 3 --> Residual nuclei scoring *
22 //* JSCRNG = # of the binning *
23 //* Flux like binnings/estimators (Fluscw): *
24 //* ISCRNG = 1 --> Boundary crossing estimator *
25 //* ISCRNG = 2 --> Track length binning *
26 //* ISCRNG = 3 --> Track length estimator *
27 //* ISCRNG = 4 --> Collision density estimator *
28 //* ISCRNG = 5 --> Yield estimator *
29 //* JSCRNG = # of the binning/estimator *
31 //*----------------------------------------------------------------------*
38 #define SCOHLP COMMON_BLOCK(SCOHLP,scohlp)
39 COMMON_BLOCK_DEF(scohlpCommon,SCOHLP);