--- DarthVader/CalorimeterLevel2/inc/INTEST.TXT	2007/07/20 08:24:51	1.5
+++ DarthVader/CalorimeterLevel2/inc/INTEST.TXT	2007/11/29 14:20:27	1.8
@@ -22,6 +22,7 @@
       REAL TBAR(2,NPLAV)
       REAL PLANETOT, QMEAN
       REAL VARCFIT(2)
+      REAL NSATSTRIP
       REAL ELEN, SELEN
       INTEGER NPCFIT(2), PLANEMAX(2)
 C
@@ -36,6 +37,10 @@
 C
       INTEGER NPLA, REVERSE
 C
+      REAL CLUS4(2,4,NCHA)
+      INTEGER NCL4(2,4)
+      INTEGER SELFDELAY(7,4)
+C
       COMMON / clevel1 / al_pp,estrip, good2,
      &     trkchi2, xalig, yalig, zalig, emin,
      &     riginput,hzn,NPLA,REVERSE
@@ -43,14 +48,14 @@
 C
       COMMON / clevel2 / fmode,wartrig,trigty,good,perr(4)
      &     ,swerr(4),crc(4),selftrigger,
-     &     nstrip, qtot, ncore, qcore, impx, impy, 
+     &     nstrip, nsatstrip, qtot, ncore, qcore, impx, impy, 
      &     tanx, tany, noint, ncyl, qcyl, qtrack, qmax, nx22, 
      &     qx22, qq, qtrackx, qtracky, dxtrack, dytrack, qlast, nlast,
      &     qpre, npre, qpresh, npresh, qlow, nlow, qtr, ntr,
      &     planetot, qmean, PLANEMAX, DX0L, varcfit, npcfit,
      $     cibar, tibar,
      $     cbar, tbar,
-     $     ELEN, SELEN
+     $     ELEN, SELEN, selfdelay
       SAVE / clevel2 /
 C
       COMMON / EVENTI / DEXY
@@ -61,3 +66,7 @@
 C
       COMMON / GRUPPO2 / CLUS2, NCL2
       SAVE / GRUPPO2 / 
+
+C
+      COMMON / GRUPPO4 / CLUS4,NCL4
+      SAVE / GRUPPO4 /