/*
 * DO NOT MANUALLY UPDATE THIS FILE.
 * If needed: make cpp_headers
 *
 * fortran2c.py - automatic conversion
 *       genstk2.inc -> genstk2.h
 */

#ifndef __GENSTK2__
#define __GENSTK2__

#include "types.h"

#ifdef __cplusplus
	extern "C" {
#endif

//
//=== Genstk2 ==========================================================*
//
//----------------------------------------------------------------------*
//                                                                      *
//     Partial (the additions wrt the original one)                     *
//     Copyright (C) 2003-2019:  CERN & INFN                            *
//     All Rights Reserved.                                             *
//                                                                      *
//     hadron GENerator STacK for FLUKA: (new version of old Finuc of   *
//     FLUKA86 by J.Ranft)                                              *
//                                                                      *
//     !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!      *
//     !!!!     S E E   A L S O   I N C L U D E   F I L E     !!!!      *
//     !!!!                 G E N S T K                       !!!!      *
//     !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!      *
//                                                                      *
//     Created on  20 January 1996  by    Alfredo Ferrari & Paola Sala  *
//                                                   Infn - Milan       *
//                                                                      *
//     /Genstk/ is the storage for secondaries created in hadronic      *
//              events                                                  *
//        Np        = total number of secondaries                       *
//       Kpart (ip) = (Paprop) id of the ip_th secondary                *
//      Infext (ip) = possible extra infos for the ip_th secondary      *
//         Cxr (ip) = x-axis direction cosine of the ip_th secondary    *
//         Cyr (ip) = y-axis direction cosine of the ip_th secondary    *
//         Czr (ip) = z-axis direction cosine of the ip_th secondary    *
//      Cxrpol (ip) = x-axis direction cosine of the ip_th secondary    *
//                    polarization vector (rest frame when applicable)  *
//      Cyrpol (ip) = y-axis direction cosine of the ip_th secondary    *
//                    polarization vector (rest frame when applicable)  *
//      Czrpol (ip) = z-axis direction cosine of the ip_th secondary    *
//                    polarization vector (rest frame when applicable)  *
//         Tki (ip) = laboratory kinetic energy of ip_th secondary (GeV)*
//         Plr (ip) = laboratory momentum of the ip_th secondary (GeV/c)*
//         Wei (ip) = statistical weight of the ip_th secondary         *
//      Agesec (ip) = "age" of the ip_th secondary with respect to the  *
//                    interaction time                                  *
//        Tv        = excitation energy (GeV)                           *
//        Tvcms     = actual excitation energy of the residual nucleus  *
//        Tvrecl    = recoil kinetic energy of the residual nucleus     *
//        Tvheav    = recoil kinetic energies of heavy (2-H, 3-H, 3-He, *
//                    4-He) fragments after evaporation                 *
//        Tvbind    = approximate energy wasted in nuclear binding      *
//                    effects (not yet operational)                     *
//                                                                      *
//----------------------------------------------------------------------*
//
//
const int    MXP = MXPSCS;
extern struct {
	double	cxrn[MXPSCS];
	double	cyrn[MXPSCS];
	double	czrn[MXPSCS];
	double	cxrpol[MXPSCS];
	double	cyrpol[MXPSCS];
	double	czrpol[MXPSCS];
	double	elr[MXPSCS];
	double	plr[MXPSCS];
	double	wei[MXPSCS];
	double	agesec[MXPSCS];
	double	tv;
	double	tvcms;
	double	tvrecl;
	double	tvheav;
	double	tvbind;
	int	itrn[MXPSCS];
	int	infext[MXPSCS];
	int	np0;
	int	irn;
} genstk_;


#ifdef __cplusplus
}
#endif
#endif