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

#ifndef __ALLDLT__
#define __ALLDLT__

#include "types.h"

#ifdef __cplusplus
	extern "C" {
#endif

//
//=== Alldlt ===========================================================*
//
//----------------------------------------------------------------------*
//                                                                      *
//     Copyright (C) 2003-2019:  CERN & INFN                            *
//     All Rights Reserved.                                             *
//                                                                      *
//     Include file: alldlt  (ALL DeLTas)  vv                           *
//                                                                      *
//     Created  on  10 October 2005    by        Alfredo Ferrari        *
//                                                INFN - Milan          *
//                                                                      *
//     Included in the following routines:                              *
//                                                                      *
//              blockmvax/bdtrns.f                                      *
//              dedxmvax/dedxfl.f                                       *
//              dedxmvax/enion.f                                        *
//              dedxmvax/enionf.f                                       *
//              emfmvax/ededxf.f                                        *
//              emfmvax/emenio.f                                        *
//              emfmvax/emfsco.f                                        *
//              emfmvax/pdedxf.f                                        *
//              kaskadmvax/kaskad.f                                     *
//                                                                      *
//           Talldl (m) = kinetic energy  of the m_th primary electron  *
//                        emitted during energy loss fluctuation pro-   *
//                        cesses                                        *
//       X/Y/Zalldl (m) = position coord. of the m_th primary electron  *
//                        emitted during energy loss fluctuation pro-   *
//                        cesses                                        *
//               Tallmn = minimum energy of the recorded primary        *
//                        electrons                                     *
//               Nalldl = number of recorded primary electrons          *
//               Lalldl = logical flag for primary electrons recording  *
//                                                                      *
//----------------------------------------------------------------------*
//
//
const int    MXALLD = 5000;
extern struct {
	double	talldl[MXALLD];
	double	xalldl[MXALLD];
	double	yalldl[MXALLD];
	double	zalldl[MXALLD];
	double	tallmn;
	int	nalldl;
	logical	lalldl;
} alldlt_;


#ifdef __cplusplus
}
#endif
#endif