git.iko.soy/elk
on 0050bfa help sign in
elk/libraries/Native/Signal/Random.js
21 lines 518 B history raw
2Elm.Native.Random = function(elm) {
3 'use strict';
4 elm.Native = elm.Native || {};
5 if (elm.Native.Random) return elm.Native.Random;
7 var Signal = Elm.Signal(elm);
9 function range(min, max, signal) {
10 function f(x) { return Math.floor(Math.random() * (max-min+1)) + min; }
11 return A2( Signal.lift, f, signal );
12 }
14 function float(signal) {
15 function f(x) { return Math.random() }
16 return A2( Signal.lift, f, signal );
17 }
19 return elm.Native.Random = { range: F3(randomize), float: float };
21};