(random) returns a floating point number
svn: r12005
This commit is contained in:
parent
0209663ec7
commit
fea96706f1
|
@ -222,7 +222,7 @@
|
||||||
(-poly (a) (cl-> [(-Pathlike (-> a)) a]
|
(-poly (a) (cl-> [(-Pathlike (-> a)) a]
|
||||||
[(-Pathlike (-> a) Sym) a]))]
|
[(-Pathlike (-> a) Sym) a]))]
|
||||||
|
|
||||||
[random (cl-> [(-Integer) -Integer] [() -Integer])]
|
[random (cl-> [(-Integer) -Integer] [() N])]
|
||||||
|
|
||||||
[assoc (-poly (a b) (a (-lst (-pair a b)) . -> . (-opt (-pair a b))))]
|
[assoc (-poly (a b) (a (-lst (-pair a b)) . -> . (-opt (-pair a b))))]
|
||||||
[assf (-poly (a b)
|
[assf (-poly (a b)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user