/* * DO NOT MANUALLY UPDATE THIS FILE. * If needed: make cpp_headers * * fortran2c.py - automatic conversion * dblpru.inc -> dblpru.h */ #ifndef __DBLPRU__ #define __DBLPRU__ #include "types.h" #ifdef __cplusplus extern "C" { #endif // * //=== dblpru ===========================================================* // * //----------------------------------------------------------------------* // * // Copyright (C) 2003-2019: CERN & INFN * // All Rights Reserved. * // * // Dblpru: included in any routine which requires the blank * // common, it is just a dummy container for DBLPRC * // and USFLMD when both are required * // * //----------------------------------------------------------------------* // // Start_GFort_seq // End_GFort_seq #include "usflmd.h" // Fake parameter #include "dblprc.h" const double PRFAKE = ONEONE; #ifdef __cplusplus } #endif #endif