X-Git-Url: http://git.uio.no/git/?p=u%2Fmrichter%2FAliRoot.git;a=blobdiff_plain;f=MINICERN%2Fpacklib%2Fkernlib%2Fkerngen%2Funix%2Flnxgs%2Firndm.F;fp=MINICERN%2Fpacklib%2Fkernlib%2Fkerngen%2Funix%2Flnxgs%2Firndm.F;h=0000000000000000000000000000000000000000;hp=74a1d66a8172aa39df31ae5c1866596fe26e96fd;hb=b9d0a01d7a0723a09071b0b56200d72f59a9c2b6;hpb=9754311559f405f3949bf48d6883dd02a93e7088

diff --git a/MINICERN/packlib/kernlib/kerngen/unix/lnxgs/irndm.F b/MINICERN/packlib/kernlib/kerngen/unix/lnxgs/irndm.F
deleted file mode 100644
index 74a1d66a817..00000000000
--- a/MINICERN/packlib/kernlib/kerngen/unix/lnxgs/irndm.F
+++ /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