*************************************************************************
*     
*     Common common_tracks.f
*     
*     to be included in:
*     - ../align/prealign.f
*     -...and other stuff
*     
*************************************************************************


c------------------------------------------------------------------------
c     good clusters common
c------------------------------------------------------------------------
c$$$      integer cl_view(nviews)   !number of good clusters per view
c$$$      integer jc(nviews,nclstrmax) !matrix containing good clusters indexes
c$$$ 
c$$$      common/good_cl/cl_view,jc

c------------------------------------------------------------------------
c     coordinates of silicon sensors centres in PAMELA reference frame in mm
c------------------------------------------------------------------------
      real x_mech_sensor(nplanes,nladders_view,2) !mechanical project coordinates
      real y_mech_sensor(nplanes,nladders_view,2) ! of silicon sensors centres
      real z_mech_sensor(nplanes,nladders_view,2) ! (plane, ladder, sensor) in 
                                ! millimeters
      common/mechanical_positions/x_mech_sensor,y_mech_sensor
     $     ,z_mech_sensor