SUBROUTINE  : FTFIT
 
AUTHOR : I.O. Skillicorn
 
DATE : 15/05/92
 
LANGUAGE : FORTRAN
 
SHORT SUMMARY of PURPOSE:                                                
                                                                                
          Fits radial track segments to straight                                
          lines in phi-z,r-z.                                                   
          Checks for wrong drift-sign segments.                                 
          Joins segments that are split accross                                 
          the cathode plane.                                                    
                                                                                
LIST and DESCRIPTION of INPUT VARIABLES/ARGUMENTS:                       
                                                                                
 Radial track segments:                                                         
          NTRAKS segments/module                                                
          Hits/drift sign         :- IRPT/SDRFT                                 
                                                                                
                                                                                
LIST and DESCRIPTION of OUTPUT VARIABLES/ARGUMENTS:                      
                                                                                
                                                                                
 Radial track segments:                                                         
          NTRAKS segments/module                                                
          Parameters(phi',phi0)   :- PCOSL,phzl                                 
          Parameters(R',R0)       :- PSINL,RZI                                  
          Chi**2 marks bad segs   :- CHSQ                                       
                                                                                
 
CALLING TREE from FTFIT :
 
  CALL FTFHQQ      == tree ==>
 
FUNCTIONS USED :
 
None
 
KEEP SEQUENCES USED :
 
 FRDIMS FH1WORK FPTVTX                                                                                        
 

 
Comments from FTFIT