--- DarthVader/TrackerLevel2/inc/F77/level1.f	2006/10/27 16:08:18	1.6
+++ DarthVader/TrackerLevel2/inc/F77/level1.f	2007/01/11 10:20:57	1.8
@@ -27,7 +27,7 @@
 
 c     CLUSTER block:
       integer nclstr1           !cluster number
-      integer view(nclstrmax)   !view the cluster belongs to
+      integer view(nclstrmax)   !view the cluster belongs to     
       integer ladder(nclstrmax) !ladder the strip carrying the largest signal 
                                 ! value belongs to
       integer maxs(nclstrmax)   !cluster strip carrying the largest signal value
@@ -37,7 +37,7 @@
       integer indmax(nclstrmax) !cluster maximum point index in clsignal array
       integer totCLlength       !sum of all clusters length (to assign
                                 ! dimension to clsignal array)
-      real clsignal(maxlength)  !signal values of all strips belonging to clusters
+      real clsignal(maxlength)  !sgnal values of all strips belonging to clusters
 
       real clsigma(maxlength)
       integer cladc(maxlength)
@@ -49,7 +49,7 @@
       integer cnnev(nviews,nva1_view)    !n.strips used for CN computation 
       integer fshower(nviews)            !flag to tag views with too many clusters
 c                                        !(in this case clusters are not saved)
-      integer whichtrack(nclstrmax)      !flag to relate the cluster to the track it belongs to
+      integer whichtrack(nclstrmax)      !flag to tag clusters associated to a track
       common/level1event/good1,nclstr1,view,ladder,maxs
      $     ,mult,dedx,indstart
      $     ,indmax,totCLlength,clsignal,clsigma,cladc,clbad