--- DarthVader/TrackerLevel2/inc/F77/calib.f	2007/02/16 14:56:01	1.6
+++ DarthVader/TrackerLevel2/inc/F77/calib.f	2007/05/14 11:03:05	1.8
@@ -7,6 +7,26 @@
 *     
 *************************************************************************
 
+      parameter (clcutx=7.)     !cluster seed cut 
+      parameter (clcuty=6.)
+      parameter (incutx=4.)     !cut to include strips in cluster definition
+      parameter (incuty=4.)
+
+c------------------------------------------------------------------------
+c     
+c     some parameters to configure data reduction
+c     
+c------------------------------------------------------------------------
+c$$$      real clcutx               !cluster seed cut 
+c$$$      real clcuty
+c$$$      real incutx               !cut to include strips in cluster definition
+c$$$      real incuty
+      integer pfaid             !if of PFA 
+      common/sw/
+     $     pfaid
+c$$$     $     ,clcutx,clcuty
+c$$$     $     ,incutx,incuty
+
 c------------------------------------------------------------------------
 c     
 c     pedestal, sigma and badstrip variables
@@ -28,10 +48,6 @@
       save/pedsigbad/
 
 
-      parameter (clcutx=7.)     !cluster seed cut 
-      parameter (clcuty=6.)
-      parameter (incutx=4.)     !cut to include strips in cluster definition
-      parameter (incuty=4.)
 
 c------------------------------------------------------------------------
 c     
@@ -91,9 +107,26 @@
 c$$$      save/angbinning/
 c$$$      common/pfa/netaval,eta2,feta2,eta3,feta3,eta4,feta4
 c$$$      save/pfa/
+    
       common/pfa/nangbin,angL,angR
      $     ,netaval,eta2,feta2,eta3,feta3,eta4,feta4
       save/pfa/
+
+*     limit of application of pfa
+      parameter (e2fax=0.)
+      parameter (e2tax=10.)
+      parameter (e3fax=10.)
+      parameter (e3tax=15.)
+      parameter (e4fax=90.)
+      parameter (e4tax=90.)
+
+      parameter (e2fay=0.)
+      parameter (e2tay=20.)
+      parameter (e3fay=90.)
+      parameter (e3tay=90.)
+      parameter (e4fay=90.)
+      parameter (e4tay=90.)
+
 c------------------------------------------------------------------------
 c     
 c     CHARGE CORRELATION