Changes to compile on Solaris 10 with f90 (Intel x86 platform). It does't like contin...

[u/mrichter/AliRoot.git] / PDF / spdf / strowp1.F

diff --git a/PDF/spdf/strowp1.F b/PDF/spdf/strowp1.F
index 307f72b7762747178fbc1d38ef2804c98dfb7296..3359f6404a9fd9bf48677c66533e8e437ff58ef2 100644 (file)
--- a/PDF/spdf/strowp1.F
+++ b/PDF/spdf/strowp1.F
@@ -2,6 +2,9 @@
 * $Id$
 *
 * $Log$
+* Revision 1.4  2000/09/18 10:02:37  hristov
+* Makefile added to PDF8
+*
 * Revision 1.1.1.2  1996/10/30 08:31:47  cernlib
 * Version 7.04
 *
@@ -18,7 +21,12 @@ C ::::::::::::::  OWENS SET 1 PION STRUCTURE FUNCTION  :::::::::::::::
 #if defined(CERNLIB_DOUBLE)
       DOUBLE PRECISION DGAMMA
 #endif
-#include "pdf/expdp.inc"
+#if defined(CERNLIB_DOUBLE)
+      DOUBLE PRECISION
+#endif
+#if defined(CERNLIB_SINGLE)
+      REAL
+#endif
      +       COW(3,5,4),TS(6),XQ(9)
 
 C...Expansion coefficients for up and down valence quark distributions.