/* * DO NOT MANUALLY UPDATE THIS FILE. * If needed: make cpp_headers * * fortran2c.py - automatic conversion * nubeam.inc -> nubeam.h */ #ifndef __NUBEAM__ #define __NUBEAM__ #include "types.h" #ifdef __cplusplus extern "C" { #endif // //=== Nubeam ===========================================================* // //----------------------------------------------------------------------* // * // Copyright (C) 2003-2019: CERN & INFN * // All Rights Reserved. * // * // Created on 01 June 1997 by Alfredo Ferrari & Paola Sala * // Infn - Milan * // * //----------------------------------------------------------------------* // const int LUNNBF = 90; const int LUNMBF = 80; const int MXNUBF = 1000; const int MXMUBF = 1000; const double TZLNGS = 0.99995E+00; const double EMLNGS = 0.1E+00; const double TZSPSN = 0.99875E+00; const double ENSPSN = 0.1E+00; const double EMSPSN = 0.5E+00; const double DDETMN = 180.E+02; // const double DDETEX = 20.E+02; extern struct { double curhor; double curref; double bshmag; double zrddmp; double dxtrgt; double dytrgt; double dxhorn; double dyhorn; double dxrefl; double dyrefl; double zgrnss; double ztosca; float wnubuf[MXNUBF][8]; float wmubuf[MXMUBF][8]; int jnubuf[MXNUBF]; int jmubuf[MXMUBF]; int nnubuf; int nmubuf; int nrhorn; int nrrefl; int nrshma; int nskhrn; int nskrfl; int nrprfc; int nrinrd; int nrunid; int ibeamg; int iskhrn; int iludmp; int irttrg; int irthrn; int irtrfl; int irtlin; logical lsknnw; logical ltrpos; logical lhrpos; logical lrfpos; logical lnwblm; logical lldire; } nubeam_; #ifdef __cplusplus } #endif #endif