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

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

diff --git a/PDF/spdf/sfsas21.F b/PDF/spdf/sfsas21.F
index 9e1709bbd5e12d368ceef34d3c9a5ac25b104c0e..289573fae51e24333c5a460b31c4a75b8eeab131 100644 (file)
--- a/PDF/spdf/sfsas21.F
+++ b/PDF/spdf/sfsas21.F
@@ -14,7 +14,12 @@ C
 C :::::::::::: Structure functions from the SAS group version 2
 C :::::::::::: Lambda = 0.200 GeV, Q**2 = 0.36 GeV**2 (DIS)
 C
-#include "pdf/expdp.inc"
+#if defined(CERNLIB_DOUBLE)
+      DOUBLE PRECISION
+#endif
+#if defined(CERNLIB_SINGLE)
+      REAL
+#endif
      +          DX,DQ2,DP2,
      +          DUPV,DDNV,DSEA,DSEAD,DSTR,DCHM,DBOT,DTOP,DGL
       DIMENSION XPDFGM(-6:6)