CMS 3D CMS Logo

/data/refman/pasoursint/CMSSW_5_3_0/src/GeneratorInterface/HijingInterface/interface/HijingWrapper.h

Go to the documentation of this file.
00001 #ifndef GeneratorInterface_HijingInterface_HijingWrapper
00002 #define GeneratorInterface_HijingInterface_HijingWrapper
00003 
00004 /*
00005  * Wrapper for FORTRAN version of HIJING 
00006  */
00007 
00008 #define _MAXNUMPARTICLE_ 130000
00009 
00010 extern "C" {
00011   void hijset_(double& efrm, const char* frame, const char* proj, const char* targ, int& iap, int& izp, int& iat, int& izt, int, int, int); 
00012 }
00013 #define HIJSET hijset_
00014 
00015 extern "C" {
00016   void hijing_(const char* frame, double& bmin0, double& bmax0, int);
00017 }
00018 #define HIJING hijing_
00019 
00020 extern "C" {
00021   extern struct{ 
00022     int natt;
00023     int eatt;
00024     int jatt;
00025     int nt;
00026     int np;
00027     int n0;
00028     int n01;
00029     int n10;
00030     int n11;
00031   }himain1_;
00032 }
00033 #define himain1 himain1_
00034 
00035 extern "C" {
00036   extern struct{ 
00037     int katt[4][_MAXNUMPARTICLE_];
00038     double patt[4][_MAXNUMPARTICLE_];
00039   }himain2_;
00040 }
00041 #define himain2 himain2_
00042 
00043 extern "C" {
00044   extern struct{ 
00045     float  hipr1[100];
00046     int    ihpr2[50];
00047     float  hint1[100];
00048     int    ihnt2[50];
00049   }hiparnt_;
00050 }
00051 #define hiparnt hiparnt_
00052 
00053 #endif