Back to home page

Project CMSSW displayed by LXR

 
 

    


File indexing completed on 2021-02-14 13:07:22

0001 #ifndef PYQUEN_WRAPPER_H
0002 #define PYQUEN_WRAPPER_H
0003 
0004 /*
0005  *
0006  * Wrapper for FORTRAN version of PYQUEN
0007  *
0008  * Camelia Mironov
0009  *
0010  */
0011 
0012 // PYQUEN routine declaration
0013 
0014 extern "C" {
0015 void pyquen_(double& a, int& ifb, double& bfix, double& bmin, double& bmax);
0016 }
0017 #define PYQUEN pyquen_
0018 
0019 extern "C" {
0020 void pyqver_(int&, int&, int&, int&);
0021 }
0022 #define PYQVER pyqver_
0023 
0024 extern "C" {
0025 extern struct { double bgen; } plfpar_;
0026 }
0027 #define plfpar plfpar_
0028 
0029 extern "C" {
0030 extern struct {
0031   double T0u;
0032   double tau0u;
0033   int nfu;
0034   int ienglu;
0035   int ianglu;
0036 } pyqpar_;
0037 }
0038 #define pyqpar pyqpar_
0039 
0040 #endif  // PYQUEN_WRAPPER_H