GEANT321/doc/history/v_313.F

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1995/10/24 10:19:47  cernlib
   6 * Geant
   7 *
   8 *
   9 #include "sys/CERNLIB_machine.h"
  10 #include "pilot.h"
  11 *CMZ :  3.21/02 29/03/94  15.41.18  by  S.Giani
  12 *-- Author :
  13 *
  14 *::>          VERSION  3.13/05   890628 15.01
  15 *
  16 *        Changes in GTELEC,GTHADR and GTMUON for overstopping tracks.
  17 *        STEP and SLENG correction optimized
  18 *        In COMMON/GCDRAW/ variable IGVIEW changed to IDVIEW
  19 *        Routine GTRMUL recoded
  20 *        DOUBLE precision in GINTCO and protection added.
  21 *        Changes in GNOPG6.
  22 *        Changes in GINME (for spheres,tubes and cones DPP.LE.0)
  23 *        GDINIT called by GXINT
  24 *        Particle data table updated in GPART
  25 *        Tests on boundary conditions for IEKBIN modified in GTGAMA
  26 *        A new user callable routine GBIRK introduced in GPHYS.
  27 *         GBIRK may be called from GUSTEP to compute the Birk
  28 *         correction factors for anorganic scintillators.
  29 *
  30 *::>          VERSION  3.13/04   890623 12.34
  31 *
  32 *        New version of GLANDZ and GPOISS by L.Urban
  33 *        GRNDM calling sequence changed
  34 *        Sequence numbers (1-->215) can be initialized
  35 *         with data card RNDM
  36 *                Ex:
  37 *            RNDM  9876  1234534   initializes sequence 1
  38 *            RNDM 45  initilizes sequence 45 with the starting
  39 *                     seed of sequence 45
  40 *        New routine GRANOR (copy of RANNOR for GRNDM)
  41 *
  42 *::>          VERSION  3.13/03   890425 12.09
  43 *
  44 *        Update of inline documentation DOCGBASE,DOCGKINE,DOCGTRAK
  45 *        Deck GGCLOS modified and moved from GGEOM to GBASE
  46 *        New deck GHCLOS (called by GGCLOS) in GBASE
  47 *        Deck GEVKEV moved from GTRAK to GCONS
  48 *        New decks GFNDIG,GFNHIT,GRHITS in GHITS
  49 *        Minor bug corrected in GTELEC
  50 *        Control of debug and removal of SNXT=BIG  in GTNEXT
  51 *        Call to GUSTEP removed from GUVIEW
  52 *
  53 *::>          VERSION  3.13/02   890311 10.45
  54 *
  55 *        Bug corrected in GPAIRM (COMMON/GCMATE/ overwritten
  56 *        Bug corrected in outines GDRELM and GDRELP
  57 *           (error in AVO changed to AVOGAD)
  58 *        Minor corrections in physics routines
  59 *        SAVE statements added
  60 *        Protection in GHANGL
  61 *        Default changed to GHEISHA instead of TATINA
  62 *          in routines GUPHAD and GUHADR
  63 *        Bug corrected in GHTATI (NAMEC(12) instead of NAMEC(10)
  64 *