/* * DO NOT MANUALLY UPDATE THIS FILE. * If needed: make cpp_headers * * fortran2c.py - automatic conversion * emfthr.inc -> emfthr.h */ #ifndef __EMFTHR__ #define __EMFTHR__ #include "types.h" #ifdef __cplusplus extern "C" { #endif // //=== Emfthr ===========================================================* // //----------------------------------------------------------------------* // * // Copyright (C) 2003-2019: CERN & INFN * // All Rights Reserved. * // * // Common Thresh for EMF * // Mxxmde = Maximum number of media in Emf * // Ecutme = Minimum energy to perform Moliere's scattering * // Ethnsz = Minimum energy to apply the nuclear size correction * // to the Moliere's scattering Moliere's scattering * // Please note that the following arrays use the Fluka material index * // rather than the EMF one * // Upcmpt = Minimum photon energy to perform Compton scattering * // Upphel = Minimum photon energy to perform photoelectric * // Uppair = Minimum photon energy to perform pair production * // Uprlgh = Minimum photon energy to perform Rayleigh scattering * // Upphnc = Minimum photon energy to perform photonucl. interac. * // Uebrms = Minimum e+/e- energy to perform bremsstrahlung * // Uebhml = Minimum e+/e- energy to perform Bhabha/Moller * // Ueannh = Minimum e+ energy to perform annihilation * // Uephnc = Minimum e+/e- energy to perform photonucl. interac. * // * //----------------------------------------------------------------------* // extern struct { double ephmin[MXXMDE]; double eepmin[MXXMDE]; double ephmax[MXXMDE]; double eepmax[MXXMDE]; double thmoll[MXXMDE]; double ecutme[MXXMDE]; double ethnsz[MXXMDE]; double upcmpt[MXXMDF]; double upphel[MXXMDF]; double uppair[MXXMDF]; double uprlgh[MXXMDF]; double upphnc[MXXMDF]; double uebrms[MXXMDF]; double uebhml[MXXMDF]; double ueannh[MXXMDF]; double uephnc[MXXMDF]; } emfthr_; #ifdef __cplusplus } #endif #endif