* * $Id: gcnmec.inc,v 1.1 2006/02/14 01:08:50 schubert Exp $ * * $Log: gcnmec.inc,v $ * Revision 1.1 2006/02/14 01:08:50 schubert * * First commit. geant321+_vmc Version 1.3 * * Revision 1.1.1.1 2002/07/24 15:56:26 rdm * initial import into CVS * * Revision 1.1.1.1 2002/06/16 15:18:38 hristov * Separate distribution of Geant3 * * Revision 1.1.1.1 1999/05/18 15:55:16 fca * AliRoot sources * * Revision 1.1.1.1 1995/10/24 10:20:31 cernlib * Geant * * #ifndef CERNLIB_GEANT321_GCNMEC_INC #define CERNLIB_GEANT321_GCNMEC_INC * * * gcnmec.inc * #if !defined(CERNLIB_INCLUDE) PARAMETER(NMECA=45,IBLOWN=23) CHARACTER*4 CHNMEC(NMECA) * * *** Two blank spaces for FISF and CAPF which do not exist * * *** The low-neutron cross-sections have to be at the end for the * *** logics of the routine to work, and they have to start at * *** IBLOWN DATA CHNMEC / + 'HADF', 'INEF', 'ELAF', 'NULL', 'NULL', + 'HADG', 'INEG', 'ELAG', 'FISG', 'CAPG', + 'LOSS', 'PHOT', 'ANNI', 'COMP', 'BREM', + 'PAIR', 'DRAY', 'PFIS', 'RAYL', 'MUNU', + 'RANG', 'STEP', 'LOWN', 'NABS', 'NELA', + 'NINE', 'NINC', 'N,2N', 'N,3N', 'N,NA', + 'N2NA', 'N,NP', 'NFIS', 'N,GA', 'N,PR', + 'N,DE', 'N,TR', 'N3HE', 'N,AL', 'N,2A', + 'N,3A', 'N,2P', 'N,PA', 'NT2A', 'ND2A'/ * #endif #endif