CMS 3D CMS Logo

ToprexWrapper.h

Go to the documentation of this file.
00001 #ifndef TOPREXWRAPPER_H
00002 #define TOPREXWRAPPER_H
00004 // Sergey.Slabospitsky@cern.ch, July 2006
00005 // Wrapper for FORTRAN version of TopReX
00006 
00007 // Initialization routine
00008                                                                                
00009 //--------------------------------------------------------------------------
00010 // TopReX routine declaration
00011 
00012 #define toprex toprex_ 
00013     extern "C" {
00014       void toprex(const char*,const char*,const char*, double*,int,int,int);
00015     }
00016 
00017 // define methods to hide the subtle syntax necessary to call fortran from C++
00018 void call_toprex( const char* frame, const char* beam, const char* target,
00019                   double win );
00020 
00021 // 
00022 #define txgive txgive_ 
00023     extern "C" {
00024         void txgive(const char*, int);
00025 
00026       }
00027 
00028 // define methods to hide the subtle syntax necessary to call fortran from C++
00029 //id call_txgive( const char* chin) 
00030 // txgive( chin,strlen(chin) ); }
00031 
00032 
00033 //--------------------------------------------------------------------------
00034 // TopReX Common Block Declarations
00035 extern "C" {
00036     extern struct {
00037         int ipar[200];
00038         double rpar[200];
00039     } txpar_;
00040 }
00041 #define txpar txpar_
00042 
00043 #endif

Generated on Tue Jun 9 17:37:10 2009 for CMSSW by  doxygen 1.5.4