SUBROUTINE  : FTCORG
 
AUTHOR : Stephen J. Maxfield
 
DATE : 08/03/91
 
LANGUAGE : FORTRAN
 
SHORT SUMMARY of PURPOSE:                                                
                                                                                
     Build tables of corrected geometry for Radial and Planar                   
     Drift Chambers. To be called at beginning of each New Run                  
                                                                                
LIST and DESCRIPTION of INPUT VARIABLES/ARGUMENTS:                       
                                                                                
     Nominal geometry:- FGAR and                    
                        FGAP                        
     Corrections     :- F1RC ,                      
                        F1PC ,                      
                        FCP1                        
     Dead wire maps  :- FRDW ,                      
                        FPDW                        
     Later: shifts from 'shift banks' (not yet implemented)                     
                                                                                
LIST and DESCRIPTION of OUTPUT VARIABLES/ARGUMENTS:                      
                                                                                
     FRG1 and                                       
     FPG1 banks                                     
                                                                                
 
CALLING TREE from FTCORG :
 
None
 
FUNCTIONS USED :
 
None
 
KEEP SEQUENCES USED :
 
 BCS H1EVDT CNSTBF FWINDS STFUNCT FTFUNCT                                                                     
 

 
Comments from FTCORG