]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - MINICERN/mathlib/gen/c/rtheta128.F
Merging the VirtualMC branch to the main development branch (HEAD)
[u/mrichter/AliRoot.git] / MINICERN / mathlib / gen / c / rtheta128.F
diff --git a/MINICERN/mathlib/gen/c/rtheta128.F b/MINICERN/mathlib/gen/c/rtheta128.F
deleted file mode 100644 (file)
index 6c30662..0000000
+++ /dev/null
@@ -1,19 +0,0 @@
-*
-* $Id$
-*
-* $Log$
-* Revision 1.1.1.1  1996/04/01 15:02:12  mclareni
-* Mathlib gen
-*
-*
-#include "gen/pilot.h"
-#if !defined(CERNLIB_DOUBLE)
-      FUNCTION DTHETA( K, X, Q )
-C
-#include "gen/imp128.inc"
-C
-      DTHETA=0
-      CALL MTLPRT('DTHETA','C349.0','Not available on this machine')
-      RETURN
-      END
-#endif