--- DarthVader/TrackerLevel2/inc/F77/level1.f	2006/09/28 14:04:39	1.4
+++ DarthVader/TrackerLevel2/inc/F77/level1.f	2006/10/27 16:08:18	1.6
@@ -19,7 +19,7 @@
 
       parameter (nclstrmax_view = 200) ! maximum number of clusters per view
       parameter (nclstrmax      = nclstrmax_view * nviews)
-      parameter (nclstrp        = 19)  ! maximum number of stored strips per cluster
+      parameter (nclstrp        = 20) ! maximum number of stored strips per cluster
       parameter (maxlength      = nclstrmax * nclstrp) 
 
 c      integer good1             !flag to mark good or noise events
@@ -45,13 +45,15 @@
 c      real clped(maxlength)
 
       real    cnev(nviews,nva1_view)     !CN of the event for a certain view and VA1
+      real    cnrmsev(nviews,nva1_view) !RMS of CN
       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
       common/level1event/good1,nclstr1,view,ladder,maxs
      $     ,mult,dedx,indstart
-     $     ,indmax,totCLlength,clsignal,clsigma,cladc,clbad!,clped
-     $     ,cnev,cnnev,fshower,whichtrack
+     $     ,indmax,totCLlength,clsignal,clsigma,cladc,clbad
+     $     ,cnev,cnnev,cnrmsev,fshower,whichtrack
+c     $     ,cnev,cnnev,fshower,whichtrack
       
       SAVE/level1event/