* * $Id: gpsitr.F,v 3.1.1.1 2002/07/11 16:02:14 cafagna Exp $ * * $Log: gpsitr.F,v $ * Revision 3.1.1.1 2002/07/11 16:02:14 cafagna * First GPAMELA release on CVS * * *CMZ : 2.01/00 05/04/2000 14.35.18 by Marialuigia Ambriola *CMZ : 2.00/00 03/03/2000 15.39.06 by Francesco Cafagna *CMZ : 1.01/00 16/05/96 17.19.05 by Francesco Cafagna *CMZ : 1.00/02 04/04/96 17.54.02 by Francesco Cafagna *-- Author : Francesco Cafagna 04/04/96 SUBROUTINE GPSITR ************************************************************************ * * * To define special tracking parameters for tracker silicon * * * * Called by: GPDAT * * Author: Francesco Cafagna, 04/04/96 17.41.17 * * * ************************************************************************ #include "gpsitr.inc" * Spectromiter silicon parameters from Paolo papini LOSSSITR=2. DRAYSITR=0. DCUTESITR=0.00001 DCUTMSITR=0.00001 CUTELESITR=0.00001 CUTMUOSITR=0.00001 STRASITR=0. RETURN END