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

#ifndef __FINLSP3__
#define __FINLSP3__

#include "types.h"

#ifdef __cplusplus
	extern "C" {
#endif

//
//=== Finlsp3 ==========================================================*
//
//----------------------------------------------------------------------*
//                                                                      *
//     New version of the original FINLSP3 (Leipzig group):             *
//                                                                      *
//     W A R N I N G !!!! check also Finlsp/2 modules for any change!!! *
//                                                                      *
//     Created on  20-January-1996  by    Alfredo Ferrari & Paola Sala  *
//                                                   Infn - Milan       *
//                                                                      *
//     Included in the following subroutines or functions: not updated  *
//                                                                      *
//     Description of the common block(s) and variable(s)               *
//                                                                      *
//        Cxh(i) = X-cosine of the i_th produced particle               *
//        Cyh(i) = Y-cosine of the i_th produced particle               *
//        Czh(i) = Z-cosine of the i_th produced particle               *
//        Elh(i) = Total energy of the i_th produced particle           *
//        Plh(i) = Momentum of the i_th produced particle               *
//        Ith(i) = Identity (part scheme) of the i_th produced particle *
//        Ih     = Number of produced particles                         *
//                                                                      *
//----------------------------------------------------------------------*
//
extern struct {
	double	cxh[MXPRSN];
	double	cyh[MXPRSN];
	double	czh[MXPRSN];
	double	elh[MXPRSN];
	double	plh[MXPRSN];
	int	ith[MXPRSN];
	int	ih;
} finlsp_;


#ifdef __cplusplus
}
#endif
#endif