home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
numana01.zip
/
DEF
/
RAND.DEF
< prev
next >
Wrap
Text File
|
1996-08-07
|
1KB
|
22 lines
DEFINITION MODULE Rand;
(********************************************************)
(* *)
(* Random number generator *)
(* *)
(* This version is about 50% slower than the *)
(* PMOS random number generator, but it's more *)
(* portable. I haven't done enough tests to *)
(* judge which one is "more random". *)
(* *)
(* Programmer: P. Moylan *)
(* Last edited: 7 August 1996 *)
(* Status: OK *)
(* *)
(********************************************************)
PROCEDURE RANDOM(): REAL;
END Rand.