]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - MINICERN/packlib/kernlib/kerngen/unix/lnxgs/irndm.F
Merging the VirtualMC branch to the main development branch (HEAD)
[u/mrichter/AliRoot.git] / MINICERN / packlib / kernlib / kerngen / unix / lnxgs / irndm.F
diff --git a/MINICERN/packlib/kernlib/kerngen/unix/lnxgs/irndm.F b/MINICERN/packlib/kernlib/kerngen/unix/lnxgs/irndm.F
deleted file mode 100644 (file)
index 74a1d66..0000000
+++ /dev/null
@@ -1,17 +0,0 @@
-*
-* $Id$
-*
-* $Log$
-* Revision 1.1.1.1  1996/02/15 17:50:07  mclareni
-* Kernlib
-*
-*
-#include "kerngen/pilot.h"
-        FUNCTION IRNDM(ISEEK)
-        COMMON /MCGN/ MCGN
-
-C--       Integer random number
-      MCGN  = MCGN * 69069
-      IRNDM = ISHFT (MCGN,-1)
-      RETURN
-        END