*-- Author : Stephen Burke SUBROUTINE FFCHTR(JPL,JTYPE,JDIG) *-----------------------------------------Updates 02/06/92------- **: FVCHTR.......SB. Change loop indices to please farm. *-----------------------------------------Updates 24/01/92------- **: FFCHTR 30205.SB. Check to see if the drift sign is correct. *-----------------------------------------Updates---------------- ********************************************************************** * * * Update LTRPL for a new digi (found by FKHUNT) * * * ********************************************************************** *KEEP,FKNPL. * * Per-track values can go in H1WORK; note that LTRUE and LFIRST must * be set at least per event. * * This is about 36k words long; the remaining common blocks are * about 3.6k in total. Some of this could be in /H1WORK/, but the * blocks would have to be reorganised. * * /FKPROJ/ * /FKFILT/ * /FKSMTH/ * /FKINT/ * /FKRSID/ * /FKTRUE/ * /FKDBG/ *KEEP,FFWBI. * Work bank indices (note that INDKTR is *NOT* a work bank index!) *KEEP,FFDBG. *KEEP,FKDBG. *KEEP,BCS. *KEEP,STFUNCT. * index of element before row number IROW * index of L'th element of row number IROW * L'th integer element of the IROW'th row of bank with index IND * L'th real element of the IROW'th row of bank with index IND *KEND. ********************************************************************** *