]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - MINICERN/mathlib/gen/c/rrteq4.F
Merging the VirtualMC branch to the main development branch (HEAD)
[u/mrichter/AliRoot.git] / MINICERN / mathlib / gen / c / rrteq4.F
diff --git a/MINICERN/mathlib/gen/c/rrteq4.F b/MINICERN/mathlib/gen/c/rrteq4.F
deleted file mode 100644 (file)
index 0c0a955..0000000
+++ /dev/null
@@ -1,27 +0,0 @@
-*
-* $Id$
-*
-* $Log$
-* Revision 1.1.1.1  1996/04/01 15:01:52  mclareni
-* Mathlib gen
-*
-*
-#include "gen/pilot.h"
-      SUBROUTINE RRTEQ4(A,B,C,D,Z,DC,MT)
-#if defined(CERNLIB_DOUBLE)
-C
-      CHARACTER NAME*6
-      NAME = 'RRTEQ4'
-      CALL MTLPRT(NAME,'C208.0','Not available on this machine')
-      RETURN
-#endif
-      ENTRY RTEQ4(A,B,C,D,Z,DC,MT)
-#if defined(CERNLIB_DOUBLE)
-      NAME = 'RTEQ4'
-      CALL MTLPRT(NAME,'C208.0','Not available on this machine')
-      RETURN
-#endif
-#if !defined(CERNLIB_DOUBLE)
-      CALL RRTEQ4(A,B,C,D,Z,DC,MT)
-#endif
-      END