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

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

diff --git a/PDF/spdf/sfgrvh.F b/PDF/spdf/sfgrvh.F
index 463a3ac5a73fc6943c9fe3f9e879a05105f3d1c7..accd5e93b38fcedd78cb71667f35ca5610ec248c 100644 (file)
--- a/PDF/spdf/sfgrvh.F
+++ b/PDF/spdf/sfgrvh.F
@@ -2,6 +2,9 @@
 * $Id$
 *
 * $Log$
+* Revision 1.4  2000/09/18 10:02:36  hristov
+* Makefile added to PDF8
+*
 * Revision 1.1.1.2  1996/10/30 08:29:48  cernlib
 * Version 7.04
 *
@@ -17,7 +20,12 @@ C :::::::::::: Structure functions from Glueck, Reya and Vogt  (HO)
 C :::::::::::: Lambda(NF=3) = 0.200 GeV
 C
       DIMENSION XQ(7)
-#include "pdf/expdp.inc"
+#if defined(CERNLIB_DOUBLE)
+      DOUBLE PRECISION
+#endif
+#if defined(CERNLIB_SINGLE)
+      REAL
+#endif
      +       DX,DSCAL,DUPV,DDNV,DSEA,DSTR,DCHM,DBOT,DTOP,DGL
       PARAMETER (ALAM=0.200)
 C