| bcdb51cc |
1 | /************************************************************************** |
| 2 | * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. * |
| 3 | * * |
| 4 | * Author: The ALICE Off-line Project. * |
| 5 | * Contributors are mentioned in the code where appropriate. * |
| 6 | * * |
| 7 | * Permission to use, copy, modify and distribute this software and its * |
| 8 | * documentation strictly for non-commercial purposes is hereby granted * |
| 9 | * without fee, provided that the above copyright notice appears in all * |
| 10 | * copies and that both the copyright notice and this permission notice * |
| 11 | * appear in the supporting documentation. The authors make no claims * |
| 12 | * about the suitability of this software for any purpose. It is * |
| 13 | * provided "as is" without express or implied warranty. * |
| 14 | **************************************************************************/ |
| 15 | |
| 803d1ab0 |
16 | /* $Id$ */ |
| bcdb51cc |
17 | |
| 0af12c00 |
18 | // Helper class to interface pdflib and the TPythia |
| 19 | // the c++ interface for Pythia |
| 20 | // The pdf codes used in pdflib are mapped |
| 21 | // to a more user friendly enumeration type. |
| 22 | // Author: andreas.morsch@cern.ch |
| 23 | |
| bcdb51cc |
24 | #include "AliStructFuncType.h" |
| 25 | |
| 26 | #ifndef WIN32 |
| 27 | # define structa structa_ |
| 28 | # define pdfset pdfset_ |
| 29 | # define type_of_call |
| 30 | #else |
| 31 | # define structa STRUCTA |
| 32 | # define pdfset PDFSET |
| 33 | # define type_of_call _stdcall |
| 34 | #endif |
| 35 | |
| 36 | |
| 37 | extern "C" { |
| 38 | void type_of_call pdfset(char parm[20][20], Double_t value[20]); |
| 39 | |
| 40 | void type_of_call structa(Double_t& xx, Double_t& qq, Double_t& a, |
| 41 | Double_t& upv, Double_t& dnv, Double_t& usea, |
| 42 | Double_t& dsea, |
| 43 | Double_t& str, Double_t& chm, Double_t& bot, |
| 44 | Double_t& top, Double_t& gl); |
| 45 | } |
| 46 | |
| 47 | ClassImp(AliStructFuncType) |
| 48 | |
| 49 | void AliStructFuncType::PdfSet(char parm[20][20], Double_t value[20]) |
| 50 | { |
| 51 | pdfset(parm, value); |
| 52 | } |
| 53 | |
| 54 | void AliStructFuncType::StructA(Double_t xx, Double_t qq, Double_t a, |
| 55 | Double_t& upv, Double_t& dnv, Double_t& usea, |
| 56 | Double_t& dsea, |
| 57 | Double_t& str, Double_t& chm, Double_t& bot, |
| 58 | Double_t& top, Double_t& gl) |
| 59 | { |
| 60 | structa(xx, qq, a, upv, dnv, usea, dsea, str, chm, bot, top, gl); |
| 61 | } |
| 62 | |
| 63 | |
git://git.uio.no / u / mrichter / AliRoot.git / blame