/* * DO NOT MANUALLY UPDATE THIS FILE. * If needed: make cpp_headers * * fortran2c.py - automatic conversion * potart.inc -> potart.h */ #ifndef __POTART__ #define __POTART__ #include "types.h" #ifdef __cplusplus extern "C" { #endif // //=== potart ===========================================================* // //----------------------------------------------------------------------* // * // Copyright (C) 2003-2019: CERN & INFN * // All Rights Reserved. * // * // Created on 25 February 1994 by Alfredo Ferrari & Paola Sala * // Infn - Milan * // * //----------------------------------------------------------------------* // extern struct { double epxart[20]; double vpxart[20]; double anmxar[20]; double angact; double anbimn[2]; double angasq; double rdvvpo; double fbrpen; int iflgpn; int isfpen[20][2]; int nsfpen; int isfart[20][2]; int nsfart; logical lrlbar; logical lpoart; logical ltrart; logical lbrpen; logical lbimmn; } potart_; #ifdef __cplusplus } #endif #endif