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

#ifndef __LNPWCG__
#define __LNPWCG__

#include "types.h"

#ifdef __cplusplus
	extern "C" {
#endif

//
//=== Lnpwcg ===========================================================*
//
//----------------------------------------------------------------------*
//                                                                      *
//     Copyright (C) 2003-2019:  CERN & INFN                            *
//     All Rights Reserved.                                             *
//                                                                      *
//     Low energy Neutron Point-Wise Capture Gammas:                    *
//                                                                      *
//     Created on    27 May 1997    by    Alfredo Ferrari & Paola Sala  *
//                                                   Infn - Milan       *
//                                                                      *
//     Description of variables:                                        *
//                                                                      *
//            Qpwsgc(i) = capture Q (virtual level) for the i_th point- *
//                        wise capture gamma data set                   *
//            Expwgc(i) = maximum neutron energy up to which the i_th   *
//                        pointwise capture gamma data set can be used  *
//            Kbgpwg(i) = starting location in the special common (0    *
//                        address) for the i_th pointwise capture gamma *
//                        data set                                      *
//            Iazpwg(i) = isomer code for the i_th pointwise capture    *
//                        gamma data set                                *
//            Idpwgc(i) = index for a possible direct transition for the*
//                        pointwise capture gamma data set              *
//            Nmpwgc    = number of defined pointwise cross section     *
//                        data sets                                     *
//            Klpwgc    = last used element in the Gwgcst array         *
//                                                                      *
//----------------------------------------------------------------------*
//
//
const int    MXPWGC = 1000;
extern struct {
	double	gwgcst[MXPWGC];
	double	qpwsgc[MXXMDF];
	double	expwgc[MXXMDF];
	int	kbgpwg[MXXMDF];
	int	iazpwg[MXXMDF];
	int	idpwgc[MXXMDF];
	int	nmpwgc;
	int	klpwgc;
} lnpwcg_;


#ifdef __cplusplus
}
#endif
#endif