/* * DO NOT MANUALLY UPDATE THIS FILE. * If needed: make cpp_headers * * fortran2c.py - automatic conversion * rddgtr.inc -> rddgtr.h */ #ifndef __RDDGTR__ #define __RDDGTR__ #include "types.h" #ifdef __cplusplus extern "C" { #endif // //=== Rddgtr ===========================================================* // //----------------------------------------------------------------------* // * // Copyright (C) 2003-2019: CERN & INFN * // All Rights Reserved. * // * // Radioactive Decay DauGhTeRs: * // * // Created on 15-September-1993 by Alfredo Ferrari & Paola Sala * // INFN - MIlan * // * //----------------------------------------------------------------------* // const int MXIDAU = 110; const int MXACTV = MXIDAU*100*100; extern struct { double activr[MXACTV]; double actxbm[MXIDAU][MXTRDC]; double brctot[MXIDAU]; int iacact; int izcact; int iscact; int ndcact; int iadgtr[MXIDAU]; int izdgtr[MXIDAU]; int isdgtr[MXIDAU]; int ndaugh; int idausv; } rddgtr_; #ifdef __cplusplus } #endif #endif