Cross-references

INTEGER,ALLOCATABLE ::&
      atpnt(:),&             ! Pointer to the same track in
                             ! /ZATRA/&
      clunb(:),&             ! Cluster-number of most energetic
                             ! shower of the track in /ZACLU/&
                             ! (kept for backward compability.
                             !  will be remoed)
      clunbn(:,:),&          ! Cluster-number in /ZACLU/&
      parnb(:)               ! Parent-number in /ZAPRN/&
INTEGER,ALLOCATABLE ::&
      vdiopt(:),&            ! X-reference table to VDIOTK
      lpa(:)                 ! ZEBRA link of track (if read from DST)
INTEGER,ALLOCATABLE :: &
     induns(:)               ! index to un-seen particles (helper in decoding)
calorimeter-cluster-module-zaclu