* $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