/* * DO NOT MANUALLY UPDATE THIS FILE. * If needed: make cpp_headers * * fortran2c.py - automatic conversion * nucpar.inc -> nucpar.h */ #ifndef __NUCPAR__ #define __NUCPAR__ #include "types.h" #ifdef __cplusplus extern "C" { #endif // //=== Nucpar ===========================================================* // //----------------------------------------------------------------------* // * // New version of the original Nucpar (by the Leipzig group): * // * // Created on 20-January-1996 by Alfredo Ferrari & Paola Sala * // Infn - Milan * // * // Included in the following subroutines or functions: not updated * // * // distnu * // eventv * // evxtes * // nucevv * // * // Description of the common block(s) and variable(s) * // * // Pxnu(i) = X-component of the momentum of the i_th produced * // particle * // Pynu(i) = Y-component of the momentum of the i_th produced * // particle * // Pznu(i) = Z-component of the momentum of the i_th produced * // particle * // Hepnu(i) = Total energy of the i_th produced particle * // Amnu(i) = Mass of the i_th produced particle * // Ichnu(i) = Charge of the i_th produced particle * // Ibarnu(i) = Baryon number of the i_th produced particle * // Nrenu(i) = Identity (part scheme) of the i_th produced particle * // Infonu(i) = chain # of the i_th produced particle * // Ichnnu(3,i) = Several informations about production vertex, rank- * // ing, decay generation etc. * // Annu(i) = Literal name of the i_th produced particle * // * //----------------------------------------------------------------------* // extern struct { double pxnu[MXPDPM]; double pynu[MXPDPM]; double pznu[MXPDPM]; double hepnu[MXPDPM]; double amnu[MXPDPM]; int ichnu[MXPDPM]; int ibarnu[MXPDPM]; int nrenu[MXPDPM]; int infonu[MXPDPM]; int ichnnu[MXPDPM][3]; } nucpar_; extern struct { char annu[MXPDPM][8]; } chncpr_; #ifdef __cplusplus } #endif #endif