************************************************************************** * frpctuple.inc * * * * last modified on 27/11/2015 by I. Koenig * * * ************************************************************************** #include "hgeantmaxtrk.h" INTEGER NTRK, NMAXMOD INTEGER FRPCTRK, FRPCPART, FRPCMOD, FRPCLAY, FRPCCELL INTEGER FRPCSUB REAL FRPCX, FRPCY, FRPCZ, FRPCPX, FRPCPY, FRPCPZ REAL FRPCTOF, FRPCLEN, FRPCE PARAMETER (NMAXMOD=1) COMMON /FRPCTUPLE/ NTRK, FRPCTRK(MAXTRKFRPC), & FRPCPART(MAXTRKFRPC), & FRPCMOD(MAXTRKFRPC), FRPCLAY(MAXTRKFRPC), & FRPCCELL(MAXTRKFRPC), FRPCSUB(MAXTRKFRPC), & FRPCX(MAXTRKFRPC), FRPCY(MAXTRKFRPC), & FRPCZ(MAXTRKFRPC), FRPCPX(MAXTRKFRPC), & FRPCPY(MAXTRKFRPC), FRPCPZ(MAXTRKFRPC), & FRPCTOF(MAXTRKFRPC), FRPCLEN(MAXTRKFRPC), & FRPCE(MAXTRKFRPC)