Dummy subroutines to avoid files with no code in
[u/mrichter/AliRoot.git] / MINICERN / mathlib / gen / c / gamma128.F
index 29d73a8cc3237a4308133bf056c5fcb66999eaef..b6260b45eed771a34b4cd2cc18b96810be71b8ad 100644 (file)
@@ -2,6 +2,9 @@
 * $Id$
 *
 * $Log$
+* Revision 1.1.1.1  1999/05/18 15:55:34  fca
+* AliRoot sources
+*
 * Revision 1.1.1.1  1996/04/01 15:01:54  mclareni
 * Mathlib gen
 *
       RETURN
   101 FORMAT('ARGUMENT IS NEGATIVE = ',1P,E15.1)
       END
+#else
+      SUBROUTINE GAMMA128_DUMMY
+      END
 #endif