PHOS/reconstruction/event_format.inc

   1       integer*4 crystals_amount_max,crystals_in_matrix_amount_max,
   2      +          crystals_matrix_amount_max
   3       parameter (crystals_matrix_amount_max=4)
   4       parameter (crystals_in_matrix_amount_max=40000)
   5       parameter (crystals_amount_max =crystals_matrix_amount_max*
   6      +                                crystals_in_matrix_amount_max)
   7
   8 * All units are in GeV, cm, radian
   9       real       crystal_amplitudes_unit, radius_unit,
  10      +           crystal_size_unit, crystal_length_unit,
  11      +           matrix_coordinate_Z_unit, matrix_coordinate_PHI_unit
  12       integer    crystal_amplitudes_in_units_min
  13       parameter (crystal_amplitudes_in_units_min        = 1)
  14       parameter (crystal_amplitudes_unit                = 0.001 ) ! 1.0  MeV
  15       parameter (radius_unit                            = 0.1   ) ! 0.1  cm
  16       parameter (crystal_size_unit                      = 0.01  ) ! 0.01 cm
  17       parameter (crystal_length_unit                    = 0.01  ) ! 0.01 cm
  18       parameter (matrix_coordinate_Z_unit               = 0.1   ) ! 0.1  cm
  19       parameter (matrix_coordinate_PHI_unit             = 1e-4  ) ! 1e-4 radian
  20
  21       integer*2 crystals_matrix_amount_PHOS, crystal_matrix_type,
  22      +          amount_of_crystals_on_Z, amount_of_crystals_on_PHI,
  23      +          crystals_amount_with_amplitudes, crystals_amplitudes_Iad
  24       integer*4 event_number
  25
  26       real      radius, crystal_size, crystal_length,
  27      +          matrix_coordinate_Z, matrix_coordinate_PHI
  28
  29       real      crystals_amplitudes, crystals_energy_total
  30       integer   event_file_unit_number
  31
  32       common /common_for_event_storing/
  33      + ! Event-independent information
  34      +        crystals_matrix_amount_PHOS,
  35      +        crystal_matrix_type,
  36      +        amount_of_crystals_on_Z,
  37      +        amount_of_crystals_on_PHI,
  38      +        radius,
  39      +        crystal_size,
  40      +        crystal_length,
  41      +        matrix_coordinate_Z     (crystals_matrix_amount_max),
  42      +        matrix_coordinate_PHI   (crystals_matrix_amount_max),
  43      +
  44      + ! Event-dependent information
  45      +        event_number,
  46      +        crystals_amount_with_amplitudes
  47      +                                (crystals_matrix_amount_max),
  48      +        crystals_amplitudes_Iad (2,crystals_in_matrix_amount_max,
  49      +                                 crystals_matrix_amount_max),
  50      +
  51      + ! These information don't store in data file
  52      +        crystals_amplitudes     (crystals_amount_max),
  53      +        crystals_energy_total,
  54      +        event_file_unit_number