GEANT321/geant321/s_result.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1995/10/24 10:20:44  cernlib
   6 * Geant
   7 *
   8 *
   9 #ifndef CERNLIB_GEANT321_S_RESULT_INC
  10 #define CERNLIB_GEANT321_S_RESULT_INC
  11 *
  12 *
  13 * s_result.inc
  14 *
  15       COMMON/RESULT/XEND,YEND,ZEND,RCA,RCE,AMAS,NCH,TOF,PX,PY,PZ,
  16      *              USERW,INTCT,P,EN,EK,AMASQ,DELTN,ITK,NTK,IPART,IND,
  17      *              LCALO,ICEL,SINL,COSL,SINP,COSP,
  18      *              XOLD,YOLD,ZOLD,POLD,PXOLD,PYOLD,PZOLD,
  19      *              XSCAT,YSCAT,ZSCAT,PSCAT,PXSCAT,PYSCAT,PZSCAT
  20                     REAL NCH,INTCT
  21 C
  22
  23 #endif