--- DarthVader/CalorimeterLevel2/inc/INTEST.TXT	2006/05/19 13:15:49	1.1.1.1
+++ DarthVader/CalorimeterLevel2/inc/INTEST.TXT	2007/01/22 09:16:56	1.4
@@ -10,10 +10,11 @@
       REAL CLUS2(2,2,NCHA)
       INTEGER NCL2(2,2)
       INTEGER SELFTRIGGER
+      INTEGER FMODE(2)
 C
 c      integer obt,pkt_num,pro_num
       real nstrip, qtot, ncore, qcore, impx, impy, tanx, tany
-      real noint, trigty
+      real noint, trigty, wartrig
       REAL ncyl, qcyl, qtrack, qmax, nx22, qx22
       real qq(4)
       REAL QTRACKX, QTRACKY, DXTRACK, DYTRACK, QLAST, NLAST, QPRE, NPRE
@@ -34,13 +35,15 @@
       INTEGER good2, trkchi2
       REAL estrip(2,22,96), emin
       real zalig, xalig, yalig
-      REAL DX0L
+      REAL DX0L, RIGINPUT
+      INTEGER HZN
 C
       COMMON / clevel1 / al_pp,estrip, good2,
-     &     trkchi2, xalig, yalig, zalig, emin
+     &     trkchi2, xalig, yalig, zalig, emin,
+     &     riginput,hzn
       SAVE / clevel1 /
 C
-      COMMON / clevel2 / trigty,good,perr(4)
+      COMMON / clevel2 / fmode,wartrig,trigty,good,perr(4)
      &     ,swerr(4),crc(4),selftrigger,
      &     nstrip, qtot, ncore, qcore, impx, impy, 
      &     tanx, tany, noint, ncyl, qcyl, qtrack, qmax, nx22,