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

#ifndef __ANENSA__
#define __ANENSA__

#include "types.h"

#ifdef __cplusplus
	extern "C" {
#endif

//                                                                      *
//=== anensa ===========================================================*
//                                                                      *
//----------------------------------------------------------------------*
//                                                                      *
//     Copyright (C) 2003-2019:  CERN & INFN                            *
//     All Rights Reserved.                                             *
//                                                                      *
//     ANgle & ENenergy SAmpling        by  Francesco Cerutti, CERN/EN  *
//                                                                      *
//            included in :                                             *
//                          bdtbme                                      *
//                          preequ                                      *
//                          angdis                                      *
//                          ddspec                                      *
//                          fddspe                                      *
//                          fddshl                                      *
//                          rbmedb                                      *
//                                                                      *
//          System =                                                    *
//          Asympa =                                                    *
//          Faddat =                                                    *
//          Ddsp0d =                                                    *
//          Ddsp2d =                                                    *
//                                                                      *
//          Lsysid =                                                    *
//                                                                      *
//          Idsyst =                                                    *
//          Fthfth =                                                    *
//          P0p0p0 =                                                    *
//          P2p2p2 =                                                    *
//          Thrmax =                                                    *
//                                                                      *
//----------------------------------------------------------------------*
//                                                                      *
const int    NSYSTM = 18;
const int    NANGRP = 89;
extern struct {
	double	faddat[NSYSTM][6][45][NANGRP];
	double	ddsp0d[NSYSTM][6][45][NANGRP];
	double	ddsp2d[NSYSTM][6][45][NANGRP];
	double	fthfth[NANGRP];
	double	asympa[NSYSTM];
	double	p0p0p0;
	double	p2p2p2;
	double	thrmax;
	int	idsyst;
	logical	lsysid;
} anensa_;

extern struct {
	char	system[NSYSTM][11];
} aesach_;

#ifdef __cplusplus
}
#endif
#endif