*FILE MEMBER=BANK_FT LIBRARY=SNOMAN LANGUAGE=INC DATE=24:Sep:2001 * SNOMAN: Address mnemonics for the FT and generic FTx* banks. * See FT, FTX, FTXV and FTXT bank descriptions for details. * Contact: D. Wark Oxford * Revision History:- * ================ * 2.07 N. West First version with revision history. * Complete rewrite for mutiple fitters. * 2.08 S. Brice Addition of elastic fitter FTE * 2.09 S. Brice Addition of grid fitter FTG * 3.01 N. Tagg Addition of muon fitter FTM * 3.02 N. West Add Program Notes. * 4.01 M. Neubauer Addition of path fitter FTP * 4.01 M. Boulay Added QPDF fitter (FTU) * 4.02 N. West Add FTXA, FTXC and FTXR bank mnemonics. * Remove Program Notes: snoman_mnemonics.h now * automatically generated from symbol_table.dat * W.Heintzelman Changed the number of angular correlation parameters * Program Notes:- * ============= * None. integer KFT_USER1, + KFT_USER2, + KFT_USER3, + KFT_ELASTIC, + KFT_TIME, + KFT_QUAD, + KFT_GRID, + KFT_MUON, + KFT_PATH, + KFT_QPDF * Fitter methods:- * ============== * Note: make sure these values stay in step with fitter SU ids. in * su_mnemonics.inc parameter (KFT_USER1 = 1, + KFT_USER2 = 2, + KFT_USER3 = 3, + KFT_ELASTIC = 4, + KFT_TIME = 5, + KFT_QUAD = 6, + KFT_GRID = 7, + KFT_MUON = 8, + KFT_PATH = 9, + KFT_QPDF = 10 ) * Links:- * ===== *FT integer KFT_FTX_CUR parameter (KFT_FTX_CUR = 11) integer KFT_FTU, + KFT_FTP, + KFT_FTM, + KFT_FTG, + KFT_FTQ, + KFT_FTT, + KFT_FTE, + KFT_FT3, + KFT_FT2, + KFT_FT1 parameter (KFT_FTU = 10, + KFT_FTP = 9, + KFT_FTM = 8, + KFT_FTG = 7, + KFT_FTQ = 6, + KFT_FTT = 5, + KFT_FTE = 4, + KFT_FT3 = 3, + KFT_FT2 = 2, + KFT_FT1 = 1) *FTX integer KFTX_FTXV, + KFTX_FTXA parameter (KFTX_FTXV = 1, + KFTX_FTXA = 2) *FTXA integer KFTXA_FTXC, + KFTXA_FTXR parameter (KFTXA_FTXC = 1, + KFTXA_FTXR = 2) *FTXV integer KFTXV_FTXT parameter (KFTXV_FTXT = 1) * Status Word Bits:- * ================ * None. * Data Words:- * ========== *FTX integer KFTX_METHOD, + KFTX_RETC, + KFTX_PMT_AVAIL, + KFTX_PMT_USED, + KFTX_EARLY, + KFTX_LATE, + KFTX_ITER, + KFTX_PROB parameter (KFTX_METHOD = 1 , + KFTX_RETC = 2 , + KFTX_PMT_AVAIL = 3 , + KFTX_PMT_USED = 4 , + KFTX_EARLY = 5 , + KFTX_LATE = 6 , + KFTX_ITER = 7 , + KFTX_PROB = 8 ) *FTXV integer KFTXV_X, + KFTXV_Y, + KFTXV_Z, + KFTXV_T, + KFTXV_DX, + KFTXV_DY, + KFTXV_DZ, + KFTXV_DT, + KFTXV_C11, + KFTXV_C12, + KFTXV_C13, + KFTXV_C14, + KFTXV_C22, + KFTXV_C23, + KFTXV_C24, + KFTXV_C33, + KFTXV_C34, + KFTXV_C44 parameter (KFTXV_X = 1 , + KFTXV_Y = 2 , + KFTXV_Z = 3 , + KFTXV_T = 4 , + KFTXV_DX = 5 , + KFTXV_DY = 6 , + KFTXV_DZ = 7 , + KFTXV_DT = 8 , + KFTXV_C11 = 9 , + KFTXV_C12 = 10 , + KFTXV_C13 = 11 , + KFTXV_C14 = 12 , + KFTXV_C22 = 13 , + KFTXV_C23 = 14 , + KFTXV_C24 = 15 , + KFTXV_C33 = 16 , + KFTXV_C34 = 17 , + KFTXV_C44 = 18 ) *FTXT integer KFTXT_U, + KFTXT_V, + KFTXT_W, + KFTXT_DU, + KFTXT_DV, + KFTXT_DW parameter (KFTXT_U = 1 , + KFTXT_V = 2 , + KFTXT_W = 3 , + KFTXT_DU = 4 , + KFTXT_DV = 5 , + KFTXT_DW = 6 ) *KFTXC integer KFTXC_NHIT_NPAR, + KFTXC_SOL_DIR_NPAR, + KFTXC_HAR_NPAR, + KFTXC_RES_HAR_NPAR, + KFTXC_RES_NPAR, + KFTXC_LEG_NPAR, + KFTXC_THETA_IJ_NPAR, + KFTXC_NECK_LIKE_NPAR, + KFTXC_ANG_CORR_NPAR, + KFTXC_ITR_NPAR, + + KFTXC_NHIT, + KFTXC_SOL_DIR, + KFTXC_HAR, + KFTXC_RES_HAR, + KFTXC_RES, + KFTXC_LEG, + KFTXC_THETA_IJ, + KFTXC_NECK_LIKE, + KFTXC_ANG_CORR, + KFTXC_ITR, + KFTXC_BANK_SIZE parameter (KFTXC_NHIT_NPAR = 1, + KFTXC_SOL_DIR_NPAR = 1, + KFTXC_HAR_NPAR = 5, + KFTXC_RES_HAR_NPAR = 5, + KFTXC_RES_NPAR = 5, + KFTXC_LEG_NPAR = 5, + KFTXC_THETA_IJ_NPAR = 1, + KFTXC_NECK_LIKE_NPAR = 1, + KFTXC_ANG_CORR_NPAR = 17, + KFTXC_ITR_NPAR = 1, + + KFTXC_NHIT = 1, + KFTXC_SOL_DIR = KFTXC_NHIT + 1 + + KFTXC_NHIT_NPAR, + KFTXC_HAR = KFTXC_SOL_DIR + 1 + + KFTXC_SOL_DIR_NPAR, + KFTXC_RES_HAR = KFTXC_HAR + 1 + + KFTXC_HAR_NPAR, + KFTXC_RES = KFTXC_RES_HAR + 1 + + KFTXC_RES_HAR_NPAR, + KFTXC_LEG = KFTXC_RES + 1 + + KFTXC_RES_NPAR, + KFTXC_THETA_IJ = KFTXC_LEG + 1 + + KFTXC_LEG_NPAR, + KFTXC_NECK_LIKE = KFTXC_THETA_IJ + 1 + + KFTXC_THETA_IJ_NPAR, + KFTXC_ITR = KFTXC_NECK_LIKE + 1 + + KFTXC_NECK_LIKE_NPAR, + KFTXC_ANG_CORR = KFTXC_ITR + 1 + + KFTXC_ITR_NPAR, + KFTXC_BANK_SIZE = KFTXC_ANG_CORR + + KFTXC_ANG_CORR_NPAR) *ENDFILE MEMBER=BANK_FT