5 * Revision 1.1.1.1 1995/10/24 10:20:37 cernlib
9 #ifndef CERNLIB_GEANT321_AADAT_INC
10 #define CERNLIB_GEANT321_AADAT_INC
16 *=== aadat ============================================================*
18 PARAMETER (IPROM = 100)
19 PARAMETER (ITARM = 100)
20 COMMON/FKAADA/ENPERN,PLPERN,SIGAA(IPROM,ITARM),SIGNN,TMASS,AAEVNO,
21 + SELAA(IPROM,ITARM),RLASTP(IPROM,ITARM),
22 + MATPRO,MATTAR,LASTM,IPROA,IPROZ,ITARA,ITARZ