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

#ifndef __SUMCOU__
#define __SUMCOU__

#include "types.h"

#ifdef __cplusplus
	extern "C" {
#endif

//
//=== Sumcou ===========================================================*
//
//----------------------------------------------------------------------*
//                                                                      *
//     All additions wrt the original one are:                          *
//     Copyright (C) 2003-2019:  CERN & INFN                            *
//     All Rights Reserved.                                             *
//                                                                      *
//     SUMmary COUnters common for FLUKA9x/200x:                        *
//                                                                      *
//     (New version of the original STARS common)                       *
//                                                                      *
//     Created on    15 May 1990    by    Alfredo Ferrari & Paola Sala  *
//                                                   Infn - Milan       *
//                                                                      *
//     Variable description:                                            *
//                                                                      *
//        Ntstar = total number of stars generated (modulo 1000000000)  *
//        Nestar = total number of elastic interactions generated       *
//                (modulo 1000000000)                                   *
//        Neulow = total number of low energy neutron interactions      *
//                (modulo 1000000000)                                   *
//        Numdec = total number of decays (modulo 1000000000)           *
//        Numoph = total number of optical photons generated            *
//                (modulo 1000000000)                                   *
//        Mtstar = total number of stars generated / 100000000          *
//        Mestar = total number of elastic interactions generated       *
//               / 1000000000                                           *
//        Meulow = total number of low energy neutron interactions      *
//               / 1000000000                                           *
//        Mumdec = total number of decays / 1000000000                  *
//        Mumoph = total number of optical photons generated /1000000000*
//   Wneulw(k,j) = total weight of the low energy neutron interactions  *
//   Woptph(k,j) = total weight of generated optical photons            *
//   Westar(k,j) = weight of the stars generated by                     *
//                 different particle types                             *
//   Westop(k,j) = weight of particles of different types stopped       *
//   Wedaug(k,j) = weight of the decay products                         *
//   Wekill(k,j) = weight of the time-killed particles                  *
//   Wedecy(k,j) = weight of the particles decayed                      *
//   Weifis(k,j) = weight of high energy fissions generated by particles*
//                 of different kind                                    *
//   Deccts(k,j) = decay c tau scoring                                  *
//   Wdecct(k,j) = weight of the particles decayed for which a c tau    *
//                 scoring is done                                      *
//   Weprdc(k,j) = weight of produced particles of different kind       *
//   Wlwnsc(k,j) = weight of the low energy neutrons interaction        *
//                 secondaries                                          *
//   Wophsc(k,j) = weight of optical photons production/interaction     *
//                 secondaries                                          *
//        Weipri = total weight of the primaries handled                *
//        Westrs = total weight of the elastic interactions generated   *
//   Edpsco(i,j) = energy deposition scoring (j = 1: prompt particles,  *
//                                            j = 2: decay  particles)  *
//            Edpsco(1,j) = by ionisation                               *
//            Edpsco(2,j) = by pi-zeros and/or EM cascade               *
//            Edpsco(3,j) = by nuclear excitation (or nuclear recoil    *
//                          and heavies if the evaporation module is    *
//                          activated)                                  *
//            Edpsco(4,j) = by stopped particles                        *
//            Edpsco(5,j) = energy leaving the system                   *
//            Edpsco(6,j) = energy carried by discarded particles       *
//            Edpsco(7,j) = by residual excitation energy (only if the  *
//                          evaporation module is activated)            *
//            Edpsco(8,j) = by low energy neutrons (kerma due to low    *
//                          energy neutrons transport is in effect)     *
//            Edpsco(9,j) = energy carried by time killed particles     *
//            Edpsco(10,j)= energy wasted for nuclear binding energy    *
//                          effects for (low energy neutrons excluded)  *
//            Edpsco(11,j)= energy wasted for nuclear binding energy    *
//                          effects for low energy neutrons             *
//                                                                      *
//----------------------------------------------------------------------*
//
extern struct {
	double	westar[2][NALLWP+6+1];
	double	westop[2][NALLWP+6+1];
	double	wedaug[2][NALLWP+6+1];
	double	wekill[2][NALLWP+6+1];
	double	wedecy[2][NALLWP+6+1];
	double	weifis[2][NALLWP+6+1];
	double	deccts[2][NALLWP+6+1];
	double	wdecct[2][NALLWP+6+1];
	double	weprdc[2][NALLWP+6+1];
	double	wlwnsc[2][9];
	double	wophsc[2][4];
	double	edpsco[2][11];
	double	woptph;
	double	wneulw;
	double	weipri;
	double	westrs;
	int	numdec;
	int	ntstar;
	int	nestar;
	int	neulow;
	int	numoph;
	int	mumdec;
	int	mtstar;
	int	mestar;
	int	meulow;
	int	mumoph;
} sumcou_;
const int sumcou_westar_base = -6;
const int sumcou_westop_base = -6;
const int sumcou_wedaug_base = -6;
const int sumcou_wekill_base = -6;
const int sumcou_wedecy_base = -6;
const int sumcou_weifis_base = -6;
const int sumcou_deccts_base = -6;
const int sumcou_wdecct_base = -6;
const int sumcou_weprdc_base = -6;


#ifdef __cplusplus
}
#endif
#endif