+PATCH,$CORR.
+DECK,CORR1.                     Updates version:  1.35/00  to   1.36/00
+REP,*TITLE*,TITLE,1.
GTRAK     1.36/00  21/12/95  18.48.56  GLOBAL TRACKING SOFTWARE
+REP,$VERSION,V1_35,1-2.
*CMZ :  1.35/01 10/09/95  23.14.25  by  Christian Voelcker
*CMZ :  1.35/00 24/08/95  16.54.48  by  Christian Voelcker
*-- Author :    Christian Voelcker   24/08/95
*
*::>          VERSION  1.35/01   10/09/95 23.14.24
*          *> TAROND: return if more than 50 particles - to
*             avoid crashes.
+ADD,$VERSION,V1_36,*.
&DECK,V1_36.
*CMZ :  1.36/00 21/12/95  18.48.56  by  Christian Voelcker
*-- Author :    Christian Voelcker   21/12/95
*
*::>          VERSION  1.36/00   21/12/95 18.48.56
*             20/12/95 Chr. Voelcker
*             GTBANK, GTDEDX
*             use the same mass for pion everywhere:
*             the PDG value from 1994 is 139.56995+-0.00035 MeV
*             use the correct values for proton and kaon too!
*
+ADD,GTPROGRM,GTBANK,0.
*CMZ :  1.36/00 20/12/95  21.40.22  by  Christian Voelcker
+ADD,GTPROGRM,GTBANK,122.
*                   20/12/95 Chr. Voelcker
*                   the mass of the charged pion has changed slightly.
*                   the PDG value from 1994 is 139.56995+-0.00035 MeV
*
+REP,GTPROGRM,GTBANK,243.
      DATA     AMP/139.56995/
+ADD,GTPROGRM,GTDEDX,0.
*CMZ :  1.36/00 20/12/95  21.49.27  by  Christian Voelcker
+ADD,GTPROGRM,GTDEDX,20.
*                20/12/95 Chr. Voelcker
*                use the same mass for pion everywhere:
*                the PDG value from 1994 is 139.56995+-0.00035 MeV
*                use the correct values for proton and kaon too!
*
+REP,GTPROGRM,GTDEDX,37.
      DATA    AMS/0.511,105.,139.56995,493.667,938.27/
+ADD,GT_TAXI,TAROND,0.
*CMZ :  1.35/01 10/09/95  23.14.17  by  Christian Voelcker
+REP,GT_TAXI,TAROND,142.
      IF(NPION.GT.20.OR.NPART.GT.50) RETURN   ! too much is too much