Back to home page

Project CMSSW displayed by LXR

 
 

    


File indexing completed on 2023-05-31 00:37:55

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 {
0026   double bgen;
0027 } plfpar_;
0028 }
0029 #define plfpar plfpar_
0030 
0031 extern "C" {
0032 extern struct {
0033   double T0u;
0034   double tau0u;
0035   int nfu;
0036   int ienglu;
0037   int ianglu;
0038 } pyqpar_;
0039 }
0040 #define pyqpar pyqpar_
0041 
0042 #endif  // PYQUEN_WRAPPER_H