From 4e987026148fe65c323afbc93cd560c07bf06b3f Mon Sep 17 00:00:00 2001
From: Yale AI Dept <ai@nebula.cs.yale.edu>
Date: Wed, 14 Jul 1993 13:08:00 -0500
Subject: Import to github.

---
 progs/lib/cl/random-prims.hi | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 progs/lib/cl/random-prims.hi

(limited to 'progs/lib/cl/random-prims.hi')

diff --git a/progs/lib/cl/random-prims.hi b/progs/lib/cl/random-prims.hi
new file mode 100644
index 0000000..e66d802
--- /dev/null
+++ b/progs/lib/cl/random-prims.hi
@@ -0,0 +1,20 @@
+-- random-prims.hi -- interface file to random number primitives
+--
+-- author :  Sandra Loosemore
+-- date   :  22 June 1993
+--
+
+
+interface RandomPrims where
+
+randomInt	:: Int -> IO Int
+randomInteger   :: Integer -> IO Integer
+randomFloat     :: Float -> IO Float
+randomDouble    :: Double -> IO Double
+
+{-#
+randomInt	:: LispName("lisp:random"), Complexity(5)
+randomInteger	:: LispName("lisp:random"), Complexity(5)
+randomFloat	:: LispName("lisp:random"), Complexity(5)
+randomDouble	:: LispName("lisp:random"), Complexity(5)
+#-}
-- 
cgit v1.2.3