LHAPDF/AliRoot code initial commit.
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Mon, 7 Aug 2006 09:29:43 +0000 (09:29 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Mon, 7 Aug 2006 09:29:43 +0000 (09:29 +0000)
LHAPDF/AliStructFuncType.cxx [new file with mode: 0644]
LHAPDF/AliStructFuncType.h [new file with mode: 0644]
LHAPDF/LHAPDFLinkDef.h [new file with mode: 0644]
LHAPDF/liblhapdf.pkg [new file with mode: 0644]

diff --git a/LHAPDF/AliStructFuncType.cxx b/LHAPDF/AliStructFuncType.cxx
new file mode 100644 (file)
index 0000000..ce5bd69
--- /dev/null
@@ -0,0 +1,63 @@
+/**************************************************************************
+ * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
+ *                                                                        *
+ * Author: The ALICE Off-line Project.                                    *
+ * Contributors are mentioned in the code where appropriate.              *
+ *                                                                        *
+ * Permission to use, copy, modify and distribute this software and its   *
+ * documentation strictly for non-commercial purposes is hereby granted   *
+ * without fee, provided that the above copyright notice appears in all   *
+ * copies and that both the copyright notice and this permission notice   *
+ * appear in the supporting documentation. The authors make no claims     *
+ * about the suitability of this software for any purpose. It is          *
+ * provided "as is" without express or implied warranty.                  *
+ **************************************************************************/
+
+/* $Id$ */
+
+// Helper class to interface pdflib and the TPythia 
+// the c++ interface for Pythia
+// The pdf codes used  in pdflib are mapped
+// to a more user friendly enumeration type.
+// Author: andreas.morsch@cern.ch
+
+#include "AliStructFuncType.h"
+
+#ifndef WIN32
+# define structa  structa_ 
+# define pdfset   pdfset_
+# define type_of_call
+#else
+# define structa  STRUCTA
+# define pdfset   PDFSET
+# define type_of_call _stdcall
+#endif
+
+
+extern "C" {
+    void type_of_call pdfset(char parm[20][20], Double_t value[20]);
+    
+    void type_of_call structa(Double_t& xx, Double_t& qq, Double_t& a,
+                              Double_t& upv, Double_t& dnv, Double_t& usea,
+                              Double_t& dsea,
+                              Double_t& str, Double_t& chm, Double_t& bot,
+                              Double_t& top, Double_t& gl);
+}
+
+ClassImp(AliStructFuncType)
+
+void AliStructFuncType::PdfSet(char parm[20][20], Double_t value[20])
+{
+    pdfset(parm, value);
+}
+
+void AliStructFuncType::StructA(Double_t xx, Double_t qq, Double_t a,
+                               Double_t& upv, Double_t& dnv, Double_t& usea,
+                               Double_t& dsea,
+                               Double_t& str, Double_t& chm, Double_t& bot,
+                               Double_t& top, Double_t& gl)
+{
+    structa(xx, qq, a, upv, dnv, usea, dsea, str, chm, bot, top, gl);
+}
+
+
diff --git a/LHAPDF/AliStructFuncType.h b/LHAPDF/AliStructFuncType.h
new file mode 100644 (file)
index 0000000..3bf613e
--- /dev/null
@@ -0,0 +1,44 @@
+#ifndef ALISTRUCTFUNCTYPE_H
+#define ALISTRUCTFUNCTYPE_H
+/* Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
+ * See cxx source for full Copyright notice                               */
+
+/* $Id$ */
+
+// Helper class to interface pdflib and the TPythia 
+// the c++ interface for Pythia
+// Author: andreas.morsch@cern.ch
+
+#include <TObject.h>
+
+class AliStructFuncType : public TObject {
+    
+ public:
+    AliStructFuncType(){;}
+    virtual ~AliStructFuncType(){;}
+    static void PdfSet(char parm[20][20], Double_t value[20]);
+    static void StructA(Double_t xx, Double_t qq, Double_t a,
+                       Double_t& upv, Double_t& dnv, Double_t& usea,
+                       Double_t& dsea,
+                       Double_t& str, Double_t& chm, Double_t& bot,
+                       Double_t& top, Double_t& gl);
+    ClassDef(AliStructFuncType,1) // Library for partonic energy loss
+};
+
+typedef enum
+{
+   kCTEQ4L     = 19170,    
+   kCTEQ4M     = 19150,    
+   kCTEQ5L     = 19070,
+   kCTEQ5M     = 19050,
+   kGRVLO98    = 80060,    
+   kCTEQ6      = 10040,
+   kCTEQ61     = 10100,
+   kCTEQ6m     = 10050,
+   kCTEQ6l     = 10041,
+   kCTEQ6ll    = 10042
+}
+StrucFunc_t;
+
+#endif
+
diff --git a/LHAPDF/LHAPDFLinkDef.h b/LHAPDF/LHAPDFLinkDef.h
new file mode 100644 (file)
index 0000000..1250010
--- /dev/null
@@ -0,0 +1,13 @@
+#ifdef __CINT__
+/* Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
+ * See cxx source for full Copyright notice                               */
+
+/* $Id$ */
+
+#pragma link off all globals;
+#pragma link off all classes;
+#pragma link off all functions;
+#pragma link C++ enum  StrucFunc_t;
+#pragma link C++ class  AliStructFuncType+;
+#endif
+
diff --git a/LHAPDF/liblhapdf.pkg b/LHAPDF/liblhapdf.pkg
new file mode 100644 (file)
index 0000000..69005b0
--- /dev/null
@@ -0,0 +1,46 @@
+SRCS:=AliStructFuncType.cxx
+HDRS= $(SRCS:.cxx=.h) 
+DHDR:=LHAPDFLinkDef.h
+
+FSRCS:= \
+lhapdf5.2.2/alphas.f \
+lhapdf5.2.2/description.f \
+lhapdf5.2.2/eks98.f \
+lhapdf5.2.2/eksarp.f \
+lhapdf5.2.2/EVLCTEQ.f \
+lhapdf5.2.2/evolution.f \
+lhapdf5.2.2/inputPDF.f \
+lhapdf5.2.2/lhaglue.f \
+lhapdf5.2.2/LHpdflib.f \
+lhapdf5.2.2/parameter.f \
+lhapdf5.2.2/QCDNUM.f \
+lhapdf5.2.2/QCDparams.f \
+lhapdf5.2.2/Sqcdnum.f \
+lhapdf5.2.2/wrapa02.f \
+lhapdf5.2.2/wrapa02m.f \
+lhapdf5.2.2/wrapabfkwpi.f \
+lhapdf5.2.2/wrapacfgpg.f \
+lhapdf5.2.2/wrapcteq5.f \
+lhapdf5.2.2/wrapcteq6.f \
+lhapdf5.2.2/wrapdgg.f \
+lhapdf5.2.2/wrapdog.f \
+lhapdf5.2.2/wrapEVLCTEQ.f \
+lhapdf5.2.2/wrapevolve.f \
+lhapdf5.2.2/wrapgrv.f \
+lhapdf5.2.2/wrapgrvg.f \
+lhapdf5.2.2/wrapgrvpi.f \
+lhapdf5.2.2/wrapgsg96.f \
+lhapdf5.2.2/wrapgsg.f \
+lhapdf5.2.2/wraph1.f \
+lhapdf5.2.2/wraplacg.f \
+lhapdf5.2.2/wrapmrst98.f \
+lhapdf5.2.2/wrapmrst.f \
+lhapdf5.2.2/wrapowpi.f \
+lhapdf5.2.2/wrapQCDNUM3.f \
+lhapdf5.2.2/wrapQCDNUM4.f \
+lhapdf5.2.2/wrapQCDNUM.f \
+lhapdf5.2.2/wrapsasg.f \
+lhapdf5.2.2/wrapsmrspi.f \
+lhapdf5.2.2/wrapwhitg.f \
+lhapdf5.2.2/wrapzeus.f
+EXPORT:=AliStructFuncType.h