git.iko.soy/elk
on db72bdb help sign in
elk/libraries/Native/Signal/Random.js
23 lines 557 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 flt(signal) {
15 function f(x) { return Math.random(); }
16 return A2( Signal.lift, f, signal );
17 }
19 elm.Native.Random = { range: F3(range) };
20 elm.Native.Random['float'] = flt;
21 return elm.Native.Random;
23};