X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;ds=sidebyside;f=random.lisp;h=80d387fbc51907ca212c2986791d5e5971733378;hb=0e5343fda28c559f11e003805727f4c625d178f3;hp=cf173fc83b74ee36cbc2aa57451c7954eeb92c3a;hpb=5e5cc3c20a925d8af5de153a118fdaf0792dd7e2;p=kmrcl.git diff --git a/random.lisp b/random.lisp index cf173fc..80d387f 100644 --- a/random.lisp +++ b/random.lisp @@ -3,19 +3,19 @@ ;;;; FILE IDENTIFICATION ;;;; ;;;; Name: random.lisp -;;;; Purpose: Random number functions for GENUTILS package +;;;; Purpose: Random number functions for KMRCL package ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: random.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $ +;;;; $Id: random.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $ ;;;; -;;;; This file, part of Genutils, is Copyright (c) 2002 by Kevin M. Rosenberg +;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; -;;;; Genutils users are granted the rights to distribute and use this software +;;;; Kmrcl users are granted the rights to distribute and use this software ;;;; as governed by the terms of the GNU General Public License. ;;;; ************************************************************************* -(in-package :genutils) +(in-package :kmrcl) (defun seed-random-generator () "Evaluate a random number of items"