]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - MINICERN/packlib/kernlib/kerngen/ccgen/wntgs/intrac.c
Merging the VirtualMC branch to the main development branch (HEAD)
[u/mrichter/AliRoot.git] / MINICERN / packlib / kernlib / kerngen / ccgen / wntgs / intrac.c
diff --git a/MINICERN/packlib/kernlib/kerngen/ccgen/wntgs/intrac.c b/MINICERN/packlib/kernlib/kerngen/ccgen/wntgs/intrac.c
deleted file mode 100644 (file)
index fc3f3c4..0000000
+++ /dev/null
@@ -1,33 +0,0 @@
-/*
- * $Id$
- *
- * $Log$
- * Revision 1.1  1997/02/04 17:35:05  mclareni
- * Merge Winnt and 97a versions
- *
- * Revision 1.1.1.1  1996/02/15 17:49:31  mclareni
- * Kernlib
- *
- */
-/*>    ROUTINE INTRAC
-  CERN PROGLIB# Z044    INTRAC          .VERSION KERNFOR  4.38  931108
-*/
-#ifdef WIN32
-#include <io.h>
-#endif
-
-#include "kerngen/fortranc.h"
-
-#if defined(CERNLIB_QX_SC)
-int type_of_call intrac_()
-#endif
-#if defined(CERNLIB_QXNO_SC)
-int type_of_call intrac()
-#endif
-#if defined(CERNLIB_QXCAPT)
-int type_of_call INTRAC()
-#endif
-{
-    return (((int) isatty(0)!=0) ? 1 : 0) ;
-}
-/*> END <----------------------------------------------------------*/