git.iko.soy/elk
on 16640f5 help sign in
elk/libraries/Native/Basics.js
62 lines 1.6 kB history raw
2Elm.Native.Basics = {};
3Elm.Native.Basics.make = function(elm) {
4 elm.Native = elm.Native || {};
5 elm.Native.Basics = elm.Native.Basics || {};
6 if (elm.Native.Basics.values) return elm.Native.Basics.values;
8 var JS = Elm.Native.JavaScript.make(elm);
9 var Utils = Elm.Native.Utils.make(elm);
11 function div(a,b) { return (a/b)|0; }
12 function rem(a,b) { return a % b; }
13 var mod = Utils.mod;
14 function abs(x) { return x < 0 ? -x : x; }
15 function logBase(base,n) { return Math.log(n) / Math.log(base); }
16 function min(a,b) { return Utils.cmp(a,b) < 0 ? a : b; }
17 function max(a,b) { return Utils.cmp(a,b) > 0 ? a : b; }
18 function clamp(lo,hi,n) {
19 return Utils.cmp(n,lo) < 0 ? lo : Utils.cmp(n,hi) > 0 ? hi : n; }
20 function xor(a,b) { return a !== b; }
21 function not(b) { return !b; }
22 function isInfinite(n) { return n === Infinity || n === -Infinity }
24 function truncate(n) { return n|0; }
26 var basics = {
27 div:F2(div),
28 rem:F2(rem),
29 mod:mod,
31 pi:Math.PI,
32 e:Math.E,
33 cos:Math.cos,
34 sin:Math.sin,
35 tan:Math.tan,
36 acos:Math.acos,
37 asin:Math.asin,
38 atan:Math.atan,
39 atan2:F2(Math.atan2),
41 sqrt:Math.sqrt,
42 abs:abs,
43 logBase:F2(logBase),
44 min:F2(min),
45 max:F2(max),
46 clamp:F3(clamp),
47 compare:Utils.compare,
49 xor:F2(xor),
50 not:not,
52 truncate:truncate,
53 ceiling:Math.ceil,
54 floor:Math.floor,
55 round:Math.round,
56 toFloat:function(x) { return x; },
57 isNaN:isNaN,
58 isInfinite:isInfinite
59 };
61 return elm.Native.Basics.values = basics;
62};