SUBROUTINE  : FFEVT0(DEVT0,ZNOM,VXYZ)
 
AUTHOR : Stephen Burke
 
DATE : 28/10/94
 
LANGUAGE : FORTRAN
 
SHORT SUMMARY of PURPOSE:                                                
                                                                                
 Calculate the event T0 correction.                                             
                                                                                
LIST and DESCRIPTION of INPUT VARIABLES/ARGUMENTS:                       
                                                                                
 BEAZ bank (nominal z-vertex)                                                   
 CJKV bank (CJC z-vertex)                                                       
                                                                                
LIST and DESCRIPTION of OUTPUT VARIABLES/ARGUMENTS:                      
                                                                                
 DEVT0 - event T0 correction (in nsec)                                          
 ZNOM  - nominal z vertex                                                       
 VXYZ  - event vertex position (3-vector)                                       
                                                                                
 
CALLING TREE from FFEVT0 :
 
None
 
FUNCTIONS USED :
 
None
 
KEEP SEQUENCES USED :
 
 FKNPL FKPROJ FKSMTH FKRSID FKTRUE FFSTEE FFDBG FKDBG FKINT FRLORA                                            
 BCS BOSMDL CNSTBF FTANG STFUNCT STFCLW FTFUNCT                                                               
 

 
Comments from FFEVT0