diff --git a/assets/app.js b/assets/app.js --- a/assets/app.js +++ b/assets/app.js @@ -6401,14551 +6401,20675 @@ }; }); -var _elm_community$list_extra$List_Extra$greedyGroupsOfWithStep = F3( - function (size, step, xs) { - var okayXs = _elm_lang$core$Native_Utils.cmp( - _elm_lang$core$List$length(xs), - 0) > 0; - var okayArgs = (_elm_lang$core$Native_Utils.cmp(size, 0) > 0) && (_elm_lang$core$Native_Utils.cmp(step, 0) > 0); - var xs_ = A2(_elm_lang$core$List$drop, step, xs); - var group = A2(_elm_lang$core$List$take, size, xs); - return (okayArgs && okayXs) ? { - ctor: '::', - _0: group, - _1: A3(_elm_community$list_extra$List_Extra$greedyGroupsOfWithStep, size, step, xs_) - } : {ctor: '[]'}; - }); -var _elm_community$list_extra$List_Extra$greedyGroupsOf = F2( - function (size, xs) { - return A3(_elm_community$list_extra$List_Extra$greedyGroupsOfWithStep, size, size, xs); - }); -var _elm_community$list_extra$List_Extra$groupsOfWithStep = F3( - function (size, step, xs) { - var okayArgs = (_elm_lang$core$Native_Utils.cmp(size, 0) > 0) && (_elm_lang$core$Native_Utils.cmp(step, 0) > 0); - var xs_ = A2(_elm_lang$core$List$drop, step, xs); - var group = A2(_elm_lang$core$List$take, size, xs); - var okayLength = _elm_lang$core$Native_Utils.eq( - size, - _elm_lang$core$List$length(group)); - return (okayArgs && okayLength) ? { - ctor: '::', - _0: group, - _1: A3(_elm_community$list_extra$List_Extra$groupsOfWithStep, size, step, xs_) - } : {ctor: '[]'}; - }); -var _elm_community$list_extra$List_Extra$groupsOf = F2( - function (size, xs) { - return A3(_elm_community$list_extra$List_Extra$groupsOfWithStep, size, size, xs); - }); -var _elm_community$list_extra$List_Extra$zip5 = _elm_lang$core$List$map5( - F5( - function (v0, v1, v2, v3, v4) { - return {ctor: '_Tuple5', _0: v0, _1: v1, _2: v2, _3: v3, _4: v4}; - })); -var _elm_community$list_extra$List_Extra$zip4 = _elm_lang$core$List$map4( - F4( - function (v0, v1, v2, v3) { - return {ctor: '_Tuple4', _0: v0, _1: v1, _2: v2, _3: v3}; - })); -var _elm_community$list_extra$List_Extra$zip3 = _elm_lang$core$List$map3( - F3( - function (v0, v1, v2) { - return {ctor: '_Tuple3', _0: v0, _1: v1, _2: v2}; - })); -var _elm_community$list_extra$List_Extra$zip = _elm_lang$core$List$map2( - F2( - function (v0, v1) { - return {ctor: '_Tuple2', _0: v0, _1: v1}; - })); -var _elm_community$list_extra$List_Extra$isPrefixOf = F2( - function (prefix, xs) { - var _p0 = {ctor: '_Tuple2', _0: prefix, _1: xs}; - if (_p0._0.ctor === '[]') { - return true; - } else { - if (_p0._1.ctor === '[]') { - return false; - } else { - return _elm_lang$core$Native_Utils.eq(_p0._0._0, _p0._1._0) && A2(_elm_community$list_extra$List_Extra$isPrefixOf, _p0._0._1, _p0._1._1); - } - } - }); -var _elm_community$list_extra$List_Extra$isSuffixOf = F2( - function (suffix, xs) { - return A2( - _elm_community$list_extra$List_Extra$isPrefixOf, - _elm_lang$core$List$reverse(suffix), - _elm_lang$core$List$reverse(xs)); - }); -var _elm_community$list_extra$List_Extra$selectSplit = function (xs) { - var _p1 = xs; - if (_p1.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p5 = _p1._1; - var _p4 = _p1._0; - return { - ctor: '::', - _0: { - ctor: '_Tuple3', - _0: {ctor: '[]'}, - _1: _p4, - _2: _p5 - }, - _1: A2( - _elm_lang$core$List$map, - function (_p2) { - var _p3 = _p2; - return { - ctor: '_Tuple3', - _0: {ctor: '::', _0: _p4, _1: _p3._0}, - _1: _p3._1, - _2: _p3._2 - }; - }, - _elm_community$list_extra$List_Extra$selectSplit(_p5)) - }; - } -}; -var _elm_community$list_extra$List_Extra$select = function (xs) { - var _p6 = xs; - if (_p6.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p10 = _p6._1; - var _p9 = _p6._0; - return { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _p9, _1: _p10}, - _1: A2( - _elm_lang$core$List$map, - function (_p7) { - var _p8 = _p7; - return { - ctor: '_Tuple2', - _0: _p8._0, - _1: {ctor: '::', _0: _p9, _1: _p8._1} - }; - }, - _elm_community$list_extra$List_Extra$select(_p10)) - }; - } -}; -var _elm_community$list_extra$List_Extra$tailsHelp = F2( - function (e, list) { - var _p11 = list; - if (_p11.ctor === '::') { - var _p12 = _p11._0; - return { - ctor: '::', - _0: {ctor: '::', _0: e, _1: _p12}, - _1: {ctor: '::', _0: _p12, _1: _p11._1} - }; - } else { - return {ctor: '[]'}; - } - }); -var _elm_community$list_extra$List_Extra$tails = A2( - _elm_lang$core$List$foldr, - _elm_community$list_extra$List_Extra$tailsHelp, - { - ctor: '::', - _0: {ctor: '[]'}, - _1: {ctor: '[]'} - }); -var _elm_community$list_extra$List_Extra$isInfixOf = F2( - function (infix, xs) { - return A2( - _elm_lang$core$List$any, - _elm_community$list_extra$List_Extra$isPrefixOf(infix), - _elm_community$list_extra$List_Extra$tails(xs)); - }); -var _elm_community$list_extra$List_Extra$inits = A2( - _elm_lang$core$List$foldr, - F2( - function (e, acc) { - return { - ctor: '::', - _0: {ctor: '[]'}, - _1: A2( - _elm_lang$core$List$map, - F2( - function (x, y) { - return {ctor: '::', _0: x, _1: y}; - })(e), - acc) - }; - }), - { - ctor: '::', - _0: {ctor: '[]'}, - _1: {ctor: '[]'} - }); -var _elm_community$list_extra$List_Extra$groupWhileTransitively = F2( - function (cmp, xs_) { - var _p13 = xs_; - if (_p13.ctor === '[]') { - return {ctor: '[]'}; - } else { - if (_p13._1.ctor === '[]') { - return { - ctor: '::', - _0: { - ctor: '::', - _0: _p13._0, - _1: {ctor: '[]'} - }, - _1: {ctor: '[]'} - }; - } else { - var _p15 = _p13._0; - var _p14 = A2(_elm_community$list_extra$List_Extra$groupWhileTransitively, cmp, _p13._1); - if (_p14.ctor === '::') { - return A2(cmp, _p15, _p13._1._0) ? { - ctor: '::', - _0: {ctor: '::', _0: _p15, _1: _p14._0}, - _1: _p14._1 - } : { - ctor: '::', - _0: { - ctor: '::', - _0: _p15, - _1: {ctor: '[]'} - }, - _1: _p14 - }; - } else { - return {ctor: '[]'}; - } - } - } - }); -var _elm_community$list_extra$List_Extra$stripPrefix = F2( - function (prefix, xs) { - var step = F2( - function (e, m) { - var _p16 = m; - if (_p16.ctor === 'Nothing') { - return _elm_lang$core$Maybe$Nothing; - } else { - if (_p16._0.ctor === '[]') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Native_Utils.eq(e, _p16._0._0) ? _elm_lang$core$Maybe$Just(_p16._0._1) : _elm_lang$core$Maybe$Nothing; - } - } - }); - return A3( - _elm_lang$core$List$foldl, - step, - _elm_lang$core$Maybe$Just(xs), - prefix); - }); -var _elm_community$list_extra$List_Extra$dropWhileRight = function (p) { - return A2( - _elm_lang$core$List$foldr, - F2( - function (x, xs) { - return (p(x) && _elm_lang$core$List$isEmpty(xs)) ? {ctor: '[]'} : {ctor: '::', _0: x, _1: xs}; - }), - {ctor: '[]'}); -}; -var _elm_community$list_extra$List_Extra$takeWhileRight = function (p) { - var step = F2( - function (x, _p17) { - var _p18 = _p17; - var _p19 = _p18._0; - return (p(x) && _p18._1) ? { - ctor: '_Tuple2', - _0: {ctor: '::', _0: x, _1: _p19}, - _1: true - } : {ctor: '_Tuple2', _0: _p19, _1: false}; - }); - return function (_p20) { - return _elm_lang$core$Tuple$first( - A3( - _elm_lang$core$List$foldr, - step, - { - ctor: '_Tuple2', - _0: {ctor: '[]'}, - _1: true - }, - _p20)); - }; -}; -var _elm_community$list_extra$List_Extra$splitAt = F2( - function (n, xs) { - return { - ctor: '_Tuple2', - _0: A2(_elm_lang$core$List$take, n, xs), - _1: A2(_elm_lang$core$List$drop, n, xs) - }; - }); -var _elm_community$list_extra$List_Extra$groupsOfVarying_ = F3( - function (listOflengths, list, accu) { - groupsOfVarying_: - while (true) { - var _p21 = {ctor: '_Tuple2', _0: listOflengths, _1: list}; - if (((_p21.ctor === '_Tuple2') && (_p21._0.ctor === '::')) && (_p21._1.ctor === '::')) { - var _p22 = A2(_elm_community$list_extra$List_Extra$splitAt, _p21._0._0, list); - var head = _p22._0; - var tail = _p22._1; - var _v11 = _p21._0._1, - _v12 = tail, - _v13 = {ctor: '::', _0: head, _1: accu}; - listOflengths = _v11; - list = _v12; - accu = _v13; - continue groupsOfVarying_; - } else { - return _elm_lang$core$List$reverse(accu); - } - } - }); -var _elm_community$list_extra$List_Extra$groupsOfVarying = F2( - function (listOflengths, list) { - return A3( - _elm_community$list_extra$List_Extra$groupsOfVarying_, - listOflengths, - list, - {ctor: '[]'}); - }); -var _elm_community$list_extra$List_Extra$unfoldr = F2( - function (f, seed) { - var _p23 = f(seed); - if (_p23.ctor === 'Nothing') { - return {ctor: '[]'}; - } else { - return { - ctor: '::', - _0: _p23._0._0, - _1: A2(_elm_community$list_extra$List_Extra$unfoldr, f, _p23._0._1) - }; - } - }); -var _elm_community$list_extra$List_Extra$scanr1 = F2( - function (f, xs_) { - var _p24 = xs_; - if (_p24.ctor === '[]') { - return {ctor: '[]'}; - } else { - if (_p24._1.ctor === '[]') { - return { - ctor: '::', - _0: _p24._0, - _1: {ctor: '[]'} - }; - } else { - var _p25 = A2(_elm_community$list_extra$List_Extra$scanr1, f, _p24._1); - if (_p25.ctor === '::') { - return { - ctor: '::', - _0: A2(f, _p24._0, _p25._0), - _1: _p25 - }; - } else { - return {ctor: '[]'}; - } - } - } - }); -var _elm_community$list_extra$List_Extra$scanr = F3( - function (f, acc, xs_) { - var _p26 = xs_; - if (_p26.ctor === '[]') { - return { - ctor: '::', - _0: acc, - _1: {ctor: '[]'} - }; - } else { - var _p27 = A3(_elm_community$list_extra$List_Extra$scanr, f, acc, _p26._1); - if (_p27.ctor === '::') { - return { - ctor: '::', - _0: A2(f, _p26._0, _p27._0), - _1: _p27 - }; - } else { - return {ctor: '[]'}; - } - } - }); -var _elm_community$list_extra$List_Extra$scanl1 = F2( - function (f, xs_) { - var _p28 = xs_; - if (_p28.ctor === '[]') { - return {ctor: '[]'}; - } else { - return A3(_elm_lang$core$List$scanl, f, _p28._0, _p28._1); - } - }); -var _elm_community$list_extra$List_Extra$indexedFoldr = F3( - function (func, acc, list) { - var step = F2( - function (x, _p29) { - var _p30 = _p29; - var _p31 = _p30._0; - return { - ctor: '_Tuple2', - _0: _p31 - 1, - _1: A3(func, _p31, x, _p30._1) - }; - }); - return _elm_lang$core$Tuple$second( - A3( - _elm_lang$core$List$foldr, - step, - { - ctor: '_Tuple2', - _0: _elm_lang$core$List$length(list) - 1, - _1: acc - }, - list)); - }); -var _elm_community$list_extra$List_Extra$indexedFoldl = F3( - function (func, acc, list) { - var step = F2( - function (x, _p32) { - var _p33 = _p32; - var _p34 = _p33._0; - return { - ctor: '_Tuple2', - _0: _p34 + 1, - _1: A3(func, _p34, x, _p33._1) - }; - }); - return _elm_lang$core$Tuple$second( - A3( - _elm_lang$core$List$foldl, - step, - {ctor: '_Tuple2', _0: 0, _1: acc}, - list)); - }); -var _elm_community$list_extra$List_Extra$foldr1 = F2( - function (f, xs) { - var mf = F2( - function (x, m) { - return _elm_lang$core$Maybe$Just( - function () { - var _p35 = m; - if (_p35.ctor === 'Nothing') { - return x; - } else { - return A2(f, x, _p35._0); - } - }()); - }); - return A3(_elm_lang$core$List$foldr, mf, _elm_lang$core$Maybe$Nothing, xs); - }); -var _elm_community$list_extra$List_Extra$foldl1 = F2( - function (f, xs) { - var mf = F2( - function (x, m) { - return _elm_lang$core$Maybe$Just( - function () { - var _p36 = m; - if (_p36.ctor === 'Nothing') { - return x; - } else { - return A2(f, _p36._0, x); - } - }()); - }); - return A3(_elm_lang$core$List$foldl, mf, _elm_lang$core$Maybe$Nothing, xs); - }); -var _elm_community$list_extra$List_Extra$interweaveHelp = F3( - function (l1, l2, acc) { - interweaveHelp: - while (true) { - var _p37 = {ctor: '_Tuple2', _0: l1, _1: l2}; - _v24_1: - do { - if (_p37._0.ctor === '::') { - if (_p37._1.ctor === '::') { - var _v25 = _p37._0._1, - _v26 = _p37._1._1, - _v27 = A2( - _elm_lang$core$Basics_ops['++'], - acc, - { - ctor: '::', - _0: _p37._0._0, - _1: { - ctor: '::', - _0: _p37._1._0, - _1: {ctor: '[]'} - } - }); - l1 = _v25; - l2 = _v26; - acc = _v27; - continue interweaveHelp; - } else { - break _v24_1; - } - } else { - if (_p37._1.ctor === '[]') { - break _v24_1; - } else { - return A2(_elm_lang$core$Basics_ops['++'], acc, _p37._1); - } - } - } while(false); - return A2(_elm_lang$core$Basics_ops['++'], acc, _p37._0); - } - }); -var _elm_community$list_extra$List_Extra$interweave = F2( - function (l1, l2) { - return A3( - _elm_community$list_extra$List_Extra$interweaveHelp, - l1, - l2, - {ctor: '[]'}); - }); -var _elm_community$list_extra$List_Extra$permutations = function (xs_) { - var _p38 = xs_; - if (_p38.ctor === '[]') { - return { - ctor: '::', - _0: {ctor: '[]'}, - _1: {ctor: '[]'} - }; - } else { - var f = function (_p39) { - var _p40 = _p39; - return A2( - _elm_lang$core$List$map, - F2( - function (x, y) { - return {ctor: '::', _0: x, _1: y}; - })(_p40._0), - _elm_community$list_extra$List_Extra$permutations(_p40._1)); - }; - return A2( - _elm_lang$core$List$concatMap, - f, - _elm_community$list_extra$List_Extra$select(_p38)); - } -}; -var _elm_community$list_extra$List_Extra$isPermutationOf = F2( - function (permut, xs) { - return A2( - _elm_lang$core$List$member, - permut, - _elm_community$list_extra$List_Extra$permutations(xs)); - }); -var _elm_community$list_extra$List_Extra$subsequencesNonEmpty = function (xs) { - var _p41 = xs; - if (_p41.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p42 = _p41._0; - var f = F2( - function (ys, r) { - return { - ctor: '::', - _0: ys, - _1: { - ctor: '::', - _0: {ctor: '::', _0: _p42, _1: ys}, - _1: r - } - }; - }); - return { - ctor: '::', - _0: { - ctor: '::', - _0: _p42, - _1: {ctor: '[]'} - }, - _1: A3( - _elm_lang$core$List$foldr, - f, - {ctor: '[]'}, - _elm_community$list_extra$List_Extra$subsequencesNonEmpty(_p41._1)) - }; - } -}; -var _elm_community$list_extra$List_Extra$subsequences = function (xs) { - return { - ctor: '::', - _0: {ctor: '[]'}, - _1: _elm_community$list_extra$List_Extra$subsequencesNonEmpty(xs) - }; -}; -var _elm_community$list_extra$List_Extra$isSubsequenceOf = F2( - function (subseq, xs) { - return A2( - _elm_lang$core$List$member, - subseq, - _elm_community$list_extra$List_Extra$subsequences(xs)); - }); -var _elm_community$list_extra$List_Extra$transpose = function (ll) { - transpose: - while (true) { - var _p43 = ll; - if (_p43.ctor === '[]') { - return {ctor: '[]'}; - } else { - if (_p43._0.ctor === '[]') { - var _v32 = _p43._1; - ll = _v32; - continue transpose; - } else { - var _p44 = _p43._1; - var tails = A2(_elm_lang$core$List$filterMap, _elm_lang$core$List$tail, _p44); - var heads = A2(_elm_lang$core$List$filterMap, _elm_lang$core$List$head, _p44); - return { - ctor: '::', - _0: {ctor: '::', _0: _p43._0._0, _1: heads}, - _1: _elm_community$list_extra$List_Extra$transpose( - {ctor: '::', _0: _p43._0._1, _1: tails}) - }; - } - } - } -}; -var _elm_community$list_extra$List_Extra$intercalate = function (xs) { - return function (_p45) { - return _elm_lang$core$List$concat( - A2(_elm_lang$core$List$intersperse, xs, _p45)); - }; -}; -var _elm_community$list_extra$List_Extra$filterNot = F2( - function (pred, list) { - return A2( - _elm_lang$core$List$filter, - function (_p46) { - return !pred(_p46); - }, - list); - }); -var _elm_community$list_extra$List_Extra$removeAt = F2( - function (index, l) { - if (_elm_lang$core$Native_Utils.cmp(index, 0) < 0) { - return l; - } else { - var tail = _elm_lang$core$List$tail( - A2(_elm_lang$core$List$drop, index, l)); - var head = A2(_elm_lang$core$List$take, index, l); - var _p47 = tail; - if (_p47.ctor === 'Nothing') { - return l; - } else { - return A2(_elm_lang$core$List$append, head, _p47._0); - } - } - }); -var _elm_community$list_extra$List_Extra$stableSortWith = F2( - function (pred, list) { - var predWithIndex = F2( - function (_p49, _p48) { - var _p50 = _p49; - var _p51 = _p48; - var result = A2(pred, _p50._0, _p51._0); - var _p52 = result; - if (_p52.ctor === 'EQ') { - return A2(_elm_lang$core$Basics$compare, _p50._1, _p51._1); - } else { - return result; - } - }); - var listWithIndex = A2( - _elm_lang$core$List$indexedMap, - F2( - function (i, a) { - return {ctor: '_Tuple2', _0: a, _1: i}; - }), - list); - return A2( - _elm_lang$core$List$map, - _elm_lang$core$Tuple$first, - A2(_elm_lang$core$List$sortWith, predWithIndex, listWithIndex)); - }); -var _elm_community$list_extra$List_Extra$setAt = F3( - function (index, value, l) { - if (_elm_lang$core$Native_Utils.cmp(index, 0) < 0) { - return _elm_lang$core$Maybe$Nothing; - } else { - var tail = _elm_lang$core$List$tail( - A2(_elm_lang$core$List$drop, index, l)); - var head = A2(_elm_lang$core$List$take, index, l); - var _p53 = tail; - if (_p53.ctor === 'Nothing') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Maybe$Just( - A2( - _elm_lang$core$List$append, - head, - {ctor: '::', _0: value, _1: _p53._0})); - } - } - }); -var _elm_community$list_extra$List_Extra$remove = F2( - function (x, xs) { - var _p54 = xs; - if (_p54.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p56 = _p54._1; - var _p55 = _p54._0; - return _elm_lang$core$Native_Utils.eq(x, _p55) ? _p56 : { - ctor: '::', - _0: _p55, - _1: A2(_elm_community$list_extra$List_Extra$remove, x, _p56) - }; - } - }); -var _elm_community$list_extra$List_Extra$updateIfIndex = F3( - function (predicate, update, list) { - return A2( - _elm_lang$core$List$indexedMap, - F2( - function (i, x) { - return predicate(i) ? update(x) : x; - }), - list); - }); -var _elm_community$list_extra$List_Extra$updateAt = F3( - function (index, update, list) { - return ((_elm_lang$core$Native_Utils.cmp(index, 0) < 0) || (_elm_lang$core$Native_Utils.cmp( - index, - _elm_lang$core$List$length(list)) > -1)) ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$Maybe$Just( - A3( - _elm_community$list_extra$List_Extra$updateIfIndex, - F2( - function (x, y) { - return _elm_lang$core$Native_Utils.eq(x, y); - })(index), - update, - list)); - }); -var _elm_community$list_extra$List_Extra$updateIf = F3( - function (predicate, update, list) { - return A2( - _elm_lang$core$List$map, - function (item) { - return predicate(item) ? update(item) : item; - }, - list); - }); -var _elm_community$list_extra$List_Extra$replaceIf = F3( - function (predicate, replacement, list) { - return A3( - _elm_community$list_extra$List_Extra$updateIf, - predicate, - _elm_lang$core$Basics$always(replacement), - list); - }); -var _elm_community$list_extra$List_Extra$findIndices = function (p) { - return function (_p57) { - return A2( - _elm_lang$core$List$map, - _elm_lang$core$Tuple$first, - A2( - _elm_lang$core$List$filter, - function (_p58) { - var _p59 = _p58; - return p(_p59._1); - }, - A2( - _elm_lang$core$List$indexedMap, - F2( - function (v0, v1) { - return {ctor: '_Tuple2', _0: v0, _1: v1}; - }), - _p57))); - }; -}; -var _elm_community$list_extra$List_Extra$findIndex = function (p) { - return function (_p60) { - return _elm_lang$core$List$head( - A2(_elm_community$list_extra$List_Extra$findIndices, p, _p60)); - }; -}; -var _elm_community$list_extra$List_Extra$splitWhen = F2( - function (predicate, list) { - return A2( - _elm_lang$core$Maybe$map, - function (i) { - return A2(_elm_community$list_extra$List_Extra$splitAt, i, list); - }, - A2(_elm_community$list_extra$List_Extra$findIndex, predicate, list)); - }); -var _elm_community$list_extra$List_Extra$elemIndices = function (x) { - return _elm_community$list_extra$List_Extra$findIndices( - F2( - function (x, y) { - return _elm_lang$core$Native_Utils.eq(x, y); - })(x)); -}; -var _elm_community$list_extra$List_Extra$elemIndex = function (x) { - return _elm_community$list_extra$List_Extra$findIndex( - F2( - function (x, y) { - return _elm_lang$core$Native_Utils.eq(x, y); - })(x)); -}; -var _elm_community$list_extra$List_Extra$find = F2( - function (predicate, list) { - find: - while (true) { - var _p61 = list; - if (_p61.ctor === '[]') { - return _elm_lang$core$Maybe$Nothing; - } else { - var _p62 = _p61._0; - if (predicate(_p62)) { - return _elm_lang$core$Maybe$Just(_p62); - } else { - var _v41 = predicate, - _v42 = _p61._1; - predicate = _v41; - list = _v42; - continue find; - } - } - } - }); -var _elm_community$list_extra$List_Extra$notMember = function (x) { - return function (_p63) { - return !A2(_elm_lang$core$List$member, x, _p63); - }; -}; -var _elm_community$list_extra$List_Extra$andThen = _elm_lang$core$List$concatMap; -var _elm_community$list_extra$List_Extra$lift2 = F3( - function (f, la, lb) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (a) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (b) { - return { - ctor: '::', - _0: A2(f, a, b), - _1: {ctor: '[]'} - }; - }, - lb); - }, - la); - }); -var _elm_community$list_extra$List_Extra$lift3 = F4( - function (f, la, lb, lc) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (a) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (b) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (c) { - return { - ctor: '::', - _0: A3(f, a, b, c), - _1: {ctor: '[]'} - }; - }, - lc); - }, - lb); - }, - la); - }); -var _elm_community$list_extra$List_Extra$lift4 = F5( - function (f, la, lb, lc, ld) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (a) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (b) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (c) { - return A2( - _elm_community$list_extra$List_Extra$andThen, - function (d) { - return { - ctor: '::', - _0: A4(f, a, b, c, d), - _1: {ctor: '[]'} - }; - }, - ld); - }, - lc); - }, - lb); - }, - la); - }); -var _elm_community$list_extra$List_Extra$andMap = F2( - function (l, fl) { - return A3( - _elm_lang$core$List$map2, - F2( - function (x, y) { - return x(y); - }), - fl, - l); - }); -var _elm_community$list_extra$List_Extra$uniqueHelp = F3( - function (f, existing, remaining) { - uniqueHelp: - while (true) { - var _p64 = remaining; - if (_p64.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p66 = _p64._1; - var _p65 = _p64._0; - var computedFirst = f(_p65); - if (A2(_elm_lang$core$Set$member, computedFirst, existing)) { - var _v44 = f, - _v45 = existing, - _v46 = _p66; - f = _v44; - existing = _v45; - remaining = _v46; - continue uniqueHelp; - } else { - return { - ctor: '::', - _0: _p65, - _1: A3( - _elm_community$list_extra$List_Extra$uniqueHelp, - f, - A2(_elm_lang$core$Set$insert, computedFirst, existing), - _p66) - }; - } - } - } - }); -var _elm_community$list_extra$List_Extra$uniqueBy = F2( - function (f, list) { - return A3(_elm_community$list_extra$List_Extra$uniqueHelp, f, _elm_lang$core$Set$empty, list); - }); -var _elm_community$list_extra$List_Extra$allDifferentBy = F2( - function (f, list) { - return _elm_lang$core$Native_Utils.eq( - _elm_lang$core$List$length(list), - _elm_lang$core$List$length( - A2(_elm_community$list_extra$List_Extra$uniqueBy, f, list))); - }); -var _elm_community$list_extra$List_Extra$allDifferent = function (list) { - return A2(_elm_community$list_extra$List_Extra$allDifferentBy, _elm_lang$core$Basics$identity, list); -}; -var _elm_community$list_extra$List_Extra$unique = function (list) { - return A3(_elm_community$list_extra$List_Extra$uniqueHelp, _elm_lang$core$Basics$identity, _elm_lang$core$Set$empty, list); -}; -var _elm_community$list_extra$List_Extra$dropWhile = F2( - function (predicate, list) { - dropWhile: - while (true) { - var _p67 = list; - if (_p67.ctor === '[]') { - return {ctor: '[]'}; - } else { - if (predicate(_p67._0)) { - var _v48 = predicate, - _v49 = _p67._1; - predicate = _v48; - list = _v49; - continue dropWhile; - } else { - return list; - } - } - } - }); -var _elm_community$list_extra$List_Extra$takeWhile = function (predicate) { - var takeWhileMemo = F2( - function (memo, list) { - takeWhileMemo: - while (true) { - var _p68 = list; - if (_p68.ctor === '[]') { - return _elm_lang$core$List$reverse(memo); - } else { - var _p69 = _p68._0; - if (predicate(_p69)) { - var _v51 = {ctor: '::', _0: _p69, _1: memo}, - _v52 = _p68._1; - memo = _v51; - list = _v52; - continue takeWhileMemo; - } else { - return _elm_lang$core$List$reverse(memo); - } - } - } - }); - return takeWhileMemo( - {ctor: '[]'}); -}; -var _elm_community$list_extra$List_Extra$span = F2( - function (p, xs) { - return { - ctor: '_Tuple2', - _0: A2(_elm_community$list_extra$List_Extra$takeWhile, p, xs), - _1: A2(_elm_community$list_extra$List_Extra$dropWhile, p, xs) - }; - }); -var _elm_community$list_extra$List_Extra$break = function (p) { - return _elm_community$list_extra$List_Extra$span( - function (_p70) { - return !p(_p70); - }); -}; -var _elm_community$list_extra$List_Extra$groupWhile = F2( - function (eq, xs_) { - var _p71 = xs_; - if (_p71.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p73 = _p71._0; - var _p72 = A2( - _elm_community$list_extra$List_Extra$span, - eq(_p73), - _p71._1); - var ys = _p72._0; - var zs = _p72._1; - return { - ctor: '::', - _0: {ctor: '::', _0: _p73, _1: ys}, - _1: A2(_elm_community$list_extra$List_Extra$groupWhile, eq, zs) - }; - } - }); -var _elm_community$list_extra$List_Extra$group = _elm_community$list_extra$List_Extra$groupWhile( - F2( - function (x, y) { - return _elm_lang$core$Native_Utils.eq(x, y); - })); -var _elm_community$list_extra$List_Extra$minimumBy = F2( - function (f, ls) { - var minBy = F2( - function (x, _p74) { - var _p75 = _p74; - var _p76 = _p75._1; - var fx = f(x); - return (_elm_lang$core$Native_Utils.cmp(fx, _p76) < 0) ? {ctor: '_Tuple2', _0: x, _1: fx} : {ctor: '_Tuple2', _0: _p75._0, _1: _p76}; - }); - var _p77 = ls; - if (_p77.ctor === '::') { - if (_p77._1.ctor === '[]') { - return _elm_lang$core$Maybe$Just(_p77._0); - } else { - var _p78 = _p77._0; - return _elm_lang$core$Maybe$Just( - _elm_lang$core$Tuple$first( - A3( - _elm_lang$core$List$foldl, - minBy, - { - ctor: '_Tuple2', - _0: _p78, - _1: f(_p78) - }, - _p77._1))); - } - } else { - return _elm_lang$core$Maybe$Nothing; - } - }); -var _elm_community$list_extra$List_Extra$maximumBy = F2( - function (f, ls) { - var maxBy = F2( - function (x, _p79) { - var _p80 = _p79; - var _p81 = _p80._1; - var fx = f(x); - return (_elm_lang$core$Native_Utils.cmp(fx, _p81) > 0) ? {ctor: '_Tuple2', _0: x, _1: fx} : {ctor: '_Tuple2', _0: _p80._0, _1: _p81}; - }); - var _p82 = ls; - if (_p82.ctor === '::') { - if (_p82._1.ctor === '[]') { - return _elm_lang$core$Maybe$Just(_p82._0); - } else { - var _p83 = _p82._0; - return _elm_lang$core$Maybe$Just( - _elm_lang$core$Tuple$first( - A3( - _elm_lang$core$List$foldl, - maxBy, - { - ctor: '_Tuple2', - _0: _p83, - _1: f(_p83) - }, - _p82._1))); - } - } else { - return _elm_lang$core$Maybe$Nothing; - } - }); -var _elm_community$list_extra$List_Extra$uncons = function (xs) { - var _p84 = xs; - if (_p84.ctor === '[]') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Maybe$Just( - {ctor: '_Tuple2', _0: _p84._0, _1: _p84._1}); - } -}; -var _elm_community$list_extra$List_Extra$swapAt = F3( - function (index1, index2, l) { - swapAt: - while (true) { - if (_elm_lang$core$Native_Utils.eq(index1, index2)) { - return _elm_lang$core$Maybe$Just(l); - } else { - if (_elm_lang$core$Native_Utils.cmp(index1, index2) > 0) { - var _v59 = index2, - _v60 = index1, - _v61 = l; - index1 = _v59; - index2 = _v60; - l = _v61; - continue swapAt; - } else { - if (_elm_lang$core$Native_Utils.cmp(index1, 0) < 0) { - return _elm_lang$core$Maybe$Nothing; - } else { - var _p85 = A2(_elm_community$list_extra$List_Extra$splitAt, index1, l); - var part1 = _p85._0; - var tail1 = _p85._1; - var _p86 = A2(_elm_community$list_extra$List_Extra$splitAt, index2 - index1, tail1); - var head2 = _p86._0; - var tail2 = _p86._1; - return A3( - _elm_lang$core$Maybe$map2, - F2( - function (_p88, _p87) { - var _p89 = _p88; - var _p90 = _p87; - return _elm_lang$core$List$concat( - { - ctor: '::', - _0: part1, - _1: { - ctor: '::', - _0: {ctor: '::', _0: _p90._0, _1: _p89._1}, - _1: { - ctor: '::', - _0: {ctor: '::', _0: _p89._0, _1: _p90._1}, - _1: {ctor: '[]'} - } - } - }); - }), - _elm_community$list_extra$List_Extra$uncons(head2), - _elm_community$list_extra$List_Extra$uncons(tail2)); - } - } - } - } - }); -var _elm_community$list_extra$List_Extra$iterate = F2( - function (f, x) { - var _p91 = f(x); - if (_p91.ctor === 'Just') { - return { - ctor: '::', - _0: x, - _1: A2(_elm_community$list_extra$List_Extra$iterate, f, _p91._0) - }; - } else { - return { - ctor: '::', - _0: x, - _1: {ctor: '[]'} - }; - } - }); -var _elm_community$list_extra$List_Extra$getAt = F2( - function (idx, xs) { - return (_elm_lang$core$Native_Utils.cmp(idx, 0) < 0) ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$List$head( - A2(_elm_lang$core$List$drop, idx, xs)); - }); -var _elm_community$list_extra$List_Extra_ops = _elm_community$list_extra$List_Extra_ops || {}; -_elm_community$list_extra$List_Extra_ops['!!'] = _elm_lang$core$Basics$flip(_elm_community$list_extra$List_Extra$getAt); -var _elm_community$list_extra$List_Extra$init = function () { - var maybe = F2( - function (d, f) { - return function (_p92) { - return A2( - _elm_lang$core$Maybe$withDefault, - d, - A2(_elm_lang$core$Maybe$map, f, _p92)); - }; - }); - return A2( - _elm_lang$core$List$foldr, - function (x) { - return function (_p93) { - return _elm_lang$core$Maybe$Just( - A3( - maybe, - {ctor: '[]'}, - F2( - function (x, y) { - return {ctor: '::', _0: x, _1: y}; - })(x), - _p93)); - }; - }, - _elm_lang$core$Maybe$Nothing); -}(); -var _elm_community$list_extra$List_Extra$last = _elm_community$list_extra$List_Extra$foldl1( - _elm_lang$core$Basics$flip(_elm_lang$core$Basics$always)); - -//import Maybe, Native.List // - -var _elm_lang$core$Native_Regex = function() { - -function escape(str) -{ - return str.replace(/[-\/\\^$*+?.()|[\]{}]/g, '\\$&'); -} -function caseInsensitive(re) -{ - return new RegExp(re.source, 'gi'); -} -function regex(raw) -{ - return new RegExp(raw, 'g'); -} - -function contains(re, string) -{ - return string.match(re) !== null; -} - -function find(n, re, str) -{ - n = n.ctor === 'All' ? Infinity : n._0; - var out = []; - var number = 0; - var string = str; - var lastIndex = re.lastIndex; - var prevLastIndex = -1; - var result; - while (number++ < n && (result = re.exec(string))) - { - if (prevLastIndex === re.lastIndex) break; - var i = result.length - 1; - var subs = new Array(i); - while (i > 0) - { - var submatch = result[i]; - subs[--i] = submatch === undefined - ? _elm_lang$core$Maybe$Nothing - : _elm_lang$core$Maybe$Just(submatch); - } - out.push({ - match: result[0], - submatches: _elm_lang$core$Native_List.fromArray(subs), - index: result.index, - number: number - }); - prevLastIndex = re.lastIndex; - } - re.lastIndex = lastIndex; - return _elm_lang$core$Native_List.fromArray(out); -} - -function replace(n, re, replacer, string) -{ - n = n.ctor === 'All' ? Infinity : n._0; - var count = 0; - function jsReplacer(match) - { - if (count++ >= n) - { - return match; - } - var i = arguments.length - 3; - var submatches = new Array(i); - while (i > 0) - { - var submatch = arguments[i]; - submatches[--i] = submatch === undefined - ? _elm_lang$core$Maybe$Nothing - : _elm_lang$core$Maybe$Just(submatch); - } - return replacer({ - match: match, - submatches: _elm_lang$core$Native_List.fromArray(submatches), - index: arguments[arguments.length - 2], - number: count - }); - } - return string.replace(re, jsReplacer); -} - -function split(n, re, str) -{ - n = n.ctor === 'All' ? Infinity : n._0; - if (n === Infinity) - { - return _elm_lang$core$Native_List.fromArray(str.split(re)); - } - var string = str; - var result; - var out = []; - var start = re.lastIndex; - var restoreLastIndex = re.lastIndex; - while (n--) - { - if (!(result = re.exec(string))) break; - out.push(string.slice(start, result.index)); - start = re.lastIndex; - } - out.push(string.slice(start)); - re.lastIndex = restoreLastIndex; - return _elm_lang$core$Native_List.fromArray(out); -} - -return { - regex: regex, - caseInsensitive: caseInsensitive, - escape: escape, - - contains: F2(contains), - find: F3(find), - replace: F4(replace), - split: F3(split) -}; - -}(); - -var _elm_lang$core$Regex$split = _elm_lang$core$Native_Regex.split; -var _elm_lang$core$Regex$replace = _elm_lang$core$Native_Regex.replace; -var _elm_lang$core$Regex$find = _elm_lang$core$Native_Regex.find; -var _elm_lang$core$Regex$contains = _elm_lang$core$Native_Regex.contains; -var _elm_lang$core$Regex$caseInsensitive = _elm_lang$core$Native_Regex.caseInsensitive; -var _elm_lang$core$Regex$regex = _elm_lang$core$Native_Regex.regex; -var _elm_lang$core$Regex$escape = _elm_lang$core$Native_Regex.escape; -var _elm_lang$core$Regex$Match = F4( - function (a, b, c, d) { - return {match: a, submatches: b, index: c, number: d}; - }); -var _elm_lang$core$Regex$Regex = {ctor: 'Regex'}; -var _elm_lang$core$Regex$AtMost = function (a) { - return {ctor: 'AtMost', _0: a}; -}; -var _elm_lang$core$Regex$All = {ctor: 'All'}; - -var _elm_lang$core$Native_Bitwise = function() { - -return { - and: F2(function and(a, b) { return a & b; }), - or: F2(function or(a, b) { return a | b; }), - xor: F2(function xor(a, b) { return a ^ b; }), - complement: function complement(a) { return ~a; }, - shiftLeftBy: F2(function(offset, a) { return a << offset; }), - shiftRightBy: F2(function(offset, a) { return a >> offset; }), - shiftRightZfBy: F2(function(offset, a) { return a >>> offset; }) -}; - -}(); - -var _elm_lang$core$Bitwise$shiftRightZfBy = _elm_lang$core$Native_Bitwise.shiftRightZfBy; -var _elm_lang$core$Bitwise$shiftRightBy = _elm_lang$core$Native_Bitwise.shiftRightBy; -var _elm_lang$core$Bitwise$shiftLeftBy = _elm_lang$core$Native_Bitwise.shiftLeftBy; -var _elm_lang$core$Bitwise$complement = _elm_lang$core$Native_Bitwise.complement; -var _elm_lang$core$Bitwise$xor = _elm_lang$core$Native_Bitwise.xor; -var _elm_lang$core$Bitwise$or = _elm_lang$core$Native_Bitwise.or; -var _elm_lang$core$Bitwise$and = _elm_lang$core$Native_Bitwise.and; - -var _elm_community$string_extra$String_Extra$nonEmpty = function (string) { - return _elm_lang$core$String$isEmpty(string) ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$Maybe$Just(string); -}; -var _elm_community$string_extra$String_Extra$replacementCodePoint = 65533; -var _elm_community$string_extra$String_Extra$toCodePoints = function (string) { - var allCodeUnits = A2( - _elm_lang$core$List$map, - _elm_lang$core$Char$toCode, - _elm_lang$core$String$toList(string)); - var combineAndReverse = F2( - function (codeUnits, accumulated) { - combineAndReverse: - while (true) { - var _p0 = codeUnits; - if (_p0.ctor === '[]') { - return accumulated; - } else { - var _p4 = _p0._0; - var _p3 = _p0._1; - if ((_elm_lang$core$Native_Utils.cmp(_p4, 0) > -1) && (_elm_lang$core$Native_Utils.cmp(_p4, 55295) < 1)) { - var _v1 = _p3, - _v2 = {ctor: '::', _0: _p4, _1: accumulated}; - codeUnits = _v1; - accumulated = _v2; - continue combineAndReverse; - } else { - if ((_elm_lang$core$Native_Utils.cmp(_p4, 55296) > -1) && (_elm_lang$core$Native_Utils.cmp(_p4, 56319) < 1)) { - var _p1 = _p3; - if (_p1.ctor === '[]') { - return {ctor: '::', _0: _elm_community$string_extra$String_Extra$replacementCodePoint, _1: accumulated}; - } else { - var _p2 = _p1._0; - if ((_elm_lang$core$Native_Utils.cmp(_p2, 56320) > -1) && (_elm_lang$core$Native_Utils.cmp(_p2, 57343) < 1)) { - var codePoint = (65536 + ((_p4 - 55296) * 1024)) + (_p2 - 56320); - var _v4 = _p1._1, - _v5 = {ctor: '::', _0: codePoint, _1: accumulated}; - codeUnits = _v4; - accumulated = _v5; - continue combineAndReverse; - } else { - var _v6 = _p3, - _v7 = {ctor: '::', _0: _elm_community$string_extra$String_Extra$replacementCodePoint, _1: accumulated}; - codeUnits = _v6; - accumulated = _v7; - continue combineAndReverse; - } - } - } else { - if ((_elm_lang$core$Native_Utils.cmp(_p4, 57344) > -1) && (_elm_lang$core$Native_Utils.cmp(_p4, 65535) < 1)) { - var _v8 = _p3, - _v9 = {ctor: '::', _0: _p4, _1: accumulated}; - codeUnits = _v8; - accumulated = _v9; - continue combineAndReverse; - } else { - var _v10 = _p3, - _v11 = {ctor: '::', _0: _elm_community$string_extra$String_Extra$replacementCodePoint, _1: accumulated}; - codeUnits = _v10; - accumulated = _v11; - continue combineAndReverse; - } - } - } - } - } - }); - return _elm_lang$core$List$reverse( - A2( - combineAndReverse, - allCodeUnits, - {ctor: '[]'})); -}; -var _elm_community$string_extra$String_Extra$fromCodePoints = function (allCodePoints) { - var splitAndReverse = F2( - function (codePoints, accumulated) { - splitAndReverse: - while (true) { - var _p5 = codePoints; - if (_p5.ctor === '[]') { - return accumulated; - } else { - var _p7 = _p5._1; - var _p6 = _p5._0; - if ((_elm_lang$core$Native_Utils.cmp(_p6, 0) > -1) && (_elm_lang$core$Native_Utils.cmp(_p6, 55295) < 1)) { - var _v13 = _p7, - _v14 = {ctor: '::', _0: _p6, _1: accumulated}; - codePoints = _v13; - accumulated = _v14; - continue splitAndReverse; - } else { - if ((_elm_lang$core$Native_Utils.cmp(_p6, 65536) > -1) && (_elm_lang$core$Native_Utils.cmp(_p6, 1114111) < 1)) { - var subtracted = _p6 - 65536; - var leading = (subtracted >> 10) + 55296; - var trailing = (subtracted & 1023) + 56320; - var _v15 = _p7, - _v16 = { - ctor: '::', - _0: trailing, - _1: {ctor: '::', _0: leading, _1: accumulated} - }; - codePoints = _v15; - accumulated = _v16; - continue splitAndReverse; - } else { - if ((_elm_lang$core$Native_Utils.cmp(_p6, 57344) > -1) && (_elm_lang$core$Native_Utils.cmp(_p6, 65535) < 1)) { - var _v17 = _p7, - _v18 = {ctor: '::', _0: _p6, _1: accumulated}; - codePoints = _v17; - accumulated = _v18; - continue splitAndReverse; - } else { - var _v19 = _p7, - _v20 = {ctor: '::', _0: _elm_community$string_extra$String_Extra$replacementCodePoint, _1: accumulated}; - codePoints = _v19; - accumulated = _v20; - continue splitAndReverse; - } - } - } - } - } - }); - var allCodeUnits = _elm_lang$core$List$reverse( - A2( - splitAndReverse, - allCodePoints, - {ctor: '[]'})); - return _elm_lang$core$String$fromList( - A2(_elm_lang$core$List$map, _elm_lang$core$Char$fromCode, allCodeUnits)); -}; -var _elm_community$string_extra$String_Extra$fromFloat = _elm_lang$core$Basics$toString; -var _elm_community$string_extra$String_Extra$fromInt = _elm_lang$core$Basics$toString; -var _elm_community$string_extra$String_Extra$leftOfBack = F2( - function (pattern, string) { - return A2( - _elm_lang$core$Maybe$withDefault, - '', - A2( - _elm_lang$core$Maybe$map, - A2(_elm_lang$core$Basics$flip, _elm_lang$core$String$left, string), - _elm_lang$core$List$head( - _elm_lang$core$List$reverse( - A2(_elm_lang$core$String$indexes, pattern, string))))); - }); -var _elm_community$string_extra$String_Extra$rightOfBack = F2( - function (pattern, string) { - return A2( - _elm_lang$core$Maybe$withDefault, - '', - A2( - _elm_lang$core$Maybe$map, - function (_p8) { - return A3( - _elm_lang$core$Basics$flip, - _elm_lang$core$String$dropLeft, - string, - A2( - F2( - function (x, y) { - return x + y; - }), - _elm_lang$core$String$length(pattern), - _p8)); - }, - _elm_lang$core$List$head( - _elm_lang$core$List$reverse( - A2(_elm_lang$core$String$indexes, pattern, string))))); - }); -var _elm_community$string_extra$String_Extra$firstResultHelp = F2( - function ($default, list) { - firstResultHelp: - while (true) { - var _p9 = list; - if (_p9.ctor === '[]') { - return $default; - } else { - if (_p9._0.ctor === 'Just') { - return _p9._0._0; - } else { - var _v22 = $default, - _v23 = _p9._1; - $default = _v22; - list = _v23; - continue firstResultHelp; - } - } - } - }); -var _elm_community$string_extra$String_Extra$firstResult = function (list) { - return A2(_elm_community$string_extra$String_Extra$firstResultHelp, '', list); -}; -var _elm_community$string_extra$String_Extra$leftOf = F2( - function (pattern, string) { - return A2( - _elm_lang$core$String$join, - '', - A2( - _elm_lang$core$List$map, - function (_p10) { - return _elm_community$string_extra$String_Extra$firstResult( - function (_) { - return _.submatches; - }(_p10)); - }, - A3( - _elm_lang$core$Regex$find, - _elm_lang$core$Regex$AtMost(1), - _elm_lang$core$Regex$regex( - A2( - _elm_lang$core$Basics_ops['++'], - '^(.*?)', - _elm_lang$core$Regex$escape(pattern))), - string))); - }); -var _elm_community$string_extra$String_Extra$rightOf = F2( - function (pattern, string) { - return A2( - _elm_lang$core$String$join, - '', - A2( - _elm_lang$core$List$map, - function (_p11) { - return _elm_community$string_extra$String_Extra$firstResult( - function (_) { - return _.submatches; - }(_p11)); - }, - A3( - _elm_lang$core$Regex$find, - _elm_lang$core$Regex$AtMost(1), - _elm_lang$core$Regex$regex( - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Regex$escape(pattern), - '(.*)$')), - string))); - }); -var _elm_community$string_extra$String_Extra$pluralize = F3( - function (singular, plural, count) { - return _elm_lang$core$Native_Utils.eq(count, 1) ? A2(_elm_lang$core$Basics_ops['++'], '1 ', singular) : A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(count), - A2(_elm_lang$core$Basics_ops['++'], ' ', plural)); - }); -var _elm_community$string_extra$String_Extra$stripTags = function (string) { - return A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('<\\/?[^>]+>'), - _elm_lang$core$Basics$always(''), - string); -}; -var _elm_community$string_extra$String_Extra$toSentenceHelper = F3( - function (lastPart, sentence, list) { - toSentenceHelper: - while (true) { - var _p12 = list; - if (_p12.ctor === '[]') { - return sentence; - } else { - if (_p12._1.ctor === '[]') { - return A2( - _elm_lang$core$Basics_ops['++'], - sentence, - A2(_elm_lang$core$Basics_ops['++'], lastPart, _p12._0)); - } else { - var _v25 = lastPart, - _v26 = A2( - _elm_lang$core$Basics_ops['++'], - sentence, - A2(_elm_lang$core$Basics_ops['++'], ', ', _p12._0)), - _v27 = _p12._1; - lastPart = _v25; - sentence = _v26; - list = _v27; - continue toSentenceHelper; - } - } - } - }); -var _elm_community$string_extra$String_Extra$toSentenceBaseCase = function (list) { - var _p13 = list; - _v28_2: - do { - if (_p13.ctor === '::') { - if (_p13._1.ctor === '[]') { - return _p13._0; - } else { - if (_p13._1._1.ctor === '[]') { - return A2( - _elm_lang$core$Basics_ops['++'], - _p13._0, - A2(_elm_lang$core$Basics_ops['++'], ' and ', _p13._1._0)); - } else { - break _v28_2; - } - } - } else { - break _v28_2; - } - } while(false); - return ''; -}; -var _elm_community$string_extra$String_Extra$toSentenceOxford = function (list) { - var _p14 = list; - if (((_p14.ctor === '::') && (_p14._1.ctor === '::')) && (_p14._1._1.ctor === '::')) { - return A3( - _elm_community$string_extra$String_Extra$toSentenceHelper, - ', and ', - A2( - _elm_lang$core$Basics_ops['++'], - _p14._0, - A2(_elm_lang$core$Basics_ops['++'], ', ', _p14._1._0)), - {ctor: '::', _0: _p14._1._1._0, _1: _p14._1._1._1}); - } else { - return _elm_community$string_extra$String_Extra$toSentenceBaseCase(list); - } -}; -var _elm_community$string_extra$String_Extra$toSentence = function (list) { - var _p15 = list; - if (((_p15.ctor === '::') && (_p15._1.ctor === '::')) && (_p15._1._1.ctor === '::')) { - return A3( - _elm_community$string_extra$String_Extra$toSentenceHelper, - ' and ', - A2( - _elm_lang$core$Basics_ops['++'], - _p15._0, - A2(_elm_lang$core$Basics_ops['++'], ', ', _p15._1._0)), - {ctor: '::', _0: _p15._1._1._0, _1: _p15._1._1._1}); - } else { - return _elm_community$string_extra$String_Extra$toSentenceBaseCase(list); - } -}; -var _elm_community$string_extra$String_Extra$ellipsisWith = F3( - function (howLong, append, string) { - return (_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$String$length(string), - howLong) < 1) ? string : A2( - _elm_lang$core$Basics_ops['++'], - A2( - _elm_lang$core$String$left, - howLong - _elm_lang$core$String$length(append), - string), - append); - }); -var _elm_community$string_extra$String_Extra$ellipsis = F2( - function (howLong, string) { - return A3(_elm_community$string_extra$String_Extra$ellipsisWith, howLong, '...', string); - }); -var _elm_community$string_extra$String_Extra$countOccurrences = F2( - function (needle, haystack) { - return (_elm_lang$core$Native_Utils.eq( - _elm_lang$core$String$length(needle), - 0) || _elm_lang$core$Native_Utils.eq( - _elm_lang$core$String$length(haystack), - 0)) ? 0 : _elm_lang$core$List$length( - A2(_elm_lang$core$String$indexes, needle, haystack)); - }); -var _elm_community$string_extra$String_Extra$unindent = function (multilineSting) { - var isNotWhitespace = function ($char) { - return (!_elm_lang$core$Native_Utils.eq( - $char, - _elm_lang$core$Native_Utils.chr(' '))) && (!_elm_lang$core$Native_Utils.eq( - $char, - _elm_lang$core$Native_Utils.chr('\t'))); - }; - var countLeadingWhitespace = F2( - function (count, line) { - countLeadingWhitespace: - while (true) { - var _p16 = _elm_lang$core$String$uncons(line); - if (_p16.ctor === 'Nothing') { - return count; - } else { - var _p18 = _p16._0._1; - var _p17 = _p16._0._0; - switch (_p17.valueOf()) { - case ' ': - var _v33 = count + 1, - _v34 = _p18; - count = _v33; - line = _v34; - continue countLeadingWhitespace; - case '\t': - var _v35 = count + 1, - _v36 = _p18; - count = _v35; - line = _v36; - continue countLeadingWhitespace; - default: - return count; - } - } - } - }); - var lines = _elm_lang$core$String$lines(multilineSting); - var minLead = A2( - _elm_lang$core$Maybe$withDefault, - 0, - _elm_lang$core$List$minimum( - A2( - _elm_lang$core$List$map, - countLeadingWhitespace(0), - A2( - _elm_lang$core$List$filter, - _elm_lang$core$String$any(isNotWhitespace), - lines)))); - return A2( - _elm_lang$core$String$join, - '\n', - A2( - _elm_lang$core$List$map, - _elm_lang$core$String$dropLeft(minLead), - lines)); -}; -var _elm_community$string_extra$String_Extra$dasherize = function (string) { - return _elm_lang$core$String$toLower( - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('[_-\\s]+'), - _elm_lang$core$Basics$always('-'), - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('([A-Z])'), - function (_p19) { - return A2( - _elm_lang$core$String$append, - '-', - function (_) { - return _.match; - }(_p19)); - }, - _elm_lang$core$String$trim(string)))); -}; -var _elm_community$string_extra$String_Extra$underscored = function (string) { - return _elm_lang$core$String$toLower( - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('[_-\\s]+'), - _elm_lang$core$Basics$always('_'), - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('([a-z\\d])([A-Z]+)'), - function (_p20) { - return A2( - _elm_lang$core$String$join, - '_', - A2( - _elm_lang$core$List$filterMap, - _elm_lang$core$Basics$identity, - function (_) { - return _.submatches; - }(_p20))); - }, - _elm_lang$core$String$trim(string)))); -}; -var _elm_community$string_extra$String_Extra$unsurround = F2( - function (wrap, string) { - if (A2(_elm_lang$core$String$startsWith, wrap, string) && A2(_elm_lang$core$String$endsWith, wrap, string)) { - var length = _elm_lang$core$String$length(wrap); - return A2( - _elm_lang$core$String$dropRight, - length, - A2(_elm_lang$core$String$dropLeft, length, string)); - } else { - return string; - } - }); -var _elm_community$string_extra$String_Extra$unquote = function (string) { - return A2(_elm_community$string_extra$String_Extra$unsurround, '\"', string); -}; -var _elm_community$string_extra$String_Extra$surround = F2( - function (wrap, string) { - return A2( - _elm_lang$core$Basics_ops['++'], - wrap, - A2(_elm_lang$core$Basics_ops['++'], string, wrap)); - }); -var _elm_community$string_extra$String_Extra$quote = function (string) { - return A2(_elm_community$string_extra$String_Extra$surround, '\"', string); -}; -var _elm_community$string_extra$String_Extra$camelize = function (string) { - return A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('[-_\\s]+(.)?'), - function (_p21) { - var _p22 = _p21; - var _p23 = _p22.submatches; - if ((_p23.ctor === '::') && (_p23._0.ctor === 'Just')) { - return _elm_lang$core$String$toUpper(_p23._0._0); - } else { - return ''; - } - }, - _elm_lang$core$String$trim(string)); -}; -var _elm_community$string_extra$String_Extra$isBlank = function (string) { - return A2( - _elm_lang$core$Regex$contains, - _elm_lang$core$Regex$regex('^\\s*$'), - string); -}; -var _elm_community$string_extra$String_Extra$clean = function (string) { - return _elm_lang$core$String$trim( - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('\\s\\s+'), - _elm_lang$core$Basics$always(' '), - string)); -}; -var _elm_community$string_extra$String_Extra$softBreakRegexp = function (width) { - return _elm_lang$core$Regex$regex( - A2( - _elm_lang$core$Basics_ops['++'], - '.{1,', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(width), - '}(\\s+|$)|\\S+?(\\s+|$)'))); -}; -var _elm_community$string_extra$String_Extra$softEllipsis = F2( - function (howLong, string) { - return (_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$String$length(string), - howLong) < 1) ? string : A3( - _elm_lang$core$Basics$flip, - _elm_lang$core$String$append, - '...', - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('([\\.,;:\\s])+$'), - _elm_lang$core$Basics$always(''), - A2( - _elm_lang$core$String$join, - '', - A2( - _elm_lang$core$List$map, - function (_) { - return _.match; - }, - A3( - _elm_lang$core$Regex$find, - _elm_lang$core$Regex$AtMost(1), - _elm_community$string_extra$String_Extra$softBreakRegexp(howLong), - string))))); - }); -var _elm_community$string_extra$String_Extra$softBreak = F2( - function (width, string) { - return (_elm_lang$core$Native_Utils.cmp(width, 0) < 1) ? {ctor: '[]'} : A2( - _elm_lang$core$List$map, - function (_) { - return _.match; - }, - A3( - _elm_lang$core$Regex$find, - _elm_lang$core$Regex$All, - _elm_community$string_extra$String_Extra$softBreakRegexp(width), - string)); - }); -var _elm_community$string_extra$String_Extra$softWrapWith = F3( - function (width, separator, string) { - return A2( - _elm_lang$core$String$join, - separator, - A2(_elm_community$string_extra$String_Extra$softBreak, width, string)); - }); -var _elm_community$string_extra$String_Extra$softWrap = F2( - function (width, string) { - return A3(_elm_community$string_extra$String_Extra$softWrapWith, width, '\n', string); - }); -var _elm_community$string_extra$String_Extra$breaker = F3( - function (width, string, acc) { - breaker: - while (true) { - var _p24 = string; - if (_p24 === '') { - return _elm_lang$core$List$reverse(acc); - } else { - var _v40 = width, - _v41 = A2(_elm_lang$core$String$dropLeft, width, string), - _v42 = { - ctor: '::', - _0: A3(_elm_lang$core$String$slice, 0, width, string), - _1: acc - }; - width = _v40; - string = _v41; - acc = _v42; - continue breaker; - } - } - }); -var _elm_community$string_extra$String_Extra$break = F2( - function (width, string) { - return (_elm_lang$core$Native_Utils.eq(width, 0) || _elm_lang$core$Native_Utils.eq(string, '')) ? { - ctor: '::', - _0: string, - _1: {ctor: '[]'} - } : A3( - _elm_community$string_extra$String_Extra$breaker, - width, - string, - {ctor: '[]'}); - }); -var _elm_community$string_extra$String_Extra$wrapWith = F3( - function (width, separator, string) { - return A2( - _elm_lang$core$String$join, - separator, - A2(_elm_community$string_extra$String_Extra$break, width, string)); - }); -var _elm_community$string_extra$String_Extra$wrap = F2( - function (width, string) { - return A3(_elm_community$string_extra$String_Extra$wrapWith, width, '\n', string); - }); -var _elm_community$string_extra$String_Extra$replaceSlice = F4( - function (substitution, start, end, string) { - return A2( - _elm_lang$core$Basics_ops['++'], - A3(_elm_lang$core$String$slice, 0, start, string), - A2( - _elm_lang$core$Basics_ops['++'], - substitution, - A3( - _elm_lang$core$String$slice, - end, - _elm_lang$core$String$length(string), - string))); - }); -var _elm_community$string_extra$String_Extra$insertAt = F3( - function (insert, pos, string) { - return A4(_elm_community$string_extra$String_Extra$replaceSlice, insert, pos, pos, string); - }); -var _elm_community$string_extra$String_Extra$replace = F3( - function (search, substitution, string) { - return A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex( - _elm_lang$core$Regex$escape(search)), - function (_p25) { - return substitution; - }, - string); - }); -var _elm_community$string_extra$String_Extra$changeCase = F2( - function (mutator, word) { - return A2( - _elm_lang$core$Maybe$withDefault, - '', - A2( - _elm_lang$core$Maybe$map, - function (_p26) { - var _p27 = _p26; - return A2( - _elm_lang$core$String$cons, - mutator(_p27._0), - _p27._1); - }, - _elm_lang$core$String$uncons(word))); - }); -var _elm_community$string_extra$String_Extra$toSentenceCase = function (word) { - return A2(_elm_community$string_extra$String_Extra$changeCase, _elm_lang$core$Char$toUpper, word); -}; -var _elm_community$string_extra$String_Extra$toTitleCase = function (ws) { - var uppercaseMatch = A3( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('\\w+'), - function (_p28) { - return _elm_community$string_extra$String_Extra$toSentenceCase( - function (_) { - return _.match; - }(_p28)); - }); - return A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('^([a-z])|\\s+([a-z])'), - function (_p29) { - return uppercaseMatch( - function (_) { - return _.match; - }(_p29)); - }, - ws); -}; -var _elm_community$string_extra$String_Extra$classify = function (string) { - return _elm_community$string_extra$String_Extra$toSentenceCase( - A3( - _elm_community$string_extra$String_Extra$replace, - ' ', - '', - _elm_community$string_extra$String_Extra$camelize( - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('[\\W_]'), - _elm_lang$core$Basics$always(' '), - string)))); -}; -var _elm_community$string_extra$String_Extra$humanize = function (string) { - return _elm_community$string_extra$String_Extra$toSentenceCase( - _elm_lang$core$String$toLower( - _elm_lang$core$String$trim( - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('_id$|[-_\\s]+'), - _elm_lang$core$Basics$always(' '), - A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _elm_lang$core$Regex$regex('[A-Z]'), - function (_p30) { - return A2( - _elm_lang$core$String$append, - '-', - function (_) { - return _.match; - }(_p30)); - }, - string))))); -}; -var _elm_community$string_extra$String_Extra$decapitalize = function (word) { - return A2(_elm_community$string_extra$String_Extra$changeCase, _elm_lang$core$Char$toLower, word); -}; - -//import Result // - -var _elm_lang$core$Native_Date = function() { - -function fromString(str) -{ - var date = new Date(str); - return isNaN(date.getTime()) - ? _elm_lang$core$Result$Err('Unable to parse \'' + str + '\' as a date. Dates must be in the ISO 8601 format.') - : _elm_lang$core$Result$Ok(date); -} - -var dayTable = ['Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat']; -var monthTable = - ['Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', - 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec']; - - -return { - fromString: fromString, - year: function(d) { return d.getFullYear(); }, - month: function(d) { return { ctor: monthTable[d.getMonth()] }; }, - day: function(d) { return d.getDate(); }, - hour: function(d) { return d.getHours(); }, - minute: function(d) { return d.getMinutes(); }, - second: function(d) { return d.getSeconds(); }, - millisecond: function(d) { return d.getMilliseconds(); }, - toTime: function(d) { return d.getTime(); }, - fromTime: function(t) { return new Date(t); }, - dayOfWeek: function(d) { return { ctor: dayTable[d.getDay()] }; } -}; - -}(); -var _elm_lang$core$Task$onError = _elm_lang$core$Native_Scheduler.onError; -var _elm_lang$core$Task$andThen = _elm_lang$core$Native_Scheduler.andThen; -var _elm_lang$core$Task$spawnCmd = F2( - function (router, _p0) { - var _p1 = _p0; - return _elm_lang$core$Native_Scheduler.spawn( - A2( - _elm_lang$core$Task$andThen, - _elm_lang$core$Platform$sendToApp(router), - _p1._0)); - }); -var _elm_lang$core$Task$fail = _elm_lang$core$Native_Scheduler.fail; -var _elm_lang$core$Task$mapError = F2( - function (convert, task) { - return A2( - _elm_lang$core$Task$onError, - function (_p2) { - return _elm_lang$core$Task$fail( - convert(_p2)); - }, - task); - }); -var _elm_lang$core$Task$succeed = _elm_lang$core$Native_Scheduler.succeed; -var _elm_lang$core$Task$map = F2( - function (func, taskA) { - return A2( - _elm_lang$core$Task$andThen, - function (a) { - return _elm_lang$core$Task$succeed( - func(a)); - }, - taskA); - }); -var _elm_lang$core$Task$map2 = F3( - function (func, taskA, taskB) { - return A2( - _elm_lang$core$Task$andThen, - function (a) { - return A2( - _elm_lang$core$Task$andThen, - function (b) { - return _elm_lang$core$Task$succeed( - A2(func, a, b)); - }, - taskB); - }, - taskA); - }); -var _elm_lang$core$Task$map3 = F4( - function (func, taskA, taskB, taskC) { - return A2( - _elm_lang$core$Task$andThen, - function (a) { - return A2( - _elm_lang$core$Task$andThen, - function (b) { - return A2( - _elm_lang$core$Task$andThen, - function (c) { - return _elm_lang$core$Task$succeed( - A3(func, a, b, c)); - }, - taskC); - }, - taskB); - }, - taskA); - }); -var _elm_lang$core$Task$map4 = F5( - function (func, taskA, taskB, taskC, taskD) { - return A2( - _elm_lang$core$Task$andThen, - function (a) { - return A2( - _elm_lang$core$Task$andThen, - function (b) { - return A2( - _elm_lang$core$Task$andThen, - function (c) { - return A2( - _elm_lang$core$Task$andThen, - function (d) { - return _elm_lang$core$Task$succeed( - A4(func, a, b, c, d)); - }, - taskD); - }, - taskC); - }, - taskB); - }, - taskA); - }); -var _elm_lang$core$Task$map5 = F6( - function (func, taskA, taskB, taskC, taskD, taskE) { - return A2( - _elm_lang$core$Task$andThen, - function (a) { - return A2( - _elm_lang$core$Task$andThen, - function (b) { - return A2( - _elm_lang$core$Task$andThen, - function (c) { - return A2( - _elm_lang$core$Task$andThen, - function (d) { - return A2( - _elm_lang$core$Task$andThen, - function (e) { - return _elm_lang$core$Task$succeed( - A5(func, a, b, c, d, e)); - }, - taskE); - }, - taskD); - }, - taskC); - }, - taskB); - }, - taskA); - }); -var _elm_lang$core$Task$sequence = function (tasks) { - var _p3 = tasks; - if (_p3.ctor === '[]') { - return _elm_lang$core$Task$succeed( - {ctor: '[]'}); - } else { - return A3( - _elm_lang$core$Task$map2, - F2( - function (x, y) { - return {ctor: '::', _0: x, _1: y}; - }), - _p3._0, - _elm_lang$core$Task$sequence(_p3._1)); - } -}; -var _elm_lang$core$Task$onEffects = F3( - function (router, commands, state) { - return A2( - _elm_lang$core$Task$map, - function (_p4) { - return {ctor: '_Tuple0'}; - }, - _elm_lang$core$Task$sequence( - A2( - _elm_lang$core$List$map, - _elm_lang$core$Task$spawnCmd(router), - commands))); - }); -var _elm_lang$core$Task$init = _elm_lang$core$Task$succeed( - {ctor: '_Tuple0'}); -var _elm_lang$core$Task$onSelfMsg = F3( - function (_p7, _p6, _p5) { - return _elm_lang$core$Task$succeed( - {ctor: '_Tuple0'}); - }); -var _elm_lang$core$Task$command = _elm_lang$core$Native_Platform.leaf('Task'); -var _elm_lang$core$Task$Perform = function (a) { - return {ctor: 'Perform', _0: a}; -}; -var _elm_lang$core$Task$perform = F2( - function (toMessage, task) { - return _elm_lang$core$Task$command( - _elm_lang$core$Task$Perform( - A2(_elm_lang$core$Task$map, toMessage, task))); - }); -var _elm_lang$core$Task$attempt = F2( - function (resultToMessage, task) { - return _elm_lang$core$Task$command( - _elm_lang$core$Task$Perform( - A2( - _elm_lang$core$Task$onError, - function (_p8) { - return _elm_lang$core$Task$succeed( - resultToMessage( - _elm_lang$core$Result$Err(_p8))); - }, - A2( - _elm_lang$core$Task$andThen, - function (_p9) { - return _elm_lang$core$Task$succeed( - resultToMessage( - _elm_lang$core$Result$Ok(_p9))); - }, - task)))); - }); -var _elm_lang$core$Task$cmdMap = F2( - function (tagger, _p10) { - var _p11 = _p10; - return _elm_lang$core$Task$Perform( - A2(_elm_lang$core$Task$map, tagger, _p11._0)); - }); -_elm_lang$core$Native_Platform.effectManagers['Task'] = {pkg: 'elm-lang/core', init: _elm_lang$core$Task$init, onEffects: _elm_lang$core$Task$onEffects, onSelfMsg: _elm_lang$core$Task$onSelfMsg, tag: 'cmd', cmdMap: _elm_lang$core$Task$cmdMap}; - -//import Native.Scheduler // - -var _elm_lang$core$Native_Time = function() { - -var now = _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) -{ - callback(_elm_lang$core$Native_Scheduler.succeed(Date.now())); -}); - -function setInterval_(interval, task) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - var id = setInterval(function() { - _elm_lang$core$Native_Scheduler.rawSpawn(task); - }, interval); - - return function() { clearInterval(id); }; - }); -} - -return { - now: now, - setInterval_: F2(setInterval_) -}; - -}(); -var _elm_lang$core$Time$setInterval = _elm_lang$core$Native_Time.setInterval_; -var _elm_lang$core$Time$spawnHelp = F3( - function (router, intervals, processes) { - var _p0 = intervals; - if (_p0.ctor === '[]') { - return _elm_lang$core$Task$succeed(processes); - } else { - var _p1 = _p0._0; - var spawnRest = function (id) { - return A3( - _elm_lang$core$Time$spawnHelp, - router, - _p0._1, - A3(_elm_lang$core$Dict$insert, _p1, id, processes)); - }; - var spawnTimer = _elm_lang$core$Native_Scheduler.spawn( - A2( - _elm_lang$core$Time$setInterval, - _p1, - A2(_elm_lang$core$Platform$sendToSelf, router, _p1))); - return A2(_elm_lang$core$Task$andThen, spawnRest, spawnTimer); - } - }); -var _elm_lang$core$Time$addMySub = F2( - function (_p2, state) { - var _p3 = _p2; - var _p6 = _p3._1; - var _p5 = _p3._0; - var _p4 = A2(_elm_lang$core$Dict$get, _p5, state); - if (_p4.ctor === 'Nothing') { - return A3( - _elm_lang$core$Dict$insert, - _p5, - { - ctor: '::', - _0: _p6, - _1: {ctor: '[]'} - }, - state); - } else { - return A3( - _elm_lang$core$Dict$insert, - _p5, - {ctor: '::', _0: _p6, _1: _p4._0}, - state); - } - }); -var _elm_lang$core$Time$inMilliseconds = function (t) { - return t; -}; -var _elm_lang$core$Time$millisecond = 1; -var _elm_lang$core$Time$second = 1000 * _elm_lang$core$Time$millisecond; -var _elm_lang$core$Time$minute = 60 * _elm_lang$core$Time$second; -var _elm_lang$core$Time$hour = 60 * _elm_lang$core$Time$minute; -var _elm_lang$core$Time$inHours = function (t) { - return t / _elm_lang$core$Time$hour; -}; -var _elm_lang$core$Time$inMinutes = function (t) { - return t / _elm_lang$core$Time$minute; -}; -var _elm_lang$core$Time$inSeconds = function (t) { - return t / _elm_lang$core$Time$second; -}; -var _elm_lang$core$Time$now = _elm_lang$core$Native_Time.now; -var _elm_lang$core$Time$onSelfMsg = F3( - function (router, interval, state) { - var _p7 = A2(_elm_lang$core$Dict$get, interval, state.taggers); - if (_p7.ctor === 'Nothing') { - return _elm_lang$core$Task$succeed(state); - } else { - var tellTaggers = function (time) { - return _elm_lang$core$Task$sequence( - A2( - _elm_lang$core$List$map, - function (tagger) { - return A2( - _elm_lang$core$Platform$sendToApp, - router, - tagger(time)); - }, - _p7._0)); - }; - return A2( - _elm_lang$core$Task$andThen, - function (_p8) { - return _elm_lang$core$Task$succeed(state); - }, - A2(_elm_lang$core$Task$andThen, tellTaggers, _elm_lang$core$Time$now)); - } - }); -var _elm_lang$core$Time$subscription = _elm_lang$core$Native_Platform.leaf('Time'); -var _elm_lang$core$Time$State = F2( - function (a, b) { - return {taggers: a, processes: b}; - }); -var _elm_lang$core$Time$init = _elm_lang$core$Task$succeed( - A2(_elm_lang$core$Time$State, _elm_lang$core$Dict$empty, _elm_lang$core$Dict$empty)); -var _elm_lang$core$Time$onEffects = F3( - function (router, subs, _p9) { - var _p10 = _p9; - var rightStep = F3( - function (_p12, id, _p11) { - var _p13 = _p11; - return { - ctor: '_Tuple3', - _0: _p13._0, - _1: _p13._1, - _2: A2( - _elm_lang$core$Task$andThen, - function (_p14) { - return _p13._2; - }, - _elm_lang$core$Native_Scheduler.kill(id)) - }; - }); - var bothStep = F4( - function (interval, taggers, id, _p15) { - var _p16 = _p15; - return { - ctor: '_Tuple3', - _0: _p16._0, - _1: A3(_elm_lang$core$Dict$insert, interval, id, _p16._1), - _2: _p16._2 - }; - }); - var leftStep = F3( - function (interval, taggers, _p17) { - var _p18 = _p17; - return { - ctor: '_Tuple3', - _0: {ctor: '::', _0: interval, _1: _p18._0}, - _1: _p18._1, - _2: _p18._2 - }; - }); - var newTaggers = A3(_elm_lang$core$List$foldl, _elm_lang$core$Time$addMySub, _elm_lang$core$Dict$empty, subs); - var _p19 = A6( - _elm_lang$core$Dict$merge, - leftStep, - bothStep, - rightStep, - newTaggers, - _p10.processes, - { - ctor: '_Tuple3', - _0: {ctor: '[]'}, - _1: _elm_lang$core$Dict$empty, - _2: _elm_lang$core$Task$succeed( - {ctor: '_Tuple0'}) - }); - var spawnList = _p19._0; - var existingDict = _p19._1; - var killTask = _p19._2; - return A2( - _elm_lang$core$Task$andThen, - function (newProcesses) { - return _elm_lang$core$Task$succeed( - A2(_elm_lang$core$Time$State, newTaggers, newProcesses)); - }, - A2( - _elm_lang$core$Task$andThen, - function (_p20) { - return A3(_elm_lang$core$Time$spawnHelp, router, spawnList, existingDict); - }, - killTask)); - }); -var _elm_lang$core$Time$Every = F2( - function (a, b) { - return {ctor: 'Every', _0: a, _1: b}; - }); -var _elm_lang$core$Time$every = F2( - function (interval, tagger) { - return _elm_lang$core$Time$subscription( - A2(_elm_lang$core$Time$Every, interval, tagger)); - }); -var _elm_lang$core$Time$subMap = F2( - function (f, _p21) { - var _p22 = _p21; - return A2( - _elm_lang$core$Time$Every, - _p22._0, - function (_p23) { - return f( - _p22._1(_p23)); - }); - }); -_elm_lang$core$Native_Platform.effectManagers['Time'] = {pkg: 'elm-lang/core', init: _elm_lang$core$Time$init, onEffects: _elm_lang$core$Time$onEffects, onSelfMsg: _elm_lang$core$Time$onSelfMsg, tag: 'sub', subMap: _elm_lang$core$Time$subMap}; - -var _elm_lang$core$Date$millisecond = _elm_lang$core$Native_Date.millisecond; -var _elm_lang$core$Date$second = _elm_lang$core$Native_Date.second; -var _elm_lang$core$Date$minute = _elm_lang$core$Native_Date.minute; -var _elm_lang$core$Date$hour = _elm_lang$core$Native_Date.hour; -var _elm_lang$core$Date$dayOfWeek = _elm_lang$core$Native_Date.dayOfWeek; -var _elm_lang$core$Date$day = _elm_lang$core$Native_Date.day; -var _elm_lang$core$Date$month = _elm_lang$core$Native_Date.month; -var _elm_lang$core$Date$year = _elm_lang$core$Native_Date.year; -var _elm_lang$core$Date$fromTime = _elm_lang$core$Native_Date.fromTime; -var _elm_lang$core$Date$toTime = _elm_lang$core$Native_Date.toTime; -var _elm_lang$core$Date$fromString = _elm_lang$core$Native_Date.fromString; -var _elm_lang$core$Date$now = A2(_elm_lang$core$Task$map, _elm_lang$core$Date$fromTime, _elm_lang$core$Time$now); -var _elm_lang$core$Date$Date = {ctor: 'Date'}; -var _elm_lang$core$Date$Sun = {ctor: 'Sun'}; -var _elm_lang$core$Date$Sat = {ctor: 'Sat'}; -var _elm_lang$core$Date$Fri = {ctor: 'Fri'}; -var _elm_lang$core$Date$Thu = {ctor: 'Thu'}; -var _elm_lang$core$Date$Wed = {ctor: 'Wed'}; -var _elm_lang$core$Date$Tue = {ctor: 'Tue'}; -var _elm_lang$core$Date$Mon = {ctor: 'Mon'}; -var _elm_lang$core$Date$Dec = {ctor: 'Dec'}; -var _elm_lang$core$Date$Nov = {ctor: 'Nov'}; -var _elm_lang$core$Date$Oct = {ctor: 'Oct'}; -var _elm_lang$core$Date$Sep = {ctor: 'Sep'}; -var _elm_lang$core$Date$Aug = {ctor: 'Aug'}; -var _elm_lang$core$Date$Jul = {ctor: 'Jul'}; -var _elm_lang$core$Date$Jun = {ctor: 'Jun'}; -var _elm_lang$core$Date$May = {ctor: 'May'}; -var _elm_lang$core$Date$Apr = {ctor: 'Apr'}; -var _elm_lang$core$Date$Mar = {ctor: 'Mar'}; -var _elm_lang$core$Date$Feb = {ctor: 'Feb'}; -var _elm_lang$core$Date$Jan = {ctor: 'Jan'}; - -var _elm_lang$core$Process$kill = _elm_lang$core$Native_Scheduler.kill; -var _elm_lang$core$Process$sleep = _elm_lang$core$Native_Scheduler.sleep; -var _elm_lang$core$Process$spawn = _elm_lang$core$Native_Scheduler.spawn; - -var _elm_lang$dom$Native_Dom = function() { - -var fakeNode = { - addEventListener: function() {}, - removeEventListener: function() {} -}; - -var onDocument = on(typeof document !== 'undefined' ? document : fakeNode); -var onWindow = on(typeof window !== 'undefined' ? window : fakeNode); - -function on(node) -{ - return function(eventName, decoder, toTask) - { - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) { - - function performTask(event) - { - var result = A2(_elm_lang$core$Json_Decode$decodeValue, decoder, event); - if (result.ctor === 'Ok') - { - _elm_lang$core$Native_Scheduler.rawSpawn(toTask(result._0)); - } - } - - node.addEventListener(eventName, performTask); - - return function() - { - node.removeEventListener(eventName, performTask); - }; - }); - }; -} - -var rAF = typeof requestAnimationFrame !== 'undefined' - ? requestAnimationFrame - : function(callback) { callback(); }; - -function withNode(id, doStuff) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - rAF(function() - { - var node = document.getElementById(id); - if (node === null) - { - callback(_elm_lang$core$Native_Scheduler.fail({ ctor: 'NotFound', _0: id })); - return; - } - callback(_elm_lang$core$Native_Scheduler.succeed(doStuff(node))); - }); - }); -} - - -// FOCUS - -function focus(id) -{ - return withNode(id, function(node) { - node.focus(); - return _elm_lang$core$Native_Utils.Tuple0; - }); -} - -function blur(id) -{ - return withNode(id, function(node) { - node.blur(); - return _elm_lang$core$Native_Utils.Tuple0; - }); -} - - -// SCROLLING - -function getScrollTop(id) -{ - return withNode(id, function(node) { - return node.scrollTop; - }); -} - -function setScrollTop(id, desiredScrollTop) -{ - return withNode(id, function(node) { - node.scrollTop = desiredScrollTop; - return _elm_lang$core$Native_Utils.Tuple0; - }); -} - -function toBottom(id) -{ - return withNode(id, function(node) { - node.scrollTop = node.scrollHeight; - return _elm_lang$core$Native_Utils.Tuple0; - }); -} - -function getScrollLeft(id) -{ - return withNode(id, function(node) { - return node.scrollLeft; - }); -} - -function setScrollLeft(id, desiredScrollLeft) -{ - return withNode(id, function(node) { - node.scrollLeft = desiredScrollLeft; - return _elm_lang$core$Native_Utils.Tuple0; - }); -} - -function toRight(id) -{ - return withNode(id, function(node) { - node.scrollLeft = node.scrollWidth; - return _elm_lang$core$Native_Utils.Tuple0; - }); -} - - -// SIZE - -function width(options, id) -{ - return withNode(id, function(node) { - switch (options.ctor) - { - case 'Content': - return node.scrollWidth; - case 'VisibleContent': - return node.clientWidth; - case 'VisibleContentWithBorders': - return node.offsetWidth; - case 'VisibleContentWithBordersAndMargins': - var rect = node.getBoundingClientRect(); - return rect.right - rect.left; - } - }); -} - -function height(options, id) -{ - return withNode(id, function(node) { - switch (options.ctor) - { - case 'Content': - return node.scrollHeight; - case 'VisibleContent': - return node.clientHeight; - case 'VisibleContentWithBorders': - return node.offsetHeight; - case 'VisibleContentWithBordersAndMargins': - var rect = node.getBoundingClientRect(); - return rect.bottom - rect.top; - } - }); -} - -return { - onDocument: F3(onDocument), - onWindow: F3(onWindow), - - focus: focus, - blur: blur, - - getScrollTop: getScrollTop, - setScrollTop: F2(setScrollTop), - getScrollLeft: getScrollLeft, - setScrollLeft: F2(setScrollLeft), - toBottom: toBottom, - toRight: toRight, - - height: F2(height), - width: F2(width) -}; - -}(); - -var _elm_lang$dom$Dom_LowLevel$onWindow = _elm_lang$dom$Native_Dom.onWindow; -var _elm_lang$dom$Dom_LowLevel$onDocument = _elm_lang$dom$Native_Dom.onDocument; - -var _elm_lang$virtual_dom$VirtualDom_Debug$wrap; -var _elm_lang$virtual_dom$VirtualDom_Debug$wrapWithFlags; - -var _elm_lang$virtual_dom$Native_VirtualDom = function() { - -var STYLE_KEY = 'STYLE'; -var EVENT_KEY = 'EVENT'; -var ATTR_KEY = 'ATTR'; -var ATTR_NS_KEY = 'ATTR_NS'; - -var localDoc = typeof document !== 'undefined' ? document : {}; - - -//////////// VIRTUAL DOM NODES //////////// - - -function text(string) -{ - return { - type: 'text', - text: string - }; -} - - -function node(tag) -{ - return F2(function(factList, kidList) { - return nodeHelp(tag, factList, kidList); - }); -} - - -function nodeHelp(tag, factList, kidList) -{ - var organized = organizeFacts(factList); - var namespace = organized.namespace; - var facts = organized.facts; - - var children = []; - var descendantsCount = 0; - while (kidList.ctor !== '[]') - { - var kid = kidList._0; - descendantsCount += (kid.descendantsCount || 0); - children.push(kid); - kidList = kidList._1; - } - descendantsCount += children.length; - - return { - type: 'node', - tag: tag, - facts: facts, - children: children, - namespace: namespace, - descendantsCount: descendantsCount - }; -} - - -function keyedNode(tag, factList, kidList) -{ - var organized = organizeFacts(factList); - var namespace = organized.namespace; - var facts = organized.facts; - - var children = []; - var descendantsCount = 0; - while (kidList.ctor !== '[]') - { - var kid = kidList._0; - descendantsCount += (kid._1.descendantsCount || 0); - children.push(kid); - kidList = kidList._1; - } - descendantsCount += children.length; - - return { - type: 'keyed-node', - tag: tag, - facts: facts, - children: children, - namespace: namespace, - descendantsCount: descendantsCount - }; -} - - -function custom(factList, model, impl) -{ - var facts = organizeFacts(factList).facts; - - return { - type: 'custom', - facts: facts, - model: model, - impl: impl - }; -} - - -function map(tagger, node) -{ - return { - type: 'tagger', - tagger: tagger, - node: node, - descendantsCount: 1 + (node.descendantsCount || 0) - }; -} - - -function thunk(func, args, thunk) -{ - return { - type: 'thunk', - func: func, - args: args, - thunk: thunk, - node: undefined - }; -} - -function lazy(fn, a) -{ - return thunk(fn, [a], function() { - return fn(a); - }); -} - -function lazy2(fn, a, b) -{ - return thunk(fn, [a,b], function() { - return A2(fn, a, b); - }); -} - -function lazy3(fn, a, b, c) -{ - return thunk(fn, [a,b,c], function() { - return A3(fn, a, b, c); - }); -} - - - -// FACTS - - -function organizeFacts(factList) -{ - var namespace, facts = {}; - - while (factList.ctor !== '[]') - { - var entry = factList._0; - var key = entry.key; - - if (key === ATTR_KEY || key === ATTR_NS_KEY || key === EVENT_KEY) - { - var subFacts = facts[key] || {}; - subFacts[entry.realKey] = entry.value; - facts[key] = subFacts; - } - else if (key === STYLE_KEY) - { - var styles = facts[key] || {}; - var styleList = entry.value; - while (styleList.ctor !== '[]') - { - var style = styleList._0; - styles[style._0] = style._1; - styleList = styleList._1; - } - facts[key] = styles; - } - else if (key === 'namespace') - { - namespace = entry.value; - } - else if (key === 'className') - { - var classes = facts[key]; - facts[key] = typeof classes === 'undefined' - ? entry.value - : classes + ' ' + entry.value; - } - else - { - facts[key] = entry.value; - } - factList = factList._1; - } - - return { - facts: facts, - namespace: namespace - }; -} - - - -//////////// PROPERTIES AND ATTRIBUTES //////////// - - -function style(value) -{ - return { - key: STYLE_KEY, - value: value - }; -} - - -function property(key, value) -{ - return { - key: key, - value: value - }; -} - - -function attribute(key, value) -{ - return { - key: ATTR_KEY, - realKey: key, - value: value - }; -} - - -function attributeNS(namespace, key, value) -{ - return { - key: ATTR_NS_KEY, - realKey: key, - value: { - value: value, - namespace: namespace - } - }; -} - - -function on(name, options, decoder) -{ - return { - key: EVENT_KEY, - realKey: name, - value: { - options: options, - decoder: decoder - } - }; -} - - -function equalEvents(a, b) -{ - if (a.options !== b.options) - { - if (a.options.stopPropagation !== b.options.stopPropagation || a.options.preventDefault !== b.options.preventDefault) - { - return false; - } - } - return _elm_lang$core$Native_Json.equality(a.decoder, b.decoder); -} - - -function mapProperty(func, property) -{ - if (property.key !== EVENT_KEY) - { - return property; - } - return on( - property.realKey, - property.value.options, - A2(_elm_lang$core$Json_Decode$map, func, property.value.decoder) - ); -} - - -//////////// RENDER //////////// - - -function render(vNode, eventNode) -{ - switch (vNode.type) - { - case 'thunk': - if (!vNode.node) - { - vNode.node = vNode.thunk(); - } - return render(vNode.node, eventNode); - - case 'tagger': - var subNode = vNode.node; - var tagger = vNode.tagger; - - while (subNode.type === 'tagger') - { - typeof tagger !== 'object' - ? tagger = [tagger, subNode.tagger] - : tagger.push(subNode.tagger); - - subNode = subNode.node; - } - - var subEventRoot = { tagger: tagger, parent: eventNode }; - var domNode = render(subNode, subEventRoot); - domNode.elm_event_node_ref = subEventRoot; - return domNode; - - case 'text': - return localDoc.createTextNode(vNode.text); - - case 'node': - var domNode = vNode.namespace - ? localDoc.createElementNS(vNode.namespace, vNode.tag) - : localDoc.createElement(vNode.tag); - - applyFacts(domNode, eventNode, vNode.facts); - - var children = vNode.children; - - for (var i = 0; i < children.length; i++) - { - domNode.appendChild(render(children[i], eventNode)); - } - - return domNode; - - case 'keyed-node': - var domNode = vNode.namespace - ? localDoc.createElementNS(vNode.namespace, vNode.tag) - : localDoc.createElement(vNode.tag); - - applyFacts(domNode, eventNode, vNode.facts); - - var children = vNode.children; - - for (var i = 0; i < children.length; i++) - { - domNode.appendChild(render(children[i]._1, eventNode)); - } - - return domNode; - - case 'custom': - var domNode = vNode.impl.render(vNode.model); - applyFacts(domNode, eventNode, vNode.facts); - return domNode; - } -} - - - -//////////// APPLY FACTS //////////// - - -function applyFacts(domNode, eventNode, facts) -{ - for (var key in facts) - { - var value = facts[key]; - - switch (key) - { - case STYLE_KEY: - applyStyles(domNode, value); - break; - - case EVENT_KEY: - applyEvents(domNode, eventNode, value); - break; - - case ATTR_KEY: - applyAttrs(domNode, value); - break; - - case ATTR_NS_KEY: - applyAttrsNS(domNode, value); - break; - - case 'value': - if (domNode[key] !== value) - { - domNode[key] = value; - } - break; - - default: - domNode[key] = value; - break; - } - } -} - -function applyStyles(domNode, styles) -{ - var domNodeStyle = domNode.style; - - for (var key in styles) - { - domNodeStyle[key] = styles[key]; - } -} - -function applyEvents(domNode, eventNode, events) -{ - var allHandlers = domNode.elm_handlers || {}; - - for (var key in events) - { - var handler = allHandlers[key]; - var value = events[key]; - - if (typeof value === 'undefined') - { - domNode.removeEventListener(key, handler); - allHandlers[key] = undefined; - } - else if (typeof handler === 'undefined') - { - var handler = makeEventHandler(eventNode, value); - domNode.addEventListener(key, handler); - allHandlers[key] = handler; - } - else - { - handler.info = value; - } - } - - domNode.elm_handlers = allHandlers; -} - -function makeEventHandler(eventNode, info) -{ - function eventHandler(event) - { - var info = eventHandler.info; - - var value = A2(_elm_lang$core$Native_Json.run, info.decoder, event); - - if (value.ctor === 'Ok') - { - var options = info.options; - if (options.stopPropagation) - { - event.stopPropagation(); - } - if (options.preventDefault) - { - event.preventDefault(); - } - - var message = value._0; - - var currentEventNode = eventNode; - while (currentEventNode) - { - var tagger = currentEventNode.tagger; - if (typeof tagger === 'function') - { - message = tagger(message); - } - else - { - for (var i = tagger.length; i--; ) - { - message = tagger[i](message); - } - } - currentEventNode = currentEventNode.parent; - } - } - }; - - eventHandler.info = info; - - return eventHandler; -} - -function applyAttrs(domNode, attrs) -{ - for (var key in attrs) - { - var value = attrs[key]; - if (typeof value === 'undefined') - { - domNode.removeAttribute(key); - } - else - { - domNode.setAttribute(key, value); - } - } -} - -function applyAttrsNS(domNode, nsAttrs) -{ - for (var key in nsAttrs) - { - var pair = nsAttrs[key]; - var namespace = pair.namespace; - var value = pair.value; - - if (typeof value === 'undefined') - { - domNode.removeAttributeNS(namespace, key); - } - else - { - domNode.setAttributeNS(namespace, key, value); - } - } -} - - - -//////////// DIFF //////////// - - -function diff(a, b) -{ - var patches = []; - diffHelp(a, b, patches, 0); - return patches; -} - - -function makePatch(type, index, data) -{ - return { - index: index, - type: type, - data: data, - domNode: undefined, - eventNode: undefined - }; -} - - -function diffHelp(a, b, patches, index) -{ - if (a === b) - { - return; - } - - var aType = a.type; - var bType = b.type; - - // Bail if you run into different types of nodes. Implies that the - // structure has changed significantly and it's not worth a diff. - if (aType !== bType) - { - patches.push(makePatch('p-redraw', index, b)); - return; - } - - // Now we know that both nodes are the same type. - switch (bType) - { - case 'thunk': - var aArgs = a.args; - var bArgs = b.args; - var i = aArgs.length; - var same = a.func === b.func && i === bArgs.length; - while (same && i--) - { - same = aArgs[i] === bArgs[i]; - } - if (same) - { - b.node = a.node; - return; - } - b.node = b.thunk(); - var subPatches = []; - diffHelp(a.node, b.node, subPatches, 0); - if (subPatches.length > 0) - { - patches.push(makePatch('p-thunk', index, subPatches)); - } - return; - - case 'tagger': - // gather nested taggers - var aTaggers = a.tagger; - var bTaggers = b.tagger; - var nesting = false; - - var aSubNode = a.node; - while (aSubNode.type === 'tagger') - { - nesting = true; - - typeof aTaggers !== 'object' - ? aTaggers = [aTaggers, aSubNode.tagger] - : aTaggers.push(aSubNode.tagger); - - aSubNode = aSubNode.node; - } - - var bSubNode = b.node; - while (bSubNode.type === 'tagger') - { - nesting = true; - - typeof bTaggers !== 'object' - ? bTaggers = [bTaggers, bSubNode.tagger] - : bTaggers.push(bSubNode.tagger); - - bSubNode = bSubNode.node; - } - - // Just bail if different numbers of taggers. This implies the - // structure of the virtual DOM has changed. - if (nesting && aTaggers.length !== bTaggers.length) - { - patches.push(makePatch('p-redraw', index, b)); - return; - } - - // check if taggers are "the same" - if (nesting ? !pairwiseRefEqual(aTaggers, bTaggers) : aTaggers !== bTaggers) - { - patches.push(makePatch('p-tagger', index, bTaggers)); - } - - // diff everything below the taggers - diffHelp(aSubNode, bSubNode, patches, index + 1); - return; - - case 'text': - if (a.text !== b.text) - { - patches.push(makePatch('p-text', index, b.text)); - return; - } - - return; - - case 'node': - // Bail if obvious indicators have changed. Implies more serious - // structural changes such that it's not worth it to diff. - if (a.tag !== b.tag || a.namespace !== b.namespace) - { - patches.push(makePatch('p-redraw', index, b)); - return; - } - - var factsDiff = diffFacts(a.facts, b.facts); - - if (typeof factsDiff !== 'undefined') - { - patches.push(makePatch('p-facts', index, factsDiff)); - } - - diffChildren(a, b, patches, index); - return; - - case 'keyed-node': - // Bail if obvious indicators have changed. Implies more serious - // structural changes such that it's not worth it to diff. - if (a.tag !== b.tag || a.namespace !== b.namespace) - { - patches.push(makePatch('p-redraw', index, b)); - return; - } - - var factsDiff = diffFacts(a.facts, b.facts); - - if (typeof factsDiff !== 'undefined') - { - patches.push(makePatch('p-facts', index, factsDiff)); - } - - diffKeyedChildren(a, b, patches, index); - return; - - case 'custom': - if (a.impl !== b.impl) - { - patches.push(makePatch('p-redraw', index, b)); - return; - } - - var factsDiff = diffFacts(a.facts, b.facts); - if (typeof factsDiff !== 'undefined') - { - patches.push(makePatch('p-facts', index, factsDiff)); - } - - var patch = b.impl.diff(a,b); - if (patch) - { - patches.push(makePatch('p-custom', index, patch)); - return; - } - - return; - } -} - - -// assumes the incoming arrays are the same length -function pairwiseRefEqual(as, bs) -{ - for (var i = 0; i < as.length; i++) - { - if (as[i] !== bs[i]) - { - return false; - } - } - - return true; -} - - -// TODO Instead of creating a new diff object, it's possible to just test if -// there *is* a diff. During the actual patch, do the diff again and make the -// modifications directly. This way, there's no new allocations. Worth it? -function diffFacts(a, b, category) -{ - var diff; - - // look for changes and removals - for (var aKey in a) - { - if (aKey === STYLE_KEY || aKey === EVENT_KEY || aKey === ATTR_KEY || aKey === ATTR_NS_KEY) - { - var subDiff = diffFacts(a[aKey], b[aKey] || {}, aKey); - if (subDiff) - { - diff = diff || {}; - diff[aKey] = subDiff; - } - continue; - } - - // remove if not in the new facts - if (!(aKey in b)) - { - diff = diff || {}; - diff[aKey] = - (typeof category === 'undefined') - ? (typeof a[aKey] === 'string' ? '' : null) - : - (category === STYLE_KEY) - ? '' - : - (category === EVENT_KEY || category === ATTR_KEY) - ? undefined - : - { namespace: a[aKey].namespace, value: undefined }; - - continue; - } - - var aValue = a[aKey]; - var bValue = b[aKey]; - - // reference equal, so don't worry about it - if (aValue === bValue && aKey !== 'value' - || category === EVENT_KEY && equalEvents(aValue, bValue)) - { - continue; - } - - diff = diff || {}; - diff[aKey] = bValue; - } - - // add new stuff - for (var bKey in b) - { - if (!(bKey in a)) - { - diff = diff || {}; - diff[bKey] = b[bKey]; - } - } - - return diff; -} - - -function diffChildren(aParent, bParent, patches, rootIndex) -{ - var aChildren = aParent.children; - var bChildren = bParent.children; - - var aLen = aChildren.length; - var bLen = bChildren.length; - - // FIGURE OUT IF THERE ARE INSERTS OR REMOVALS - - if (aLen > bLen) - { - patches.push(makePatch('p-remove-last', rootIndex, aLen - bLen)); - } - else if (aLen < bLen) - { - patches.push(makePatch('p-append', rootIndex, bChildren.slice(aLen))); - } - - // PAIRWISE DIFF EVERYTHING ELSE - - var index = rootIndex; - var minLen = aLen < bLen ? aLen : bLen; - for (var i = 0; i < minLen; i++) - { - index++; - var aChild = aChildren[i]; - diffHelp(aChild, bChildren[i], patches, index); - index += aChild.descendantsCount || 0; - } -} - - - -//////////// KEYED DIFF //////////// - - -function diffKeyedChildren(aParent, bParent, patches, rootIndex) -{ - var localPatches = []; - - var changes = {}; // Dict String Entry - var inserts = []; // Array { index : Int, entry : Entry } - // type Entry = { tag : String, vnode : VNode, index : Int, data : _ } - - var aChildren = aParent.children; - var bChildren = bParent.children; - var aLen = aChildren.length; - var bLen = bChildren.length; - var aIndex = 0; - var bIndex = 0; - - var index = rootIndex; - - while (aIndex < aLen && bIndex < bLen) - { - var a = aChildren[aIndex]; - var b = bChildren[bIndex]; - - var aKey = a._0; - var bKey = b._0; - var aNode = a._1; - var bNode = b._1; - - // check if keys match - - if (aKey === bKey) - { - index++; - diffHelp(aNode, bNode, localPatches, index); - index += aNode.descendantsCount || 0; - - aIndex++; - bIndex++; - continue; - } - - // look ahead 1 to detect insertions and removals. - - var aLookAhead = aIndex + 1 < aLen; - var bLookAhead = bIndex + 1 < bLen; - - if (aLookAhead) - { - var aNext = aChildren[aIndex + 1]; - var aNextKey = aNext._0; - var aNextNode = aNext._1; - var oldMatch = bKey === aNextKey; - } - - if (bLookAhead) - { - var bNext = bChildren[bIndex + 1]; - var bNextKey = bNext._0; - var bNextNode = bNext._1; - var newMatch = aKey === bNextKey; - } - - - // swap a and b - if (aLookAhead && bLookAhead && newMatch && oldMatch) - { - index++; - diffHelp(aNode, bNextNode, localPatches, index); - insertNode(changes, localPatches, aKey, bNode, bIndex, inserts); - index += aNode.descendantsCount || 0; - - index++; - removeNode(changes, localPatches, aKey, aNextNode, index); - index += aNextNode.descendantsCount || 0; - - aIndex += 2; - bIndex += 2; - continue; - } - - // insert b - if (bLookAhead && newMatch) - { - index++; - insertNode(changes, localPatches, bKey, bNode, bIndex, inserts); - diffHelp(aNode, bNextNode, localPatches, index); - index += aNode.descendantsCount || 0; - - aIndex += 1; - bIndex += 2; - continue; - } - - // remove a - if (aLookAhead && oldMatch) - { - index++; - removeNode(changes, localPatches, aKey, aNode, index); - index += aNode.descendantsCount || 0; - - index++; - diffHelp(aNextNode, bNode, localPatches, index); - index += aNextNode.descendantsCount || 0; - - aIndex += 2; - bIndex += 1; - continue; - } - - // remove a, insert b - if (aLookAhead && bLookAhead && aNextKey === bNextKey) - { - index++; - removeNode(changes, localPatches, aKey, aNode, index); - insertNode(changes, localPatches, bKey, bNode, bIndex, inserts); - index += aNode.descendantsCount || 0; - - index++; - diffHelp(aNextNode, bNextNode, localPatches, index); - index += aNextNode.descendantsCount || 0; - - aIndex += 2; - bIndex += 2; - continue; - } - - break; - } - - // eat up any remaining nodes with removeNode and insertNode - - while (aIndex < aLen) - { - index++; - var a = aChildren[aIndex]; - var aNode = a._1; - removeNode(changes, localPatches, a._0, aNode, index); - index += aNode.descendantsCount || 0; - aIndex++; - } - - var endInserts; - while (bIndex < bLen) - { - endInserts = endInserts || []; - var b = bChildren[bIndex]; - insertNode(changes, localPatches, b._0, b._1, undefined, endInserts); - bIndex++; - } - - if (localPatches.length > 0 || inserts.length > 0 || typeof endInserts !== 'undefined') - { - patches.push(makePatch('p-reorder', rootIndex, { - patches: localPatches, - inserts: inserts, - endInserts: endInserts - })); - } -} - - - -//////////// CHANGES FROM KEYED DIFF //////////// - - -var POSTFIX = '_elmW6BL'; - - -function insertNode(changes, localPatches, key, vnode, bIndex, inserts) -{ - var entry = changes[key]; - - // never seen this key before - if (typeof entry === 'undefined') - { - entry = { - tag: 'insert', - vnode: vnode, - index: bIndex, - data: undefined - }; - - inserts.push({ index: bIndex, entry: entry }); - changes[key] = entry; - - return; - } - - // this key was removed earlier, a match! - if (entry.tag === 'remove') - { - inserts.push({ index: bIndex, entry: entry }); - - entry.tag = 'move'; - var subPatches = []; - diffHelp(entry.vnode, vnode, subPatches, entry.index); - entry.index = bIndex; - entry.data.data = { - patches: subPatches, - entry: entry - }; - - return; - } - - // this key has already been inserted or moved, a duplicate! - insertNode(changes, localPatches, key + POSTFIX, vnode, bIndex, inserts); -} - - -function removeNode(changes, localPatches, key, vnode, index) -{ - var entry = changes[key]; - - // never seen this key before - if (typeof entry === 'undefined') - { - var patch = makePatch('p-remove', index, undefined); - localPatches.push(patch); - - changes[key] = { - tag: 'remove', - vnode: vnode, - index: index, - data: patch - }; - - return; - } - - // this key was inserted earlier, a match! - if (entry.tag === 'insert') - { - entry.tag = 'move'; - var subPatches = []; - diffHelp(vnode, entry.vnode, subPatches, index); - - var patch = makePatch('p-remove', index, { - patches: subPatches, - entry: entry - }); - localPatches.push(patch); - - return; - } - - // this key has already been removed or moved, a duplicate! - removeNode(changes, localPatches, key + POSTFIX, vnode, index); -} - - - -//////////// ADD DOM NODES //////////// -// -// Each DOM node has an "index" assigned in order of traversal. It is important -// to minimize our crawl over the actual DOM, so these indexes (along with the -// descendantsCount of virtual nodes) let us skip touching entire subtrees of -// the DOM if we know there are no patches there. - - -function addDomNodes(domNode, vNode, patches, eventNode) -{ - addDomNodesHelp(domNode, vNode, patches, 0, 0, vNode.descendantsCount, eventNode); -} - - -// assumes `patches` is non-empty and indexes increase monotonically. -function addDomNodesHelp(domNode, vNode, patches, i, low, high, eventNode) -{ - var patch = patches[i]; - var index = patch.index; - - while (index === low) - { - var patchType = patch.type; - - if (patchType === 'p-thunk') - { - addDomNodes(domNode, vNode.node, patch.data, eventNode); - } - else if (patchType === 'p-reorder') - { - patch.domNode = domNode; - patch.eventNode = eventNode; - - var subPatches = patch.data.patches; - if (subPatches.length > 0) - { - addDomNodesHelp(domNode, vNode, subPatches, 0, low, high, eventNode); - } - } - else if (patchType === 'p-remove') - { - patch.domNode = domNode; - patch.eventNode = eventNode; - - var data = patch.data; - if (typeof data !== 'undefined') - { - data.entry.data = domNode; - var subPatches = data.patches; - if (subPatches.length > 0) - { - addDomNodesHelp(domNode, vNode, subPatches, 0, low, high, eventNode); - } - } - } - else - { - patch.domNode = domNode; - patch.eventNode = eventNode; - } - - i++; - - if (!(patch = patches[i]) || (index = patch.index) > high) - { - return i; - } - } - - switch (vNode.type) - { - case 'tagger': - var subNode = vNode.node; - - while (subNode.type === "tagger") - { - subNode = subNode.node; - } - - return addDomNodesHelp(domNode, subNode, patches, i, low + 1, high, domNode.elm_event_node_ref); - - case 'node': - var vChildren = vNode.children; - var childNodes = domNode.childNodes; - for (var j = 0; j < vChildren.length; j++) - { - low++; - var vChild = vChildren[j]; - var nextLow = low + (vChild.descendantsCount || 0); - if (low <= index && index <= nextLow) - { - i = addDomNodesHelp(childNodes[j], vChild, patches, i, low, nextLow, eventNode); - if (!(patch = patches[i]) || (index = patch.index) > high) - { - return i; - } - } - low = nextLow; - } - return i; - - case 'keyed-node': - var vChildren = vNode.children; - var childNodes = domNode.childNodes; - for (var j = 0; j < vChildren.length; j++) - { - low++; - var vChild = vChildren[j]._1; - var nextLow = low + (vChild.descendantsCount || 0); - if (low <= index && index <= nextLow) - { - i = addDomNodesHelp(childNodes[j], vChild, patches, i, low, nextLow, eventNode); - if (!(patch = patches[i]) || (index = patch.index) > high) - { - return i; - } - } - low = nextLow; - } - return i; - - case 'text': - case 'thunk': - throw new Error('should never traverse `text` or `thunk` nodes like this'); - } -} - - - -//////////// APPLY PATCHES //////////// - - -function applyPatches(rootDomNode, oldVirtualNode, patches, eventNode) -{ - if (patches.length === 0) - { - return rootDomNode; - } - - addDomNodes(rootDomNode, oldVirtualNode, patches, eventNode); - return applyPatchesHelp(rootDomNode, patches); -} - -function applyPatchesHelp(rootDomNode, patches) -{ - for (var i = 0; i < patches.length; i++) - { - var patch = patches[i]; - var localDomNode = patch.domNode - var newNode = applyPatch(localDomNode, patch); - if (localDomNode === rootDomNode) - { - rootDomNode = newNode; - } - } - return rootDomNode; -} - -function applyPatch(domNode, patch) -{ - switch (patch.type) - { - case 'p-redraw': - return applyPatchRedraw(domNode, patch.data, patch.eventNode); - - case 'p-facts': - applyFacts(domNode, patch.eventNode, patch.data); - return domNode; - - case 'p-text': - domNode.replaceData(0, domNode.length, patch.data); - return domNode; - - case 'p-thunk': - return applyPatchesHelp(domNode, patch.data); - - case 'p-tagger': - if (typeof domNode.elm_event_node_ref !== 'undefined') - { - domNode.elm_event_node_ref.tagger = patch.data; - } - else - { - domNode.elm_event_node_ref = { tagger: patch.data, parent: patch.eventNode }; - } - return domNode; - - case 'p-remove-last': - var i = patch.data; - while (i--) - { - domNode.removeChild(domNode.lastChild); - } - return domNode; - - case 'p-append': - var newNodes = patch.data; - for (var i = 0; i < newNodes.length; i++) - { - domNode.appendChild(render(newNodes[i], patch.eventNode)); - } - return domNode; - - case 'p-remove': - var data = patch.data; - if (typeof data === 'undefined') - { - domNode.parentNode.removeChild(domNode); - return domNode; - } - var entry = data.entry; - if (typeof entry.index !== 'undefined') - { - domNode.parentNode.removeChild(domNode); - } - entry.data = applyPatchesHelp(domNode, data.patches); - return domNode; - - case 'p-reorder': - return applyPatchReorder(domNode, patch); - - case 'p-custom': - var impl = patch.data; - return impl.applyPatch(domNode, impl.data); - - default: - throw new Error('Ran into an unknown patch!'); - } -} - - -function applyPatchRedraw(domNode, vNode, eventNode) -{ - var parentNode = domNode.parentNode; - var newNode = render(vNode, eventNode); - - if (typeof newNode.elm_event_node_ref === 'undefined') - { - newNode.elm_event_node_ref = domNode.elm_event_node_ref; - } - - if (parentNode && newNode !== domNode) - { - parentNode.replaceChild(newNode, domNode); - } - return newNode; -} - - -function applyPatchReorder(domNode, patch) -{ - var data = patch.data; - - // remove end inserts - var frag = applyPatchReorderEndInsertsHelp(data.endInserts, patch); - - // removals - domNode = applyPatchesHelp(domNode, data.patches); - - // inserts - var inserts = data.inserts; - for (var i = 0; i < inserts.length; i++) - { - var insert = inserts[i]; - var entry = insert.entry; - var node = entry.tag === 'move' - ? entry.data - : render(entry.vnode, patch.eventNode); - domNode.insertBefore(node, domNode.childNodes[insert.index]); - } - - // add end inserts - if (typeof frag !== 'undefined') - { - domNode.appendChild(frag); - } - - return domNode; -} - - -function applyPatchReorderEndInsertsHelp(endInserts, patch) -{ - if (typeof endInserts === 'undefined') - { - return; - } - - var frag = localDoc.createDocumentFragment(); - for (var i = 0; i < endInserts.length; i++) - { - var insert = endInserts[i]; - var entry = insert.entry; - frag.appendChild(entry.tag === 'move' - ? entry.data - : render(entry.vnode, patch.eventNode) - ); - } - return frag; -} - - -// PROGRAMS - -var program = makeProgram(checkNoFlags); -var programWithFlags = makeProgram(checkYesFlags); - -function makeProgram(flagChecker) -{ - return F2(function(debugWrap, impl) - { - return function(flagDecoder) - { - return function(object, moduleName, debugMetadata) - { - var checker = flagChecker(flagDecoder, moduleName); - if (typeof debugMetadata === 'undefined') - { - normalSetup(impl, object, moduleName, checker); - } - else - { - debugSetup(A2(debugWrap, debugMetadata, impl), object, moduleName, checker); - } - }; - }; - }); -} - -function staticProgram(vNode) -{ - var nothing = _elm_lang$core$Native_Utils.Tuple2( - _elm_lang$core$Native_Utils.Tuple0, - _elm_lang$core$Platform_Cmd$none - ); - return A2(program, _elm_lang$virtual_dom$VirtualDom_Debug$wrap, { - init: nothing, - view: function() { return vNode; }, - update: F2(function() { return nothing; }), - subscriptions: function() { return _elm_lang$core$Platform_Sub$none; } - })(); -} - - -// FLAG CHECKERS - -function checkNoFlags(flagDecoder, moduleName) -{ - return function(init, flags, domNode) - { - if (typeof flags === 'undefined') - { - return init; - } - - var errorMessage = - 'The `' + moduleName + '` module does not need flags.\n' - + 'Initialize it with no arguments and you should be all set!'; - - crash(errorMessage, domNode); - }; -} - -function checkYesFlags(flagDecoder, moduleName) -{ - return function(init, flags, domNode) - { - if (typeof flagDecoder === 'undefined') - { - var errorMessage = - 'Are you trying to sneak a Never value into Elm? Trickster!\n' - + 'It looks like ' + moduleName + '.main is defined with `programWithFlags` but has type `Program Never`.\n' - + 'Use `program` instead if you do not want flags.' - - crash(errorMessage, domNode); - } - - var result = A2(_elm_lang$core$Native_Json.run, flagDecoder, flags); - if (result.ctor === 'Ok') - { - return init(result._0); - } - - var errorMessage = - 'Trying to initialize the `' + moduleName + '` module with an unexpected flag.\n' - + 'I tried to convert it to an Elm value, but ran into this problem:\n\n' - + result._0; - - crash(errorMessage, domNode); - }; -} - -function crash(errorMessage, domNode) -{ - if (domNode) - { - domNode.innerHTML = - '
' - + '

Oops! Something went wrong when starting your Elm program.

' - + '
' + errorMessage + '
' - + '
'; - } - - throw new Error(errorMessage); -} - - -// NORMAL SETUP - -function normalSetup(impl, object, moduleName, flagChecker) -{ - object['embed'] = function embed(node, flags) - { - while (node.lastChild) - { - node.removeChild(node.lastChild); - } - - return _elm_lang$core$Native_Platform.initialize( - flagChecker(impl.init, flags, node), - impl.update, - impl.subscriptions, - normalRenderer(node, impl.view) - ); - }; - - object['fullscreen'] = function fullscreen(flags) - { - return _elm_lang$core$Native_Platform.initialize( - flagChecker(impl.init, flags, document.body), - impl.update, - impl.subscriptions, - normalRenderer(document.body, impl.view) - ); - }; -} - -function normalRenderer(parentNode, view) -{ - return function(tagger, initialModel) - { - var eventNode = { tagger: tagger, parent: undefined }; - var initialVirtualNode = view(initialModel); - var domNode = render(initialVirtualNode, eventNode); - parentNode.appendChild(domNode); - return makeStepper(domNode, view, initialVirtualNode, eventNode); - }; -} - - -// STEPPER - -var rAF = - typeof requestAnimationFrame !== 'undefined' - ? requestAnimationFrame - : function(callback) { setTimeout(callback, 1000 / 60); }; - -function makeStepper(domNode, view, initialVirtualNode, eventNode) -{ - var state = 'NO_REQUEST'; - var currNode = initialVirtualNode; - var nextModel; - - function updateIfNeeded() - { - switch (state) - { - case 'NO_REQUEST': - throw new Error( - 'Unexpected draw callback.\n' + - 'Please report this to .' - ); - - case 'PENDING_REQUEST': - rAF(updateIfNeeded); - state = 'EXTRA_REQUEST'; - - var nextNode = view(nextModel); - var patches = diff(currNode, nextNode); - domNode = applyPatches(domNode, currNode, patches, eventNode); - currNode = nextNode; - - return; - - case 'EXTRA_REQUEST': - state = 'NO_REQUEST'; - return; - } - } - - return function stepper(model) - { - if (state === 'NO_REQUEST') - { - rAF(updateIfNeeded); - } - state = 'PENDING_REQUEST'; - nextModel = model; - }; -} - - -// DEBUG SETUP - -function debugSetup(impl, object, moduleName, flagChecker) -{ - object['fullscreen'] = function fullscreen(flags) - { - var popoutRef = { doc: undefined }; - return _elm_lang$core$Native_Platform.initialize( - flagChecker(impl.init, flags, document.body), - impl.update(scrollTask(popoutRef)), - impl.subscriptions, - debugRenderer(moduleName, document.body, popoutRef, impl.view, impl.viewIn, impl.viewOut) - ); - }; - - object['embed'] = function fullscreen(node, flags) - { - var popoutRef = { doc: undefined }; - return _elm_lang$core$Native_Platform.initialize( - flagChecker(impl.init, flags, node), - impl.update(scrollTask(popoutRef)), - impl.subscriptions, - debugRenderer(moduleName, node, popoutRef, impl.view, impl.viewIn, impl.viewOut) - ); - }; -} - -function scrollTask(popoutRef) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - var doc = popoutRef.doc; - if (doc) - { - var msgs = doc.getElementsByClassName('debugger-sidebar-messages')[0]; - if (msgs) - { - msgs.scrollTop = msgs.scrollHeight; - } - } - callback(_elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0)); - }); -} - - -function debugRenderer(moduleName, parentNode, popoutRef, view, viewIn, viewOut) -{ - return function(tagger, initialModel) - { - var appEventNode = { tagger: tagger, parent: undefined }; - var eventNode = { tagger: tagger, parent: undefined }; - - // make normal stepper - var appVirtualNode = view(initialModel); - var appNode = render(appVirtualNode, appEventNode); - parentNode.appendChild(appNode); - var appStepper = makeStepper(appNode, view, appVirtualNode, appEventNode); - - // make overlay stepper - var overVirtualNode = viewIn(initialModel)._1; - var overNode = render(overVirtualNode, eventNode); - parentNode.appendChild(overNode); - var wrappedViewIn = wrapViewIn(appEventNode, overNode, viewIn); - var overStepper = makeStepper(overNode, wrappedViewIn, overVirtualNode, eventNode); - - // make debugger stepper - var debugStepper = makeDebugStepper(initialModel, viewOut, eventNode, parentNode, moduleName, popoutRef); - - return function stepper(model) - { - appStepper(model); - overStepper(model); - debugStepper(model); - } - }; -} - -function makeDebugStepper(initialModel, view, eventNode, parentNode, moduleName, popoutRef) -{ - var curr; - var domNode; - - return function stepper(model) - { - if (!model.isDebuggerOpen) - { - return; - } - - if (!popoutRef.doc) - { - curr = view(model); - domNode = openDebugWindow(moduleName, popoutRef, curr, eventNode); - return; - } - - // switch to document of popout - localDoc = popoutRef.doc; - - var next = view(model); - var patches = diff(curr, next); - domNode = applyPatches(domNode, curr, patches, eventNode); - curr = next; - - // switch back to normal document - localDoc = document; - }; -} - -function openDebugWindow(moduleName, popoutRef, virtualNode, eventNode) -{ - var w = 900; - var h = 360; - var x = screen.width - w; - var y = screen.height - h; - var debugWindow = window.open('', '', 'width=' + w + ',height=' + h + ',left=' + x + ',top=' + y); - - // switch to window document - localDoc = debugWindow.document; - - popoutRef.doc = localDoc; - localDoc.title = 'Debugger - ' + moduleName; - localDoc.body.style.margin = '0'; - localDoc.body.style.padding = '0'; - var domNode = render(virtualNode, eventNode); - localDoc.body.appendChild(domNode); - - localDoc.addEventListener('keydown', function(event) { - if (event.metaKey && event.which === 82) - { - window.location.reload(); - } - if (event.which === 38) - { - eventNode.tagger({ ctor: 'Up' }); - event.preventDefault(); - } - if (event.which === 40) - { - eventNode.tagger({ ctor: 'Down' }); - event.preventDefault(); - } - }); - - function close() - { - popoutRef.doc = undefined; - debugWindow.close(); - } - window.addEventListener('unload', close); - debugWindow.addEventListener('unload', function() { - popoutRef.doc = undefined; - window.removeEventListener('unload', close); - eventNode.tagger({ ctor: 'Close' }); - }); - - // switch back to the normal document - localDoc = document; - - return domNode; -} - - -// BLOCK EVENTS - -function wrapViewIn(appEventNode, overlayNode, viewIn) -{ - var ignorer = makeIgnorer(overlayNode); - var blocking = 'Normal'; - var overflow; - - var normalTagger = appEventNode.tagger; - var blockTagger = function() {}; - - return function(model) - { - var tuple = viewIn(model); - var newBlocking = tuple._0.ctor; - appEventNode.tagger = newBlocking === 'Normal' ? normalTagger : blockTagger; - if (blocking !== newBlocking) - { - traverse('removeEventListener', ignorer, blocking); - traverse('addEventListener', ignorer, newBlocking); - - if (blocking === 'Normal') - { - overflow = document.body.style.overflow; - document.body.style.overflow = 'hidden'; - } - - if (newBlocking === 'Normal') - { - document.body.style.overflow = overflow; - } - - blocking = newBlocking; - } - return tuple._1; - } -} - -function traverse(verbEventListener, ignorer, blocking) -{ - switch(blocking) - { - case 'Normal': - return; - - case 'Pause': - return traverseHelp(verbEventListener, ignorer, mostEvents); - - case 'Message': - return traverseHelp(verbEventListener, ignorer, allEvents); - } -} - -function traverseHelp(verbEventListener, handler, eventNames) -{ - for (var i = 0; i < eventNames.length; i++) - { - document.body[verbEventListener](eventNames[i], handler, true); - } -} - -function makeIgnorer(overlayNode) -{ - return function(event) - { - if (event.type === 'keydown' && event.metaKey && event.which === 82) - { - return; - } - - var isScroll = event.type === 'scroll' || event.type === 'wheel'; - - var node = event.target; - while (node !== null) - { - if (node.className === 'elm-overlay-message-details' && isScroll) - { - return; - } - - if (node === overlayNode && !isScroll) - { - return; - } - node = node.parentNode; - } - - event.stopPropagation(); - event.preventDefault(); - } -} - -var mostEvents = [ - 'click', 'dblclick', 'mousemove', - 'mouseup', 'mousedown', 'mouseenter', 'mouseleave', - 'touchstart', 'touchend', 'touchcancel', 'touchmove', - 'pointerdown', 'pointerup', 'pointerover', 'pointerout', - 'pointerenter', 'pointerleave', 'pointermove', 'pointercancel', - 'dragstart', 'drag', 'dragend', 'dragenter', 'dragover', 'dragleave', 'drop', - 'keyup', 'keydown', 'keypress', - 'input', 'change', - 'focus', 'blur' -]; - -var allEvents = mostEvents.concat('wheel', 'scroll'); - - -return { - node: node, - text: text, - custom: custom, - map: F2(map), - - on: F3(on), - style: style, - property: F2(property), - attribute: F2(attribute), - attributeNS: F3(attributeNS), - mapProperty: F2(mapProperty), - - lazy: F2(lazy), - lazy2: F3(lazy2), - lazy3: F4(lazy3), - keyedNode: F3(keyedNode), - - program: program, - programWithFlags: programWithFlags, - staticProgram: staticProgram -}; - -}(); - -var _elm_lang$virtual_dom$VirtualDom$programWithFlags = function (impl) { - return A2(_elm_lang$virtual_dom$Native_VirtualDom.programWithFlags, _elm_lang$virtual_dom$VirtualDom_Debug$wrapWithFlags, impl); -}; -var _elm_lang$virtual_dom$VirtualDom$program = function (impl) { - return A2(_elm_lang$virtual_dom$Native_VirtualDom.program, _elm_lang$virtual_dom$VirtualDom_Debug$wrap, impl); -}; -var _elm_lang$virtual_dom$VirtualDom$keyedNode = _elm_lang$virtual_dom$Native_VirtualDom.keyedNode; -var _elm_lang$virtual_dom$VirtualDom$lazy3 = _elm_lang$virtual_dom$Native_VirtualDom.lazy3; -var _elm_lang$virtual_dom$VirtualDom$lazy2 = _elm_lang$virtual_dom$Native_VirtualDom.lazy2; -var _elm_lang$virtual_dom$VirtualDom$lazy = _elm_lang$virtual_dom$Native_VirtualDom.lazy; -var _elm_lang$virtual_dom$VirtualDom$defaultOptions = {stopPropagation: false, preventDefault: false}; -var _elm_lang$virtual_dom$VirtualDom$onWithOptions = _elm_lang$virtual_dom$Native_VirtualDom.on; -var _elm_lang$virtual_dom$VirtualDom$on = F2( - function (eventName, decoder) { - return A3(_elm_lang$virtual_dom$VirtualDom$onWithOptions, eventName, _elm_lang$virtual_dom$VirtualDom$defaultOptions, decoder); - }); -var _elm_lang$virtual_dom$VirtualDom$style = _elm_lang$virtual_dom$Native_VirtualDom.style; -var _elm_lang$virtual_dom$VirtualDom$mapProperty = _elm_lang$virtual_dom$Native_VirtualDom.mapProperty; -var _elm_lang$virtual_dom$VirtualDom$attributeNS = _elm_lang$virtual_dom$Native_VirtualDom.attributeNS; -var _elm_lang$virtual_dom$VirtualDom$attribute = _elm_lang$virtual_dom$Native_VirtualDom.attribute; -var _elm_lang$virtual_dom$VirtualDom$property = _elm_lang$virtual_dom$Native_VirtualDom.property; -var _elm_lang$virtual_dom$VirtualDom$map = _elm_lang$virtual_dom$Native_VirtualDom.map; -var _elm_lang$virtual_dom$VirtualDom$text = _elm_lang$virtual_dom$Native_VirtualDom.text; -var _elm_lang$virtual_dom$VirtualDom$node = _elm_lang$virtual_dom$Native_VirtualDom.node; -var _elm_lang$virtual_dom$VirtualDom$Options = F2( - function (a, b) { - return {stopPropagation: a, preventDefault: b}; - }); -var _elm_lang$virtual_dom$VirtualDom$Node = {ctor: 'Node'}; -var _elm_lang$virtual_dom$VirtualDom$Property = {ctor: 'Property'}; - -var _elm_lang$html$Html$programWithFlags = _elm_lang$virtual_dom$VirtualDom$programWithFlags; -var _elm_lang$html$Html$program = _elm_lang$virtual_dom$VirtualDom$program; -var _elm_lang$html$Html$beginnerProgram = function (_p0) { - var _p1 = _p0; - return _elm_lang$html$Html$program( - { - init: A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _p1.model, - {ctor: '[]'}), - update: F2( - function (msg, model) { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - A2(_p1.update, msg, model), - {ctor: '[]'}); - }), - view: _p1.view, - subscriptions: function (_p2) { - return _elm_lang$core$Platform_Sub$none; - } - }); -}; -var _elm_lang$html$Html$map = _elm_lang$virtual_dom$VirtualDom$map; -var _elm_lang$html$Html$text = _elm_lang$virtual_dom$VirtualDom$text; -var _elm_lang$html$Html$node = _elm_lang$virtual_dom$VirtualDom$node; -var _elm_lang$html$Html$body = _elm_lang$html$Html$node('body'); -var _elm_lang$html$Html$section = _elm_lang$html$Html$node('section'); -var _elm_lang$html$Html$nav = _elm_lang$html$Html$node('nav'); -var _elm_lang$html$Html$article = _elm_lang$html$Html$node('article'); -var _elm_lang$html$Html$aside = _elm_lang$html$Html$node('aside'); -var _elm_lang$html$Html$h1 = _elm_lang$html$Html$node('h1'); -var _elm_lang$html$Html$h2 = _elm_lang$html$Html$node('h2'); -var _elm_lang$html$Html$h3 = _elm_lang$html$Html$node('h3'); -var _elm_lang$html$Html$h4 = _elm_lang$html$Html$node('h4'); -var _elm_lang$html$Html$h5 = _elm_lang$html$Html$node('h5'); -var _elm_lang$html$Html$h6 = _elm_lang$html$Html$node('h6'); -var _elm_lang$html$Html$header = _elm_lang$html$Html$node('header'); -var _elm_lang$html$Html$footer = _elm_lang$html$Html$node('footer'); -var _elm_lang$html$Html$address = _elm_lang$html$Html$node('address'); -var _elm_lang$html$Html$main_ = _elm_lang$html$Html$node('main'); -var _elm_lang$html$Html$p = _elm_lang$html$Html$node('p'); -var _elm_lang$html$Html$hr = _elm_lang$html$Html$node('hr'); -var _elm_lang$html$Html$pre = _elm_lang$html$Html$node('pre'); -var _elm_lang$html$Html$blockquote = _elm_lang$html$Html$node('blockquote'); -var _elm_lang$html$Html$ol = _elm_lang$html$Html$node('ol'); -var _elm_lang$html$Html$ul = _elm_lang$html$Html$node('ul'); -var _elm_lang$html$Html$li = _elm_lang$html$Html$node('li'); -var _elm_lang$html$Html$dl = _elm_lang$html$Html$node('dl'); -var _elm_lang$html$Html$dt = _elm_lang$html$Html$node('dt'); -var _elm_lang$html$Html$dd = _elm_lang$html$Html$node('dd'); -var _elm_lang$html$Html$figure = _elm_lang$html$Html$node('figure'); -var _elm_lang$html$Html$figcaption = _elm_lang$html$Html$node('figcaption'); -var _elm_lang$html$Html$div = _elm_lang$html$Html$node('div'); -var _elm_lang$html$Html$a = _elm_lang$html$Html$node('a'); -var _elm_lang$html$Html$em = _elm_lang$html$Html$node('em'); -var _elm_lang$html$Html$strong = _elm_lang$html$Html$node('strong'); -var _elm_lang$html$Html$small = _elm_lang$html$Html$node('small'); -var _elm_lang$html$Html$s = _elm_lang$html$Html$node('s'); -var _elm_lang$html$Html$cite = _elm_lang$html$Html$node('cite'); -var _elm_lang$html$Html$q = _elm_lang$html$Html$node('q'); -var _elm_lang$html$Html$dfn = _elm_lang$html$Html$node('dfn'); -var _elm_lang$html$Html$abbr = _elm_lang$html$Html$node('abbr'); -var _elm_lang$html$Html$time = _elm_lang$html$Html$node('time'); -var _elm_lang$html$Html$code = _elm_lang$html$Html$node('code'); -var _elm_lang$html$Html$var = _elm_lang$html$Html$node('var'); -var _elm_lang$html$Html$samp = _elm_lang$html$Html$node('samp'); -var _elm_lang$html$Html$kbd = _elm_lang$html$Html$node('kbd'); -var _elm_lang$html$Html$sub = _elm_lang$html$Html$node('sub'); -var _elm_lang$html$Html$sup = _elm_lang$html$Html$node('sup'); -var _elm_lang$html$Html$i = _elm_lang$html$Html$node('i'); -var _elm_lang$html$Html$b = _elm_lang$html$Html$node('b'); -var _elm_lang$html$Html$u = _elm_lang$html$Html$node('u'); -var _elm_lang$html$Html$mark = _elm_lang$html$Html$node('mark'); -var _elm_lang$html$Html$ruby = _elm_lang$html$Html$node('ruby'); -var _elm_lang$html$Html$rt = _elm_lang$html$Html$node('rt'); -var _elm_lang$html$Html$rp = _elm_lang$html$Html$node('rp'); -var _elm_lang$html$Html$bdi = _elm_lang$html$Html$node('bdi'); -var _elm_lang$html$Html$bdo = _elm_lang$html$Html$node('bdo'); -var _elm_lang$html$Html$span = _elm_lang$html$Html$node('span'); -var _elm_lang$html$Html$br = _elm_lang$html$Html$node('br'); -var _elm_lang$html$Html$wbr = _elm_lang$html$Html$node('wbr'); -var _elm_lang$html$Html$ins = _elm_lang$html$Html$node('ins'); -var _elm_lang$html$Html$del = _elm_lang$html$Html$node('del'); -var _elm_lang$html$Html$img = _elm_lang$html$Html$node('img'); -var _elm_lang$html$Html$iframe = _elm_lang$html$Html$node('iframe'); -var _elm_lang$html$Html$embed = _elm_lang$html$Html$node('embed'); -var _elm_lang$html$Html$object = _elm_lang$html$Html$node('object'); -var _elm_lang$html$Html$param = _elm_lang$html$Html$node('param'); -var _elm_lang$html$Html$video = _elm_lang$html$Html$node('video'); -var _elm_lang$html$Html$audio = _elm_lang$html$Html$node('audio'); -var _elm_lang$html$Html$source = _elm_lang$html$Html$node('source'); -var _elm_lang$html$Html$track = _elm_lang$html$Html$node('track'); -var _elm_lang$html$Html$canvas = _elm_lang$html$Html$node('canvas'); -var _elm_lang$html$Html$math = _elm_lang$html$Html$node('math'); -var _elm_lang$html$Html$table = _elm_lang$html$Html$node('table'); -var _elm_lang$html$Html$caption = _elm_lang$html$Html$node('caption'); -var _elm_lang$html$Html$colgroup = _elm_lang$html$Html$node('colgroup'); -var _elm_lang$html$Html$col = _elm_lang$html$Html$node('col'); -var _elm_lang$html$Html$tbody = _elm_lang$html$Html$node('tbody'); -var _elm_lang$html$Html$thead = _elm_lang$html$Html$node('thead'); -var _elm_lang$html$Html$tfoot = _elm_lang$html$Html$node('tfoot'); -var _elm_lang$html$Html$tr = _elm_lang$html$Html$node('tr'); -var _elm_lang$html$Html$td = _elm_lang$html$Html$node('td'); -var _elm_lang$html$Html$th = _elm_lang$html$Html$node('th'); -var _elm_lang$html$Html$form = _elm_lang$html$Html$node('form'); -var _elm_lang$html$Html$fieldset = _elm_lang$html$Html$node('fieldset'); -var _elm_lang$html$Html$legend = _elm_lang$html$Html$node('legend'); -var _elm_lang$html$Html$label = _elm_lang$html$Html$node('label'); -var _elm_lang$html$Html$input = _elm_lang$html$Html$node('input'); -var _elm_lang$html$Html$button = _elm_lang$html$Html$node('button'); -var _elm_lang$html$Html$select = _elm_lang$html$Html$node('select'); -var _elm_lang$html$Html$datalist = _elm_lang$html$Html$node('datalist'); -var _elm_lang$html$Html$optgroup = _elm_lang$html$Html$node('optgroup'); -var _elm_lang$html$Html$option = _elm_lang$html$Html$node('option'); -var _elm_lang$html$Html$textarea = _elm_lang$html$Html$node('textarea'); -var _elm_lang$html$Html$keygen = _elm_lang$html$Html$node('keygen'); -var _elm_lang$html$Html$output = _elm_lang$html$Html$node('output'); -var _elm_lang$html$Html$progress = _elm_lang$html$Html$node('progress'); -var _elm_lang$html$Html$meter = _elm_lang$html$Html$node('meter'); -var _elm_lang$html$Html$details = _elm_lang$html$Html$node('details'); -var _elm_lang$html$Html$summary = _elm_lang$html$Html$node('summary'); -var _elm_lang$html$Html$menuitem = _elm_lang$html$Html$node('menuitem'); -var _elm_lang$html$Html$menu = _elm_lang$html$Html$node('menu'); - -var _elm_lang$html$Html_Attributes$map = _elm_lang$virtual_dom$VirtualDom$mapProperty; -var _elm_lang$html$Html_Attributes$attribute = _elm_lang$virtual_dom$VirtualDom$attribute; -var _elm_lang$html$Html_Attributes$contextmenu = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'contextmenu', value); -}; -var _elm_lang$html$Html_Attributes$draggable = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'draggable', value); -}; -var _elm_lang$html$Html_Attributes$itemprop = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'itemprop', value); -}; -var _elm_lang$html$Html_Attributes$tabindex = function (n) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'tabIndex', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$charset = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'charset', value); -}; -var _elm_lang$html$Html_Attributes$height = function (value) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'height', - _elm_lang$core$Basics$toString(value)); -}; -var _elm_lang$html$Html_Attributes$width = function (value) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'width', - _elm_lang$core$Basics$toString(value)); -}; -var _elm_lang$html$Html_Attributes$formaction = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'formAction', value); -}; -var _elm_lang$html$Html_Attributes$list = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'list', value); -}; -var _elm_lang$html$Html_Attributes$minlength = function (n) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'minLength', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$maxlength = function (n) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'maxlength', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$size = function (n) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'size', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$form = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'form', value); -}; -var _elm_lang$html$Html_Attributes$cols = function (n) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'cols', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$rows = function (n) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'rows', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$challenge = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'challenge', value); -}; -var _elm_lang$html$Html_Attributes$media = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'media', value); -}; -var _elm_lang$html$Html_Attributes$rel = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'rel', value); -}; -var _elm_lang$html$Html_Attributes$datetime = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'datetime', value); -}; -var _elm_lang$html$Html_Attributes$pubdate = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'pubdate', value); -}; -var _elm_lang$html$Html_Attributes$colspan = function (n) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'colspan', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$rowspan = function (n) { - return A2( - _elm_lang$html$Html_Attributes$attribute, - 'rowspan', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$manifest = function (value) { - return A2(_elm_lang$html$Html_Attributes$attribute, 'manifest', value); -}; -var _elm_lang$html$Html_Attributes$property = _elm_lang$virtual_dom$VirtualDom$property; -var _elm_lang$html$Html_Attributes$stringProperty = F2( - function (name, string) { - return A2( - _elm_lang$html$Html_Attributes$property, - name, - _elm_lang$core$Json_Encode$string(string)); - }); -var _elm_lang$html$Html_Attributes$class = function (name) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'className', name); -}; -var _elm_lang$html$Html_Attributes$id = function (name) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'id', name); -}; -var _elm_lang$html$Html_Attributes$title = function (name) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'title', name); -}; -var _elm_lang$html$Html_Attributes$accesskey = function ($char) { - return A2( - _elm_lang$html$Html_Attributes$stringProperty, - 'accessKey', - _elm_lang$core$String$fromChar($char)); -}; -var _elm_lang$html$Html_Attributes$dir = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'dir', value); -}; -var _elm_lang$html$Html_Attributes$dropzone = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'dropzone', value); -}; -var _elm_lang$html$Html_Attributes$lang = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'lang', value); -}; -var _elm_lang$html$Html_Attributes$content = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'content', value); -}; -var _elm_lang$html$Html_Attributes$httpEquiv = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'httpEquiv', value); -}; -var _elm_lang$html$Html_Attributes$language = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'language', value); -}; -var _elm_lang$html$Html_Attributes$src = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'src', value); -}; -var _elm_lang$html$Html_Attributes$alt = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'alt', value); -}; -var _elm_lang$html$Html_Attributes$preload = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'preload', value); -}; -var _elm_lang$html$Html_Attributes$poster = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'poster', value); -}; -var _elm_lang$html$Html_Attributes$kind = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'kind', value); -}; -var _elm_lang$html$Html_Attributes$srclang = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'srclang', value); -}; -var _elm_lang$html$Html_Attributes$sandbox = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'sandbox', value); -}; -var _elm_lang$html$Html_Attributes$srcdoc = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'srcdoc', value); -}; -var _elm_lang$html$Html_Attributes$type_ = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'type', value); -}; -var _elm_lang$html$Html_Attributes$value = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'value', value); -}; -var _elm_lang$html$Html_Attributes$defaultValue = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'defaultValue', value); -}; -var _elm_lang$html$Html_Attributes$placeholder = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'placeholder', value); -}; -var _elm_lang$html$Html_Attributes$accept = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'accept', value); -}; -var _elm_lang$html$Html_Attributes$acceptCharset = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'acceptCharset', value); -}; -var _elm_lang$html$Html_Attributes$action = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'action', value); -}; -var _elm_lang$html$Html_Attributes$autocomplete = function (bool) { - return A2( - _elm_lang$html$Html_Attributes$stringProperty, - 'autocomplete', - bool ? 'on' : 'off'); -}; -var _elm_lang$html$Html_Attributes$enctype = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'enctype', value); -}; -var _elm_lang$html$Html_Attributes$method = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'method', value); -}; -var _elm_lang$html$Html_Attributes$name = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'name', value); -}; -var _elm_lang$html$Html_Attributes$pattern = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'pattern', value); -}; -var _elm_lang$html$Html_Attributes$for = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'htmlFor', value); -}; -var _elm_lang$html$Html_Attributes$max = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'max', value); -}; -var _elm_lang$html$Html_Attributes$min = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'min', value); -}; -var _elm_lang$html$Html_Attributes$step = function (n) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'step', n); -}; -var _elm_lang$html$Html_Attributes$wrap = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'wrap', value); -}; -var _elm_lang$html$Html_Attributes$usemap = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'useMap', value); -}; -var _elm_lang$html$Html_Attributes$shape = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'shape', value); -}; -var _elm_lang$html$Html_Attributes$coords = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'coords', value); -}; -var _elm_lang$html$Html_Attributes$keytype = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'keytype', value); -}; -var _elm_lang$html$Html_Attributes$align = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'align', value); -}; -var _elm_lang$html$Html_Attributes$cite = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'cite', value); -}; -var _elm_lang$html$Html_Attributes$href = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'href', value); -}; -var _elm_lang$html$Html_Attributes$target = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'target', value); -}; -var _elm_lang$html$Html_Attributes$downloadAs = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'download', value); -}; -var _elm_lang$html$Html_Attributes$hreflang = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'hreflang', value); -}; -var _elm_lang$html$Html_Attributes$ping = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'ping', value); -}; -var _elm_lang$html$Html_Attributes$start = function (n) { - return A2( - _elm_lang$html$Html_Attributes$stringProperty, - 'start', - _elm_lang$core$Basics$toString(n)); -}; -var _elm_lang$html$Html_Attributes$headers = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'headers', value); -}; -var _elm_lang$html$Html_Attributes$scope = function (value) { - return A2(_elm_lang$html$Html_Attributes$stringProperty, 'scope', value); -}; -var _elm_lang$html$Html_Attributes$boolProperty = F2( - function (name, bool) { - return A2( - _elm_lang$html$Html_Attributes$property, - name, - _elm_lang$core$Json_Encode$bool(bool)); - }); -var _elm_lang$html$Html_Attributes$hidden = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'hidden', bool); -}; -var _elm_lang$html$Html_Attributes$contenteditable = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'contentEditable', bool); -}; -var _elm_lang$html$Html_Attributes$spellcheck = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'spellcheck', bool); -}; -var _elm_lang$html$Html_Attributes$async = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'async', bool); -}; -var _elm_lang$html$Html_Attributes$defer = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'defer', bool); -}; -var _elm_lang$html$Html_Attributes$scoped = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'scoped', bool); -}; -var _elm_lang$html$Html_Attributes$autoplay = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'autoplay', bool); -}; -var _elm_lang$html$Html_Attributes$controls = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'controls', bool); -}; -var _elm_lang$html$Html_Attributes$loop = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'loop', bool); -}; -var _elm_lang$html$Html_Attributes$default = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'default', bool); -}; -var _elm_lang$html$Html_Attributes$seamless = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'seamless', bool); -}; -var _elm_lang$html$Html_Attributes$checked = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'checked', bool); -}; -var _elm_lang$html$Html_Attributes$selected = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'selected', bool); -}; -var _elm_lang$html$Html_Attributes$autofocus = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'autofocus', bool); -}; -var _elm_lang$html$Html_Attributes$disabled = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'disabled', bool); -}; -var _elm_lang$html$Html_Attributes$multiple = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'multiple', bool); -}; -var _elm_lang$html$Html_Attributes$novalidate = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'noValidate', bool); -}; -var _elm_lang$html$Html_Attributes$readonly = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'readOnly', bool); -}; -var _elm_lang$html$Html_Attributes$required = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'required', bool); -}; -var _elm_lang$html$Html_Attributes$ismap = function (value) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'isMap', value); -}; -var _elm_lang$html$Html_Attributes$download = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'download', bool); -}; -var _elm_lang$html$Html_Attributes$reversed = function (bool) { - return A2(_elm_lang$html$Html_Attributes$boolProperty, 'reversed', bool); -}; -var _elm_lang$html$Html_Attributes$classList = function (list) { - return _elm_lang$html$Html_Attributes$class( - A2( - _elm_lang$core$String$join, - ' ', - A2( - _elm_lang$core$List$map, - _elm_lang$core$Tuple$first, - A2(_elm_lang$core$List$filter, _elm_lang$core$Tuple$second, list)))); -}; -var _elm_lang$html$Html_Attributes$style = _elm_lang$virtual_dom$VirtualDom$style; - -var _elm_lang$html$Html_Events$keyCode = A2(_elm_lang$core$Json_Decode$field, 'keyCode', _elm_lang$core$Json_Decode$int); -var _elm_lang$html$Html_Events$targetChecked = A2( - _elm_lang$core$Json_Decode$at, - { - ctor: '::', - _0: 'target', - _1: { - ctor: '::', - _0: 'checked', - _1: {ctor: '[]'} - } - }, - _elm_lang$core$Json_Decode$bool); -var _elm_lang$html$Html_Events$targetValue = A2( - _elm_lang$core$Json_Decode$at, - { - ctor: '::', - _0: 'target', - _1: { - ctor: '::', - _0: 'value', - _1: {ctor: '[]'} - } - }, - _elm_lang$core$Json_Decode$string); -var _elm_lang$html$Html_Events$defaultOptions = _elm_lang$virtual_dom$VirtualDom$defaultOptions; -var _elm_lang$html$Html_Events$onWithOptions = _elm_lang$virtual_dom$VirtualDom$onWithOptions; -var _elm_lang$html$Html_Events$on = _elm_lang$virtual_dom$VirtualDom$on; -var _elm_lang$html$Html_Events$onFocus = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'focus', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onBlur = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'blur', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onSubmitOptions = _elm_lang$core$Native_Utils.update( - _elm_lang$html$Html_Events$defaultOptions, - {preventDefault: true}); -var _elm_lang$html$Html_Events$onSubmit = function (msg) { - return A3( - _elm_lang$html$Html_Events$onWithOptions, - 'submit', - _elm_lang$html$Html_Events$onSubmitOptions, - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onCheck = function (tagger) { - return A2( - _elm_lang$html$Html_Events$on, - 'change', - A2(_elm_lang$core$Json_Decode$map, tagger, _elm_lang$html$Html_Events$targetChecked)); -}; -var _elm_lang$html$Html_Events$onInput = function (tagger) { - return A2( - _elm_lang$html$Html_Events$on, - 'input', - A2(_elm_lang$core$Json_Decode$map, tagger, _elm_lang$html$Html_Events$targetValue)); -}; -var _elm_lang$html$Html_Events$onMouseOut = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'mouseout', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onMouseOver = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'mouseover', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onMouseLeave = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'mouseleave', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onMouseEnter = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'mouseenter', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onMouseUp = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'mouseup', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onMouseDown = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'mousedown', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onDoubleClick = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'dblclick', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$onClick = function (msg) { - return A2( - _elm_lang$html$Html_Events$on, - 'click', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$html$Html_Events$Options = F2( - function (a, b) { - return {stopPropagation: a, preventDefault: b}; - }); - -var _elm_lang$http$Native_Http = function() { - - -// ENCODING AND DECODING - -function encodeUri(string) -{ - return encodeURIComponent(string); -} - -function decodeUri(string) -{ - try - { - return _elm_lang$core$Maybe$Just(decodeURIComponent(string)); - } - catch(e) - { - return _elm_lang$core$Maybe$Nothing; - } -} - - -// SEND REQUEST - -function toTask(request, maybeProgress) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - var xhr = new XMLHttpRequest(); - - configureProgress(xhr, maybeProgress); - - xhr.addEventListener('error', function() { - callback(_elm_lang$core$Native_Scheduler.fail({ ctor: 'NetworkError' })); - }); - xhr.addEventListener('timeout', function() { - callback(_elm_lang$core$Native_Scheduler.fail({ ctor: 'Timeout' })); - }); - xhr.addEventListener('load', function() { - callback(handleResponse(xhr, request.expect.responseToResult)); - }); - - try - { - xhr.open(request.method, request.url, true); - } - catch (e) - { - return callback(_elm_lang$core$Native_Scheduler.fail({ ctor: 'BadUrl', _0: request.url })); - } - - configureRequest(xhr, request); - send(xhr, request.body); - - return function() { xhr.abort(); }; - }); -} - -function configureProgress(xhr, maybeProgress) -{ - if (maybeProgress.ctor === 'Nothing') - { - return; - } - - xhr.addEventListener('progress', function(event) { - if (!event.lengthComputable) - { - return; - } - _elm_lang$core$Native_Scheduler.rawSpawn(maybeProgress._0({ - bytes: event.loaded, - bytesExpected: event.total - })); - }); -} - -function configureRequest(xhr, request) -{ - function setHeader(pair) - { - xhr.setRequestHeader(pair._0, pair._1); - } - - A2(_elm_lang$core$List$map, setHeader, request.headers); - xhr.responseType = request.expect.responseType; - xhr.withCredentials = request.withCredentials; - - if (request.timeout.ctor === 'Just') - { - xhr.timeout = request.timeout._0; - } -} - -function send(xhr, body) -{ - switch (body.ctor) - { - case 'EmptyBody': - xhr.send(); - return; - - case 'StringBody': - xhr.setRequestHeader('Content-Type', body._0); - xhr.send(body._1); - return; - - case 'FormDataBody': - xhr.send(body._0); - return; - } -} - - -// RESPONSES - -function handleResponse(xhr, responseToResult) -{ - var response = toResponse(xhr); - - if (xhr.status < 200 || 300 <= xhr.status) - { - response.body = xhr.responseText; - return _elm_lang$core$Native_Scheduler.fail({ - ctor: 'BadStatus', - _0: response - }); - } - - var result = responseToResult(response); - - if (result.ctor === 'Ok') - { - return _elm_lang$core$Native_Scheduler.succeed(result._0); - } - else - { - response.body = xhr.responseText; - return _elm_lang$core$Native_Scheduler.fail({ - ctor: 'BadPayload', - _0: result._0, - _1: response - }); - } -} - -function toResponse(xhr) -{ - return { - status: { code: xhr.status, message: xhr.statusText }, - headers: parseHeaders(xhr.getAllResponseHeaders()), - url: xhr.responseURL, - body: xhr.response - }; -} - -function parseHeaders(rawHeaders) -{ - var headers = _elm_lang$core$Dict$empty; - - if (!rawHeaders) - { - return headers; - } - - var headerPairs = rawHeaders.split('\u000d\u000a'); - for (var i = headerPairs.length; i--; ) - { - var headerPair = headerPairs[i]; - var index = headerPair.indexOf('\u003a\u0020'); - if (index > 0) - { - var key = headerPair.substring(0, index); - var value = headerPair.substring(index + 2); - - headers = A3(_elm_lang$core$Dict$update, key, function(oldValue) { - if (oldValue.ctor === 'Just') - { - return _elm_lang$core$Maybe$Just(value + ', ' + oldValue._0); - } - return _elm_lang$core$Maybe$Just(value); - }, headers); - } - } - - return headers; -} - - -// EXPECTORS - -function expectStringResponse(responseToResult) -{ - return { - responseType: 'text', - responseToResult: responseToResult - }; -} - -function mapExpect(func, expect) -{ - return { - responseType: expect.responseType, - responseToResult: function(response) { - var convertedResponse = expect.responseToResult(response); - return A2(_elm_lang$core$Result$map, func, convertedResponse); - } - }; -} - - -// BODY - -function multipart(parts) -{ - var formData = new FormData(); - - while (parts.ctor !== '[]') - { - var part = parts._0; - formData.append(part._0, part._1); - parts = parts._1; - } - - return { ctor: 'FormDataBody', _0: formData }; -} - -return { - toTask: F2(toTask), - expectStringResponse: expectStringResponse, - mapExpect: F2(mapExpect), - multipart: multipart, - encodeUri: encodeUri, - decodeUri: decodeUri -}; - -}(); - -var _elm_lang$http$Http_Internal$map = F2( - function (func, request) { - return _elm_lang$core$Native_Utils.update( - request, - { - expect: A2(_elm_lang$http$Native_Http.mapExpect, func, request.expect) - }); - }); -var _elm_lang$http$Http_Internal$RawRequest = F7( - function (a, b, c, d, e, f, g) { - return {method: a, headers: b, url: c, body: d, expect: e, timeout: f, withCredentials: g}; - }); -var _elm_lang$http$Http_Internal$Request = function (a) { - return {ctor: 'Request', _0: a}; -}; -var _elm_lang$http$Http_Internal$Expect = {ctor: 'Expect'}; -var _elm_lang$http$Http_Internal$FormDataBody = {ctor: 'FormDataBody'}; -var _elm_lang$http$Http_Internal$StringBody = F2( - function (a, b) { - return {ctor: 'StringBody', _0: a, _1: b}; - }); -var _elm_lang$http$Http_Internal$EmptyBody = {ctor: 'EmptyBody'}; -var _elm_lang$http$Http_Internal$Header = F2( - function (a, b) { - return {ctor: 'Header', _0: a, _1: b}; - }); - -var _elm_lang$http$Http$decodeUri = _elm_lang$http$Native_Http.decodeUri; -var _elm_lang$http$Http$encodeUri = _elm_lang$http$Native_Http.encodeUri; -var _elm_lang$http$Http$expectStringResponse = _elm_lang$http$Native_Http.expectStringResponse; -var _elm_lang$http$Http$expectJson = function (decoder) { - return _elm_lang$http$Http$expectStringResponse( - function (response) { - return A2(_elm_lang$core$Json_Decode$decodeString, decoder, response.body); - }); -}; -var _elm_lang$http$Http$expectString = _elm_lang$http$Http$expectStringResponse( - function (response) { - return _elm_lang$core$Result$Ok(response.body); - }); -var _elm_lang$http$Http$multipartBody = _elm_lang$http$Native_Http.multipart; -var _elm_lang$http$Http$stringBody = _elm_lang$http$Http_Internal$StringBody; -var _elm_lang$http$Http$jsonBody = function (value) { - return A2( - _elm_lang$http$Http_Internal$StringBody, - 'application/json', - A2(_elm_lang$core$Json_Encode$encode, 0, value)); -}; -var _elm_lang$http$Http$emptyBody = _elm_lang$http$Http_Internal$EmptyBody; -var _elm_lang$http$Http$header = _elm_lang$http$Http_Internal$Header; -var _elm_lang$http$Http$request = _elm_lang$http$Http_Internal$Request; -var _elm_lang$http$Http$post = F3( - function (url, body, decoder) { - return _elm_lang$http$Http$request( - { - method: 'POST', - headers: {ctor: '[]'}, - url: url, - body: body, - expect: _elm_lang$http$Http$expectJson(decoder), - timeout: _elm_lang$core$Maybe$Nothing, - withCredentials: false - }); - }); -var _elm_lang$http$Http$get = F2( - function (url, decoder) { - return _elm_lang$http$Http$request( - { - method: 'GET', - headers: {ctor: '[]'}, - url: url, - body: _elm_lang$http$Http$emptyBody, - expect: _elm_lang$http$Http$expectJson(decoder), - timeout: _elm_lang$core$Maybe$Nothing, - withCredentials: false - }); - }); -var _elm_lang$http$Http$getString = function (url) { - return _elm_lang$http$Http$request( - { - method: 'GET', - headers: {ctor: '[]'}, - url: url, - body: _elm_lang$http$Http$emptyBody, - expect: _elm_lang$http$Http$expectString, - timeout: _elm_lang$core$Maybe$Nothing, - withCredentials: false - }); -}; -var _elm_lang$http$Http$toTask = function (_p0) { - var _p1 = _p0; - return A2(_elm_lang$http$Native_Http.toTask, _p1._0, _elm_lang$core$Maybe$Nothing); -}; -var _elm_lang$http$Http$send = F2( - function (resultToMessage, request) { - return A2( - _elm_lang$core$Task$attempt, - resultToMessage, - _elm_lang$http$Http$toTask(request)); - }); -var _elm_lang$http$Http$Response = F4( - function (a, b, c, d) { - return {url: a, status: b, headers: c, body: d}; - }); -var _elm_lang$http$Http$BadPayload = F2( - function (a, b) { - return {ctor: 'BadPayload', _0: a, _1: b}; - }); -var _elm_lang$http$Http$BadStatus = function (a) { - return {ctor: 'BadStatus', _0: a}; -}; -var _elm_lang$http$Http$NetworkError = {ctor: 'NetworkError'}; -var _elm_lang$http$Http$Timeout = {ctor: 'Timeout'}; -var _elm_lang$http$Http$BadUrl = function (a) { - return {ctor: 'BadUrl', _0: a}; -}; -var _elm_lang$http$Http$StringPart = F2( - function (a, b) { - return {ctor: 'StringPart', _0: a, _1: b}; - }); -var _elm_lang$http$Http$stringPart = _elm_lang$http$Http$StringPart; - -var _elm_lang$navigation$Native_Navigation = function() { - - -// FAKE NAVIGATION - -function go(n) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - if (n !== 0) - { - history.go(n); - } - callback(_elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0)); - }); -} - -function pushState(url) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - history.pushState({}, '', url); - callback(_elm_lang$core$Native_Scheduler.succeed(getLocation())); - }); -} - -function replaceState(url) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - history.replaceState({}, '', url); - callback(_elm_lang$core$Native_Scheduler.succeed(getLocation())); - }); -} - - -// REAL NAVIGATION - -function reloadPage(skipCache) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - document.location.reload(skipCache); - callback(_elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0)); - }); -} - -function setLocation(url) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - try - { - window.location = url; - } - catch(err) - { - // Only Firefox can throw a NS_ERROR_MALFORMED_URI exception here. - // Other browsers reload the page, so let's be consistent about that. - document.location.reload(false); - } - callback(_elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0)); - }); -} - - -// GET LOCATION - -function getLocation() -{ - var location = document.location; - - return { - href: location.href, - host: location.host, - hostname: location.hostname, - protocol: location.protocol, - origin: location.origin, - port_: location.port, - pathname: location.pathname, - search: location.search, - hash: location.hash, - username: location.username, - password: location.password - }; -} - - -// DETECT IE11 PROBLEMS - -function isInternetExplorer11() -{ - return window.navigator.userAgent.indexOf('Trident') !== -1; -} - - -return { - go: go, - setLocation: setLocation, - reloadPage: reloadPage, - pushState: pushState, - replaceState: replaceState, - getLocation: getLocation, - isInternetExplorer11: isInternetExplorer11 -}; - -}(); - -var _elm_lang$navigation$Navigation$replaceState = _elm_lang$navigation$Native_Navigation.replaceState; -var _elm_lang$navigation$Navigation$pushState = _elm_lang$navigation$Native_Navigation.pushState; -var _elm_lang$navigation$Navigation$go = _elm_lang$navigation$Native_Navigation.go; -var _elm_lang$navigation$Navigation$reloadPage = _elm_lang$navigation$Native_Navigation.reloadPage; -var _elm_lang$navigation$Navigation$setLocation = _elm_lang$navigation$Native_Navigation.setLocation; -var _elm_lang$navigation$Navigation_ops = _elm_lang$navigation$Navigation_ops || {}; -_elm_lang$navigation$Navigation_ops['&>'] = F2( - function (task1, task2) { - return A2( - _elm_lang$core$Task$andThen, - function (_p0) { - return task2; - }, - task1); - }); -var _elm_lang$navigation$Navigation$notify = F3( - function (router, subs, location) { - var send = function (_p1) { - var _p2 = _p1; - return A2( - _elm_lang$core$Platform$sendToApp, - router, - _p2._0(location)); - }; - return A2( - _elm_lang$navigation$Navigation_ops['&>'], - _elm_lang$core$Task$sequence( - A2(_elm_lang$core$List$map, send, subs)), - _elm_lang$core$Task$succeed( - {ctor: '_Tuple0'})); - }); -var _elm_lang$navigation$Navigation$cmdHelp = F3( - function (router, subs, cmd) { - var _p3 = cmd; - switch (_p3.ctor) { - case 'Jump': - return _elm_lang$navigation$Navigation$go(_p3._0); - case 'New': - var _p5 = _p3._1; - var _p4 = _p3._0; - if (_p4.ctor === 'Notify') { - return A2( - _elm_lang$core$Task$andThen, - A2(_elm_lang$navigation$Navigation$notify, router, subs), - _elm_lang$navigation$Navigation$pushState(_p5)); - } else { - return A2( - _elm_lang$core$Task$andThen, - _elm_lang$core$Basics$always( - _elm_lang$core$Task$succeed( - {ctor: '_Tuple0'})), - _elm_lang$navigation$Navigation$pushState(_p5)); - } - case 'Modify': - var _p7 = _p3._1; - var _p6 = _p3._0; - if (_p6.ctor === 'Notify') { - return A2( - _elm_lang$core$Task$andThen, - A2(_elm_lang$navigation$Navigation$notify, router, subs), - _elm_lang$navigation$Navigation$replaceState(_p7)); - } else { - return A2( - _elm_lang$core$Task$andThen, - _elm_lang$core$Basics$always( - _elm_lang$core$Task$succeed( - {ctor: '_Tuple0'})), - _elm_lang$navigation$Navigation$replaceState(_p7)); - } - case 'Visit': - return _elm_lang$navigation$Navigation$setLocation(_p3._0); - default: - return _elm_lang$navigation$Navigation$reloadPage(_p3._0); - } - }); -var _elm_lang$navigation$Navigation$killPopWatcher = function (popWatcher) { - var _p8 = popWatcher; - if (_p8.ctor === 'Normal') { - return _elm_lang$core$Process$kill(_p8._0); - } else { - return A2( - _elm_lang$navigation$Navigation_ops['&>'], - _elm_lang$core$Process$kill(_p8._0), - _elm_lang$core$Process$kill(_p8._1)); - } -}; -var _elm_lang$navigation$Navigation$onSelfMsg = F3( - function (router, location, state) { - return A2( - _elm_lang$navigation$Navigation_ops['&>'], - A3(_elm_lang$navigation$Navigation$notify, router, state.subs, location), - _elm_lang$core$Task$succeed(state)); - }); -var _elm_lang$navigation$Navigation$subscription = _elm_lang$core$Native_Platform.leaf('Navigation'); -var _elm_lang$navigation$Navigation$command = _elm_lang$core$Native_Platform.leaf('Navigation'); -var _elm_lang$navigation$Navigation$Location = function (a) { - return function (b) { - return function (c) { - return function (d) { - return function (e) { - return function (f) { - return function (g) { - return function (h) { - return function (i) { - return function (j) { - return function (k) { - return {href: a, host: b, hostname: c, protocol: d, origin: e, port_: f, pathname: g, search: h, hash: i, username: j, password: k}; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; -}; -var _elm_lang$navigation$Navigation$State = F2( - function (a, b) { - return {subs: a, popWatcher: b}; - }); -var _elm_lang$navigation$Navigation$init = _elm_lang$core$Task$succeed( - A2( - _elm_lang$navigation$Navigation$State, - {ctor: '[]'}, - _elm_lang$core$Maybe$Nothing)); -var _elm_lang$navigation$Navigation$NoNotify = {ctor: 'NoNotify'}; -var _elm_lang$navigation$Navigation$Notify = {ctor: 'Notify'}; -var _elm_lang$navigation$Navigation$Reload = function (a) { - return {ctor: 'Reload', _0: a}; -}; -var _elm_lang$navigation$Navigation$reload = _elm_lang$navigation$Navigation$command( - _elm_lang$navigation$Navigation$Reload(false)); -var _elm_lang$navigation$Navigation$reloadAndSkipCache = _elm_lang$navigation$Navigation$command( - _elm_lang$navigation$Navigation$Reload(true)); -var _elm_lang$navigation$Navigation$Visit = function (a) { - return {ctor: 'Visit', _0: a}; -}; -var _elm_lang$navigation$Navigation$load = function (url) { - return _elm_lang$navigation$Navigation$command( - _elm_lang$navigation$Navigation$Visit(url)); -}; -var _elm_lang$navigation$Navigation$Modify = F2( - function (a, b) { - return {ctor: 'Modify', _0: a, _1: b}; - }); -var _elm_lang$navigation$Navigation$modifyUrl = function (url) { - return _elm_lang$navigation$Navigation$command( - A2(_elm_lang$navigation$Navigation$Modify, _elm_lang$navigation$Navigation$Notify, url)); -}; -var _elm_lang$navigation$Navigation$modifyUrlWithoutNotify = function (url) { - return _elm_lang$navigation$Navigation$command( - A2(_elm_lang$navigation$Navigation$Modify, _elm_lang$navigation$Navigation$NoNotify, url)); -}; -var _elm_lang$navigation$Navigation$New = F2( - function (a, b) { - return {ctor: 'New', _0: a, _1: b}; - }); -var _elm_lang$navigation$Navigation$newUrl = function (url) { - return _elm_lang$navigation$Navigation$command( - A2(_elm_lang$navigation$Navigation$New, _elm_lang$navigation$Navigation$Notify, url)); -}; -var _elm_lang$navigation$Navigation$newUrlWithoutNotify = function (url) { - return _elm_lang$navigation$Navigation$command( - A2(_elm_lang$navigation$Navigation$New, _elm_lang$navigation$Navigation$NoNotify, url)); -}; -var _elm_lang$navigation$Navigation$Jump = function (a) { - return {ctor: 'Jump', _0: a}; -}; -var _elm_lang$navigation$Navigation$back = function (n) { - return _elm_lang$navigation$Navigation$command( - _elm_lang$navigation$Navigation$Jump(0 - n)); -}; -var _elm_lang$navigation$Navigation$forward = function (n) { - return _elm_lang$navigation$Navigation$command( - _elm_lang$navigation$Navigation$Jump(n)); -}; -var _elm_lang$navigation$Navigation$cmdMap = F2( - function (_p9, myCmd) { - var _p10 = myCmd; - switch (_p10.ctor) { - case 'Jump': - return _elm_lang$navigation$Navigation$Jump(_p10._0); - case 'New': - return A2(_elm_lang$navigation$Navigation$New, _p10._0, _p10._1); - case 'Modify': - return A2(_elm_lang$navigation$Navigation$Modify, _p10._0, _p10._1); - case 'Visit': - return _elm_lang$navigation$Navigation$Visit(_p10._0); - default: - return _elm_lang$navigation$Navigation$Reload(_p10._0); - } - }); -var _elm_lang$navigation$Navigation$Monitor = function (a) { - return {ctor: 'Monitor', _0: a}; -}; -var _elm_lang$navigation$Navigation$program = F2( - function (locationToMessage, stuff) { - var init = stuff.init( - _elm_lang$navigation$Native_Navigation.getLocation( - {ctor: '_Tuple0'})); - var subs = function (model) { - return _elm_lang$core$Platform_Sub$batch( - { - ctor: '::', - _0: _elm_lang$navigation$Navigation$subscription( - _elm_lang$navigation$Navigation$Monitor(locationToMessage)), - _1: { - ctor: '::', - _0: stuff.subscriptions(model), - _1: {ctor: '[]'} - } - }); - }; - return _elm_lang$html$Html$program( - {init: init, view: stuff.view, update: stuff.update, subscriptions: subs}); - }); -var _elm_lang$navigation$Navigation$programWithFlags = F2( - function (locationToMessage, stuff) { - var init = function (flags) { - return A2( - stuff.init, - flags, - _elm_lang$navigation$Native_Navigation.getLocation( - {ctor: '_Tuple0'})); - }; - var subs = function (model) { - return _elm_lang$core$Platform_Sub$batch( - { - ctor: '::', - _0: _elm_lang$navigation$Navigation$subscription( - _elm_lang$navigation$Navigation$Monitor(locationToMessage)), - _1: { - ctor: '::', - _0: stuff.subscriptions(model), - _1: {ctor: '[]'} - } - }); - }; - return _elm_lang$html$Html$programWithFlags( - {init: init, view: stuff.view, update: stuff.update, subscriptions: subs}); - }); -var _elm_lang$navigation$Navigation$subMap = F2( - function (func, _p11) { - var _p12 = _p11; - return _elm_lang$navigation$Navigation$Monitor( - function (_p13) { - return func( - _p12._0(_p13)); - }); - }); -var _elm_lang$navigation$Navigation$InternetExplorer = F2( - function (a, b) { - return {ctor: 'InternetExplorer', _0: a, _1: b}; - }); -var _elm_lang$navigation$Navigation$Normal = function (a) { - return {ctor: 'Normal', _0: a}; -}; -var _elm_lang$navigation$Navigation$spawnPopWatcher = function (router) { - var reportLocation = function (_p14) { - return A2( - _elm_lang$core$Platform$sendToSelf, - router, - _elm_lang$navigation$Native_Navigation.getLocation( - {ctor: '_Tuple0'})); - }; - return _elm_lang$navigation$Native_Navigation.isInternetExplorer11( - {ctor: '_Tuple0'}) ? A3( - _elm_lang$core$Task$map2, - _elm_lang$navigation$Navigation$InternetExplorer, - _elm_lang$core$Process$spawn( - A3(_elm_lang$dom$Dom_LowLevel$onWindow, 'popstate', _elm_lang$core$Json_Decode$value, reportLocation)), - _elm_lang$core$Process$spawn( - A3(_elm_lang$dom$Dom_LowLevel$onWindow, 'hashchange', _elm_lang$core$Json_Decode$value, reportLocation))) : A2( - _elm_lang$core$Task$map, - _elm_lang$navigation$Navigation$Normal, - _elm_lang$core$Process$spawn( - A3(_elm_lang$dom$Dom_LowLevel$onWindow, 'popstate', _elm_lang$core$Json_Decode$value, reportLocation))); -}; -var _elm_lang$navigation$Navigation$onEffects = F4( - function (router, cmds, subs, _p15) { - var _p16 = _p15; - var _p19 = _p16.popWatcher; - var stepState = function () { - var _p17 = {ctor: '_Tuple2', _0: subs, _1: _p19}; - _v8_2: - do { - if (_p17._0.ctor === '[]') { - if (_p17._1.ctor === 'Just') { - return A2( - _elm_lang$navigation$Navigation_ops['&>'], - _elm_lang$navigation$Navigation$killPopWatcher(_p17._1._0), - _elm_lang$core$Task$succeed( - A2(_elm_lang$navigation$Navigation$State, subs, _elm_lang$core$Maybe$Nothing))); - } else { - break _v8_2; - } - } else { - if (_p17._1.ctor === 'Nothing') { - return A2( - _elm_lang$core$Task$map, - function (_p18) { - return A2( - _elm_lang$navigation$Navigation$State, - subs, - _elm_lang$core$Maybe$Just(_p18)); - }, - _elm_lang$navigation$Navigation$spawnPopWatcher(router)); - } else { - break _v8_2; - } - } - } while(false); - return _elm_lang$core$Task$succeed( - A2(_elm_lang$navigation$Navigation$State, subs, _p19)); - }(); - return A2( - _elm_lang$navigation$Navigation_ops['&>'], - _elm_lang$core$Task$sequence( - A2( - _elm_lang$core$List$map, - A2(_elm_lang$navigation$Navigation$cmdHelp, router, subs), - cmds)), - stepState); - }); -_elm_lang$core$Native_Platform.effectManagers['Navigation'] = {pkg: 'elm-lang/navigation', init: _elm_lang$navigation$Navigation$init, onEffects: _elm_lang$navigation$Navigation$onEffects, onSelfMsg: _elm_lang$navigation$Navigation$onSelfMsg, tag: 'fx', cmdMap: _elm_lang$navigation$Navigation$cmdMap, subMap: _elm_lang$navigation$Navigation$subMap}; - -var _elm_lang$svg$Svg$map = _elm_lang$virtual_dom$VirtualDom$map; -var _elm_lang$svg$Svg$text = _elm_lang$virtual_dom$VirtualDom$text; -var _elm_lang$svg$Svg$svgNamespace = A2( - _elm_lang$virtual_dom$VirtualDom$property, - 'namespace', - _elm_lang$core$Json_Encode$string('http://www.w3.org/2000/svg')); -var _elm_lang$svg$Svg$node = F3( - function (name, attributes, children) { - return A3( - _elm_lang$virtual_dom$VirtualDom$node, - name, - {ctor: '::', _0: _elm_lang$svg$Svg$svgNamespace, _1: attributes}, - children); - }); -var _elm_lang$svg$Svg$svg = _elm_lang$svg$Svg$node('svg'); -var _elm_lang$svg$Svg$foreignObject = _elm_lang$svg$Svg$node('foreignObject'); -var _elm_lang$svg$Svg$animate = _elm_lang$svg$Svg$node('animate'); -var _elm_lang$svg$Svg$animateColor = _elm_lang$svg$Svg$node('animateColor'); -var _elm_lang$svg$Svg$animateMotion = _elm_lang$svg$Svg$node('animateMotion'); -var _elm_lang$svg$Svg$animateTransform = _elm_lang$svg$Svg$node('animateTransform'); -var _elm_lang$svg$Svg$mpath = _elm_lang$svg$Svg$node('mpath'); -var _elm_lang$svg$Svg$set = _elm_lang$svg$Svg$node('set'); -var _elm_lang$svg$Svg$a = _elm_lang$svg$Svg$node('a'); -var _elm_lang$svg$Svg$defs = _elm_lang$svg$Svg$node('defs'); -var _elm_lang$svg$Svg$g = _elm_lang$svg$Svg$node('g'); -var _elm_lang$svg$Svg$marker = _elm_lang$svg$Svg$node('marker'); -var _elm_lang$svg$Svg$mask = _elm_lang$svg$Svg$node('mask'); -var _elm_lang$svg$Svg$pattern = _elm_lang$svg$Svg$node('pattern'); -var _elm_lang$svg$Svg$switch = _elm_lang$svg$Svg$node('switch'); -var _elm_lang$svg$Svg$symbol = _elm_lang$svg$Svg$node('symbol'); -var _elm_lang$svg$Svg$desc = _elm_lang$svg$Svg$node('desc'); -var _elm_lang$svg$Svg$metadata = _elm_lang$svg$Svg$node('metadata'); -var _elm_lang$svg$Svg$title = _elm_lang$svg$Svg$node('title'); -var _elm_lang$svg$Svg$feBlend = _elm_lang$svg$Svg$node('feBlend'); -var _elm_lang$svg$Svg$feColorMatrix = _elm_lang$svg$Svg$node('feColorMatrix'); -var _elm_lang$svg$Svg$feComponentTransfer = _elm_lang$svg$Svg$node('feComponentTransfer'); -var _elm_lang$svg$Svg$feComposite = _elm_lang$svg$Svg$node('feComposite'); -var _elm_lang$svg$Svg$feConvolveMatrix = _elm_lang$svg$Svg$node('feConvolveMatrix'); -var _elm_lang$svg$Svg$feDiffuseLighting = _elm_lang$svg$Svg$node('feDiffuseLighting'); -var _elm_lang$svg$Svg$feDisplacementMap = _elm_lang$svg$Svg$node('feDisplacementMap'); -var _elm_lang$svg$Svg$feFlood = _elm_lang$svg$Svg$node('feFlood'); -var _elm_lang$svg$Svg$feFuncA = _elm_lang$svg$Svg$node('feFuncA'); -var _elm_lang$svg$Svg$feFuncB = _elm_lang$svg$Svg$node('feFuncB'); -var _elm_lang$svg$Svg$feFuncG = _elm_lang$svg$Svg$node('feFuncG'); -var _elm_lang$svg$Svg$feFuncR = _elm_lang$svg$Svg$node('feFuncR'); -var _elm_lang$svg$Svg$feGaussianBlur = _elm_lang$svg$Svg$node('feGaussianBlur'); -var _elm_lang$svg$Svg$feImage = _elm_lang$svg$Svg$node('feImage'); -var _elm_lang$svg$Svg$feMerge = _elm_lang$svg$Svg$node('feMerge'); -var _elm_lang$svg$Svg$feMergeNode = _elm_lang$svg$Svg$node('feMergeNode'); -var _elm_lang$svg$Svg$feMorphology = _elm_lang$svg$Svg$node('feMorphology'); -var _elm_lang$svg$Svg$feOffset = _elm_lang$svg$Svg$node('feOffset'); -var _elm_lang$svg$Svg$feSpecularLighting = _elm_lang$svg$Svg$node('feSpecularLighting'); -var _elm_lang$svg$Svg$feTile = _elm_lang$svg$Svg$node('feTile'); -var _elm_lang$svg$Svg$feTurbulence = _elm_lang$svg$Svg$node('feTurbulence'); -var _elm_lang$svg$Svg$font = _elm_lang$svg$Svg$node('font'); -var _elm_lang$svg$Svg$linearGradient = _elm_lang$svg$Svg$node('linearGradient'); -var _elm_lang$svg$Svg$radialGradient = _elm_lang$svg$Svg$node('radialGradient'); -var _elm_lang$svg$Svg$stop = _elm_lang$svg$Svg$node('stop'); -var _elm_lang$svg$Svg$circle = _elm_lang$svg$Svg$node('circle'); -var _elm_lang$svg$Svg$ellipse = _elm_lang$svg$Svg$node('ellipse'); -var _elm_lang$svg$Svg$image = _elm_lang$svg$Svg$node('image'); -var _elm_lang$svg$Svg$line = _elm_lang$svg$Svg$node('line'); -var _elm_lang$svg$Svg$path = _elm_lang$svg$Svg$node('path'); -var _elm_lang$svg$Svg$polygon = _elm_lang$svg$Svg$node('polygon'); -var _elm_lang$svg$Svg$polyline = _elm_lang$svg$Svg$node('polyline'); -var _elm_lang$svg$Svg$rect = _elm_lang$svg$Svg$node('rect'); -var _elm_lang$svg$Svg$use = _elm_lang$svg$Svg$node('use'); -var _elm_lang$svg$Svg$feDistantLight = _elm_lang$svg$Svg$node('feDistantLight'); -var _elm_lang$svg$Svg$fePointLight = _elm_lang$svg$Svg$node('fePointLight'); -var _elm_lang$svg$Svg$feSpotLight = _elm_lang$svg$Svg$node('feSpotLight'); -var _elm_lang$svg$Svg$altGlyph = _elm_lang$svg$Svg$node('altGlyph'); -var _elm_lang$svg$Svg$altGlyphDef = _elm_lang$svg$Svg$node('altGlyphDef'); -var _elm_lang$svg$Svg$altGlyphItem = _elm_lang$svg$Svg$node('altGlyphItem'); -var _elm_lang$svg$Svg$glyph = _elm_lang$svg$Svg$node('glyph'); -var _elm_lang$svg$Svg$glyphRef = _elm_lang$svg$Svg$node('glyphRef'); -var _elm_lang$svg$Svg$textPath = _elm_lang$svg$Svg$node('textPath'); -var _elm_lang$svg$Svg$text_ = _elm_lang$svg$Svg$node('text'); -var _elm_lang$svg$Svg$tref = _elm_lang$svg$Svg$node('tref'); -var _elm_lang$svg$Svg$tspan = _elm_lang$svg$Svg$node('tspan'); -var _elm_lang$svg$Svg$clipPath = _elm_lang$svg$Svg$node('clipPath'); -var _elm_lang$svg$Svg$colorProfile = _elm_lang$svg$Svg$node('colorProfile'); -var _elm_lang$svg$Svg$cursor = _elm_lang$svg$Svg$node('cursor'); -var _elm_lang$svg$Svg$filter = _elm_lang$svg$Svg$node('filter'); -var _elm_lang$svg$Svg$script = _elm_lang$svg$Svg$node('script'); -var _elm_lang$svg$Svg$style = _elm_lang$svg$Svg$node('style'); -var _elm_lang$svg$Svg$view = _elm_lang$svg$Svg$node('view'); - -var _elm_lang$svg$Svg_Attributes$writingMode = _elm_lang$virtual_dom$VirtualDom$attribute('writing-mode'); -var _elm_lang$svg$Svg_Attributes$wordSpacing = _elm_lang$virtual_dom$VirtualDom$attribute('word-spacing'); -var _elm_lang$svg$Svg_Attributes$visibility = _elm_lang$virtual_dom$VirtualDom$attribute('visibility'); -var _elm_lang$svg$Svg_Attributes$unicodeBidi = _elm_lang$virtual_dom$VirtualDom$attribute('unicode-bidi'); -var _elm_lang$svg$Svg_Attributes$textRendering = _elm_lang$virtual_dom$VirtualDom$attribute('text-rendering'); -var _elm_lang$svg$Svg_Attributes$textDecoration = _elm_lang$virtual_dom$VirtualDom$attribute('text-decoration'); -var _elm_lang$svg$Svg_Attributes$textAnchor = _elm_lang$virtual_dom$VirtualDom$attribute('text-anchor'); -var _elm_lang$svg$Svg_Attributes$stroke = _elm_lang$virtual_dom$VirtualDom$attribute('stroke'); -var _elm_lang$svg$Svg_Attributes$strokeWidth = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-width'); -var _elm_lang$svg$Svg_Attributes$strokeOpacity = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-opacity'); -var _elm_lang$svg$Svg_Attributes$strokeMiterlimit = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-miterlimit'); -var _elm_lang$svg$Svg_Attributes$strokeLinejoin = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-linejoin'); -var _elm_lang$svg$Svg_Attributes$strokeLinecap = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-linecap'); -var _elm_lang$svg$Svg_Attributes$strokeDashoffset = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-dashoffset'); -var _elm_lang$svg$Svg_Attributes$strokeDasharray = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-dasharray'); -var _elm_lang$svg$Svg_Attributes$stopOpacity = _elm_lang$virtual_dom$VirtualDom$attribute('stop-opacity'); -var _elm_lang$svg$Svg_Attributes$stopColor = _elm_lang$virtual_dom$VirtualDom$attribute('stop-color'); -var _elm_lang$svg$Svg_Attributes$shapeRendering = _elm_lang$virtual_dom$VirtualDom$attribute('shape-rendering'); -var _elm_lang$svg$Svg_Attributes$pointerEvents = _elm_lang$virtual_dom$VirtualDom$attribute('pointer-events'); -var _elm_lang$svg$Svg_Attributes$overflow = _elm_lang$virtual_dom$VirtualDom$attribute('overflow'); -var _elm_lang$svg$Svg_Attributes$opacity = _elm_lang$virtual_dom$VirtualDom$attribute('opacity'); -var _elm_lang$svg$Svg_Attributes$mask = _elm_lang$virtual_dom$VirtualDom$attribute('mask'); -var _elm_lang$svg$Svg_Attributes$markerStart = _elm_lang$virtual_dom$VirtualDom$attribute('marker-start'); -var _elm_lang$svg$Svg_Attributes$markerMid = _elm_lang$virtual_dom$VirtualDom$attribute('marker-mid'); -var _elm_lang$svg$Svg_Attributes$markerEnd = _elm_lang$virtual_dom$VirtualDom$attribute('marker-end'); -var _elm_lang$svg$Svg_Attributes$lightingColor = _elm_lang$virtual_dom$VirtualDom$attribute('lighting-color'); -var _elm_lang$svg$Svg_Attributes$letterSpacing = _elm_lang$virtual_dom$VirtualDom$attribute('letter-spacing'); -var _elm_lang$svg$Svg_Attributes$kerning = _elm_lang$virtual_dom$VirtualDom$attribute('kerning'); -var _elm_lang$svg$Svg_Attributes$imageRendering = _elm_lang$virtual_dom$VirtualDom$attribute('image-rendering'); -var _elm_lang$svg$Svg_Attributes$glyphOrientationVertical = _elm_lang$virtual_dom$VirtualDom$attribute('glyph-orientation-vertical'); -var _elm_lang$svg$Svg_Attributes$glyphOrientationHorizontal = _elm_lang$virtual_dom$VirtualDom$attribute('glyph-orientation-horizontal'); -var _elm_lang$svg$Svg_Attributes$fontWeight = _elm_lang$virtual_dom$VirtualDom$attribute('font-weight'); -var _elm_lang$svg$Svg_Attributes$fontVariant = _elm_lang$virtual_dom$VirtualDom$attribute('font-variant'); -var _elm_lang$svg$Svg_Attributes$fontStyle = _elm_lang$virtual_dom$VirtualDom$attribute('font-style'); -var _elm_lang$svg$Svg_Attributes$fontStretch = _elm_lang$virtual_dom$VirtualDom$attribute('font-stretch'); -var _elm_lang$svg$Svg_Attributes$fontSize = _elm_lang$virtual_dom$VirtualDom$attribute('font-size'); -var _elm_lang$svg$Svg_Attributes$fontSizeAdjust = _elm_lang$virtual_dom$VirtualDom$attribute('font-size-adjust'); -var _elm_lang$svg$Svg_Attributes$fontFamily = _elm_lang$virtual_dom$VirtualDom$attribute('font-family'); -var _elm_lang$svg$Svg_Attributes$floodOpacity = _elm_lang$virtual_dom$VirtualDom$attribute('flood-opacity'); -var _elm_lang$svg$Svg_Attributes$floodColor = _elm_lang$virtual_dom$VirtualDom$attribute('flood-color'); -var _elm_lang$svg$Svg_Attributes$filter = _elm_lang$virtual_dom$VirtualDom$attribute('filter'); -var _elm_lang$svg$Svg_Attributes$fill = _elm_lang$virtual_dom$VirtualDom$attribute('fill'); -var _elm_lang$svg$Svg_Attributes$fillRule = _elm_lang$virtual_dom$VirtualDom$attribute('fill-rule'); -var _elm_lang$svg$Svg_Attributes$fillOpacity = _elm_lang$virtual_dom$VirtualDom$attribute('fill-opacity'); -var _elm_lang$svg$Svg_Attributes$enableBackground = _elm_lang$virtual_dom$VirtualDom$attribute('enable-background'); -var _elm_lang$svg$Svg_Attributes$dominantBaseline = _elm_lang$virtual_dom$VirtualDom$attribute('dominant-baseline'); -var _elm_lang$svg$Svg_Attributes$display = _elm_lang$virtual_dom$VirtualDom$attribute('display'); -var _elm_lang$svg$Svg_Attributes$direction = _elm_lang$virtual_dom$VirtualDom$attribute('direction'); -var _elm_lang$svg$Svg_Attributes$cursor = _elm_lang$virtual_dom$VirtualDom$attribute('cursor'); -var _elm_lang$svg$Svg_Attributes$color = _elm_lang$virtual_dom$VirtualDom$attribute('color'); -var _elm_lang$svg$Svg_Attributes$colorRendering = _elm_lang$virtual_dom$VirtualDom$attribute('color-rendering'); -var _elm_lang$svg$Svg_Attributes$colorProfile = _elm_lang$virtual_dom$VirtualDom$attribute('color-profile'); -var _elm_lang$svg$Svg_Attributes$colorInterpolation = _elm_lang$virtual_dom$VirtualDom$attribute('color-interpolation'); -var _elm_lang$svg$Svg_Attributes$colorInterpolationFilters = _elm_lang$virtual_dom$VirtualDom$attribute('color-interpolation-filters'); -var _elm_lang$svg$Svg_Attributes$clip = _elm_lang$virtual_dom$VirtualDom$attribute('clip'); -var _elm_lang$svg$Svg_Attributes$clipRule = _elm_lang$virtual_dom$VirtualDom$attribute('clip-rule'); -var _elm_lang$svg$Svg_Attributes$clipPath = _elm_lang$virtual_dom$VirtualDom$attribute('clip-path'); -var _elm_lang$svg$Svg_Attributes$baselineShift = _elm_lang$virtual_dom$VirtualDom$attribute('baseline-shift'); -var _elm_lang$svg$Svg_Attributes$alignmentBaseline = _elm_lang$virtual_dom$VirtualDom$attribute('alignment-baseline'); -var _elm_lang$svg$Svg_Attributes$zoomAndPan = _elm_lang$virtual_dom$VirtualDom$attribute('zoomAndPan'); -var _elm_lang$svg$Svg_Attributes$z = _elm_lang$virtual_dom$VirtualDom$attribute('z'); -var _elm_lang$svg$Svg_Attributes$yChannelSelector = _elm_lang$virtual_dom$VirtualDom$attribute('yChannelSelector'); -var _elm_lang$svg$Svg_Attributes$y2 = _elm_lang$virtual_dom$VirtualDom$attribute('y2'); -var _elm_lang$svg$Svg_Attributes$y1 = _elm_lang$virtual_dom$VirtualDom$attribute('y1'); -var _elm_lang$svg$Svg_Attributes$y = _elm_lang$virtual_dom$VirtualDom$attribute('y'); -var _elm_lang$svg$Svg_Attributes$xmlSpace = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/XML/1998/namespace', 'xml:space'); -var _elm_lang$svg$Svg_Attributes$xmlLang = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/XML/1998/namespace', 'xml:lang'); -var _elm_lang$svg$Svg_Attributes$xmlBase = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/XML/1998/namespace', 'xml:base'); -var _elm_lang$svg$Svg_Attributes$xlinkType = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:type'); -var _elm_lang$svg$Svg_Attributes$xlinkTitle = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:title'); -var _elm_lang$svg$Svg_Attributes$xlinkShow = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:show'); -var _elm_lang$svg$Svg_Attributes$xlinkRole = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:role'); -var _elm_lang$svg$Svg_Attributes$xlinkHref = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:href'); -var _elm_lang$svg$Svg_Attributes$xlinkArcrole = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:arcrole'); -var _elm_lang$svg$Svg_Attributes$xlinkActuate = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:actuate'); -var _elm_lang$svg$Svg_Attributes$xChannelSelector = _elm_lang$virtual_dom$VirtualDom$attribute('xChannelSelector'); -var _elm_lang$svg$Svg_Attributes$x2 = _elm_lang$virtual_dom$VirtualDom$attribute('x2'); -var _elm_lang$svg$Svg_Attributes$x1 = _elm_lang$virtual_dom$VirtualDom$attribute('x1'); -var _elm_lang$svg$Svg_Attributes$xHeight = _elm_lang$virtual_dom$VirtualDom$attribute('x-height'); -var _elm_lang$svg$Svg_Attributes$x = _elm_lang$virtual_dom$VirtualDom$attribute('x'); -var _elm_lang$svg$Svg_Attributes$widths = _elm_lang$virtual_dom$VirtualDom$attribute('widths'); -var _elm_lang$svg$Svg_Attributes$width = _elm_lang$virtual_dom$VirtualDom$attribute('width'); -var _elm_lang$svg$Svg_Attributes$viewTarget = _elm_lang$virtual_dom$VirtualDom$attribute('viewTarget'); -var _elm_lang$svg$Svg_Attributes$viewBox = _elm_lang$virtual_dom$VirtualDom$attribute('viewBox'); -var _elm_lang$svg$Svg_Attributes$vertOriginY = _elm_lang$virtual_dom$VirtualDom$attribute('vert-origin-y'); -var _elm_lang$svg$Svg_Attributes$vertOriginX = _elm_lang$virtual_dom$VirtualDom$attribute('vert-origin-x'); -var _elm_lang$svg$Svg_Attributes$vertAdvY = _elm_lang$virtual_dom$VirtualDom$attribute('vert-adv-y'); -var _elm_lang$svg$Svg_Attributes$version = _elm_lang$virtual_dom$VirtualDom$attribute('version'); -var _elm_lang$svg$Svg_Attributes$values = _elm_lang$virtual_dom$VirtualDom$attribute('values'); -var _elm_lang$svg$Svg_Attributes$vMathematical = _elm_lang$virtual_dom$VirtualDom$attribute('v-mathematical'); -var _elm_lang$svg$Svg_Attributes$vIdeographic = _elm_lang$virtual_dom$VirtualDom$attribute('v-ideographic'); -var _elm_lang$svg$Svg_Attributes$vHanging = _elm_lang$virtual_dom$VirtualDom$attribute('v-hanging'); -var _elm_lang$svg$Svg_Attributes$vAlphabetic = _elm_lang$virtual_dom$VirtualDom$attribute('v-alphabetic'); -var _elm_lang$svg$Svg_Attributes$unitsPerEm = _elm_lang$virtual_dom$VirtualDom$attribute('units-per-em'); -var _elm_lang$svg$Svg_Attributes$unicodeRange = _elm_lang$virtual_dom$VirtualDom$attribute('unicode-range'); -var _elm_lang$svg$Svg_Attributes$unicode = _elm_lang$virtual_dom$VirtualDom$attribute('unicode'); -var _elm_lang$svg$Svg_Attributes$underlineThickness = _elm_lang$virtual_dom$VirtualDom$attribute('underline-thickness'); -var _elm_lang$svg$Svg_Attributes$underlinePosition = _elm_lang$virtual_dom$VirtualDom$attribute('underline-position'); -var _elm_lang$svg$Svg_Attributes$u2 = _elm_lang$virtual_dom$VirtualDom$attribute('u2'); -var _elm_lang$svg$Svg_Attributes$u1 = _elm_lang$virtual_dom$VirtualDom$attribute('u1'); -var _elm_lang$svg$Svg_Attributes$type_ = _elm_lang$virtual_dom$VirtualDom$attribute('type'); -var _elm_lang$svg$Svg_Attributes$transform = _elm_lang$virtual_dom$VirtualDom$attribute('transform'); -var _elm_lang$svg$Svg_Attributes$to = _elm_lang$virtual_dom$VirtualDom$attribute('to'); -var _elm_lang$svg$Svg_Attributes$title = _elm_lang$virtual_dom$VirtualDom$attribute('title'); -var _elm_lang$svg$Svg_Attributes$textLength = _elm_lang$virtual_dom$VirtualDom$attribute('textLength'); -var _elm_lang$svg$Svg_Attributes$targetY = _elm_lang$virtual_dom$VirtualDom$attribute('targetY'); -var _elm_lang$svg$Svg_Attributes$targetX = _elm_lang$virtual_dom$VirtualDom$attribute('targetX'); -var _elm_lang$svg$Svg_Attributes$target = _elm_lang$virtual_dom$VirtualDom$attribute('target'); -var _elm_lang$svg$Svg_Attributes$tableValues = _elm_lang$virtual_dom$VirtualDom$attribute('tableValues'); -var _elm_lang$svg$Svg_Attributes$systemLanguage = _elm_lang$virtual_dom$VirtualDom$attribute('systemLanguage'); -var _elm_lang$svg$Svg_Attributes$surfaceScale = _elm_lang$virtual_dom$VirtualDom$attribute('surfaceScale'); -var _elm_lang$svg$Svg_Attributes$style = _elm_lang$virtual_dom$VirtualDom$attribute('style'); -var _elm_lang$svg$Svg_Attributes$string = _elm_lang$virtual_dom$VirtualDom$attribute('string'); -var _elm_lang$svg$Svg_Attributes$strikethroughThickness = _elm_lang$virtual_dom$VirtualDom$attribute('strikethrough-thickness'); -var _elm_lang$svg$Svg_Attributes$strikethroughPosition = _elm_lang$virtual_dom$VirtualDom$attribute('strikethrough-position'); -var _elm_lang$svg$Svg_Attributes$stitchTiles = _elm_lang$virtual_dom$VirtualDom$attribute('stitchTiles'); -var _elm_lang$svg$Svg_Attributes$stemv = _elm_lang$virtual_dom$VirtualDom$attribute('stemv'); -var _elm_lang$svg$Svg_Attributes$stemh = _elm_lang$virtual_dom$VirtualDom$attribute('stemh'); -var _elm_lang$svg$Svg_Attributes$stdDeviation = _elm_lang$virtual_dom$VirtualDom$attribute('stdDeviation'); -var _elm_lang$svg$Svg_Attributes$startOffset = _elm_lang$virtual_dom$VirtualDom$attribute('startOffset'); -var _elm_lang$svg$Svg_Attributes$spreadMethod = _elm_lang$virtual_dom$VirtualDom$attribute('spreadMethod'); -var _elm_lang$svg$Svg_Attributes$speed = _elm_lang$virtual_dom$VirtualDom$attribute('speed'); -var _elm_lang$svg$Svg_Attributes$specularExponent = _elm_lang$virtual_dom$VirtualDom$attribute('specularExponent'); -var _elm_lang$svg$Svg_Attributes$specularConstant = _elm_lang$virtual_dom$VirtualDom$attribute('specularConstant'); -var _elm_lang$svg$Svg_Attributes$spacing = _elm_lang$virtual_dom$VirtualDom$attribute('spacing'); -var _elm_lang$svg$Svg_Attributes$slope = _elm_lang$virtual_dom$VirtualDom$attribute('slope'); -var _elm_lang$svg$Svg_Attributes$seed = _elm_lang$virtual_dom$VirtualDom$attribute('seed'); -var _elm_lang$svg$Svg_Attributes$scale = _elm_lang$virtual_dom$VirtualDom$attribute('scale'); -var _elm_lang$svg$Svg_Attributes$ry = _elm_lang$virtual_dom$VirtualDom$attribute('ry'); -var _elm_lang$svg$Svg_Attributes$rx = _elm_lang$virtual_dom$VirtualDom$attribute('rx'); -var _elm_lang$svg$Svg_Attributes$rotate = _elm_lang$virtual_dom$VirtualDom$attribute('rotate'); -var _elm_lang$svg$Svg_Attributes$result = _elm_lang$virtual_dom$VirtualDom$attribute('result'); -var _elm_lang$svg$Svg_Attributes$restart = _elm_lang$virtual_dom$VirtualDom$attribute('restart'); -var _elm_lang$svg$Svg_Attributes$requiredFeatures = _elm_lang$virtual_dom$VirtualDom$attribute('requiredFeatures'); -var _elm_lang$svg$Svg_Attributes$requiredExtensions = _elm_lang$virtual_dom$VirtualDom$attribute('requiredExtensions'); -var _elm_lang$svg$Svg_Attributes$repeatDur = _elm_lang$virtual_dom$VirtualDom$attribute('repeatDur'); -var _elm_lang$svg$Svg_Attributes$repeatCount = _elm_lang$virtual_dom$VirtualDom$attribute('repeatCount'); -var _elm_lang$svg$Svg_Attributes$renderingIntent = _elm_lang$virtual_dom$VirtualDom$attribute('rendering-intent'); -var _elm_lang$svg$Svg_Attributes$refY = _elm_lang$virtual_dom$VirtualDom$attribute('refY'); -var _elm_lang$svg$Svg_Attributes$refX = _elm_lang$virtual_dom$VirtualDom$attribute('refX'); -var _elm_lang$svg$Svg_Attributes$radius = _elm_lang$virtual_dom$VirtualDom$attribute('radius'); -var _elm_lang$svg$Svg_Attributes$r = _elm_lang$virtual_dom$VirtualDom$attribute('r'); -var _elm_lang$svg$Svg_Attributes$primitiveUnits = _elm_lang$virtual_dom$VirtualDom$attribute('primitiveUnits'); -var _elm_lang$svg$Svg_Attributes$preserveAspectRatio = _elm_lang$virtual_dom$VirtualDom$attribute('preserveAspectRatio'); -var _elm_lang$svg$Svg_Attributes$preserveAlpha = _elm_lang$virtual_dom$VirtualDom$attribute('preserveAlpha'); -var _elm_lang$svg$Svg_Attributes$pointsAtZ = _elm_lang$virtual_dom$VirtualDom$attribute('pointsAtZ'); -var _elm_lang$svg$Svg_Attributes$pointsAtY = _elm_lang$virtual_dom$VirtualDom$attribute('pointsAtY'); -var _elm_lang$svg$Svg_Attributes$pointsAtX = _elm_lang$virtual_dom$VirtualDom$attribute('pointsAtX'); -var _elm_lang$svg$Svg_Attributes$points = _elm_lang$virtual_dom$VirtualDom$attribute('points'); -var _elm_lang$svg$Svg_Attributes$pointOrder = _elm_lang$virtual_dom$VirtualDom$attribute('point-order'); -var _elm_lang$svg$Svg_Attributes$patternUnits = _elm_lang$virtual_dom$VirtualDom$attribute('patternUnits'); -var _elm_lang$svg$Svg_Attributes$patternTransform = _elm_lang$virtual_dom$VirtualDom$attribute('patternTransform'); -var _elm_lang$svg$Svg_Attributes$patternContentUnits = _elm_lang$virtual_dom$VirtualDom$attribute('patternContentUnits'); -var _elm_lang$svg$Svg_Attributes$pathLength = _elm_lang$virtual_dom$VirtualDom$attribute('pathLength'); -var _elm_lang$svg$Svg_Attributes$path = _elm_lang$virtual_dom$VirtualDom$attribute('path'); -var _elm_lang$svg$Svg_Attributes$panose1 = _elm_lang$virtual_dom$VirtualDom$attribute('panose-1'); -var _elm_lang$svg$Svg_Attributes$overlineThickness = _elm_lang$virtual_dom$VirtualDom$attribute('overline-thickness'); -var _elm_lang$svg$Svg_Attributes$overlinePosition = _elm_lang$virtual_dom$VirtualDom$attribute('overline-position'); -var _elm_lang$svg$Svg_Attributes$origin = _elm_lang$virtual_dom$VirtualDom$attribute('origin'); -var _elm_lang$svg$Svg_Attributes$orientation = _elm_lang$virtual_dom$VirtualDom$attribute('orientation'); -var _elm_lang$svg$Svg_Attributes$orient = _elm_lang$virtual_dom$VirtualDom$attribute('orient'); -var _elm_lang$svg$Svg_Attributes$order = _elm_lang$virtual_dom$VirtualDom$attribute('order'); -var _elm_lang$svg$Svg_Attributes$operator = _elm_lang$virtual_dom$VirtualDom$attribute('operator'); -var _elm_lang$svg$Svg_Attributes$offset = _elm_lang$virtual_dom$VirtualDom$attribute('offset'); -var _elm_lang$svg$Svg_Attributes$numOctaves = _elm_lang$virtual_dom$VirtualDom$attribute('numOctaves'); -var _elm_lang$svg$Svg_Attributes$name = _elm_lang$virtual_dom$VirtualDom$attribute('name'); -var _elm_lang$svg$Svg_Attributes$mode = _elm_lang$virtual_dom$VirtualDom$attribute('mode'); -var _elm_lang$svg$Svg_Attributes$min = _elm_lang$virtual_dom$VirtualDom$attribute('min'); -var _elm_lang$svg$Svg_Attributes$method = _elm_lang$virtual_dom$VirtualDom$attribute('method'); -var _elm_lang$svg$Svg_Attributes$media = _elm_lang$virtual_dom$VirtualDom$attribute('media'); -var _elm_lang$svg$Svg_Attributes$max = _elm_lang$virtual_dom$VirtualDom$attribute('max'); -var _elm_lang$svg$Svg_Attributes$mathematical = _elm_lang$virtual_dom$VirtualDom$attribute('mathematical'); -var _elm_lang$svg$Svg_Attributes$maskUnits = _elm_lang$virtual_dom$VirtualDom$attribute('maskUnits'); -var _elm_lang$svg$Svg_Attributes$maskContentUnits = _elm_lang$virtual_dom$VirtualDom$attribute('maskContentUnits'); -var _elm_lang$svg$Svg_Attributes$markerWidth = _elm_lang$virtual_dom$VirtualDom$attribute('markerWidth'); -var _elm_lang$svg$Svg_Attributes$markerUnits = _elm_lang$virtual_dom$VirtualDom$attribute('markerUnits'); -var _elm_lang$svg$Svg_Attributes$markerHeight = _elm_lang$virtual_dom$VirtualDom$attribute('markerHeight'); -var _elm_lang$svg$Svg_Attributes$local = _elm_lang$virtual_dom$VirtualDom$attribute('local'); -var _elm_lang$svg$Svg_Attributes$limitingConeAngle = _elm_lang$virtual_dom$VirtualDom$attribute('limitingConeAngle'); -var _elm_lang$svg$Svg_Attributes$lengthAdjust = _elm_lang$virtual_dom$VirtualDom$attribute('lengthAdjust'); -var _elm_lang$svg$Svg_Attributes$lang = _elm_lang$virtual_dom$VirtualDom$attribute('lang'); -var _elm_lang$svg$Svg_Attributes$keyTimes = _elm_lang$virtual_dom$VirtualDom$attribute('keyTimes'); -var _elm_lang$svg$Svg_Attributes$keySplines = _elm_lang$virtual_dom$VirtualDom$attribute('keySplines'); -var _elm_lang$svg$Svg_Attributes$keyPoints = _elm_lang$virtual_dom$VirtualDom$attribute('keyPoints'); -var _elm_lang$svg$Svg_Attributes$kernelUnitLength = _elm_lang$virtual_dom$VirtualDom$attribute('kernelUnitLength'); -var _elm_lang$svg$Svg_Attributes$kernelMatrix = _elm_lang$virtual_dom$VirtualDom$attribute('kernelMatrix'); -var _elm_lang$svg$Svg_Attributes$k4 = _elm_lang$virtual_dom$VirtualDom$attribute('k4'); -var _elm_lang$svg$Svg_Attributes$k3 = _elm_lang$virtual_dom$VirtualDom$attribute('k3'); -var _elm_lang$svg$Svg_Attributes$k2 = _elm_lang$virtual_dom$VirtualDom$attribute('k2'); -var _elm_lang$svg$Svg_Attributes$k1 = _elm_lang$virtual_dom$VirtualDom$attribute('k1'); -var _elm_lang$svg$Svg_Attributes$k = _elm_lang$virtual_dom$VirtualDom$attribute('k'); -var _elm_lang$svg$Svg_Attributes$intercept = _elm_lang$virtual_dom$VirtualDom$attribute('intercept'); -var _elm_lang$svg$Svg_Attributes$in2 = _elm_lang$virtual_dom$VirtualDom$attribute('in2'); -var _elm_lang$svg$Svg_Attributes$in_ = _elm_lang$virtual_dom$VirtualDom$attribute('in'); -var _elm_lang$svg$Svg_Attributes$ideographic = _elm_lang$virtual_dom$VirtualDom$attribute('ideographic'); -var _elm_lang$svg$Svg_Attributes$id = _elm_lang$virtual_dom$VirtualDom$attribute('id'); -var _elm_lang$svg$Svg_Attributes$horizOriginY = _elm_lang$virtual_dom$VirtualDom$attribute('horiz-origin-y'); -var _elm_lang$svg$Svg_Attributes$horizOriginX = _elm_lang$virtual_dom$VirtualDom$attribute('horiz-origin-x'); -var _elm_lang$svg$Svg_Attributes$horizAdvX = _elm_lang$virtual_dom$VirtualDom$attribute('horiz-adv-x'); -var _elm_lang$svg$Svg_Attributes$height = _elm_lang$virtual_dom$VirtualDom$attribute('height'); -var _elm_lang$svg$Svg_Attributes$hanging = _elm_lang$virtual_dom$VirtualDom$attribute('hanging'); -var _elm_lang$svg$Svg_Attributes$gradientUnits = _elm_lang$virtual_dom$VirtualDom$attribute('gradientUnits'); -var _elm_lang$svg$Svg_Attributes$gradientTransform = _elm_lang$virtual_dom$VirtualDom$attribute('gradientTransform'); -var _elm_lang$svg$Svg_Attributes$glyphRef = _elm_lang$virtual_dom$VirtualDom$attribute('glyphRef'); -var _elm_lang$svg$Svg_Attributes$glyphName = _elm_lang$virtual_dom$VirtualDom$attribute('glyph-name'); -var _elm_lang$svg$Svg_Attributes$g2 = _elm_lang$virtual_dom$VirtualDom$attribute('g2'); -var _elm_lang$svg$Svg_Attributes$g1 = _elm_lang$virtual_dom$VirtualDom$attribute('g1'); -var _elm_lang$svg$Svg_Attributes$fy = _elm_lang$virtual_dom$VirtualDom$attribute('fy'); -var _elm_lang$svg$Svg_Attributes$fx = _elm_lang$virtual_dom$VirtualDom$attribute('fx'); -var _elm_lang$svg$Svg_Attributes$from = _elm_lang$virtual_dom$VirtualDom$attribute('from'); -var _elm_lang$svg$Svg_Attributes$format = _elm_lang$virtual_dom$VirtualDom$attribute('format'); -var _elm_lang$svg$Svg_Attributes$filterUnits = _elm_lang$virtual_dom$VirtualDom$attribute('filterUnits'); -var _elm_lang$svg$Svg_Attributes$filterRes = _elm_lang$virtual_dom$VirtualDom$attribute('filterRes'); -var _elm_lang$svg$Svg_Attributes$externalResourcesRequired = _elm_lang$virtual_dom$VirtualDom$attribute('externalResourcesRequired'); -var _elm_lang$svg$Svg_Attributes$exponent = _elm_lang$virtual_dom$VirtualDom$attribute('exponent'); -var _elm_lang$svg$Svg_Attributes$end = _elm_lang$virtual_dom$VirtualDom$attribute('end'); -var _elm_lang$svg$Svg_Attributes$elevation = _elm_lang$virtual_dom$VirtualDom$attribute('elevation'); -var _elm_lang$svg$Svg_Attributes$edgeMode = _elm_lang$virtual_dom$VirtualDom$attribute('edgeMode'); -var _elm_lang$svg$Svg_Attributes$dy = _elm_lang$virtual_dom$VirtualDom$attribute('dy'); -var _elm_lang$svg$Svg_Attributes$dx = _elm_lang$virtual_dom$VirtualDom$attribute('dx'); -var _elm_lang$svg$Svg_Attributes$dur = _elm_lang$virtual_dom$VirtualDom$attribute('dur'); -var _elm_lang$svg$Svg_Attributes$divisor = _elm_lang$virtual_dom$VirtualDom$attribute('divisor'); -var _elm_lang$svg$Svg_Attributes$diffuseConstant = _elm_lang$virtual_dom$VirtualDom$attribute('diffuseConstant'); -var _elm_lang$svg$Svg_Attributes$descent = _elm_lang$virtual_dom$VirtualDom$attribute('descent'); -var _elm_lang$svg$Svg_Attributes$decelerate = _elm_lang$virtual_dom$VirtualDom$attribute('decelerate'); -var _elm_lang$svg$Svg_Attributes$d = _elm_lang$virtual_dom$VirtualDom$attribute('d'); -var _elm_lang$svg$Svg_Attributes$cy = _elm_lang$virtual_dom$VirtualDom$attribute('cy'); -var _elm_lang$svg$Svg_Attributes$cx = _elm_lang$virtual_dom$VirtualDom$attribute('cx'); -var _elm_lang$svg$Svg_Attributes$contentStyleType = _elm_lang$virtual_dom$VirtualDom$attribute('contentStyleType'); -var _elm_lang$svg$Svg_Attributes$contentScriptType = _elm_lang$virtual_dom$VirtualDom$attribute('contentScriptType'); -var _elm_lang$svg$Svg_Attributes$clipPathUnits = _elm_lang$virtual_dom$VirtualDom$attribute('clipPathUnits'); -var _elm_lang$svg$Svg_Attributes$class = _elm_lang$virtual_dom$VirtualDom$attribute('class'); -var _elm_lang$svg$Svg_Attributes$capHeight = _elm_lang$virtual_dom$VirtualDom$attribute('cap-height'); -var _elm_lang$svg$Svg_Attributes$calcMode = _elm_lang$virtual_dom$VirtualDom$attribute('calcMode'); -var _elm_lang$svg$Svg_Attributes$by = _elm_lang$virtual_dom$VirtualDom$attribute('by'); -var _elm_lang$svg$Svg_Attributes$bias = _elm_lang$virtual_dom$VirtualDom$attribute('bias'); -var _elm_lang$svg$Svg_Attributes$begin = _elm_lang$virtual_dom$VirtualDom$attribute('begin'); -var _elm_lang$svg$Svg_Attributes$bbox = _elm_lang$virtual_dom$VirtualDom$attribute('bbox'); -var _elm_lang$svg$Svg_Attributes$baseProfile = _elm_lang$virtual_dom$VirtualDom$attribute('baseProfile'); -var _elm_lang$svg$Svg_Attributes$baseFrequency = _elm_lang$virtual_dom$VirtualDom$attribute('baseFrequency'); -var _elm_lang$svg$Svg_Attributes$azimuth = _elm_lang$virtual_dom$VirtualDom$attribute('azimuth'); -var _elm_lang$svg$Svg_Attributes$autoReverse = _elm_lang$virtual_dom$VirtualDom$attribute('autoReverse'); -var _elm_lang$svg$Svg_Attributes$attributeType = _elm_lang$virtual_dom$VirtualDom$attribute('attributeType'); -var _elm_lang$svg$Svg_Attributes$attributeName = _elm_lang$virtual_dom$VirtualDom$attribute('attributeName'); -var _elm_lang$svg$Svg_Attributes$ascent = _elm_lang$virtual_dom$VirtualDom$attribute('ascent'); -var _elm_lang$svg$Svg_Attributes$arabicForm = _elm_lang$virtual_dom$VirtualDom$attribute('arabic-form'); -var _elm_lang$svg$Svg_Attributes$amplitude = _elm_lang$virtual_dom$VirtualDom$attribute('amplitude'); -var _elm_lang$svg$Svg_Attributes$allowReorder = _elm_lang$virtual_dom$VirtualDom$attribute('allowReorder'); -var _elm_lang$svg$Svg_Attributes$alphabetic = _elm_lang$virtual_dom$VirtualDom$attribute('alphabetic'); -var _elm_lang$svg$Svg_Attributes$additive = _elm_lang$virtual_dom$VirtualDom$attribute('additive'); -var _elm_lang$svg$Svg_Attributes$accumulate = _elm_lang$virtual_dom$VirtualDom$attribute('accumulate'); -var _elm_lang$svg$Svg_Attributes$accelerate = _elm_lang$virtual_dom$VirtualDom$attribute('accelerate'); -var _elm_lang$svg$Svg_Attributes$accentHeight = _elm_lang$virtual_dom$VirtualDom$attribute('accent-height'); - -var _elm_lang$svg$Svg_Events$on = _elm_lang$virtual_dom$VirtualDom$on; -var _elm_lang$svg$Svg_Events$simpleOn = F2( - function (name, msg) { - return A2( - _elm_lang$svg$Svg_Events$on, - name, - _elm_lang$core$Json_Decode$succeed(msg)); - }); -var _elm_lang$svg$Svg_Events$onBegin = _elm_lang$svg$Svg_Events$simpleOn('begin'); -var _elm_lang$svg$Svg_Events$onEnd = _elm_lang$svg$Svg_Events$simpleOn('end'); -var _elm_lang$svg$Svg_Events$onRepeat = _elm_lang$svg$Svg_Events$simpleOn('repeat'); -var _elm_lang$svg$Svg_Events$onAbort = _elm_lang$svg$Svg_Events$simpleOn('abort'); -var _elm_lang$svg$Svg_Events$onError = _elm_lang$svg$Svg_Events$simpleOn('error'); -var _elm_lang$svg$Svg_Events$onResize = _elm_lang$svg$Svg_Events$simpleOn('resize'); -var _elm_lang$svg$Svg_Events$onScroll = _elm_lang$svg$Svg_Events$simpleOn('scroll'); -var _elm_lang$svg$Svg_Events$onLoad = _elm_lang$svg$Svg_Events$simpleOn('load'); -var _elm_lang$svg$Svg_Events$onUnload = _elm_lang$svg$Svg_Events$simpleOn('unload'); -var _elm_lang$svg$Svg_Events$onZoom = _elm_lang$svg$Svg_Events$simpleOn('zoom'); -var _elm_lang$svg$Svg_Events$onActivate = _elm_lang$svg$Svg_Events$simpleOn('activate'); -var _elm_lang$svg$Svg_Events$onClick = _elm_lang$svg$Svg_Events$simpleOn('click'); -var _elm_lang$svg$Svg_Events$onFocusIn = _elm_lang$svg$Svg_Events$simpleOn('focusin'); -var _elm_lang$svg$Svg_Events$onFocusOut = _elm_lang$svg$Svg_Events$simpleOn('focusout'); -var _elm_lang$svg$Svg_Events$onMouseDown = _elm_lang$svg$Svg_Events$simpleOn('mousedown'); -var _elm_lang$svg$Svg_Events$onMouseMove = _elm_lang$svg$Svg_Events$simpleOn('mousemove'); -var _elm_lang$svg$Svg_Events$onMouseOut = _elm_lang$svg$Svg_Events$simpleOn('mouseout'); -var _elm_lang$svg$Svg_Events$onMouseOver = _elm_lang$svg$Svg_Events$simpleOn('mouseover'); -var _elm_lang$svg$Svg_Events$onMouseUp = _elm_lang$svg$Svg_Events$simpleOn('mouseup'); - -var _evancz$elm_markdown$Native_Markdown = function() { - - -// VIRTUAL-DOM WIDGETS - -function toHtml(options, factList, rawMarkdown) -{ - var model = { - options: options, - markdown: rawMarkdown - }; - return _elm_lang$virtual_dom$Native_VirtualDom.custom(factList, model, implementation); -} - - -// WIDGET IMPLEMENTATION - -var implementation = { - render: render, - diff: diff -}; - -function render(model) -{ - var html = marked(model.markdown, formatOptions(model.options)); - var div = document.createElement('div'); - div.innerHTML = html; - return div; -} - -function diff(a, b) -{ - - if (a.model.markdown === b.model.markdown && a.model.options === b.model.options) - { - return null; - } - - return { - applyPatch: applyPatch, - data: marked(b.model.markdown, formatOptions(b.model.options)) - }; -} - -function applyPatch(domNode, data) -{ - domNode.innerHTML = data; - return domNode; -} - - -// ACTUAL MARKDOWN PARSER - -var marked = function() { - // catch the `marked` object regardless of the outer environment. - // (ex. a CommonJS module compatible environment.) - // note that this depends on marked's implementation of environment detection. - var module = {}; - var exports = module.exports = {}; - - /** - * marked - a markdown parser - * Copyright (c) 2011-2014, Christopher Jeffrey. (MIT Licensed) - * https://github.com/chjj/marked - * commit cd2f6f5b7091154c5526e79b5f3bfb4d15995a51 - */ - (function(){var block={newline:/^\n+/,code:/^( {4}[^\n]+\n*)+/,fences:noop,hr:/^( *[-*_]){3,} *(?:\n+|$)/,heading:/^ *(#{1,6}) *([^\n]+?) *#* *(?:\n+|$)/,nptable:noop,lheading:/^([^\n]+)\n *(=|-){2,} *(?:\n+|$)/,blockquote:/^( *>[^\n]+(\n(?!def)[^\n]+)*\n*)+/,list:/^( *)(bull) [\s\S]+?(?:hr|def|\n{2,}(?! )(?!\1bull )\n*|\s*$)/,html:/^ *(?:comment *(?:\n|\s*$)|closed *(?:\n{2,}|\s*$)|closing *(?:\n{2,}|\s*$))/,def:/^ *\[([^\]]+)\]: *]+)>?(?: +["(]([^\n]+)[")])? *(?:\n+|$)/,table:noop,paragraph:/^((?:[^\n]+\n?(?!hr|heading|lheading|blockquote|tag|def))+)\n*/,text:/^[^\n]+/};block.bullet=/(?:[*+-]|\d+\.)/;block.item=/^( *)(bull) [^\n]*(?:\n(?!\1bull )[^\n]*)*/;block.item=replace(block.item,"gm")(/bull/g,block.bullet)();block.list=replace(block.list)(/bull/g,block.bullet)("hr","\\n+(?=\\1?(?:[-*_] *){3,}(?:\\n+|$))")("def","\\n+(?="+block.def.source+")")();block.blockquote=replace(block.blockquote)("def",block.def)();block._tag="(?!(?:"+"a|em|strong|small|s|cite|q|dfn|abbr|data|time|code"+"|var|samp|kbd|sub|sup|i|b|u|mark|ruby|rt|rp|bdi|bdo"+"|span|br|wbr|ins|del|img)\\b)\\w+(?!:/|[^\\w\\s@]*@)\\b";block.html=replace(block.html)("comment",//)("closed",/<(tag)[\s\S]+?<\/\1>/)("closing",/])*?>/)(/tag/g,block._tag)();block.paragraph=replace(block.paragraph)("hr",block.hr)("heading",block.heading)("lheading",block.lheading)("blockquote",block.blockquote)("tag","<"+block._tag)("def",block.def)();block.normal=merge({},block);block.gfm=merge({},block.normal,{fences:/^ *(`{3,}|~{3,})[ \.]*(\S+)? *\n([\s\S]*?)\s*\1 *(?:\n+|$)/,paragraph:/^/,heading:/^ *(#{1,6}) +([^\n]+?) *#* *(?:\n+|$)/});block.gfm.paragraph=replace(block.paragraph)("(?!","(?!"+block.gfm.fences.source.replace("\\1","\\2")+"|"+block.list.source.replace("\\1","\\3")+"|")();block.tables=merge({},block.gfm,{nptable:/^ *(\S.*\|.*)\n *([-:]+ *\|[-| :]*)\n((?:.*\|.*(?:\n|$))*)\n*/,table:/^ *\|(.+)\n *\|( *[-:]+[-| :]*)\n((?: *\|.*(?:\n|$))*)\n*/});function Lexer(options){this.tokens=[];this.tokens.links={};this.options=options||marked.defaults;this.rules=block.normal;if(this.options.gfm){if(this.options.tables){this.rules=block.tables}else{this.rules=block.gfm}}}Lexer.rules=block;Lexer.lex=function(src,options){var lexer=new Lexer(options);return lexer.lex(src)};Lexer.prototype.lex=function(src){src=src.replace(/\r\n|\r/g,"\n").replace(/\t/g," ").replace(/\u00a0/g," ").replace(/\u2424/g,"\n");return this.token(src,true)};Lexer.prototype.token=function(src,top,bq){var src=src.replace(/^ +$/gm,""),next,loose,cap,bull,b,item,space,i,l;while(src){if(cap=this.rules.newline.exec(src)){src=src.substring(cap[0].length);if(cap[0].length>1){this.tokens.push({type:"space"})}}if(cap=this.rules.code.exec(src)){src=src.substring(cap[0].length);cap=cap[0].replace(/^ {4}/gm,"");this.tokens.push({type:"code",text:!this.options.pedantic?cap.replace(/\n+$/,""):cap});continue}if(cap=this.rules.fences.exec(src)){src=src.substring(cap[0].length);this.tokens.push({type:"code",lang:cap[2],text:cap[3]||""});continue}if(cap=this.rules.heading.exec(src)){src=src.substring(cap[0].length);this.tokens.push({type:"heading",depth:cap[1].length,text:cap[2]});continue}if(top&&(cap=this.rules.nptable.exec(src))){src=src.substring(cap[0].length);item={type:"table",header:cap[1].replace(/^ *| *\| *$/g,"").split(/ *\| */),align:cap[2].replace(/^ *|\| *$/g,"").split(/ *\| */),cells:cap[3].replace(/\n$/,"").split("\n")};for(i=0;i ?/gm,"");this.token(cap,top,true);this.tokens.push({type:"blockquote_end"});continue}if(cap=this.rules.list.exec(src)){src=src.substring(cap[0].length);bull=cap[2];this.tokens.push({type:"list_start",ordered:bull.length>1});cap=cap[0].match(this.rules.item);next=false;l=cap.length;i=0;for(;i1&&b.length>1)){src=cap.slice(i+1).join("\n")+src;i=l-1}}loose=next||/\n\n(?!\s*$)/.test(item);if(i!==l-1){next=item.charAt(item.length-1)==="\n";if(!loose)loose=next}this.tokens.push({type:loose?"loose_item_start":"list_item_start"});this.token(item,false,bq);this.tokens.push({type:"list_item_end"})}this.tokens.push({type:"list_end"});continue}if(cap=this.rules.html.exec(src)){src=src.substring(cap[0].length);this.tokens.push({type:this.options.sanitize?"paragraph":"html",pre:!this.options.sanitizer&&(cap[1]==="pre"||cap[1]==="script"||cap[1]==="style"),text:cap[0]});continue}if(!bq&&top&&(cap=this.rules.def.exec(src))){src=src.substring(cap[0].length);this.tokens.links[cap[1].toLowerCase()]={href:cap[2],title:cap[3]};continue}if(top&&(cap=this.rules.table.exec(src))){src=src.substring(cap[0].length);item={type:"table",header:cap[1].replace(/^ *| *\| *$/g,"").split(/ *\| */),align:cap[2].replace(/^ *|\| *$/g,"").split(/ *\| */),cells:cap[3].replace(/(?: *\| *)?\n$/,"").split("\n")};for(i=0;i])/,autolink:/^<([^ >]+(@|:\/)[^ >]+)>/,url:noop,tag:/^|^<\/?\w+(?:"[^"]*"|'[^']*'|[^'">])*?>/,link:/^!?\[(inside)\]\(href\)/,reflink:/^!?\[(inside)\]\s*\[([^\]]*)\]/,nolink:/^!?\[((?:\[[^\]]*\]|[^\[\]])*)\]/,strong:/^__([\s\S]+?)__(?!_)|^\*\*([\s\S]+?)\*\*(?!\*)/,em:/^\b_((?:[^_]|__)+?)_\b|^\*((?:\*\*|[\s\S])+?)\*(?!\*)/,code:/^(`+)\s*([\s\S]*?[^`])\s*\1(?!`)/,br:/^ {2,}\n(?!\s*$)/,del:noop,text:/^[\s\S]+?(?=[\\?(?:\s+['"]([\s\S]*?)['"])?\s*/;inline.link=replace(inline.link)("inside",inline._inside)("href",inline._href)();inline.reflink=replace(inline.reflink)("inside",inline._inside)();inline.normal=merge({},inline);inline.pedantic=merge({},inline.normal,{strong:/^__(?=\S)([\s\S]*?\S)__(?!_)|^\*\*(?=\S)([\s\S]*?\S)\*\*(?!\*)/,em:/^_(?=\S)([\s\S]*?\S)_(?!_)|^\*(?=\S)([\s\S]*?\S)\*(?!\*)/});inline.gfm=merge({},inline.normal,{escape:replace(inline.escape)("])","~|])")(),url:/^(https?:\/\/[^\s<]+[^<.,:;"')\]\s])/,del:/^~~(?=\S)([\s\S]*?\S)~~/,text:replace(inline.text)("]|","~]|")("|","|https?://|")()});inline.breaks=merge({},inline.gfm,{br:replace(inline.br)("{2,}","*")(),text:replace(inline.gfm.text)("{2,}","*")()});function InlineLexer(links,options){this.options=options||marked.defaults;this.links=links;this.rules=inline.normal;this.renderer=this.options.renderer||new Renderer;this.renderer.options=this.options;if(!this.links){throw new Error("Tokens array requires a `links` property.")}if(this.options.gfm){if(this.options.breaks){this.rules=inline.breaks}else{this.rules=inline.gfm}}else if(this.options.pedantic){this.rules=inline.pedantic}}InlineLexer.rules=inline;InlineLexer.output=function(src,links,options){var inline=new InlineLexer(links,options);return inline.output(src)};InlineLexer.prototype.output=function(src){var out="",link,text,href,cap;while(src){if(cap=this.rules.escape.exec(src)){src=src.substring(cap[0].length);out+=cap[1];continue}if(cap=this.rules.autolink.exec(src)){src=src.substring(cap[0].length);if(cap[2]==="@"){text=cap[1].charAt(6)===":"?this.mangle(cap[1].substring(7)):this.mangle(cap[1]);href=this.mangle("mailto:")+text}else{text=escape(cap[1]);href=text}out+=this.renderer.link(href,null,text);continue}if(!this.inLink&&(cap=this.rules.url.exec(src))){src=src.substring(cap[0].length);text=escape(cap[1]);href=text;out+=this.renderer.link(href,null,text);continue}if(cap=this.rules.tag.exec(src)){if(!this.inLink&&/^/i.test(cap[0])){this.inLink=false}src=src.substring(cap[0].length);out+=this.options.sanitize?this.options.sanitizer?this.options.sanitizer(cap[0]):escape(cap[0]):cap[0];continue}if(cap=this.rules.link.exec(src)){src=src.substring(cap[0].length);this.inLink=true;out+=this.outputLink(cap,{href:cap[2],title:cap[3]});this.inLink=false;continue}if((cap=this.rules.reflink.exec(src))||(cap=this.rules.nolink.exec(src))){src=src.substring(cap[0].length);link=(cap[2]||cap[1]).replace(/\s+/g," ");link=this.links[link.toLowerCase()];if(!link||!link.href){out+=cap[0].charAt(0);src=cap[0].substring(1)+src;continue}this.inLink=true;out+=this.outputLink(cap,link);this.inLink=false;continue}if(cap=this.rules.strong.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.strong(this.output(cap[2]||cap[1]));continue}if(cap=this.rules.em.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.em(this.output(cap[2]||cap[1]));continue}if(cap=this.rules.code.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.codespan(escape(cap[2],true));continue}if(cap=this.rules.br.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.br();continue}if(cap=this.rules.del.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.del(this.output(cap[1]));continue}if(cap=this.rules.text.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.text(escape(this.smartypants(cap[0])));continue}if(src){throw new Error("Infinite loop on byte: "+src.charCodeAt(0))}}return out};InlineLexer.prototype.outputLink=function(cap,link){var href=escape(link.href),title=link.title?escape(link.title):null;return cap[0].charAt(0)!=="!"?this.renderer.link(href,title,this.output(cap[1])):this.renderer.image(href,title,escape(cap[1]))};InlineLexer.prototype.smartypants=function(text){if(!this.options.smartypants)return text;return text.replace(/---/g,"—").replace(/--/g,"–").replace(/(^|[-\u2014\/(\[{"\s])'/g,"$1‘").replace(/'/g,"’").replace(/(^|[-\u2014\/(\[{\u2018\s])"/g,"$1“").replace(/"/g,"”").replace(/\.{3}/g,"…")};InlineLexer.prototype.mangle=function(text){if(!this.options.mangle)return text;var out="",l=text.length,i=0,ch;for(;i.5){ch="x"+ch.toString(16)}out+="&#"+ch+";"}return out};function Renderer(options){this.options=options||{}}Renderer.prototype.code=function(code,lang,escaped){if(this.options.highlight){var out=this.options.highlight(code,lang);if(out!=null&&out!==code){escaped=true;code=out}}if(!lang){return"
"+(escaped?code:escape(code,true))+"\n
"}return'
'+(escaped?code:escape(code,true))+"\n
\n"};Renderer.prototype.blockquote=function(quote){return"
\n"+quote+"
\n"};Renderer.prototype.html=function(html){return html};Renderer.prototype.heading=function(text,level,raw){return"'+text+"\n"};Renderer.prototype.hr=function(){return this.options.xhtml?"
\n":"
\n"};Renderer.prototype.list=function(body,ordered){var type=ordered?"ol":"ul";return"<"+type+">\n"+body+"\n"};Renderer.prototype.listitem=function(text){return"
  • "+text+"
    • \n"};Renderer.prototype.paragraph=function(text){return"

    "+text+"

    \n"};Renderer.prototype.table=function(header,body){return"\n"+"\n"+header+"\n"+"\n"+body+"\n"+"
    \n"};Renderer.prototype.tablerow=function(content){return"\n"+content+"\n"};Renderer.prototype.tablecell=function(content,flags){var type=flags.header?"th":"td";var tag=flags.align?"<"+type+' style="text-align:'+flags.align+'">':"<"+type+">";return tag+content+"\n"};Renderer.prototype.strong=function(text){return""+text+""};Renderer.prototype.em=function(text){return""+text+""};Renderer.prototype.codespan=function(text){return""+text+""};Renderer.prototype.br=function(){return this.options.xhtml?"
    ":"
    "};Renderer.prototype.del=function(text){return""+text+""};Renderer.prototype.link=function(href,title,text){if(this.options.sanitize){try{var prot=decodeURIComponent(unescape(href)).replace(/[^\w:]/g,"").toLowerCase()}catch(e){return""}if(prot.indexOf("javascript:")===0||prot.indexOf("vbscript:")===0||prot.indexOf("data:")===0){return""}}var out='    ";return out};Renderer.prototype.image=function(href,title,text){var out=''+text+'":">";return out};Renderer.prototype.text=function(text){return text};function Parser(options){this.tokens=[];this.token=null;this.options=options||marked.defaults;this.options.renderer=this.options.renderer||new Renderer;this.renderer=this.options.renderer;this.renderer.options=this.options}Parser.parse=function(src,options,renderer){var parser=new Parser(options,renderer);return parser.parse(src)};Parser.prototype.parse=function(src){this.inline=new InlineLexer(src.links,this.options,this.renderer);this.tokens=src.reverse();var out="";while(this.next()){out+=this.tok()}return out};Parser.prototype.next=function(){return this.token=this.tokens.pop()};Parser.prototype.peek=function(){return this.tokens[this.tokens.length-1]||0};Parser.prototype.parseText=function(){var body=this.token.text;while(this.peek().type==="text"){body+="\n"+this.next().text}return this.inline.output(body)};Parser.prototype.tok=function(){switch(this.token.type){case"space":{return""}case"hr":{return this.renderer.hr()}case"heading":{return this.renderer.heading(this.inline.output(this.token.text),this.token.depth,this.token.text)}case"code":{return this.renderer.code(this.token.text,this.token.lang,this.token.escaped)}case"table":{var header="",body="",i,row,cell,flags,j;cell="";for(i=0;i/g,">").replace(/"/g,""").replace(/'/g,"'")}function unescape(html){return html.replace(/&(#(?:\d+)|(?:#x[0-9A-Fa-f]+)|(?:\w+));?/g,function(_,n){n=n.toLowerCase();if(n==="colon")return":";if(n.charAt(0)==="#"){return n.charAt(1)==="x"?String.fromCharCode(parseInt(n.substring(2),16)):String.fromCharCode(+n.substring(1))}return""})}function replace(regex,opt){regex=regex.source;opt=opt||"";return function self(name,val){if(!name)return new RegExp(regex,opt);val=val.source||val;val=val.replace(/(^|[^\[])\^/g,"$1");regex=regex.replace(name,val);return self}}function noop(){}noop.exec=noop;function merge(obj){var i=1,target,key;for(;iAn error occured:

    "+escape(e.message+"",true)+"
    "}throw e}}marked.options=marked.setOptions=function(opt){merge(marked.defaults,opt);return marked};marked.defaults={gfm:true,tables:true,breaks:false,pedantic:false,sanitize:false,sanitizer:null,mangle:true,smartLists:false,silent:false,highlight:null,langPrefix:"lang-",smartypants:false,headerPrefix:"",renderer:new Renderer,xhtml:false};marked.Parser=Parser;marked.parser=Parser.parse;marked.Renderer=Renderer;marked.Lexer=Lexer;marked.lexer=Lexer.lex;marked.InlineLexer=InlineLexer;marked.inlineLexer=InlineLexer.output;marked.parse=marked;if(typeof module!=="undefined"&&typeof exports==="object"){module.exports=marked}else if(typeof define==="function"&&define.amd){define(function(){return marked})}else{this.marked=marked}}).call(function(){return this||(typeof window!=="undefined"?window:global)}()); - - return module.exports; -}(); - - -// FORMAT OPTIONS FOR MARKED IMPLEMENTATION - -function formatOptions(options) -{ - function toHighlight(code, lang) - { - if (!lang && options.defaultHighlighting.ctor === 'Just') - { - lang = options.defaultHighlighting._0; - } - - if (typeof hljs !== 'undefined' && lang && hljs.listLanguages().indexOf(lang) >= 0) - { - return hljs.highlight(lang, code, true).value; - } - - return code; - } - - var gfm = options.githubFlavored; - if (gfm.ctor === 'Just') - { - return { - highlight: toHighlight, - gfm: true, - tables: gfm._0.tables, - breaks: gfm._0.breaks, - sanitize: options.sanitize, - smartypants: options.smartypants - }; - } - - return { - highlight: toHighlight, - gfm: false, - tables: false, - breaks: false, - sanitize: options.sanitize, - smartypants: options.smartypants - }; -} - - -// EXPORTS - -return { - toHtml: F3(toHtml) -}; - -}(); - -var _evancz$elm_markdown$Markdown$toHtmlWith = _evancz$elm_markdown$Native_Markdown.toHtml; -var _evancz$elm_markdown$Markdown$defaultOptions = { - githubFlavored: _elm_lang$core$Maybe$Just( - {tables: false, breaks: false}), - defaultHighlighting: _elm_lang$core$Maybe$Nothing, - sanitize: false, - smartypants: false -}; -var _evancz$elm_markdown$Markdown$toHtml = F2( - function (attrs, string) { - return A3(_evancz$elm_markdown$Native_Markdown.toHtml, _evancz$elm_markdown$Markdown$defaultOptions, attrs, string); - }); -var _evancz$elm_markdown$Markdown$Options = F4( - function (a, b, c, d) { - return {githubFlavored: a, defaultHighlighting: b, sanitize: c, smartypants: d}; - }); - -var _evancz$url_parser$UrlParser$toKeyValuePair = function (segment) { - var _p0 = A2(_elm_lang$core$String$split, '=', segment); - if (((_p0.ctor === '::') && (_p0._1.ctor === '::')) && (_p0._1._1.ctor === '[]')) { - return A3( - _elm_lang$core$Maybe$map2, - F2( - function (v0, v1) { - return {ctor: '_Tuple2', _0: v0, _1: v1}; - }), - _elm_lang$http$Http$decodeUri(_p0._0), - _elm_lang$http$Http$decodeUri(_p0._1._0)); - } else { - return _elm_lang$core$Maybe$Nothing; - } -}; -var _evancz$url_parser$UrlParser$parseParams = function (queryString) { - return _elm_lang$core$Dict$fromList( - A2( - _elm_lang$core$List$filterMap, - _evancz$url_parser$UrlParser$toKeyValuePair, - A2( - _elm_lang$core$String$split, - '&', - A2(_elm_lang$core$String$dropLeft, 1, queryString)))); -}; -var _evancz$url_parser$UrlParser$splitUrl = function (url) { - var _p1 = A2(_elm_lang$core$String$split, '/', url); - if ((_p1.ctor === '::') && (_p1._0 === '')) { - return _p1._1; - } else { - return _p1; - } -}; -var _evancz$url_parser$UrlParser$parseHelp = function (states) { - parseHelp: - while (true) { - var _p2 = states; - if (_p2.ctor === '[]') { - return _elm_lang$core$Maybe$Nothing; - } else { - var _p4 = _p2._0; - var _p3 = _p4.unvisited; - if (_p3.ctor === '[]') { - return _elm_lang$core$Maybe$Just(_p4.value); - } else { - if ((_p3._0 === '') && (_p3._1.ctor === '[]')) { - return _elm_lang$core$Maybe$Just(_p4.value); - } else { - var _v4 = _p2._1; - states = _v4; - continue parseHelp; - } - } - } - } -}; -var _evancz$url_parser$UrlParser$parse = F3( - function (_p5, url, params) { - var _p6 = _p5; - return _evancz$url_parser$UrlParser$parseHelp( - _p6._0( - { - visited: {ctor: '[]'}, - unvisited: _evancz$url_parser$UrlParser$splitUrl(url), - params: params, - value: _elm_lang$core$Basics$identity - })); - }); -var _evancz$url_parser$UrlParser$parseHash = F2( - function (parser, location) { - return A3( - _evancz$url_parser$UrlParser$parse, - parser, - A2(_elm_lang$core$String$dropLeft, 1, location.hash), - _evancz$url_parser$UrlParser$parseParams(location.search)); - }); -var _evancz$url_parser$UrlParser$parsePath = F2( - function (parser, location) { - return A3( - _evancz$url_parser$UrlParser$parse, - parser, - location.pathname, - _evancz$url_parser$UrlParser$parseParams(location.search)); - }); -var _evancz$url_parser$UrlParser$intParamHelp = function (maybeValue) { - var _p7 = maybeValue; - if (_p7.ctor === 'Nothing') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Result$toMaybe( - _elm_lang$core$String$toInt(_p7._0)); - } -}; -var _evancz$url_parser$UrlParser$mapHelp = F2( - function (func, _p8) { - var _p9 = _p8; - return { - visited: _p9.visited, - unvisited: _p9.unvisited, - params: _p9.params, - value: func(_p9.value) - }; - }); -var _evancz$url_parser$UrlParser$State = F4( - function (a, b, c, d) { - return {visited: a, unvisited: b, params: c, value: d}; - }); -var _evancz$url_parser$UrlParser$Parser = function (a) { - return {ctor: 'Parser', _0: a}; -}; -var _evancz$url_parser$UrlParser$s = function (str) { - return _evancz$url_parser$UrlParser$Parser( - function (_p10) { - var _p11 = _p10; - var _p12 = _p11.unvisited; - if (_p12.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p13 = _p12._0; - return _elm_lang$core$Native_Utils.eq(_p13, str) ? { - ctor: '::', - _0: A4( - _evancz$url_parser$UrlParser$State, - {ctor: '::', _0: _p13, _1: _p11.visited}, - _p12._1, - _p11.params, - _p11.value), - _1: {ctor: '[]'} - } : {ctor: '[]'}; - } - }); -}; -var _evancz$url_parser$UrlParser$custom = F2( - function (tipe, stringToSomething) { - return _evancz$url_parser$UrlParser$Parser( - function (_p14) { - var _p15 = _p14; - var _p16 = _p15.unvisited; - if (_p16.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p18 = _p16._0; - var _p17 = stringToSomething(_p18); - if (_p17.ctor === 'Ok') { - return { - ctor: '::', - _0: A4( - _evancz$url_parser$UrlParser$State, - {ctor: '::', _0: _p18, _1: _p15.visited}, - _p16._1, - _p15.params, - _p15.value(_p17._0)), - _1: {ctor: '[]'} - }; - } else { - return {ctor: '[]'}; - } - } - }); - }); -var _evancz$url_parser$UrlParser$string = A2(_evancz$url_parser$UrlParser$custom, 'STRING', _elm_lang$core$Result$Ok); -var _evancz$url_parser$UrlParser$int = A2(_evancz$url_parser$UrlParser$custom, 'NUMBER', _elm_lang$core$String$toInt); -var _evancz$url_parser$UrlParser_ops = _evancz$url_parser$UrlParser_ops || {}; -_evancz$url_parser$UrlParser_ops[''] = F2( - function (_p20, _p19) { - var _p21 = _p20; - var _p22 = _p19; - return _evancz$url_parser$UrlParser$Parser( - function (state) { - return A2( - _elm_lang$core$List$concatMap, - _p22._0, - _p21._0(state)); - }); - }); -var _evancz$url_parser$UrlParser$map = F2( - function (subValue, _p23) { - var _p24 = _p23; - return _evancz$url_parser$UrlParser$Parser( - function (_p25) { - var _p26 = _p25; - return A2( - _elm_lang$core$List$map, - _evancz$url_parser$UrlParser$mapHelp(_p26.value), - _p24._0( - {visited: _p26.visited, unvisited: _p26.unvisited, params: _p26.params, value: subValue})); - }); - }); -var _evancz$url_parser$UrlParser$oneOf = function (parsers) { - return _evancz$url_parser$UrlParser$Parser( - function (state) { - return A2( - _elm_lang$core$List$concatMap, - function (_p27) { - var _p28 = _p27; - return _p28._0(state); - }, - parsers); - }); -}; -var _evancz$url_parser$UrlParser$top = _evancz$url_parser$UrlParser$Parser( - function (state) { - return { - ctor: '::', - _0: state, - _1: {ctor: '[]'} - }; - }); -var _evancz$url_parser$UrlParser_ops = _evancz$url_parser$UrlParser_ops || {}; -_evancz$url_parser$UrlParser_ops[''] = F2( - function (_p30, _p29) { - var _p31 = _p30; - var _p32 = _p29; - return _evancz$url_parser$UrlParser$Parser( - function (state) { - return A2( - _elm_lang$core$List$concatMap, - _p32._0, - _p31._0(state)); - }); - }); -var _evancz$url_parser$UrlParser$QueryParser = function (a) { - return {ctor: 'QueryParser', _0: a}; -}; -var _evancz$url_parser$UrlParser$customParam = F2( - function (key, func) { - return _evancz$url_parser$UrlParser$QueryParser( - function (_p33) { - var _p34 = _p33; - var _p35 = _p34.params; - return { - ctor: '::', - _0: A4( - _evancz$url_parser$UrlParser$State, - _p34.visited, - _p34.unvisited, - _p35, - _p34.value( - func( - A2(_elm_lang$core$Dict$get, key, _p35)))), - _1: {ctor: '[]'} - }; - }); - }); -var _evancz$url_parser$UrlParser$stringParam = function (name) { - return A2(_evancz$url_parser$UrlParser$customParam, name, _elm_lang$core$Basics$identity); -}; -var _evancz$url_parser$UrlParser$intParam = function (name) { - return A2(_evancz$url_parser$UrlParser$customParam, name, _evancz$url_parser$UrlParser$intParamHelp); -}; - -var _mgold$elm_date_format$Date_Local$french = { - date: { - months: {jan: 'Janvier', feb: 'Février', mar: 'Mars', apr: 'Avril', may: 'Mai', jun: 'Juin', jul: 'Juillet', aug: 'Août', sep: 'Septembre', oct: 'Octobre', nov: 'Novembre', dec: 'Décembre'}, - monthsAbbrev: {jan: 'Jan', feb: 'Fév', mar: 'Mar', apr: 'Avr', may: 'Mai', jun: 'Jui', jul: 'Jul', aug: 'Aoû', sep: 'Sep', oct: 'Oct', nov: 'Nov', dec: 'Déc'}, - wdays: {mon: 'Lundi', tue: 'Mardi', wed: 'Mercredi', thu: 'Jeudi', fri: 'Vendredi', sat: 'Samedi', sun: 'Dimanche'}, - wdaysAbbrev: {mon: 'Lun', tue: 'Mar', wed: 'Mer', thu: 'Jeu', fri: 'Ven', sat: 'Sam', sun: 'Dim'}, - defaultFormat: _elm_lang$core$Maybe$Nothing - }, - time: {am: 'am', pm: 'pm', defaultFormat: _elm_lang$core$Maybe$Nothing}, - timeZones: _elm_lang$core$Maybe$Nothing, - defaultFormat: _elm_lang$core$Maybe$Nothing -}; -var _mgold$elm_date_format$Date_Local$international = { - date: { - months: {jan: 'January', feb: 'February', mar: 'March', apr: 'April', may: 'May', jun: 'June', jul: 'July', aug: 'August', sep: 'September', oct: 'October', nov: 'November', dec: 'December'}, - monthsAbbrev: {jan: 'Jan', feb: 'Feb', mar: 'Mar', apr: 'Apr', may: 'May', jun: 'Jun', jul: 'Jul', aug: 'Aug', sep: 'Sep', oct: 'Oct', nov: 'Nov', dec: 'Dec'}, - wdays: {mon: 'Monday', tue: 'Tuesday', wed: 'Wednesday', thu: 'Thursday', fri: 'Friday', sat: 'Saturday', sun: 'Sunday'}, - wdaysAbbrev: {mon: 'Mon', tue: 'Tue', wed: 'Wed', thu: 'Thu', fri: 'Fri', sat: 'Sat', sun: 'Sun'}, - defaultFormat: _elm_lang$core$Maybe$Nothing - }, - time: {am: 'am', pm: 'pm', defaultFormat: _elm_lang$core$Maybe$Nothing}, - timeZones: _elm_lang$core$Maybe$Nothing, - defaultFormat: _elm_lang$core$Maybe$Nothing -}; -var _mgold$elm_date_format$Date_Local$Local = F4( - function (a, b, c, d) { - return {date: a, time: b, timeZones: c, defaultFormat: d}; - }); -var _mgold$elm_date_format$Date_Local$Months = function (a) { - return function (b) { - return function (c) { - return function (d) { - return function (e) { - return function (f) { - return function (g) { - return function (h) { - return function (i) { - return function (j) { - return function (k) { - return function (l) { - return {jan: a, feb: b, mar: c, apr: d, may: e, jun: f, jul: g, aug: h, sep: i, oct: j, nov: k, dec: l}; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; -}; -var _mgold$elm_date_format$Date_Local$WeekDays = F7( - function (a, b, c, d, e, f, g) { - return {mon: a, tue: b, wed: c, thu: d, fri: e, sat: f, sun: g}; - }); - -var _mgold$elm_date_format$Date_Format$padWith = function (padding) { - var padder = function () { - var _p0 = padding; - switch (_p0.ctor) { - case 'NoPadding': - return _elm_lang$core$Basics$identity; - case 'Zero': - return A2( - _elm_lang$core$String$padLeft, - 2, - _elm_lang$core$Native_Utils.chr('0')); - default: - return A2( - _elm_lang$core$String$padLeft, - 2, - _elm_lang$core$Native_Utils.chr(' ')); - } - }(); - return function (_p1) { - return padder( - _elm_lang$core$Basics$toString(_p1)); - }; -}; -var _mgold$elm_date_format$Date_Format$zero2twelve = function (n) { - return _elm_lang$core$Native_Utils.eq(n, 0) ? 12 : n; -}; -var _mgold$elm_date_format$Date_Format$mod12 = function (h) { - return A2(_elm_lang$core$Basics_ops['%'], h, 12); -}; -var _mgold$elm_date_format$Date_Format$dayOfWeekToWord = F2( - function (loc, dow) { - var _p2 = dow; - switch (_p2.ctor) { - case 'Mon': - return loc.mon; - case 'Tue': - return loc.tue; - case 'Wed': - return loc.wed; - case 'Thu': - return loc.thu; - case 'Fri': - return loc.fri; - case 'Sat': - return loc.sat; - default: - return loc.sun; - } - }); -var _mgold$elm_date_format$Date_Format$monthToWord = F2( - function (loc, m) { - var _p3 = m; - switch (_p3.ctor) { - case 'Jan': - return loc.jan; - case 'Feb': - return loc.feb; - case 'Mar': - return loc.mar; - case 'Apr': - return loc.apr; - case 'May': - return loc.may; - case 'Jun': - return loc.jun; - case 'Jul': - return loc.jul; - case 'Aug': - return loc.aug; - case 'Sep': - return loc.sep; - case 'Oct': - return loc.oct; - case 'Nov': - return loc.nov; - default: - return loc.dec; - } - }); -var _mgold$elm_date_format$Date_Format$monthToInt = function (m) { - var _p4 = m; - switch (_p4.ctor) { - case 'Jan': - return 1; - case 'Feb': - return 2; - case 'Mar': - return 3; - case 'Apr': - return 4; - case 'May': - return 5; - case 'Jun': - return 6; - case 'Jul': - return 7; - case 'Aug': - return 8; - case 'Sep': - return 9; - case 'Oct': - return 10; - case 'Nov': - return 11; - default: - return 12; - } -}; -var _mgold$elm_date_format$Date_Format$re = _elm_lang$core$Regex$regex('%(_|-|0)?(%|Y|y|m|B|b|d|e|a|A|H|k|I|l|p|P|M|S)'); -var _mgold$elm_date_format$Date_Format$Zero = {ctor: 'Zero'}; -var _mgold$elm_date_format$Date_Format$Space = {ctor: 'Space'}; -var _mgold$elm_date_format$Date_Format$NoPadding = {ctor: 'NoPadding'}; -var _mgold$elm_date_format$Date_Format$formatToken = F3( - function (loc, d, m) { - var _p5 = function () { - var _p6 = m.submatches; - _v4_4: - do { - if (_p6.ctor === '::') { - if (_p6._0.ctor === 'Just') { - if (((_p6._1.ctor === '::') && (_p6._1._0.ctor === 'Just')) && (_p6._1._1.ctor === '[]')) { - switch (_p6._0._0) { - case '-': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(_mgold$elm_date_format$Date_Format$NoPadding), - _1: _p6._1._0._0 - }; - case '_': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(_mgold$elm_date_format$Date_Format$Space), - _1: _p6._1._0._0 - }; - case '0': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(_mgold$elm_date_format$Date_Format$Zero), - _1: _p6._1._0._0 - }; - default: - break _v4_4; - } - } else { - break _v4_4; - } - } else { - if (((_p6._1.ctor === '::') && (_p6._1._0.ctor === 'Just')) && (_p6._1._1.ctor === '[]')) { - return {ctor: '_Tuple2', _0: _elm_lang$core$Maybe$Nothing, _1: _p6._1._0._0}; - } else { - break _v4_4; - } - } - } else { - break _v4_4; - } - } while(false); - return {ctor: '_Tuple2', _0: _elm_lang$core$Maybe$Nothing, _1: ' '}; - }(); - var padding = _p5._0; - var symbol = _p5._1; - var _p7 = symbol; - switch (_p7) { - case '%': - return '%'; - case 'Y': - return _elm_lang$core$Basics$toString( - _elm_lang$core$Date$year(d)); - case 'y': - return A2( - _elm_lang$core$String$right, - 2, - _elm_lang$core$Basics$toString( - _elm_lang$core$Date$year(d))); - case 'm': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), - _mgold$elm_date_format$Date_Format$monthToInt( - _elm_lang$core$Date$month(d))); - case 'B': - return A2( - _mgold$elm_date_format$Date_Format$monthToWord, - loc.date.months, - _elm_lang$core$Date$month(d)); - case 'b': - return A2( - _mgold$elm_date_format$Date_Format$monthToWord, - loc.date.monthsAbbrev, - _elm_lang$core$Date$month(d)); - case 'd': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), - _elm_lang$core$Date$day(d)); - case 'e': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Space, padding), - _elm_lang$core$Date$day(d)); - case 'a': - return A2( - _mgold$elm_date_format$Date_Format$dayOfWeekToWord, - loc.date.wdaysAbbrev, - _elm_lang$core$Date$dayOfWeek(d)); - case 'A': - return A2( - _mgold$elm_date_format$Date_Format$dayOfWeekToWord, - loc.date.wdays, - _elm_lang$core$Date$dayOfWeek(d)); - case 'H': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), - _elm_lang$core$Date$hour(d)); - case 'k': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Space, padding), - _elm_lang$core$Date$hour(d)); - case 'I': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), - _mgold$elm_date_format$Date_Format$zero2twelve( - _mgold$elm_date_format$Date_Format$mod12( - _elm_lang$core$Date$hour(d)))); - case 'l': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Space, padding), - _mgold$elm_date_format$Date_Format$zero2twelve( - _mgold$elm_date_format$Date_Format$mod12( - _elm_lang$core$Date$hour(d)))); - case 'p': - return (_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$Date$hour(d), - 12) < 0) ? _elm_lang$core$String$toUpper(loc.time.am) : _elm_lang$core$String$toUpper(loc.time.pm); - case 'P': - return (_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$Date$hour(d), - 12) < 0) ? loc.time.am : loc.time.pm; - case 'M': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), - _elm_lang$core$Date$minute(d)); - case 'S': - return A2( - _mgold$elm_date_format$Date_Format$padWith, - A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), - _elm_lang$core$Date$second(d)); - default: - return ''; - } - }); -var _mgold$elm_date_format$Date_Format$localFormat = F3( - function (loc, s, d) { - return A4( - _elm_lang$core$Regex$replace, - _elm_lang$core$Regex$All, - _mgold$elm_date_format$Date_Format$re, - A2(_mgold$elm_date_format$Date_Format$formatToken, loc, d), - s); - }); -var _mgold$elm_date_format$Date_Format$format = F2( - function (s, d) { - return A3(_mgold$elm_date_format$Date_Format$localFormat, _mgold$elm_date_format$Date_Local$international, s, d); - }); -var _mgold$elm_date_format$Date_Format$formatISO8601 = _mgold$elm_date_format$Date_Format$format('%Y-%m-%dT%H:%M:%SZ'); - -var _myrho$elm_round$Round$funNum = F3( - function (fun, s, fl) { - return A2( - _elm_lang$core$Maybe$withDefault, - 1 / 0, - _elm_lang$core$Result$toMaybe( - _elm_lang$core$String$toFloat( - A2(fun, s, fl)))); - }); -var _myrho$elm_round$Round$splitComma = function (str) { - var _p0 = A2(_elm_lang$core$String$split, '.', str); - if (_p0.ctor === '::') { - if (_p0._1.ctor === '::') { - return {ctor: '_Tuple2', _0: _p0._0, _1: _p0._1._0}; - } else { - return {ctor: '_Tuple2', _0: _p0._0, _1: '0'}; - } - } else { - return {ctor: '_Tuple2', _0: '0', _1: '0'}; - } -}; -var _myrho$elm_round$Round$toDecimal = function (fl) { - var _p1 = A2( - _elm_lang$core$String$split, - 'e', - _elm_lang$core$Basics$toString(fl)); - if (_p1.ctor === '::') { - if (_p1._1.ctor === '::') { - var _p4 = _p1._1._0; - var _p2 = function () { - var hasSign = _elm_lang$core$Native_Utils.cmp(fl, 0) < 0; - var _p3 = _myrho$elm_round$Round$splitComma(_p1._0); - var b = _p3._0; - var a = _p3._1; - return { - ctor: '_Tuple3', - _0: hasSign ? '-' : '', - _1: hasSign ? A2(_elm_lang$core$String$dropLeft, 1, b) : b, - _2: a - }; - }(); - var sign = _p2._0; - var before = _p2._1; - var after = _p2._2; - var e = A2( - _elm_lang$core$Maybe$withDefault, - 0, - _elm_lang$core$Result$toMaybe( - _elm_lang$core$String$toInt( - A2(_elm_lang$core$String$startsWith, '+', _p4) ? A2(_elm_lang$core$String$dropLeft, 1, _p4) : _p4))); - var newBefore = (_elm_lang$core$Native_Utils.cmp(e, 0) > -1) ? before : ((_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$Basics$abs(e), - _elm_lang$core$String$length(before)) < 0) ? A2( - _elm_lang$core$Basics_ops['++'], - A2( - _elm_lang$core$String$left, - _elm_lang$core$String$length(before) - _elm_lang$core$Basics$abs(e), - before), - A2( - _elm_lang$core$Basics_ops['++'], - '.', - A2( - _elm_lang$core$String$right, - _elm_lang$core$Basics$abs(e), - before))) : A2( - _elm_lang$core$Basics_ops['++'], - '0.', - A2( - _elm_lang$core$Basics_ops['++'], - A2( - _elm_lang$core$String$repeat, - _elm_lang$core$Basics$abs(e) - _elm_lang$core$String$length(before), - '0'), - before))); - var newAfter = (_elm_lang$core$Native_Utils.cmp(e, 0) < 1) ? after : ((_elm_lang$core$Native_Utils.cmp( - e, - _elm_lang$core$String$length(after)) < 0) ? A2( - _elm_lang$core$Basics_ops['++'], - A2(_elm_lang$core$String$left, e, after), - A2( - _elm_lang$core$Basics_ops['++'], - '.', - A2( - _elm_lang$core$String$right, - _elm_lang$core$String$length(after) - e, - after))) : A2( - _elm_lang$core$Basics_ops['++'], - after, - A2( - _elm_lang$core$String$repeat, - e - _elm_lang$core$String$length(after), - '0'))); - return A2( - _elm_lang$core$Basics_ops['++'], - sign, - A2(_elm_lang$core$Basics_ops['++'], newBefore, newAfter)); - } else { - return _p1._0; - } - } else { - return ''; - } -}; -var _myrho$elm_round$Round$truncate = function (n) { - return (_elm_lang$core$Native_Utils.cmp(n, 0) < 0) ? _elm_lang$core$Basics$ceiling(n) : _elm_lang$core$Basics$floor(n); -}; -var _myrho$elm_round$Round$roundFun = F3( - function (functor, s, fl) { - if (_elm_lang$core$Native_Utils.eq(s, 0)) { - return _elm_lang$core$Basics$toString( - functor(fl)); - } else { - if (_elm_lang$core$Native_Utils.cmp(s, 0) < 0) { - return function (r) { - return (!_elm_lang$core$Native_Utils.eq(r, '0')) ? A2( - _elm_lang$core$Basics_ops['++'], - r, - A2( - _elm_lang$core$String$repeat, - _elm_lang$core$Basics$abs(s), - '0')) : r; - }( - A3( - _myrho$elm_round$Round$roundFun, - functor, - 0, - A2( - F2( - function (x, y) { - return x / y; - }), - fl, - A2( - F2( - function (x, y) { - return Math.pow(x, y); - }), - 10, - _elm_lang$core$Basics$abs( - _elm_lang$core$Basics$toFloat(s)))))); - } else { - var dd = (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? 2 : 1; - var n = (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? -1 : 1; - var e = Math.pow(10, s); - var _p5 = _myrho$elm_round$Round$splitComma( - _myrho$elm_round$Round$toDecimal(fl)); - var before = _p5._0; - var after = _p5._1; - var a = A3( - _elm_lang$core$String$padRight, - s + 1, - _elm_lang$core$Native_Utils.chr('0'), - after); - var b = A2(_elm_lang$core$String$left, s, a); - var c = A2(_elm_lang$core$String$dropLeft, s, a); - var f = functor( - A2( - _elm_lang$core$Maybe$withDefault, - _elm_lang$core$Basics$toFloat(e), - _elm_lang$core$Result$toMaybe( - _elm_lang$core$String$toFloat( - A2( - _elm_lang$core$Basics_ops['++'], - (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? '-' : '', - A2( - _elm_lang$core$Basics_ops['++'], - '1', - A2( - _elm_lang$core$Basics_ops['++'], - b, - A2(_elm_lang$core$Basics_ops['++'], '.', c)))))))); - var g = A2( - _elm_lang$core$String$dropLeft, - dd, - _elm_lang$core$Basics$toString(f)); - var h = _myrho$elm_round$Round$truncate(fl) + (_elm_lang$core$Native_Utils.eq(f - (e * n), e * n) ? ((_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? -1 : 1) : 0); - var j = _elm_lang$core$Basics$toString(h); - var i = (_elm_lang$core$Native_Utils.eq(j, '0') && ((!_elm_lang$core$Native_Utils.eq(f - (e * n), 0)) && ((_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) && (_elm_lang$core$Native_Utils.cmp(fl, -1) > 0)))) ? A2(_elm_lang$core$Basics_ops['++'], '-', j) : j; - return A2( - _elm_lang$core$Basics_ops['++'], - i, - A2(_elm_lang$core$Basics_ops['++'], '.', g)); - } - } - }); -var _myrho$elm_round$Round$round = _myrho$elm_round$Round$roundFun(_elm_lang$core$Basics$round); -var _myrho$elm_round$Round$roundNum = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$round); -var _myrho$elm_round$Round$ceiling = _myrho$elm_round$Round$roundFun(_elm_lang$core$Basics$ceiling); -var _myrho$elm_round$Round$ceilingNum = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$ceiling); -var _myrho$elm_round$Round$floor = _myrho$elm_round$Round$roundFun(_elm_lang$core$Basics$floor); -var _myrho$elm_round$Round$floorCom = F2( - function (s, fl) { - return (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? A2(_myrho$elm_round$Round$ceiling, s, fl) : A2(_myrho$elm_round$Round$floor, s, fl); - }); -var _myrho$elm_round$Round$floorNumCom = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$floorCom); -var _myrho$elm_round$Round$ceilingCom = F2( - function (s, fl) { - return (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? A2(_myrho$elm_round$Round$floor, s, fl) : A2(_myrho$elm_round$Round$ceiling, s, fl); - }); -var _myrho$elm_round$Round$ceilingNumCom = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$ceilingCom); -var _myrho$elm_round$Round$floorNum = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$floor); -var _myrho$elm_round$Round$roundCom = _myrho$elm_round$Round$roundFun( - function (fl) { - var dec = fl - _elm_lang$core$Basics$toFloat( - _myrho$elm_round$Round$truncate(fl)); - return (_elm_lang$core$Native_Utils.cmp(dec, 0.5) > -1) ? _elm_lang$core$Basics$ceiling(fl) : ((_elm_lang$core$Native_Utils.cmp(dec, -0.5) < 1) ? _elm_lang$core$Basics$floor(fl) : _elm_lang$core$Basics$round(fl)); - }); -var _myrho$elm_round$Round$roundNumCom = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$roundCom); - -var _seatgeek$wrecker_ui$Data$decodeDateTime = function (datetimeString) { - var _p0 = _elm_lang$core$Date$fromString(datetimeString); - if (_p0.ctor === 'Err') { - return _elm_lang$core$Json_Decode$fail(_p0._0); - } else { - return _elm_lang$core$Json_Decode$succeed(_p0._0); - } -}; -var _seatgeek$wrecker_ui$Data$Stats = function (a) { - return function (b) { - return function (c) { - return function (d) { - return function (e) { - return function (f) { - return function (g) { - return function (h) { - return function (i) { - return function (j) { - return function (k) { - return {meanTime: a, successHits: b, serverErrorHits: c, maxTime: d, minTime: e, userErrorHits: f, totalTime: g, failedHits: h, variance: i, hits: j, quantile95: k}; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; -}; -var _seatgeek$wrecker_ui$Data$decodeStats = A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'quantile95', - _elm_lang$core$Json_Decode$float, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'hits', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'variance', - _elm_lang$core$Json_Decode$float, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'failedHits', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'totalTime', - _elm_lang$core$Json_Decode$float, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'userErrorHits', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'minTime', - _elm_lang$core$Json_Decode$float, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'maxTime', - _elm_lang$core$Json_Decode$float, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'serverErrorHits', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'successHits', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'meanTime', - _elm_lang$core$Json_Decode$float, - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$Stats)))))))))))); -var _seatgeek$wrecker_ui$Data$GroupSet = F4( - function (a, b, c, d) { - return {id: a, name: b, description: c, created: d}; - }); -var _seatgeek$wrecker_ui$Data$decodeGroupSet = A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'created', - A2(_elm_lang$core$Json_Decode$andThen, _seatgeek$wrecker_ui$Data$decodeDateTime, _elm_lang$core$Json_Decode$string), - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'description', - _elm_lang$core$Json_Decode$string, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'name', - _elm_lang$core$Json_Decode$string, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'id', - _elm_lang$core$Json_Decode$int, - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$GroupSet))))); -var _seatgeek$wrecker_ui$Data$RunGroup = F9( - function (a, b, c, d, e, f, g, h, i) { - return {id: a, groupSetId: b, title: c, notes: d, concurrencyStart: e, concurrencyTarget: f, rampupStep: g, runKeepTime: h, created: i}; - }); -var _seatgeek$wrecker_ui$Data$decodeRunGroup = A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'created', - A2(_elm_lang$core$Json_Decode$andThen, _seatgeek$wrecker_ui$Data$decodeDateTime, _elm_lang$core$Json_Decode$string), - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'runKeepTime', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'rampupStep', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'concurrencyTarget', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'concurrencyStart', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'notes', - _elm_lang$core$Json_Decode$string, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'title', - _elm_lang$core$Json_Decode$string, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'groupSetId', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'id', - _elm_lang$core$Json_Decode$int, - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$RunGroup)))))))))); -var _seatgeek$wrecker_ui$Data$RunInfo = F5( - function (a, b, c, d, e) { - return {created: a, concurrency: b, runGroupId: c, id: d, match: e}; - }); -var _seatgeek$wrecker_ui$Data$decodeRunInfo = A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'match', - _elm_lang$core$Json_Decode$string, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'id', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'runGroupId', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'concurrency', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'created', - A2(_elm_lang$core$Json_Decode$andThen, _seatgeek$wrecker_ui$Data$decodeDateTime, _elm_lang$core$Json_Decode$string), - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$RunInfo)))))); -var _seatgeek$wrecker_ui$Data$Run = F2( - function (a, b) { - return {stats: a, run: b}; - }); -var _seatgeek$wrecker_ui$Data$decodeRun = A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'run', - _seatgeek$wrecker_ui$Data$decodeRunInfo, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'stats', - _seatgeek$wrecker_ui$Data$decodeStats, - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$Run))); -var _seatgeek$wrecker_ui$Data$Page = F3( - function (a, b, c) { - return {url: a, runId: b, stats: c}; - }); -var _seatgeek$wrecker_ui$Data$decodePage = A2( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$custom, - _seatgeek$wrecker_ui$Data$decodeStats, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'runId', - _elm_lang$core$Json_Decode$int, - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'url', - _elm_lang$core$Json_Decode$string, - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$Page)))); -var _seatgeek$wrecker_ui$Data$Results = F4( - function (a, b, c, d) { - return {runs: a, pages: b, runGroups: c, availableGroupSets: d}; - }); -var _seatgeek$wrecker_ui$Data$decodeResults = A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'availableGroupSets', - _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodeGroupSet), - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'runGroups', - _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodeRunGroup), - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'pages', - _elm_lang$core$Json_Decode$dict( - _elm_lang$core$Json_Decode$list(_elm_lang$core$Json_Decode$int)), - A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'runs', - _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodeRun), - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$Results))))); - -var _terezka$elm_plot$Internal_Draw$sign = function (x) { - return (_elm_lang$core$Native_Utils.cmp(x, 0) < 0) ? -1 : 1; -}; -var _terezka$elm_plot$Internal_Draw$slope2 = F3( - function (point0, point1, t) { - var h = point1.x - point0.x; - return (!_elm_lang$core$Native_Utils.eq(h, 0)) ? ((((3 * (point1.y - point0.y)) / h) - t) / 2) : t; - }); -var _terezka$elm_plot$Internal_Draw$toH = F2( - function (h0, h1) { - return _elm_lang$core$Native_Utils.eq(h0, 0) ? ((_elm_lang$core$Native_Utils.cmp(h1, 0) < 0) ? (0 * -1) : h1) : h0; - }); -var _terezka$elm_plot$Internal_Draw$slope3 = F3( - function (point0, point1, point2) { - var h1 = point2.x - point1.x; - var h0 = point1.x - point0.x; - var s0h = A2(_terezka$elm_plot$Internal_Draw$toH, h0, h1); - var s0 = (point1.y - point0.y) / s0h; - var s1h = A2(_terezka$elm_plot$Internal_Draw$toH, h1, h0); - var s1 = (point2.y - point1.y) / s1h; - var p = ((s0 * h1) + (s1 * h0)) / (h0 + h1); - var slope = (_terezka$elm_plot$Internal_Draw$sign(s0) + _terezka$elm_plot$Internal_Draw$sign(s1)) * A2( - _elm_lang$core$Basics$min, - A2( - _elm_lang$core$Basics$min, - _elm_lang$core$Basics$abs(s0), - _elm_lang$core$Basics$abs(s1)), - 0.5 * _elm_lang$core$Basics$abs(p)); - return _elm_lang$core$Basics$isNaN(slope) ? 0 : slope; - }); -var _terezka$elm_plot$Internal_Draw$boolToString = function (bool) { - return bool ? '0' : '1'; -}; -var _terezka$elm_plot$Internal_Draw$pointToString = function (_p0) { - var _p1 = _p0; - return A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(_p1.x), - A2( - _elm_lang$core$Basics_ops['++'], - ' ', - _elm_lang$core$Basics$toString(_p1.y))); -}; -var _terezka$elm_plot$Internal_Draw$pointsToString = function (points) { - return A2( - _elm_lang$core$String$join, - ',', - A2(_elm_lang$core$List$map, _terezka$elm_plot$Internal_Draw$pointToString, points)); -}; -var _terezka$elm_plot$Internal_Draw$joinCommands = function (commands) { - return A2(_elm_lang$core$String$join, ' ', commands); -}; -var _terezka$elm_plot$Internal_Draw$yClosestToZero = function (_p2) { - var _p3 = _p2; - var _p4 = _p3.y; - return A3(_elm_lang$core$Basics$clamp, _p4.min, _p4.max, 0); -}; -var _terezka$elm_plot$Internal_Draw$length = function (axis) { - return (axis.length - axis.marginLower) - axis.marginUpper; -}; -var _terezka$elm_plot$Internal_Draw$range = function (axis) { - return (!_elm_lang$core$Native_Utils.eq(axis.max - axis.min, 0)) ? (axis.max - axis.min) : 1; -}; -var _terezka$elm_plot$Internal_Draw$scaleValue = F2( - function (axis, value) { - return (value * _terezka$elm_plot$Internal_Draw$length(axis)) / _terezka$elm_plot$Internal_Draw$range(axis); - }); -var _terezka$elm_plot$Internal_Draw$toSVGX = F2( - function (_p5, value) { - var _p6 = _p5; - var _p7 = _p6.x; - return A2(_terezka$elm_plot$Internal_Draw$scaleValue, _p7, value - _p7.min) + _p7.marginLower; - }); -var _terezka$elm_plot$Internal_Draw$toSVGY = F2( - function (_p8, value) { - var _p9 = _p8; - var _p10 = _p9.y; - return A2(_terezka$elm_plot$Internal_Draw$scaleValue, _p10, _p10.max - value) + _p10.marginLower; - }); -var _terezka$elm_plot$Internal_Draw$place = F4( - function (plot, _p11, offsetX, offsetY) { - var _p12 = _p11; - return _elm_lang$svg$Svg_Attributes$transform( - A2( - _elm_lang$core$Basics_ops['++'], - 'translate(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString( - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p12.x) + offsetX), - A2( - _elm_lang$core$Basics_ops['++'], - ',', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString( - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p12.y) + offsetY), - ')'))))); - }); -var _terezka$elm_plot$Internal_Draw$unScaleValue = F2( - function (axis, v) { - return (v * _terezka$elm_plot$Internal_Draw$range(axis)) / _terezka$elm_plot$Internal_Draw$length(axis); - }); -var _terezka$elm_plot$Internal_Draw$toUnSVGX = F2( - function (_p13, value) { - var _p14 = _p13; - var _p15 = _p14.x; - return A2(_terezka$elm_plot$Internal_Draw$unScaleValue, _p15, value - _p15.marginLower) + _p15.min; - }); -var _terezka$elm_plot$Internal_Draw$toUnSVGY = F2( - function (_p16, value) { - var _p17 = _p16; - var _p18 = _p17.y; - return (_terezka$elm_plot$Internal_Draw$range(_p18) - A2(_terezka$elm_plot$Internal_Draw$unScaleValue, _p18, value - _p18.marginLower)) + _p18.min; - }); -var _terezka$elm_plot$Internal_Draw$Point = F2( - function (a, b) { - return {x: a, y: b}; - }); -var _terezka$elm_plot$Internal_Draw$stringifyCommand = function (command) { - var _p19 = command; - switch (_p19.ctor) { - case 'Move': - return A2( - _elm_lang$core$Basics_ops['++'], - 'M', - _terezka$elm_plot$Internal_Draw$pointToString( - A2(_terezka$elm_plot$Internal_Draw$Point, _p19._0, _p19._1))); - case 'Line': - return A2( - _elm_lang$core$Basics_ops['++'], - 'L', - _terezka$elm_plot$Internal_Draw$pointToString( - A2(_terezka$elm_plot$Internal_Draw$Point, _p19._0, _p19._1))); - case 'HorizontalLine': - return A2( - _elm_lang$core$Basics_ops['++'], - 'H', - _elm_lang$core$Basics$toString(_p19._0)); - case 'VerticalLine': - return A2( - _elm_lang$core$Basics_ops['++'], - 'V', - _elm_lang$core$Basics$toString(_p19._0)); - case 'CubicBeziers': - return A2( - _elm_lang$core$Basics_ops['++'], - 'C', - _terezka$elm_plot$Internal_Draw$pointsToString( - { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Point, _p19._0, _p19._1), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Point, _p19._2, _p19._3), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Point, _p19._4, _p19._5), - _1: {ctor: '[]'} - } - } - })); - case 'CubicBeziersShort': - return A2( - _elm_lang$core$Basics_ops['++'], - 'Q', - _terezka$elm_plot$Internal_Draw$pointsToString( - { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Point, _p19._0, _p19._1), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Point, _p19._2, _p19._3), - _1: {ctor: '[]'} - } - })); - case 'QuadraticBeziers': - return A2( - _elm_lang$core$Basics_ops['++'], - 'Q', - _terezka$elm_plot$Internal_Draw$pointsToString( - { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Point, _p19._0, _p19._1), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Point, _p19._2, _p19._3), - _1: {ctor: '[]'} - } - })); - case 'QuadraticBeziersShort': - return A2( - _elm_lang$core$Basics_ops['++'], - 'T', - _terezka$elm_plot$Internal_Draw$pointToString( - A2(_terezka$elm_plot$Internal_Draw$Point, _p19._0, _p19._1))); - case 'Arc': - return A2( - _elm_lang$core$Basics_ops['++'], - 'A', - _terezka$elm_plot$Internal_Draw$joinCommands( - { - ctor: '::', - _0: _terezka$elm_plot$Internal_Draw$pointToString( - A2(_terezka$elm_plot$Internal_Draw$Point, _p19._0, _p19._1)), - _1: { - ctor: '::', - _0: _elm_lang$core$Basics$toString(_p19._2), - _1: { - ctor: '::', - _0: _terezka$elm_plot$Internal_Draw$boolToString(_p19._3), - _1: { - ctor: '::', - _0: _terezka$elm_plot$Internal_Draw$boolToString(_p19._4), - _1: { - ctor: '::', - _0: _terezka$elm_plot$Internal_Draw$pointToString( - A2(_terezka$elm_plot$Internal_Draw$Point, _p19._5, _p19._6)), - _1: {ctor: '[]'} - } - } - } - } - })); - default: - return 'Z'; - } -}; -var _terezka$elm_plot$Internal_Draw$draw = F2( - function (attributes, commands) { - return A2( - _elm_lang$svg$Svg$path, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$d( - _terezka$elm_plot$Internal_Draw$joinCommands( - A2(_elm_lang$core$List$map, _terezka$elm_plot$Internal_Draw$stringifyCommand, commands))), - _1: attributes - }, - {ctor: '[]'}); - }); -var _terezka$elm_plot$Internal_Draw$AxisSummary = F8( - function (a, b, c, d, e, f, g, h) { - return {min: a, max: b, dataMin: c, dataMax: d, marginLower: e, marginUpper: f, length: g, all: h}; - }); -var _terezka$elm_plot$Internal_Draw$PlotSummary = F2( - function (a, b) { - return {x: a, y: b}; - }); -var _terezka$elm_plot$Internal_Draw$Close = {ctor: 'Close'}; -var _terezka$elm_plot$Internal_Draw$Arc = F7( - function (a, b, c, d, e, f, g) { - return {ctor: 'Arc', _0: a, _1: b, _2: c, _3: d, _4: e, _5: f, _6: g}; - }); -var _terezka$elm_plot$Internal_Draw$QuadraticBeziersShort = F2( - function (a, b) { - return {ctor: 'QuadraticBeziersShort', _0: a, _1: b}; - }); -var _terezka$elm_plot$Internal_Draw$QuadraticBeziers = F4( - function (a, b, c, d) { - return {ctor: 'QuadraticBeziers', _0: a, _1: b, _2: c, _3: d}; - }); -var _terezka$elm_plot$Internal_Draw$CubicBeziersShort = F4( - function (a, b, c, d) { - return {ctor: 'CubicBeziersShort', _0: a, _1: b, _2: c, _3: d}; - }); -var _terezka$elm_plot$Internal_Draw$CubicBeziers = F6( - function (a, b, c, d, e, f) { - return {ctor: 'CubicBeziers', _0: a, _1: b, _2: c, _3: d, _4: e, _5: f}; - }); -var _terezka$elm_plot$Internal_Draw$monotoneXCurve = F4( - function (point0, point1, tangent0, tangent1) { - var dx = (point1.x - point0.x) / 3; - return { - ctor: '::', - _0: A6(_terezka$elm_plot$Internal_Draw$CubicBeziers, point0.x + dx, point0.y + (dx * tangent0), point1.x - dx, point1.y - (dx * tangent1), point1.x, point1.y), - _1: {ctor: '[]'} - }; - }); -var _terezka$elm_plot$Internal_Draw$monotoneXNext = F3( - function (points, tangent0, commands) { - monotoneXNext: - while (true) { - var _p20 = points; - if ((_p20.ctor === '::') && (_p20._1.ctor === '::')) { - if (_p20._1._1.ctor === '::') { - var _p23 = _p20._1._1._0; - var _p22 = _p20._1._0; - var _p21 = _p20._0; - var tangent1 = A3(_terezka$elm_plot$Internal_Draw$slope3, _p21, _p22, _p23); - var nextCommands = A2( - _elm_lang$core$Basics_ops['++'], - commands, - A4(_terezka$elm_plot$Internal_Draw$monotoneXCurve, _p21, _p22, tangent0, tangent1)); - var _v9 = { - ctor: '::', - _0: _p22, - _1: {ctor: '::', _0: _p23, _1: _p20._1._1._1} - }, - _v10 = tangent1, - _v11 = nextCommands; - points = _v9; - tangent0 = _v10; - commands = _v11; - continue monotoneXNext; - } else { - var _p25 = _p20._1._0; - var _p24 = _p20._0; - var tangent1 = A3(_terezka$elm_plot$Internal_Draw$slope3, _p24, _p25, _p25); - return A2( - _elm_lang$core$Basics_ops['++'], - commands, - A4(_terezka$elm_plot$Internal_Draw$monotoneXCurve, _p24, _p25, tangent0, tangent1)); - } - } else { - return commands; - } - } - }); -var _terezka$elm_plot$Internal_Draw$monotoneXBegin = function (points) { - var _p26 = points; - if (((_p26.ctor === '::') && (_p26._1.ctor === '::')) && (_p26._1._1.ctor === '::')) { - var _p29 = _p26._1._1._0; - var _p28 = _p26._1._0; - var _p27 = _p26._0; - var tangent1 = A3(_terezka$elm_plot$Internal_Draw$slope3, _p27, _p28, _p29); - var tangent0 = A3(_terezka$elm_plot$Internal_Draw$slope2, _p27, _p28, tangent1); - return A2( - _elm_lang$core$Basics_ops['++'], - A4(_terezka$elm_plot$Internal_Draw$monotoneXCurve, _p27, _p28, tangent0, tangent1), - A3( - _terezka$elm_plot$Internal_Draw$monotoneXNext, - { - ctor: '::', - _0: _p28, - _1: {ctor: '::', _0: _p29, _1: _p26._1._1._1} - }, - tangent1, - {ctor: '[]'})); - } else { - return {ctor: '[]'}; - } -}; -var _terezka$elm_plot$Internal_Draw$VerticalLine = function (a) { - return {ctor: 'VerticalLine', _0: a}; -}; -var _terezka$elm_plot$Internal_Draw$HorizontalLine = function (a) { - return {ctor: 'HorizontalLine', _0: a}; -}; -var _terezka$elm_plot$Internal_Draw$Line = F2( - function (a, b) { - return {ctor: 'Line', _0: a, _1: b}; - }); -var _terezka$elm_plot$Internal_Draw$lineCommand = function (_p30) { - var _p31 = _p30; - return A2(_terezka$elm_plot$Internal_Draw$Line, _p31.x, _p31.y); -}; -var _terezka$elm_plot$Internal_Draw$areaEnd = F2( - function (plot, points) { - var _p32 = _elm_lang$core$List$head( - _elm_lang$core$List$reverse(points)); - if (_p32.ctor === 'Just') { - return { - ctor: '::', - _0: A2( - _terezka$elm_plot$Internal_Draw$Line, - _p32._0.x, - _terezka$elm_plot$Internal_Draw$yClosestToZero(plot)), - _1: {ctor: '[]'} - }; - } else { - return {ctor: '[]'}; - } - }); -var _terezka$elm_plot$Internal_Draw$Move = F2( - function (a, b) { - return {ctor: 'Move', _0: a, _1: b}; - }); -var _terezka$elm_plot$Internal_Draw$lineBegin = F2( - function (plot, points) { - var _p33 = points; - if (_p33.ctor === '::') { - return { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Move, _p33._0.x, _p33._0.y), - _1: {ctor: '[]'} - }; - } else { - return {ctor: '[]'}; - } - }); -var _terezka$elm_plot$Internal_Draw$areaBegin = F2( - function (plot, points) { - var _p34 = points; - if (_p34.ctor === '::') { - var _p35 = _p34._0.x; - return { - ctor: '::', - _0: A2( - _terezka$elm_plot$Internal_Draw$Move, - _p35, - _terezka$elm_plot$Internal_Draw$yClosestToZero(plot)), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Internal_Draw$Line, _p35, _p34._0.y), - _1: {ctor: '[]'} - } - }; - } else { - return {ctor: '[]'}; - } - }); -var _terezka$elm_plot$Internal_Draw$translateCommand = F2( - function (plot, command) { - var _p36 = command; - switch (_p36.ctor) { - case 'Move': - return A2( - _terezka$elm_plot$Internal_Draw$Move, - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._0), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._1)); - case 'Line': - return A2( - _terezka$elm_plot$Internal_Draw$Line, - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._0), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._1)); - case 'HorizontalLine': - return _terezka$elm_plot$Internal_Draw$HorizontalLine( - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._0)); - case 'VerticalLine': - return _terezka$elm_plot$Internal_Draw$VerticalLine( - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._0)); - case 'CubicBeziers': - return A6( - _terezka$elm_plot$Internal_Draw$CubicBeziers, - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._0), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._1), - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._2), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._3), - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._4), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._5)); - case 'CubicBeziersShort': - return A4( - _terezka$elm_plot$Internal_Draw$CubicBeziersShort, - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._0), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._1), - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._2), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._3)); - case 'QuadraticBeziers': - return A4( - _terezka$elm_plot$Internal_Draw$QuadraticBeziers, - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._0), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._1), - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._2), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._3)); - case 'QuadraticBeziersShort': - return A2( - _terezka$elm_plot$Internal_Draw$QuadraticBeziersShort, - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._0), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._1)); - case 'Arc': - return A7( - _terezka$elm_plot$Internal_Draw$Arc, - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._0), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._1), - _p36._2, - _p36._3, - _p36._4, - A2(_terezka$elm_plot$Internal_Draw$toSVGX, plot, _p36._5), - A2(_terezka$elm_plot$Internal_Draw$toSVGY, plot, _p36._6)); - default: - return _terezka$elm_plot$Internal_Draw$Close; - } - }); -var _terezka$elm_plot$Internal_Draw$linear = F2( - function (plot, points) { - return A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Internal_Draw$translateCommand(plot), - A2( - _elm_lang$core$Basics_ops['++'], - A2(_terezka$elm_plot$Internal_Draw$lineBegin, plot, points), - A2(_elm_lang$core$List$map, _terezka$elm_plot$Internal_Draw$lineCommand, points))); - }); -var _terezka$elm_plot$Internal_Draw$linearArea = F2( - function (plot, points) { - return A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Internal_Draw$translateCommand(plot), - A2( - _elm_lang$core$Basics_ops['++'], - A2(_terezka$elm_plot$Internal_Draw$areaBegin, plot, points), - A2( - _elm_lang$core$Basics_ops['++'], - A2(_elm_lang$core$List$map, _terezka$elm_plot$Internal_Draw$lineCommand, points), - A2(_terezka$elm_plot$Internal_Draw$areaEnd, plot, points)))); - }); -var _terezka$elm_plot$Internal_Draw$monotoneX = F2( - function (plot, points) { - return A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Internal_Draw$translateCommand(plot), - A2( - _elm_lang$core$Basics_ops['++'], - A2(_terezka$elm_plot$Internal_Draw$lineBegin, plot, points), - _terezka$elm_plot$Internal_Draw$monotoneXBegin(points))); - }); -var _terezka$elm_plot$Internal_Draw$monotoneXArea = F2( - function (plot, points) { - return A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Internal_Draw$translateCommand(plot), - A2( - _elm_lang$core$Basics_ops['++'], - A2(_terezka$elm_plot$Internal_Draw$areaBegin, plot, points), - A2( - _elm_lang$core$Basics_ops['++'], - _terezka$elm_plot$Internal_Draw$monotoneXBegin(points), - A2(_terezka$elm_plot$Internal_Draw$areaEnd, plot, points)))); - }); - -var _terezka$elm_plot$Internal_Colors$darkGrey = '#a3a3a3'; -var _terezka$elm_plot$Internal_Colors$grey = '#e3e3e3'; -var _terezka$elm_plot$Internal_Colors$transparent = 'transparent'; -var _terezka$elm_plot$Internal_Colors$blueStroke = '#cfd8ea'; -var _terezka$elm_plot$Internal_Colors$blueFill = '#e4eeff'; -var _terezka$elm_plot$Internal_Colors$pinkStroke = '#ff9edf'; -var _terezka$elm_plot$Internal_Colors$pinkFill = 'rgba(253, 185, 231, 0.5)'; - -var _terezka$elm_plot$Plot$point = function (_p0) { - var _p1 = _p0; - return A2(_terezka$elm_plot$Internal_Draw$Point, _p1.x, _p1.y); -}; -var _terezka$elm_plot$Plot$points = _elm_lang$core$List$map(_terezka$elm_plot$Plot$point); -var _terezka$elm_plot$Plot$niceInterval = F3( - function (min, max, total) { - var range = _elm_lang$core$Basics$abs(max - min); - var delta0 = range / _elm_lang$core$Basics$toFloat(total); - var mag = _elm_lang$core$Basics$floor( - A2(_elm_lang$core$Basics$logBase, 10, delta0)); - var magPow = _elm_lang$core$Basics$toFloat( - Math.pow(10, mag)); - var magMsd = _elm_lang$core$Basics$round(delta0 / magPow); - var magMsdFinal = (_elm_lang$core$Native_Utils.cmp(magMsd, 5) > 0) ? 10 : ((_elm_lang$core$Native_Utils.cmp(magMsd, 2) > 0) ? 5 : ((_elm_lang$core$Native_Utils.cmp(magMsd, 1) > 0) ? 1 : magMsd)); - return _elm_lang$core$Basics$toFloat(magMsdFinal) * magPow; - }); -var _terezka$elm_plot$Plot$count = F4( - function (delta, lowest, range, firstValue) { - return _elm_lang$core$Basics$floor( - (range - (_elm_lang$core$Basics$abs(lowest) - _elm_lang$core$Basics$abs(firstValue))) / delta); - }); -var _terezka$elm_plot$Plot$ceilToNearest = F2( - function (precision, value) { - return _elm_lang$core$Basics$toFloat( - _elm_lang$core$Basics$ceiling(value / precision)) * precision; - }); -var _terezka$elm_plot$Plot$firstValue = F2( - function (delta, lowest) { - return A2(_terezka$elm_plot$Plot$ceilToNearest, delta, lowest); - }); -var _terezka$elm_plot$Plot$deltaPrecision = function (delta) { - return _elm_lang$core$Basics$abs( - A2( - _elm_lang$core$Basics$min, - 0, - A2( - F2( - function (x, y) { - return x - y; - }), - 1, - _elm_lang$core$String$length( - A2( - _elm_lang$core$Maybe$withDefault, - '', - _elm_lang$core$List$head( - A2( - _elm_lang$core$List$map, - function (_) { - return _.match; - }, - A3( - _elm_lang$core$Regex$find, - _elm_lang$core$Regex$AtMost(1), - _elm_lang$core$Regex$regex('\\.[0-9]*'), - _elm_lang$core$Basics$toString(delta))))))))); -}; -var _terezka$elm_plot$Plot$tickPosition = F3( - function (delta, firstValue, index) { - return A2( - _elm_lang$core$Result$withDefault, - 0, - _elm_lang$core$String$toFloat( - A2( - _myrho$elm_round$Round$round, - _terezka$elm_plot$Plot$deltaPrecision(delta), - firstValue + (_elm_lang$core$Basics$toFloat(index) * delta)))); - }); -var _terezka$elm_plot$Plot$remove = F2( - function (banned, values) { - return A2( - _elm_lang$core$List$filter, - function (v) { - return !_elm_lang$core$Native_Utils.eq(v, banned); - }, - values); - }); -var _terezka$elm_plot$Plot$interval = F3( - function (offset, delta, _p2) { - var _p3 = _p2; - var _p4 = _p3.min; - var value = A2(_terezka$elm_plot$Plot$firstValue, delta, _p4) + offset; - var range = _elm_lang$core$Basics$abs(_p4 - _p3.max); - var indexes = A2( - _elm_lang$core$List$range, - 0, - A4(_terezka$elm_plot$Plot$count, delta, _p4, range, value)); - return A2( - _elm_lang$core$List$map, - A2(_terezka$elm_plot$Plot$tickPosition, delta, value), - indexes); - }); -var _terezka$elm_plot$Plot$decentPositions = function (summary) { - return (_elm_lang$core$Native_Utils.cmp(summary.length, 600) > 0) ? A3( - _terezka$elm_plot$Plot$interval, - 0, - A3(_terezka$elm_plot$Plot$niceInterval, summary.min, summary.max, 10), - summary) : A3( - _terezka$elm_plot$Plot$interval, - 0, - A3(_terezka$elm_plot$Plot$niceInterval, summary.min, summary.max, 5), - summary); -}; -var _terezka$elm_plot$Plot$viewLabel = F2( - function (attributes, string) { - return A2( - _elm_lang$svg$Svg$text_, - attributes, - { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$tspan, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$svg$Svg$text(string), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }); - }); -var _terezka$elm_plot$Plot$viewTickInner = F3( - function (attributes, width, height) { - return A2( - _elm_lang$svg$Svg$line, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$x2( - _elm_lang$core$Basics$toString(width)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$y2( - _elm_lang$core$Basics$toString(height)), - _1: attributes - } - }, - {ctor: '[]'}); - }); -var _terezka$elm_plot$Plot$viewAxisLine = F3( - function (summary, at, axisLine) { - var _p5 = axisLine; - if (_p5.ctor === 'Just') { - return A2( - _terezka$elm_plot$Internal_Draw$draw, - _p5._0.attributes, - A2( - _terezka$elm_plot$Internal_Draw$linear, - summary, - { - ctor: '::', - _0: at(_p5._0.start), - _1: { - ctor: '::', - _0: at(_p5._0.end), - _1: {ctor: '[]'} - } - })); - } else { - return _elm_lang$svg$Svg$text(''); - } - }); -var _terezka$elm_plot$Plot$viewGlitterLines = F2( - function (summary, _p6) { - var _p7 = _p6; - return { - ctor: '::', - _0: A3( - _terezka$elm_plot$Plot$viewAxisLine, - summary, - function (y) { - return {x: _p7.x, y: y}; - }, - A2( - _elm_lang$core$Maybe$map, - function (toLine) { - return toLine(summary.y); - }, - _p7.xLine)), - _1: { - ctor: '::', - _0: A3( - _terezka$elm_plot$Plot$viewAxisLine, - summary, - function (x) { - return {x: x, y: _p7.y}; - }, - A2( - _elm_lang$core$Maybe$map, - function (toLine) { - return toLine(summary.x); - }, - _p7.yLine)), - _1: {ctor: '[]'} - } - }; - }); -var _terezka$elm_plot$Plot$viewActualVerticalAxis = F3( - function (summary, _p8, glitterTicks) { - var _p9 = _p8; - var _p14 = _p9.flipAnchor; - var anchorOfLabel = _p14 ? 'text-anchor: start;' : 'text-anchor: end;'; - var positionOfLabel = _p14 ? 10 : -10; - var lengthOfTick = function (length) { - return _p14 ? length : (0 - length); - }; - var at = function (y) { - return { - x: A2(_p9.position, summary.x.min, summary.x.max), - y: y - }; - }; - var viewTickLine = function (_p10) { - var _p11 = _p10; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: A4( - _terezka$elm_plot$Internal_Draw$place, - summary, - at(_p11.position), - 0, - 0), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A3( - _terezka$elm_plot$Plot$viewTickInner, - _p11.attributes, - lengthOfTick(_p11.length), - 0), - _1: {ctor: '[]'} - }); - }; - var viewLabel = function (_p12) { - var _p13 = _p12; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: A4( - _terezka$elm_plot$Internal_Draw$place, - summary, - at(_p13.position), - positionOfLabel, - 5), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$style(anchorOfLabel), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _p13.view, - _1: {ctor: '[]'} - }); - }; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__vertical-axis'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A3(_terezka$elm_plot$Plot$viewAxisLine, summary, at, _p9.axisLine), - _1: { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__ticks'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$map, - viewTickLine, - A2(_elm_lang$core$Basics_ops['++'], _p9.ticks, glitterTicks))), - _1: { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__labels'), - _1: {ctor: '[]'} - }, - A2(_elm_lang$core$List$map, viewLabel, _p9.labels)), - _1: {ctor: '[]'} - } - } - }); - }); -var _terezka$elm_plot$Plot$viewVerticalAxis = F3( - function (summary, axis, moreTicks) { - var _p15 = axis; - if (_p15.ctor === 'Axis') { - return _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$map, - _elm_lang$core$Basics$never, - A3( - _terezka$elm_plot$Plot$viewActualVerticalAxis, - summary, - _p15._0(summary.y), - moreTicks))); - } else { - return _elm_lang$core$Maybe$Nothing; - } - }); -var _terezka$elm_plot$Plot$viewActualHorizontalAxis = F4( - function (summary, _p16, glitterLabels, glitterTicks) { - var _p17 = _p16; - var _p22 = _p17.flipAnchor; - var positionOfLabel = _p22 ? -10 : 20; - var lengthOfTick = function (length) { - return _p22 ? (0 - length) : length; - }; - var at = function (x) { - return { - x: x, - y: A2(_p17.position, summary.y.min, summary.y.max) - }; - }; - var viewTickLine = function (_p18) { - var _p19 = _p18; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: A4( - _terezka$elm_plot$Internal_Draw$place, - summary, - at(_p19.position), - 0, - 0), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A3( - _terezka$elm_plot$Plot$viewTickInner, - _p19.attributes, - 0, - lengthOfTick(_p19.length)), - _1: {ctor: '[]'} - }); - }; - var viewLabel = function (_p20) { - var _p21 = _p20; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: A4( - _terezka$elm_plot$Internal_Draw$place, - summary, - at(_p21.position), - 0, - positionOfLabel), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$style('text-anchor: middle;'), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _p21.view, - _1: {ctor: '[]'} - }); - }; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__horizontal-axis'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A3(_terezka$elm_plot$Plot$viewAxisLine, summary, at, _p17.axisLine), - _1: { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__ticks'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$map, - viewTickLine, - A2(_elm_lang$core$Basics_ops['++'], _p17.ticks, glitterTicks))), - _1: { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__labels'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$map, - viewLabel, - A2(_elm_lang$core$Basics_ops['++'], _p17.labels, glitterLabels))), - _1: {ctor: '[]'} - } - } - }); - }); -var _terezka$elm_plot$Plot$viewHorizontalAxis = F4( - function (summary, axis, moreLabels, moreTicks) { - var _p23 = axis; - if (_p23.ctor === 'Axis') { - return _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$map, - _elm_lang$core$Basics$never, - A4( - _terezka$elm_plot$Plot$viewActualHorizontalAxis, - summary, - _p23._0(summary.x), - moreLabels, - moreTicks))); - } else { - return _elm_lang$core$Maybe$Nothing; - } - }); -var _terezka$elm_plot$Plot$viewTriangle = function (color) { - return A2( - _elm_lang$svg$Svg$polygon, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$points('0,-5 5,5 -5,5'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$transform('translate(0, -2.5)'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(color), - _1: {ctor: '[]'} - } - } - }, - {ctor: '[]'}); -}; -var _terezka$elm_plot$Plot$viewDiamond = F3( - function (width, height, color) { - return A2( - _elm_lang$svg$Svg$rect, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$width( - _elm_lang$core$Basics$toString(width)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$height( - _elm_lang$core$Basics$toString(height)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$transform('rotate(45)'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$x( - _elm_lang$core$Basics$toString((0 - width) / 2)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$y( - _elm_lang$core$Basics$toString((0 - height) / 2)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke('transparent'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(color), - _1: {ctor: '[]'} - } - } - } - } - } - } - }, - {ctor: '[]'}); - }); -var _terezka$elm_plot$Plot$viewSquare = F2( - function (width, color) { - return A2( - _elm_lang$svg$Svg$rect, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$width( - _elm_lang$core$Basics$toString(width)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$height( - _elm_lang$core$Basics$toString(width)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$x( - _elm_lang$core$Basics$toString((0 - width) / 2)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$y( - _elm_lang$core$Basics$toString((0 - width) / 2)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke('transparent'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(color), - _1: {ctor: '[]'} - } - } - } - } - } - }, - {ctor: '[]'}); - }); -var _terezka$elm_plot$Plot$viewCircle = F2( - function (radius, color) { - return A2( - _elm_lang$svg$Svg$circle, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$r( - _elm_lang$core$Basics$toString(radius)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke('transparent'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(color), - _1: {ctor: '[]'} - } - } - }, - {ctor: '[]'}); - }); -var _terezka$elm_plot$Plot$viewDataPoint = F2( - function (plotSummary, _p24) { - var _p25 = _p24; - var _p26 = _p25.view; - if (_p26.ctor === 'Nothing') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: A4( - _terezka$elm_plot$Internal_Draw$place, - plotSummary, - {x: _p25.x, y: _p25.y}, - 0, - 0), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _p26._0, - _1: {ctor: '[]'} - })); - } - }); -var _terezka$elm_plot$Plot$viewDataPoints = F2( - function (plotSummary, dataPoints) { - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__series__points'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$filterMap, - _elm_lang$core$Basics$identity, - A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$viewDataPoint(plotSummary), - dataPoints))); - }); -var _terezka$elm_plot$Plot$viewActualHorizontalGrid = F2( - function (summary, gridLines) { - var viewGridLine = function (_p27) { - var _p28 = _p27; - var _p29 = _p28.position; - return A2( - _terezka$elm_plot$Internal_Draw$draw, - _p28.attributes, - A2( - _terezka$elm_plot$Internal_Draw$linear, - summary, - { - ctor: '::', - _0: {x: summary.x.min, y: _p29}, - _1: { - ctor: '::', - _0: {x: summary.x.max, y: _p29}, - _1: {ctor: '[]'} - } - })); - }; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__vertical-grid'), - _1: {ctor: '[]'} - }, - A2(_elm_lang$core$List$map, viewGridLine, gridLines)); - }); -var _terezka$elm_plot$Plot$viewHorizontalGrid = F2( - function (summary, grid) { - var _p30 = grid; - if (_p30.ctor === 'Grid') { - return _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$map, - _elm_lang$core$Basics$never, - A2( - _terezka$elm_plot$Plot$viewActualHorizontalGrid, - summary, - _p30._0(summary.y)))); - } else { - return _elm_lang$core$Maybe$Nothing; - } - }); -var _terezka$elm_plot$Plot$viewActualVerticalGrid = F2( - function (summary, gridLines) { - var viewGridLine = function (_p31) { - var _p32 = _p31; - var _p33 = _p32.position; - return A2( - _terezka$elm_plot$Internal_Draw$draw, - _p32.attributes, - A2( - _terezka$elm_plot$Internal_Draw$linear, - summary, - { - ctor: '::', - _0: {x: _p33, y: summary.y.min}, - _1: { - ctor: '::', - _0: {x: _p33, y: summary.y.max}, - _1: {ctor: '[]'} - } - })); - }; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__horizontal-grid'), - _1: {ctor: '[]'} - }, - A2(_elm_lang$core$List$map, viewGridLine, gridLines)); - }); -var _terezka$elm_plot$Plot$viewVerticalGrid = F2( - function (summary, grid) { - var _p34 = grid; - if (_p34.ctor === 'Grid') { - return _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$map, - _elm_lang$core$Basics$never, - A2( - _terezka$elm_plot$Plot$viewActualVerticalGrid, - summary, - _p34._0(summary.x)))); - } else { - return _elm_lang$core$Maybe$Nothing; - } - }); -var _terezka$elm_plot$Plot$defaultPlotSummary = { - x: { - min: 0.0, - max: 1.0, - all: {ctor: '[]'} - }, - y: { - min: 0.0, - max: 1.0, - all: {ctor: '[]'} - } -}; -var _terezka$elm_plot$Plot$toPlotSummary = F3( - function (customizations, toNiceReach, points) { - var foldAxis = F2( - function (summary, v) { - return { - min: A2(_elm_lang$core$Basics$min, summary.min, v), - max: A2(_elm_lang$core$Basics$max, summary.max, v), - all: {ctor: '::', _0: v, _1: summary.all} - }; - }); - var foldPlot = F2( - function (_p35, result) { - var _p36 = _p35; - var _p40 = _p36.y; - var _p39 = _p36.x; - var _p37 = result; - if (_p37.ctor === 'Nothing') { - return _elm_lang$core$Maybe$Just( - { - x: { - min: _p39, - max: _p39, - all: { - ctor: '::', - _0: _p39, - _1: {ctor: '[]'} - } - }, - y: { - min: _p40, - max: _p40, - all: { - ctor: '::', - _0: _p40, - _1: {ctor: '[]'} - } - } - }); - } else { - var _p38 = _p37._0; - return _elm_lang$core$Maybe$Just( - { - x: A2(foldAxis, _p38.x, _p39), - y: A2(foldAxis, _p38.y, _p40) - }); - } - }); - var plotSummary = toNiceReach( - A2( - _elm_lang$core$Maybe$withDefault, - _terezka$elm_plot$Plot$defaultPlotSummary, - A3(_elm_lang$core$List$foldl, foldPlot, _elm_lang$core$Maybe$Nothing, points))); - return { - x: { - min: customizations.toRangeLowest(plotSummary.x.min), - max: customizations.toRangeHighest(plotSummary.x.max), - dataMin: plotSummary.x.min, - dataMax: plotSummary.x.max, - length: _elm_lang$core$Basics$toFloat(customizations.width), - marginLower: _elm_lang$core$Basics$toFloat(customizations.margin.left), - marginUpper: _elm_lang$core$Basics$toFloat(customizations.margin.right), - all: _elm_lang$core$List$sort(plotSummary.x.all) - }, - y: { - min: customizations.toDomainLowest(plotSummary.y.min), - max: customizations.toDomainHighest(plotSummary.y.max), - dataMin: plotSummary.y.min, - dataMax: plotSummary.y.max, - length: _elm_lang$core$Basics$toFloat(customizations.height), - marginLower: _elm_lang$core$Basics$toFloat(customizations.margin.top), - marginUpper: _elm_lang$core$Basics$toFloat(customizations.margin.bottom), - all: plotSummary.y.all - } - }; - }); -var _terezka$elm_plot$Plot$diff = F2( - function (a, b) { - return _elm_lang$core$Basics$abs(a - b); - }); -var _terezka$elm_plot$Plot$toNearestX = F2( - function (summary, exactX) { - var updateIfCloser = F2( - function (closest, x) { - return (_elm_lang$core$Native_Utils.cmp( - A2(_terezka$elm_plot$Plot$diff, x, exactX), - A2(_terezka$elm_plot$Plot$diff, closest, exactX)) > 0) ? closest : x; - }); - var $default = A2( - _elm_lang$core$Maybe$withDefault, - 0, - _elm_lang$core$List$head(summary.x.all)); - return A3(_elm_lang$core$List$foldl, updateIfCloser, $default, summary.x.all); - }); -var _terezka$elm_plot$Plot$unScalePoint = F4( - function (summary, mouseX, mouseY, _p41) { - var _p42 = _p41; - return _elm_lang$core$Maybe$Just( - { - x: A2( - _terezka$elm_plot$Plot$toNearestX, - summary, - A2(_terezka$elm_plot$Internal_Draw$toUnSVGX, summary, (summary.x.length * (mouseX - _p42.left)) / _p42.width)), - y: A3( - _elm_lang$core$Basics$clamp, - summary.y.min, - summary.y.max, - A2(_terezka$elm_plot$Internal_Draw$toUnSVGY, summary, (summary.y.length * (mouseY - _p42.top)) / _p42.height)) - }); - }); -var _terezka$elm_plot$Plot$plotPosition = _elm_lang$core$Json_Decode$oneOf( - { - ctor: '::', - _0: _debois$elm_dom$DOM$boundingClientRect, - _1: { - ctor: '::', - _0: _elm_lang$core$Json_Decode$lazy( - function (_p43) { - return _debois$elm_dom$DOM$parentElement(_terezka$elm_plot$Plot$plotPosition); - }), - _1: {ctor: '[]'} - } - }); -var _terezka$elm_plot$Plot$handleHint = F2( - function (summary, toMsg) { - return A4( - _elm_lang$core$Json_Decode$map3, - F3( - function (x, y, r) { - return toMsg( - A4(_terezka$elm_plot$Plot$unScalePoint, summary, x, y, r)); - }), - A2(_elm_lang$core$Json_Decode$field, 'clientX', _elm_lang$core$Json_Decode$float), - A2(_elm_lang$core$Json_Decode$field, 'clientY', _elm_lang$core$Json_Decode$float), - _debois$elm_dom$DOM$target(_terezka$elm_plot$Plot$plotPosition)); - }); -var _terezka$elm_plot$Plot$viewActualJunk = F2( - function (summary, _p44) { - var _p45 = _p44; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: A4( - _terezka$elm_plot$Internal_Draw$place, - summary, - {x: _p45.x, y: _p45.y}, - 0, - 0), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _p45.view, - _1: {ctor: '[]'} - }); - }); -var _terezka$elm_plot$Plot$innerAttributes = function (customizations) { - return A2( - _elm_lang$core$Basics_ops['++'], - customizations.attributes, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$viewBox( - A2( - _elm_lang$core$Basics_ops['++'], - '0 0 ', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(customizations.width), - A2( - _elm_lang$core$Basics_ops['++'], - ' ', - _elm_lang$core$Basics$toString(customizations.height))))), - _1: {ctor: '[]'} - }); -}; -var _terezka$elm_plot$Plot$containerAttributes = F2( - function (customizations, summary) { - var _p46 = customizations.onHover; - if (_p46.ctor === 'Just') { - var _p47 = _p46._0; - return { - ctor: '::', - _0: A2( - _elm_lang$html$Html_Events$on, - 'mousemove', - A2(_terezka$elm_plot$Plot$handleHint, summary, _p47)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Events$onMouseLeave( - _p47(_elm_lang$core$Maybe$Nothing)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$id(customizations.id), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'position', _1: 'relative'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'margin', _1: '0 auto'}, - _1: {ctor: '[]'} - } - }), - _1: {ctor: '[]'} - } - } - } - }; - } else { - return { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$id(customizations.id), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'position', _1: 'relative'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'margin', _1: '0 auto'}, - _1: {ctor: '[]'} - } - }), - _1: {ctor: '[]'} - } - }; - } - }); -var _terezka$elm_plot$Plot$toClipPathId = function (_p48) { - var _p49 = _p48; - return A2(_elm_lang$core$Basics_ops['++'], 'elm-plot__clip-path__', _p49.id); -}; -var _terezka$elm_plot$Plot$viewInterpolation = F7( - function (customizations, summary, toLine, toArea, area, attributes, dataPoints) { - var _p50 = area; - if (_p50.ctor === 'Nothing') { - return A2( - _terezka$elm_plot$Internal_Draw$draw, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(_terezka$elm_plot$Internal_Colors$transparent), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$pinkStroke), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__series__interpolation'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$clipPath( - A2( - _elm_lang$core$Basics_ops['++'], - 'url(#', - A2( - _elm_lang$core$Basics_ops['++'], - _terezka$elm_plot$Plot$toClipPathId(customizations), - ')'))), - _1: attributes - } - } - } - }, - A2( - toLine, - summary, - _terezka$elm_plot$Plot$points(dataPoints))); - } else { - return A2( - _terezka$elm_plot$Internal_Draw$draw, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(_p50._0), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$pinkStroke), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__series__interpolation'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$clipPath( - A2( - _elm_lang$core$Basics_ops['++'], - 'url(#', - A2( - _elm_lang$core$Basics_ops['++'], - _terezka$elm_plot$Plot$toClipPathId(customizations), - ')'))), - _1: attributes - } - } - } - }, - A2( - toArea, - summary, - _terezka$elm_plot$Plot$points(dataPoints))); - } - }); -var _terezka$elm_plot$Plot$viewPath = F4( - function (customizations, plotSummary, interpolation, dataPoints) { - var _p51 = interpolation; - switch (_p51.ctor) { - case 'None': - return A2( - _elm_lang$svg$Svg$path, - {ctor: '[]'}, - {ctor: '[]'}); - case 'Linear': - return A7(_terezka$elm_plot$Plot$viewInterpolation, customizations, plotSummary, _terezka$elm_plot$Internal_Draw$linear, _terezka$elm_plot$Internal_Draw$linearArea, _p51._0, _p51._1, dataPoints); - default: - return A7(_terezka$elm_plot$Plot$viewInterpolation, customizations, plotSummary, _terezka$elm_plot$Internal_Draw$monotoneX, _terezka$elm_plot$Internal_Draw$monotoneXArea, _p51._0, _p51._1, dataPoints); - } - }); -var _terezka$elm_plot$Plot$viewASeries = F4( - function (customizations, plotSummary, _p52, dataPoints) { - var _p53 = _p52; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__series'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$map, - _elm_lang$core$Basics$never, - A4(_terezka$elm_plot$Plot$viewPath, customizations, plotSummary, _p53.interpolation, dataPoints)), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Plot$viewDataPoints, plotSummary, dataPoints), - _1: {ctor: '[]'} - } - }); - }); -var _terezka$elm_plot$Plot$defineClipPath = F2( - function (customizations, summary) { - return A2( - _elm_lang$svg$Svg$defs, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$clipPath, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$id( - _terezka$elm_plot$Plot$toClipPathId(customizations)), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$rect, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$x( - _elm_lang$core$Basics$toString(summary.x.marginLower)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$y( - _elm_lang$core$Basics$toString(summary.y.marginLower)), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$width( - _elm_lang$core$Basics$toString( - _terezka$elm_plot$Internal_Draw$length(summary.x))), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$height( - _elm_lang$core$Basics$toString( - _terezka$elm_plot$Internal_Draw$length(summary.y))), - _1: {ctor: '[]'} - } - } - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - }), - _1: customizations.defs - }); - }); -var _terezka$elm_plot$Plot$addNiceReachForBars = function (_p54) { - var _p55 = _p54; - var _p57 = _p55.y; - var _p56 = _p55.x; - return _elm_lang$core$Native_Utils.update( - _p55, - { - x: _elm_lang$core$Native_Utils.update( - _p56, - {min: _p56.min - 0.5, max: _p56.max + 0.5}), - y: _elm_lang$core$Native_Utils.update( - _p57, - { - min: A2(_elm_lang$core$Basics$min, _p57.min, 0), - max: _p57.max - }) - }); -}; -var _terezka$elm_plot$Plot$addNiceReachForArea = F2( - function (area, _p58) { - var _p59 = _p58; - var _p62 = _p59.y; - var _p61 = _p59; - var _p60 = area; - if (_p60.ctor === 'Nothing') { - return _p61; - } else { - return _elm_lang$core$Native_Utils.update( - _p61, - { - x: _p59.x, - y: _elm_lang$core$Native_Utils.update( - _p62, - { - min: A2(_elm_lang$core$Basics$min, _p62.min, 0), - max: _p62.max - }) - }); - } - }); -var _terezka$elm_plot$Plot$addNiceReachForSeries = function (series) { - var _p63 = series.interpolation; - switch (_p63.ctor) { - case 'None': - return _elm_lang$core$Basics$identity; - case 'Linear': - return _terezka$elm_plot$Plot$addNiceReachForArea(_p63._0); - default: - return _terezka$elm_plot$Plot$addNiceReachForArea(_p63._0); - } -}; -var _terezka$elm_plot$Plot$viewSeriesCustom = F3( - function (customizations, series, data) { - var addNiceReach = function (summary) { - return A3(_elm_lang$core$List$foldl, _terezka$elm_plot$Plot$addNiceReachForSeries, summary, series); - }; - var dataPoints = A2( - _elm_lang$core$List$map, - function (_p64) { - var _p65 = _p64; - return _p65.toDataPoints(data); - }, - series); - var allDataPoints = _elm_lang$core$List$concat(dataPoints); - var summary = A3(_terezka$elm_plot$Plot$toPlotSummary, customizations, addNiceReach, allDataPoints); - var viewJunks = _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__junk'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$viewActualJunk(summary), - customizations.junk(summary)))); - var viewHorizontalAxes = A4( - _terezka$elm_plot$Plot$viewHorizontalAxis, - summary, - customizations.horizontalAxis, - {ctor: '[]'}, - A2( - _elm_lang$core$List$filterMap, - function (_) { - return _.xTick; - }, - allDataPoints)); - var viewGlitter = _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$map, - _elm_lang$core$Basics$never, - A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__glitter'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$concatMap, - _terezka$elm_plot$Plot$viewGlitterLines(summary), - allDataPoints)))); - var viewHint = function () { - var _p66 = A2( - _elm_lang$core$List$filterMap, - function (_) { - return _.hint; - }, - allDataPoints); - if (_p66.ctor === '[]') { - return _elm_lang$svg$Svg$text(''); - } else { - return A2( - _elm_lang$html$Html$map, - _elm_lang$core$Basics$never, - A2(customizations.hintContainer, summary, _p66)); - } - }(); - var viewVerticalAxes = _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__vertical-axes'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$filterMap, - _elm_lang$core$Basics$identity, - A3( - _elm_lang$core$List$map2, - function (_p67) { - return A2( - _terezka$elm_plot$Plot$viewVerticalAxis, - summary, - function (_) { - return _.axis; - }(_p67)); - }, - series, - A2( - _elm_lang$core$List$map, - _elm_lang$core$List$filterMap( - function (_) { - return _.yTick; - }), - dataPoints))))); - var viewActualSeries = _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__all-series'), - _1: {ctor: '[]'} - }, - A3( - _elm_lang$core$List$map2, - A2(_terezka$elm_plot$Plot$viewASeries, customizations, summary), - series, - dataPoints))); - var children = A2( - _elm_lang$core$List$filterMap, - _elm_lang$core$Basics$identity, - { - ctor: '::', - _0: _elm_lang$core$Maybe$Just( - A2(_terezka$elm_plot$Plot$defineClipPath, customizations, summary)), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Plot$viewHorizontalGrid, summary, customizations.grid.horizontal), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Plot$viewVerticalGrid, summary, customizations.grid.vertical), - _1: { - ctor: '::', - _0: viewActualSeries, - _1: { - ctor: '::', - _0: viewHorizontalAxes, - _1: { - ctor: '::', - _0: viewVerticalAxes, - _1: { - ctor: '::', - _0: viewGlitter, - _1: { - ctor: '::', - _0: viewJunks, - _1: {ctor: '[]'} - } - } - } - } - } - } - } - }); - return A2( - _elm_lang$html$Html$div, - A2(_terezka$elm_plot$Plot$containerAttributes, customizations, summary), - { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$svg, - _terezka$elm_plot$Plot$innerAttributes(customizations), - children), - _1: { - ctor: '::', - _0: viewHint, - _1: {ctor: '[]'} - } - }); - }); -var _terezka$elm_plot$Plot$closestToZero = F2( - function (min, max) { - return A3(_elm_lang$core$Basics$clamp, min, max, 0); - }); -var _terezka$elm_plot$Plot$viewActualBars = F3( - function (summary, _p68, groups) { - var _p69 = _p68; - var _p75 = _p69.styles; - var indexedHeights = function (group) { - return A2( - _elm_lang$core$List$indexedMap, - F2( - function (v0, v1) { - return {ctor: '_Tuple2', _0: v0, _1: v1}; - }), - group.bars); - }; - var barsPerGroup = _elm_lang$core$Basics$toFloat( - _elm_lang$core$List$length(_p75)); - var defaultWidth = 1 / barsPerGroup; - var width = function () { - var _p70 = _p69.maxWidth; - if (_p70.ctor === 'Percentage') { - return (defaultWidth * _elm_lang$core$Basics$toFloat(_p70._0)) / 100; - } else { - var _p71 = _p70._0; - return (_elm_lang$core$Native_Utils.cmp( - defaultWidth, - A2(_terezka$elm_plot$Internal_Draw$unScaleValue, summary.x, _p71)) > 0) ? A2(_terezka$elm_plot$Internal_Draw$unScaleValue, summary.x, _p71) : defaultWidth; - } - }(); - var viewLabel = function (label) { - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$transform( - A2( - _elm_lang$core$Basics_ops['++'], - 'translate(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString( - A2(_terezka$elm_plot$Internal_Draw$scaleValue, summary.x, width / 2)), - ', -5)'))), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$style('text-anchor: middle;'), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: label, - _1: {ctor: '[]'} - }); - }; - var offset = F2( - function (x, i) { - return x + (width * (_elm_lang$core$Basics$toFloat(i) - (barsPerGroup / 2))); - }); - var viewBar = F3( - function (x, attributes, _p72) { - var _p73 = _p72; - var _p74 = _p73._1.height; - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: A4( - _terezka$elm_plot$Internal_Draw$place, - summary, - { - x: A2(offset, x, _p73._0), - y: A2( - _elm_lang$core$Basics$max, - A2(_terezka$elm_plot$Plot$closestToZero, summary.y.min, summary.y.max), - _p74) - }, - 0, - 0), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$map, - _elm_lang$core$Basics$never, - A2( - _elm_lang$core$Maybe$withDefault, - _elm_lang$svg$Svg$text(''), - A2(_elm_lang$core$Maybe$map, viewLabel, _p73._1.label))), - _1: { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$rect, - A2( - _elm_lang$core$Basics_ops['++'], - attributes, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$width( - _elm_lang$core$Basics$toString( - A2(_terezka$elm_plot$Internal_Draw$scaleValue, summary.x, width))), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$height( - _elm_lang$core$Basics$toString( - A2( - _terezka$elm_plot$Internal_Draw$scaleValue, - summary.y, - _elm_lang$core$Basics$abs(_p74)))), - _1: {ctor: '[]'} - } - }), - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }); - }); - var viewGroup = F2( - function (index, group) { - return A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__bars__group'), - _1: {ctor: '[]'} - }, - A3( - _elm_lang$core$List$map2, - viewBar( - _elm_lang$core$Basics$toFloat(index + 1)), - _p75, - indexedHeights(group))); - }); - return _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__bars'), - _1: {ctor: '[]'} - }, - A2(_elm_lang$core$List$indexedMap, viewGroup, groups))); - }); -var _terezka$elm_plot$Plot$viewBarsCustom = F3( - function (customizations, bars, data) { - var toDataPoint = F3( - function (index, group, _p76) { - var _p77 = _p76; - return { - x: _elm_lang$core$Basics$toFloat(index) + 1, - y: _p77.height, - xLine: group.verticalLine( - _elm_lang$core$Basics$toFloat(index) + 1), - yLine: _elm_lang$core$Maybe$Nothing - }; - }); - var toDataPoints = F2( - function (index, group) { - return A2( - _elm_lang$core$List$map, - A2(toDataPoint, index, group), - group.bars); - }); - var groups = bars.toGroups(data); - var dataPoints = _elm_lang$core$List$concat( - A2(_elm_lang$core$List$indexedMap, toDataPoints, groups)); - var summary = A3(_terezka$elm_plot$Plot$toPlotSummary, customizations, _terezka$elm_plot$Plot$addNiceReachForBars, dataPoints); - var viewGlitter = _elm_lang$core$Maybe$Just( - A2( - _elm_lang$svg$Svg$map, - _elm_lang$core$Basics$never, - A2( - _elm_lang$svg$Svg$g, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__glitter'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$concatMap, - _terezka$elm_plot$Plot$viewGlitterLines(summary), - dataPoints)))); - var xLabels = A2( - _elm_lang$core$List$indexedMap, - F2( - function (index, group) { - return group.label( - _elm_lang$core$Basics$toFloat(index) + 1); - }), - groups); - var hints = A2( - _elm_lang$core$List$filterMap, - _elm_lang$core$Basics$identity, - A2( - _elm_lang$core$List$indexedMap, - F2( - function (index, group) { - return group.hint( - _elm_lang$core$Basics$toFloat(index) + 1); - }), - groups)); - var viewHint = function () { - var _p78 = hints; - if (_p78.ctor === '[]') { - return _elm_lang$svg$Svg$text(''); - } else { - return A2( - _elm_lang$html$Html$map, - _elm_lang$core$Basics$never, - A2(customizations.hintContainer, summary, _p78)); - } - }(); - var children = A2( - _elm_lang$core$List$filterMap, - _elm_lang$core$Basics$identity, - { - ctor: '::', - _0: _elm_lang$core$Maybe$Just( - A2(_terezka$elm_plot$Plot$defineClipPath, customizations, summary)), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Plot$viewHorizontalGrid, summary, customizations.grid.horizontal), - _1: { - ctor: '::', - _0: A2(_terezka$elm_plot$Plot$viewVerticalGrid, summary, customizations.grid.vertical), - _1: { - ctor: '::', - _0: A3(_terezka$elm_plot$Plot$viewActualBars, summary, bars, groups), - _1: { - ctor: '::', - _0: A4( - _terezka$elm_plot$Plot$viewHorizontalAxis, - summary, - customizations.horizontalAxis, - xLabels, - {ctor: '[]'}), - _1: { - ctor: '::', - _0: A3( - _terezka$elm_plot$Plot$viewVerticalAxis, - summary, - bars.axis, - {ctor: '[]'}), - _1: { - ctor: '::', - _0: viewGlitter, - _1: {ctor: '[]'} - } - } - } - } - } - } - }); - return A2( - _elm_lang$html$Html$div, - A2(_terezka$elm_plot$Plot$containerAttributes, customizations, summary), - { - ctor: '::', - _0: A2( - _elm_lang$svg$Svg$svg, - _terezka$elm_plot$Plot$innerAttributes(customizations), - children), - _1: { - ctor: '::', - _0: viewHint, - _1: {ctor: '[]'} - } - }); - }); -var _terezka$elm_plot$Plot$displace = F2( - function (x, y) { - return _elm_lang$svg$Svg_Attributes$transform( - A2( - _elm_lang$core$Basics_ops['++'], - 'translate(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(x), - A2( - _elm_lang$core$Basics_ops['++'], - ', ', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(y), - ')'))))); - }); -var _terezka$elm_plot$Plot$fullLine = F2( - function (attributes, summary) { - return { - attributes: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$style('pointer-events: none;'), - _1: attributes - }, - start: summary.min, - end: summary.max - }; - }); -var _terezka$elm_plot$Plot$simpleLabel = function (position) { - return { - position: position, - view: A2( - _terezka$elm_plot$Plot$viewLabel, - {ctor: '[]'}, - _elm_lang$core$Basics$toString(position)) - }; -}; -var _terezka$elm_plot$Plot$simpleTick = function (position) { - return { - position: position, - length: 5, - attributes: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$darkGrey), - _1: {ctor: '[]'} - } - }; -}; -var _terezka$elm_plot$Plot$simpleLine = function (summary) { - return A2( - _terezka$elm_plot$Plot$fullLine, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$darkGrey), - _1: {ctor: '[]'} - }, - summary); -}; -var _terezka$elm_plot$Plot$normalHintContainerInner = F2( - function (isLeft, hints) { - var margin = isLeft ? 10 : 10; - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'margin', - _1: A2( - _elm_lang$core$Basics_ops['++'], - '0 ', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(margin), - 'px')) - }, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'padding', _1: '5px 10px'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'background', _1: _terezka$elm_plot$Internal_Colors$grey}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'border-radius', _1: '2px'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'color', _1: 'black'}, - _1: {ctor: '[]'} - } - } - } - } - }), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__hint'), - _1: {ctor: '[]'} - } - }, - hints); - }); -var _terezka$elm_plot$Plot$viewFlyingHintContainer = F4( - function (inner, _p79, summary, hints) { - var _p80 = _p79; - var _p81 = _p80.x; - var isLeft = _elm_lang$core$Native_Utils.cmp( - _p81 - summary.x.min, - _terezka$elm_plot$Internal_Draw$range(summary.x) / 2) > 0; - var direction = isLeft ? 'translateX(-100%)' : 'translateX(0)'; - var xOffset = (A2(_terezka$elm_plot$Internal_Draw$toSVGX, summary, _p81) * 100) / summary.x.length; - var style = { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'position', _1: 'absolute'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'top', _1: '25%'}, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'left', - _1: A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(xOffset), - '%') - }, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'transform', _1: direction}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'pointer-events', _1: 'none'}, - _1: {ctor: '[]'} - } - } - } - } - }; - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style(style), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$class('elm-plot__hint'), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: A2(inner, isLeft, hints), - _1: {ctor: '[]'} - }); - }); -var _terezka$elm_plot$Plot$flyingHintContainer = F4( - function (inner, hovering, summary, hints) { - var _p82 = hovering; - if (_p82.ctor === 'Nothing') { - return _elm_lang$svg$Svg$text(''); - } else { - return A4(_terezka$elm_plot$Plot$viewFlyingHintContainer, inner, _p82._0, summary, hints); - } - }); -var _terezka$elm_plot$Plot$normalHintContainer = function (summary) { - return _elm_lang$html$Html$div( - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'margin-left', - _1: A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(summary.x.marginLower), - 'px') - }, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }); -}; -var _terezka$elm_plot$Plot$junk = F3( - function (title, x, y) { - return {x: x, y: y, view: title}; - }); -var _terezka$elm_plot$Plot$normalBarLabel = F2( - function (label, position) { - return { - position: position, - view: A2( - _terezka$elm_plot$Plot$viewLabel, - {ctor: '[]'}, - label) - }; - }); -var _terezka$elm_plot$Plot$normalHint = function (y) { - return A2( - _elm_lang$html$Html$span, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'padding', _1: '5px'}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text( - A2( - _elm_lang$core$Basics_ops['++'], - 'y: ', - _elm_lang$core$Basics$toString(y))), - _1: {ctor: '[]'} - }); -}; -var _terezka$elm_plot$Plot$rangeFrameDot = F3( - function (view, x, y) { - return { - view: _elm_lang$core$Maybe$Just(view), - xLine: _elm_lang$core$Maybe$Nothing, - yLine: _elm_lang$core$Maybe$Nothing, - xTick: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$simpleTick(x)), - yTick: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$simpleTick(y)), - hint: _elm_lang$core$Maybe$Nothing, - x: x, - y: y - }; - }); -var _terezka$elm_plot$Plot$emphasizedDot = F3( - function (view, x, y) { - return { - view: _elm_lang$core$Maybe$Just(view), - xLine: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$fullLine( - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$darkGrey), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$strokeDasharray('5, 5'), - _1: {ctor: '[]'} - } - })), - yLine: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$fullLine( - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$darkGrey), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$strokeDasharray('5, 5'), - _1: {ctor: '[]'} - } - })), - xTick: _elm_lang$core$Maybe$Nothing, - yTick: _elm_lang$core$Maybe$Nothing, - hint: _elm_lang$core$Maybe$Nothing, - x: x, - y: y - }; - }); -var _terezka$elm_plot$Plot$onHovering = F3( - function (stuff, hovering, x) { - return A2( - _elm_lang$core$Maybe$andThen, - function (p) { - return _elm_lang$core$Native_Utils.eq(p.x, x) ? _elm_lang$core$Maybe$Just(stuff) : _elm_lang$core$Maybe$Nothing; - }, - hovering); - }); -var _terezka$elm_plot$Plot$hintDot = F4( - function (view, hovering, x, y) { - return { - view: _elm_lang$core$Maybe$Just(view), - xLine: A3( - _terezka$elm_plot$Plot$onHovering, - _terezka$elm_plot$Plot$fullLine( - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$darkGrey), - _1: {ctor: '[]'} - }), - hovering, - x), - yLine: _elm_lang$core$Maybe$Nothing, - xTick: _elm_lang$core$Maybe$Nothing, - yTick: _elm_lang$core$Maybe$Nothing, - hint: A3( - _terezka$elm_plot$Plot$onHovering, - _terezka$elm_plot$Plot$normalHint(y), - hovering, - x), - x: x, - y: y - }; - }); -var _terezka$elm_plot$Plot$dot = F3( - function (view, x, y) { - return { - view: _elm_lang$core$Maybe$Just(view), - xLine: _elm_lang$core$Maybe$Nothing, - yLine: _elm_lang$core$Maybe$Nothing, - xTick: _elm_lang$core$Maybe$Nothing, - yTick: _elm_lang$core$Maybe$Nothing, - hint: _elm_lang$core$Maybe$Nothing, - x: x, - y: y - }; - }); -var _terezka$elm_plot$Plot$clear = _terezka$elm_plot$Plot$dot( - _elm_lang$svg$Svg$text('')); -var _terezka$elm_plot$Plot$triangle = _terezka$elm_plot$Plot$dot( - _terezka$elm_plot$Plot$viewTriangle(_terezka$elm_plot$Internal_Colors$pinkStroke)); -var _terezka$elm_plot$Plot$diamond = _terezka$elm_plot$Plot$dot( - A3(_terezka$elm_plot$Plot$viewDiamond, 10, 10, _terezka$elm_plot$Internal_Colors$pinkStroke)); -var _terezka$elm_plot$Plot$square = _terezka$elm_plot$Plot$dot( - A2(_terezka$elm_plot$Plot$viewSquare, 10, _terezka$elm_plot$Internal_Colors$pinkStroke)); -var _terezka$elm_plot$Plot$circle = _terezka$elm_plot$Plot$dot( - A2(_terezka$elm_plot$Plot$viewCircle, 5, _terezka$elm_plot$Internal_Colors$pinkStroke)); -var _terezka$elm_plot$Plot$PlotSummary = F2( - function (a, b) { - return {x: a, y: b}; - }); -var _terezka$elm_plot$Plot$AxisSummary = F8( - function (a, b, c, d, e, f, g, h) { - return {min: a, max: b, dataMin: c, dataMax: d, marginLower: e, marginUpper: f, length: g, all: h}; - }); -var _terezka$elm_plot$Plot$DataPoint = F8( - function (a, b, c, d, e, f, g, h) { - return {view: a, xLine: b, yLine: c, xTick: d, yTick: e, hint: f, x: g, y: h}; - }); -var _terezka$elm_plot$Plot$customDot = _terezka$elm_plot$Plot$DataPoint; -var _terezka$elm_plot$Plot$Series = F3( - function (a, b, c) { - return {axis: a, interpolation: b, toDataPoints: c}; - }); -var _terezka$elm_plot$Plot$customSeries = _terezka$elm_plot$Plot$Series; -var _terezka$elm_plot$Plot$Bars = F4( - function (a, b, c, d) { - return {axis: a, toGroups: b, styles: c, maxWidth: d}; - }); -var _terezka$elm_plot$Plot$customGroups = _terezka$elm_plot$Plot$Bars; -var _terezka$elm_plot$Plot$BarGroup = F4( - function (a, b, c, d) { - return {label: a, hint: b, verticalLine: c, bars: d}; - }); -var _terezka$elm_plot$Plot$customGroup = _terezka$elm_plot$Plot$BarGroup; -var _terezka$elm_plot$Plot$Bar = F2( - function (a, b) { - return {label: a, height: b}; - }); -var _terezka$elm_plot$Plot$group = F2( - function (label, heights) { - return { - label: _terezka$elm_plot$Plot$normalBarLabel(label), - verticalLine: _elm_lang$core$Basics$always(_elm_lang$core$Maybe$Nothing), - hint: _elm_lang$core$Basics$always(_elm_lang$core$Maybe$Nothing), - bars: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$Bar(_elm_lang$core$Maybe$Nothing), - heights) - }; - }); -var _terezka$elm_plot$Plot$hintGroup = F3( - function (hovering, label, heights) { - return { - label: _terezka$elm_plot$Plot$normalBarLabel(label), - verticalLine: A2( - _terezka$elm_plot$Plot$onHovering, - _terezka$elm_plot$Plot$fullLine( - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$darkGrey), - _1: {ctor: '[]'} - }), - hovering), - hint: function (g) { - return A3( - _terezka$elm_plot$Plot$onHovering, - A2( - _elm_lang$html$Html$div, - {ctor: '[]'}, - A2(_elm_lang$core$List$map, _terezka$elm_plot$Plot$normalHint, heights)), - hovering, - g); - }, - bars: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$Bar(_elm_lang$core$Maybe$Nothing), - heights) - }; - }); -var _terezka$elm_plot$Plot$histogramBar = function (height) { - return { - label: _terezka$elm_plot$Plot$simpleLabel, - verticalLine: _elm_lang$core$Basics$always(_elm_lang$core$Maybe$Nothing), - hint: _elm_lang$core$Basics$always(_elm_lang$core$Maybe$Nothing), - bars: { - ctor: '::', - _0: A2(_terezka$elm_plot$Plot$Bar, _elm_lang$core$Maybe$Nothing, height), - _1: {ctor: '[]'} - } - }; -}; -var _terezka$elm_plot$Plot$PlotCustomizations = function (a) { - return function (b) { - return function (c) { - return function (d) { - return function (e) { - return function (f) { - return function (g) { - return function (h) { - return function (i) { - return function (j) { - return function (k) { - return function (l) { - return function (m) { - return function (n) { - return function (o) { - return {attributes: a, id: b, width: c, height: d, defs: e, margin: f, onHover: g, hintContainer: h, horizontalAxis: i, grid: j, junk: k, toDomainLowest: l, toDomainHighest: m, toRangeLowest: n, toRangeHighest: o}; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; -}; -var _terezka$elm_plot$Plot$JunkCustomizations = F3( - function (a, b, c) { - return {x: a, y: b, view: c}; - }); -var _terezka$elm_plot$Plot$GridLineCustomizations = F2( - function (a, b) { - return {attributes: a, position: b}; - }); -var _terezka$elm_plot$Plot$AxisCustomizations = F5( - function (a, b, c, d, e) { - return {position: a, axisLine: b, ticks: c, labels: d, flipAnchor: e}; - }); -var _terezka$elm_plot$Plot$LineCustomizations = F3( - function (a, b, c) { - return {attributes: a, start: b, end: c}; - }); -var _terezka$elm_plot$Plot$TickCustomizations = F3( - function (a, b, c) { - return {attributes: a, length: b, position: c}; - }); -var _terezka$elm_plot$Plot$LabelCustomizations = F2( - function (a, b) { - return {view: a, position: b}; - }); -var _terezka$elm_plot$Plot$TempPlotSummary = F2( - function (a, b) { - return {x: a, y: b}; - }); -var _terezka$elm_plot$Plot$Monotone = F2( - function (a, b) { - return {ctor: 'Monotone', _0: a, _1: b}; - }); -var _terezka$elm_plot$Plot$Linear = F2( - function (a, b) { - return {ctor: 'Linear', _0: a, _1: b}; - }); -var _terezka$elm_plot$Plot$None = {ctor: 'None'}; -var _terezka$elm_plot$Plot$Fixed = function (a) { - return {ctor: 'Fixed', _0: a}; -}; -var _terezka$elm_plot$Plot$Percentage = function (a) { - return {ctor: 'Percentage', _0: a}; -}; -var _terezka$elm_plot$Plot$YeahGridsAreTotallyLame = {ctor: 'YeahGridsAreTotallyLame'}; -var _terezka$elm_plot$Plot$clearGrid = _terezka$elm_plot$Plot$YeahGridsAreTotallyLame; -var _terezka$elm_plot$Plot$Grid = function (a) { - return {ctor: 'Grid', _0: a}; -}; -var _terezka$elm_plot$Plot$customGrid = _terezka$elm_plot$Plot$Grid; -var _terezka$elm_plot$Plot$decentGrid = _terezka$elm_plot$Plot$customGrid( - function (summary) { - return A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$GridLineCustomizations( - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$grey), - _1: {ctor: '[]'} - }), - _terezka$elm_plot$Plot$decentPositions(summary)); - }); -var _terezka$elm_plot$Plot$SometimesYouDoNotHaveAnAxis = {ctor: 'SometimesYouDoNotHaveAnAxis'}; -var _terezka$elm_plot$Plot$sometimesYouDoNotHaveAnAxis = _terezka$elm_plot$Plot$SometimesYouDoNotHaveAnAxis; -var _terezka$elm_plot$Plot$Axis = function (a) { - return {ctor: 'Axis', _0: a}; -}; -var _terezka$elm_plot$Plot$customAxis = _terezka$elm_plot$Plot$Axis; -var _terezka$elm_plot$Plot$normalBarsAxis = _terezka$elm_plot$Plot$customAxis( - function (summary) { - return { - position: _terezka$elm_plot$Plot$closestToZero, - axisLine: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$simpleLine(summary)), - ticks: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleTick, - A3(_terezka$elm_plot$Plot$interval, 0, 1, summary)), - labels: {ctor: '[]'}, - flipAnchor: false - }; - }); -var _terezka$elm_plot$Plot$normalAxis = _terezka$elm_plot$Plot$customAxis( - function (summary) { - return { - position: _terezka$elm_plot$Plot$closestToZero, - axisLine: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$simpleLine(summary)), - ticks: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleTick, - A2( - _terezka$elm_plot$Plot$remove, - 0, - _terezka$elm_plot$Plot$decentPositions(summary))), - labels: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleLabel, - A2( - _terezka$elm_plot$Plot$remove, - 0, - _terezka$elm_plot$Plot$decentPositions(summary))), - flipAnchor: false - }; - }); -var _terezka$elm_plot$Plot$dots = function (toDataPoints) { - return {axis: _terezka$elm_plot$Plot$normalAxis, interpolation: _terezka$elm_plot$Plot$None, toDataPoints: toDataPoints}; -}; -var _terezka$elm_plot$Plot$line = function (toDataPoints) { - return { - axis: _terezka$elm_plot$Plot$normalAxis, - interpolation: A2( - _terezka$elm_plot$Plot$Linear, - _elm_lang$core$Maybe$Nothing, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$pinkStroke), - _1: {ctor: '[]'} - }), - toDataPoints: toDataPoints - }; -}; -var _terezka$elm_plot$Plot$area = function (toDataPoints) { - return { - axis: _terezka$elm_plot$Plot$normalAxis, - interpolation: A2( - _terezka$elm_plot$Plot$Linear, - _elm_lang$core$Maybe$Just(_terezka$elm_plot$Internal_Colors$pinkFill), - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$pinkStroke), - _1: {ctor: '[]'} - }), - toDataPoints: toDataPoints - }; -}; -var _terezka$elm_plot$Plot$groups = function (toGroups) { - return { - axis: _terezka$elm_plot$Plot$normalAxis, - toGroups: toGroups, - styles: { - ctor: '::', - _0: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(_terezka$elm_plot$Internal_Colors$pinkFill), - _1: {ctor: '[]'} - }, - _1: { - ctor: '::', - _0: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(_terezka$elm_plot$Internal_Colors$blueFill), - _1: {ctor: '[]'} - }, - _1: {ctor: '[]'} - } - }, - maxWidth: _terezka$elm_plot$Plot$Percentage(75) - }; -}; -var _terezka$elm_plot$Plot$histogram = function (toGroups) { - return { - axis: _terezka$elm_plot$Plot$normalAxis, - toGroups: toGroups, - styles: { - ctor: '::', - _0: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(_terezka$elm_plot$Internal_Colors$pinkFill), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_terezka$elm_plot$Internal_Colors$pinkStroke), - _1: {ctor: '[]'} - } - }, - _1: {ctor: '[]'} - }, - maxWidth: _terezka$elm_plot$Plot$Percentage(100) - }; -}; -var _terezka$elm_plot$Plot$defaultSeriesPlotCustomizations = { - attributes: {ctor: '[]'}, - defs: {ctor: '[]'}, - id: 'elm-plot', - width: 647, - height: 440, - margin: {top: 20, right: 40, bottom: 20, left: 40}, - onHover: _elm_lang$core$Maybe$Nothing, - hintContainer: _terezka$elm_plot$Plot$normalHintContainer, - horizontalAxis: _terezka$elm_plot$Plot$normalAxis, - grid: {horizontal: _terezka$elm_plot$Plot$clearGrid, vertical: _terezka$elm_plot$Plot$clearGrid}, - junk: _elm_lang$core$Basics$always( - {ctor: '[]'}), - toDomainLowest: _elm_lang$core$Basics$identity, - toDomainHighest: _elm_lang$core$Basics$identity, - toRangeLowest: _elm_lang$core$Basics$identity, - toRangeHighest: _elm_lang$core$Basics$identity -}; -var _terezka$elm_plot$Plot$defaultBarsPlotCustomizations = _elm_lang$core$Native_Utils.update( - _terezka$elm_plot$Plot$defaultSeriesPlotCustomizations, - { - horizontalAxis: _terezka$elm_plot$Plot$normalBarsAxis, - margin: {top: 20, right: 40, bottom: 40, left: 40} - }); -var _terezka$elm_plot$Plot$viewBars = _terezka$elm_plot$Plot$viewBarsCustom(_terezka$elm_plot$Plot$defaultBarsPlotCustomizations); -var _terezka$elm_plot$Plot$viewSeries = _terezka$elm_plot$Plot$viewSeriesCustom(_terezka$elm_plot$Plot$defaultSeriesPlotCustomizations); -var _terezka$elm_plot$Plot$clearAxis = _terezka$elm_plot$Plot$customAxis( - function (summary) { - return { - position: _terezka$elm_plot$Plot$closestToZero, - axisLine: _elm_lang$core$Maybe$Nothing, - ticks: {ctor: '[]'}, - labels: {ctor: '[]'}, - flipAnchor: false - }; - }); -var _terezka$elm_plot$Plot$axisAtMin = _terezka$elm_plot$Plot$customAxis( - function (summary) { - return { - position: _elm_lang$core$Basics$min, - axisLine: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$simpleLine(summary)), - ticks: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleTick, - _terezka$elm_plot$Plot$decentPositions(summary)), - labels: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleLabel, - _terezka$elm_plot$Plot$decentPositions(summary)), - flipAnchor: false - }; - }); -var _terezka$elm_plot$Plot$axisAtMax = _terezka$elm_plot$Plot$customAxis( - function (summary) { - return { - position: _elm_lang$core$Basics$max, - axisLine: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$simpleLine(summary)), - ticks: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleTick, - _terezka$elm_plot$Plot$decentPositions(summary)), - labels: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleLabel, - _terezka$elm_plot$Plot$decentPositions(summary)), - flipAnchor: true - }; - }); - -var _seatgeek$wrecker_ui$Graph$hintLabel = F2( - function (hinted, toValue) { - return A2( - _elm_lang$core$Maybe$withDefault, - {ctor: '[]'}, - A2( - _elm_lang$core$Maybe$map, - function (_p0) { - return _elm_lang$core$List$singleton( - _terezka$elm_plot$Plot$simpleLabel( - toValue(_p0))); - }, - hinted)); - }); -var _seatgeek$wrecker_ui$Graph$hintedAxisAtMin = function (hinted) { - return _terezka$elm_plot$Plot$customAxis( - function (summary) { - return { - position: _elm_lang$core$Basics$min, - axisLine: _elm_lang$core$Maybe$Nothing, - ticks: A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleTick, - _terezka$elm_plot$Plot$decentPositions(summary)), - labels: function () { - var _p1 = hinted; - if (_p1.ctor === 'Nothing') { - return A2( - _elm_lang$core$Basics_ops['++'], - A2( - _elm_lang$core$List$map, - _terezka$elm_plot$Plot$simpleLabel, - _terezka$elm_plot$Plot$decentPositions(summary)), - { - ctor: '::', - _0: _terezka$elm_plot$Plot$simpleLabel( - A2(_myrho$elm_round$Round$roundNum, 3, summary.dataMax)), - _1: {ctor: '[]'} - }); - } else { - return A2( - _seatgeek$wrecker_ui$Graph$hintLabel, - hinted, - function (_p2) { - return A2( - _myrho$elm_round$Round$roundNum, - 3, - function (_) { - return _.y; - }(_p2)); - }); - } - }(), - flipAnchor: false - }; - }); -}; -var _seatgeek$wrecker_ui$Graph$rangeFrameAxis = F2( - function (hinted, toValue) { - return _terezka$elm_plot$Plot$customAxis( - function (summary) { - return { - position: _terezka$elm_plot$Plot$closestToZero, - axisLine: _elm_lang$core$Maybe$Nothing, - ticks: A2( - _elm_lang$core$List$map, - function (_p3) { - return _terezka$elm_plot$Plot$simpleTick( - A2(_myrho$elm_round$Round$roundNum, 3, _p3)); - }, - { - ctor: '::', - _0: summary.dataMin, - _1: { - ctor: '::', - _0: summary.dataMax, - _1: {ctor: '[]'} - } - }), - labels: function () { - var _p4 = hinted; - if (_p4.ctor === 'Nothing') { - return A2( - _elm_lang$core$List$map, - function (_p5) { - return _terezka$elm_plot$Plot$simpleLabel( - A2(_myrho$elm_round$Round$roundNum, 3, _p5)); - }, - { - ctor: '::', - _0: summary.dataMin, - _1: { - ctor: '::', - _0: summary.dataMax, - _1: {ctor: '[]'} - } - }); - } else { - return A2(_seatgeek$wrecker_ui$Graph$hintLabel, hinted, toValue); - } - }(), - flipAnchor: false - }; - }); - }); -var _seatgeek$wrecker_ui$Graph$flashyLine = F3( - function (x, y, hinted) { - return (_elm_lang$core$Native_Utils.eq(hinted.x, x) && _elm_lang$core$Native_Utils.eq(hinted.y, y)) ? _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$fullLine( - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke('#a3a3a3'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$strokeDasharray('2, 10'), - _1: {ctor: '[]'} - } - })) : _elm_lang$core$Maybe$Nothing; - }); -var _seatgeek$wrecker_ui$Graph$filterGroups = F2( - function (filters, data) { - var filterIds = A2( - _elm_lang$core$List$map, - function (_) { - return _.id; - }, - filters); - var _p6 = filters; - if (_p6.ctor === '[]') { - return data; - } else { - return A2( - _elm_lang$core$List$filter, - function (_p7) { - var _p8 = _p7; - return A2(_elm_lang$core$List$member, _p8._1.run.runGroupId, filterIds); - }, - data); - } - }); -var _seatgeek$wrecker_ui$Graph$blueStroke = '#cfd8ea'; -var _seatgeek$wrecker_ui$Graph$yTitle = function (txt) { - return A2( - _terezka$elm_plot$Plot$viewLabel, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(_seatgeek$wrecker_ui$Graph$blueStroke), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$transform('translate(-30, 0)'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$style('text-anchor: end; font-style: italic; font-size:10px'), - _1: {ctor: '[]'} - } - } - }, - txt); -}; -var _seatgeek$wrecker_ui$Graph$xTitle = function (txt) { - return A2( - _terezka$elm_plot$Plot$viewLabel, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(_seatgeek$wrecker_ui$Graph$blueStroke), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$transform('translate(-30, 20)'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$style('text-anchor: end; font-style: italic; font-size:10px'), - _1: {ctor: '[]'} - } - } - }, - txt); -}; -var _seatgeek$wrecker_ui$Graph$legend = F3( - function (xLegend, yLegend, summary) { - var verticalCenter = summary.y.dataMax / 2; - return { - ctor: '::', - _0: A3( - _terezka$elm_plot$Plot$junk, - _seatgeek$wrecker_ui$Graph$yTitle(yLegend), - summary.x.min, - verticalCenter), - _1: { - ctor: '::', - _0: A3( - _terezka$elm_plot$Plot$junk, - _seatgeek$wrecker_ui$Graph$xTitle(xLegend), - summary.x.max, - summary.y.min), - _1: {ctor: '[]'} - } - }; - }); -var _seatgeek$wrecker_ui$Graph$basicSeries = F3( - function (hovered, xLegend, yLegend) { - return _terezka$elm_plot$Plot$viewSeriesCustom( - _elm_lang$core$Native_Utils.update( - _terezka$elm_plot$Plot$defaultSeriesPlotCustomizations, - { - horizontalAxis: A2( - _seatgeek$wrecker_ui$Graph$rangeFrameAxis, - hovered, - function (_p9) { - return A2( - _myrho$elm_round$Round$roundNum, - 3, - function (_) { - return _.x; - }(_p9)); - }), - margin: {top: 20, bottom: 20, left: 150, right: 40}, - junk: A2(_seatgeek$wrecker_ui$Graph$legend, xLegend, yLegend) - })); - }); -var _seatgeek$wrecker_ui$Graph$assembleRunData = F2( - function (pages, runs) { - var _p10 = pages; - if (_p10.ctor === 'Nothing') { - return runs; - } else { - return A2( - _elm_lang$core$List$filterMap, - function (_p11) { - var _p12 = _p11; - var _p14 = _p12._1; - var _p13 = A2(_elm_lang$core$Dict$get, _p14.run.id, _p10._0); - if (_p13.ctor === 'Nothing') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Maybe$Just( - { - ctor: '_Tuple2', - _0: _p12._0, - _1: _elm_lang$core$Native_Utils.update( - _p14, - {stats: _p13._0.stats}) - }); - } - }, - runs); - } - }); -var _seatgeek$wrecker_ui$Graph$allColors = { - ctor: '::', - _0: '#ff9edf', - _1: { - ctor: '::', - _0: '#cfd8ea', - _1: { - ctor: '::', - _0: '#77DD77', - _1: { - ctor: '::', - _0: '#AEC6CF', - _1: { - ctor: '::', - _0: '#CB99C9', - _1: { - ctor: '::', - _0: '#B39EB5', - _1: { - ctor: '::', - _0: '#FFB347', - _1: { - ctor: '::', - _0: '#FF6961', - _1: { - ctor: '::', - _0: '#836953', - _1: { - ctor: '::', - _0: '#779ECB', - _1: { - ctor: '::', - _0: '#FDFD96', - _1: { - ctor: '::', - _0: '#F49AC2', - _1: { - ctor: '::', - _0: '#CFCFC4', - _1: { - ctor: '::', - _0: '#B19CD9', - _1: { - ctor: '::', - _0: '#03C03C', - _1: { - ctor: '::', - _0: '#a0344e', - _1: { - ctor: '::', - _0: '#d7909b', - _1: { - ctor: '::', - _0: '#ddd4d3', - _1: { - ctor: '::', - _0: '#c8d7ca', - _1: { - ctor: '::', - _0: '#8cac90', - _1: { - ctor: '::', - _0: '#492212', - _1: { - ctor: '::', - _0: '#b06e40', - _1: { - ctor: '::', - _0: '#d4a06e', - _1: { - ctor: '::', - _0: '#e8ceb5', - _1: { - ctor: '::', - _0: '#363634', - _1: { - ctor: '::', - _0: '#524636', - _1: { - ctor: '::', - _0: '#ac7330', - _1: { - ctor: '::', - _0: '#b19a78', - _1: { - ctor: '::', - _0: '#d1c5ab', - _1: { - ctor: '::', - _0: '#617373', - _1: {ctor: '[]'} - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } - } -}; -var _seatgeek$wrecker_ui$Graph$assignGroupColors = function (groups) { - var toDate = function (_p15) { - return _elm_lang$core$Date$toTime( - function (_) { - return _.created; - }(_p15)); - }; - var inverseSort = F2( - function (a, b) { - var _p16 = A2( - _elm_lang$core$Basics$compare, - toDate(a), - toDate(b)); - switch (_p16.ctor) { - case 'LT': - return _elm_lang$core$Basics$GT; - case 'EQ': - return _elm_lang$core$Basics$EQ; - default: - return _elm_lang$core$Basics$LT; - } - }); - return A2( - _elm_community$list_extra$List_Extra$zip, - _seatgeek$wrecker_ui$Graph$allColors, - A2( - _elm_lang$core$List$take, - 30, - A2(_elm_lang$core$List$sortWith, inverseSort, groups))); -}; -var _seatgeek$wrecker_ui$Graph$assignColors = F2( - function (groups, runs) { - var colorsDict = _elm_lang$core$Dict$fromList( - A2( - _elm_lang$core$List$map, - function (_p17) { - var _p18 = _p17; - return {ctor: '_Tuple2', _0: _p18._1.id, _1: _p18._0}; - }, - _seatgeek$wrecker_ui$Graph$assignGroupColors(groups))); - var doAssign = function (run) { - var _p19 = A2(_elm_lang$core$Dict$get, run.run.runGroupId, colorsDict); - if (_p19.ctor === 'Nothing') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Maybe$Just( - {ctor: '_Tuple2', _0: _p19._0, _1: run}); - } - }; - return A2(_elm_lang$core$List$filterMap, doAssign, runs); - }); -var _seatgeek$wrecker_ui$Graph$update = F2( - function (_p20, model) { - var _p21 = _p20; - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Native_Utils.update( - model, - {hovered: _p21._0}), - _1: _elm_lang$core$Platform_Cmd$none - }; - }); -var _seatgeek$wrecker_ui$Graph$Model = function (a) { - return {hovered: a}; -}; -var _seatgeek$wrecker_ui$Graph$defaultModel = _seatgeek$wrecker_ui$Graph$Model(_elm_lang$core$Maybe$Nothing); -var _seatgeek$wrecker_ui$Graph$Timeline = F2( - function (a, b) { - return {ctor: 'Timeline', _0: a, _1: b}; - }); -var _seatgeek$wrecker_ui$Graph$Scatter = F4( - function (a, b, c, d) { - return {ctor: 'Scatter', _0: a, _1: b, _2: c, _3: d}; - }); -var _seatgeek$wrecker_ui$Graph$validGraphs = function () { - var totalScatter = A3( - _seatgeek$wrecker_ui$Graph$Scatter, - 'Concurrency', - 'Total', - function (_p22) { - return _elm_lang$core$Basics$toFloat( - function (_) { - return _.concurrency; - }( - function (_) { - return _.run; - }(_p22))); - }); - var baseScatter = A3( - _seatgeek$wrecker_ui$Graph$Scatter, - 'Concurrency', - 'Resp. Time (s)', - function (_p23) { - return _elm_lang$core$Basics$toFloat( - function (_) { - return _.concurrency; - }( - function (_) { - return _.run; - }(_p23))); - }); - return { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Mean Time / Concurrency', - _1: baseScatter( - function (_p24) { - return function (_) { - return _.meanTime; - }( - function (_) { - return _.stats; - }(_p24)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Percentile 95 / Concurrency', - _1: baseScatter( - function (_p25) { - return function (_) { - return _.quantile95; - }( - function (_) { - return _.stats; - }(_p25)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Total Requests / Concurrency', - _1: totalScatter( - function (_p26) { - return _elm_lang$core$Basics$toFloat( - function (_) { - return _.hits; - }( - function (_) { - return _.stats; - }(_p26))); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Failed Requests / Concurrency', - _1: totalScatter( - function (_p27) { - return _elm_lang$core$Basics$toFloat( - function (s) { - return s.serverErrorHits + s.failedHits; - }( - function (_) { - return _.stats; - }(_p27))); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: '2xx Requests / Concurrency', - _1: totalScatter( - function (_p28) { - return _elm_lang$core$Basics$toFloat( - function (_) { - return _.successHits; - }( - function (_) { - return _.stats; - }(_p28))); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: '4xx Requests / Concurrency', - _1: totalScatter( - function (_p29) { - return _elm_lang$core$Basics$toFloat( - function (_) { - return _.userErrorHits; - }( - function (_) { - return _.stats; - }(_p29))); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Requests per second / Concurrency', - _1: totalScatter( - function (s) { - return _elm_lang$core$Basics$toFloat(s.stats.hits) / s.stats.totalTime; - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Fastest Time / Concurrency', - _1: baseScatter( - function (_p30) { - return function (_) { - return _.minTime; - }( - function (_) { - return _.stats; - }(_p30)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Slowest Time / Concurrency', - _1: baseScatter( - function (_p31) { - return function (_) { - return _.maxTime; - }( - function (_) { - return _.stats; - }(_p31)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Aggregated Time / Concurrency', - _1: baseScatter( - function (_p32) { - return function (_) { - return _.totalTime; - }( - function (_) { - return _.stats; - }(_p32)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Variance / Concurrency', - _1: baseScatter( - function (_p33) { - return function (_) { - return _.variance; - }( - function (_) { - return _.stats; - }(_p33)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Mean Time Comparison', - _1: A2( - _seatgeek$wrecker_ui$Graph$Timeline, - 'Resp. Time (s)', - function (_p34) { - return function (_) { - return _.meanTime; - }( - function (_) { - return _.stats; - }(_p34)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Percentile 95 Comparison', - _1: A2( - _seatgeek$wrecker_ui$Graph$Timeline, - 'Resp. Time (s)', - function (_p35) { - return function (_) { - return _.quantile95; - }( - function (_) { - return _.stats; - }(_p35)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Slowest Time Comparison', - _1: A2( - _seatgeek$wrecker_ui$Graph$Timeline, - 'Resp. Time (s)', - function (_p36) { - return function (_) { - return _.maxTime; - }( - function (_) { - return _.stats; - }(_p36)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Variance Comparison', - _1: A2( - _seatgeek$wrecker_ui$Graph$Timeline, - 'Resp. Time (s)', - function (_p37) { - return function (_) { - return _.variance; - }( - function (_) { - return _.stats; - }(_p37)); - }) - }, - _1: {ctor: '[]'} - } - } - } - } - } - } - } - } - } - } - } - } - } - } - }; -}(); -var _seatgeek$wrecker_ui$Graph$chooseGraphType = F2( - function (name, runs) { - var appropriateConcurrency = function (runs) { - return _elm_lang$core$List$maximum( - A2( - _elm_lang$core$List$map, - function (_p38) { - return function (_) { - return _.concurrency; - }( - function (_) { - return _.run; - }(_p38)); - }, - runs)); - }; - var graphType = _elm_lang$core$List$head( - A2( - _elm_lang$core$List$filter, - function (_p39) { - var _p40 = _p39; - return _elm_lang$core$Native_Utils.eq(_p40._0, name); - }, - _seatgeek$wrecker_ui$Graph$validGraphs)); - var _p41 = graphType; - if (_p41.ctor === 'Nothing') { - return {ctor: '_Tuple2', _0: _elm_lang$core$Maybe$Nothing, _1: _elm_lang$core$Maybe$Nothing}; - } else { - if (_p41._0._1.ctor === 'Timeline') { - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(_p41._0._0), - _1: appropriateConcurrency(runs) - }; - } else { - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(_p41._0._0), - _1: _elm_lang$core$Maybe$Nothing - }; - } - } - }); -var _seatgeek$wrecker_ui$Graph$graphDefinition = function (title) { - return _elm_lang$core$List$head( - A2( - _elm_lang$core$List$map, - _elm_lang$core$Tuple$second, - A2( - _elm_lang$core$List$filter, - function (_p42) { - var _p43 = _p42; - return _elm_lang$core$Native_Utils.eq(title, _p43._0); - }, - _seatgeek$wrecker_ui$Graph$validGraphs))); -}; -var _seatgeek$wrecker_ui$Graph$Hover = function (a) { - return {ctor: 'Hover', _0: a}; -}; -var _seatgeek$wrecker_ui$Graph$circle = F3( - function (color, x, y) { - return A2( - _elm_lang$svg$Svg$circle, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$r('3'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke('transparent'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$strokeWidth('3px'), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$fill(color), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Events$onMouseOver( - _seatgeek$wrecker_ui$Graph$Hover( - _elm_lang$core$Maybe$Just( - {x: x, y: y}))), - _1: { - ctor: '::', - _0: _elm_lang$svg$Svg_Events$onMouseOut( - _seatgeek$wrecker_ui$Graph$Hover(_elm_lang$core$Maybe$Nothing)), - _1: {ctor: '[]'} - } - } - } - } - } - }, - {ctor: '[]'}); - }); -var _seatgeek$wrecker_ui$Graph$rangeFrameHintDot = F4( - function (xGetter, yGetter, hinted, _p44) { - var _p45 = _p44; - var _p46 = _p45._1; - var y = yGetter(_p46); - var x = xGetter(_p46); - return { - view: _elm_lang$core$Maybe$Just( - A3(_seatgeek$wrecker_ui$Graph$circle, _p45._0, x, y)), - xLine: A2( - _elm_lang$core$Maybe$andThen, - A2(_seatgeek$wrecker_ui$Graph$flashyLine, x, y), - hinted), - yLine: A2( - _elm_lang$core$Maybe$andThen, - A2(_seatgeek$wrecker_ui$Graph$flashyLine, x, y), - hinted), - xTick: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$simpleTick(x)), - yTick: _elm_lang$core$Maybe$Just( - _terezka$elm_plot$Plot$simpleTick(y)), - hint: _elm_lang$core$Maybe$Nothing, - x: x, - y: y - }; - }); -var _seatgeek$wrecker_ui$Graph$scatterPlot = F3( - function (xGetter, yGetter, hinting) { - return { - axis: A2( - _seatgeek$wrecker_ui$Graph$rangeFrameAxis, - hinting, - function (_p47) { - return A2( - _myrho$elm_round$Round$roundNum, - 3, - function (_) { - return _.y; - }(_p47)); - }), - interpolation: _terezka$elm_plot$Plot$None, - toDataPoints: function (_p48) { - return A2( - _elm_lang$core$List$map, - A3(_seatgeek$wrecker_ui$Graph$rangeFrameHintDot, xGetter, yGetter, hinting), - A2( - _elm_lang$core$List$sortBy, - function (_p49) { - return _elm_lang$core$Date$toTime( - function (_) { - return _.created; - }( - function (_) { - return _.run; - }( - _elm_lang$core$Tuple$second(_p49)))); - }, - _p48)); - } - }; - }); -var _seatgeek$wrecker_ui$Graph$linePlot = F3( - function (xGetter, yGetter, hinting) { - return { - axis: _seatgeek$wrecker_ui$Graph$hintedAxisAtMin(hinting), - interpolation: A2( - _terezka$elm_plot$Plot$Monotone, - _elm_lang$core$Maybe$Nothing, - { - ctor: '::', - _0: _elm_lang$svg$Svg_Attributes$stroke(_seatgeek$wrecker_ui$Graph$blueStroke), - _1: {ctor: '[]'} - }), - toDataPoints: _elm_lang$core$List$map( - A3(_seatgeek$wrecker_ui$Graph$rangeFrameHintDot, xGetter, yGetter, hinting)) - }; - }); -var _seatgeek$wrecker_ui$Graph$plotRuns = F7( - function (_p50, graph, allGroups, runs, filteredGroups, concurrencyComparison, pageStats) { - var _p51 = _p50; - var _p55 = _p51.hovered; - var selectRunData = function (graphData) { - return A2(_seatgeek$wrecker_ui$Graph$assembleRunData, pageStats, graphData); - }; - var _p52 = _seatgeek$wrecker_ui$Graph$graphDefinition(graph); - if (_p52.ctor === 'Just') { - if (_p52._0.ctor === 'Scatter') { - return A5( - _seatgeek$wrecker_ui$Graph$basicSeries, - _p55, - _p52._0._0, - _p52._0._1, - { - ctor: '::', - _0: A3(_seatgeek$wrecker_ui$Graph$scatterPlot, _p52._0._2, _p52._0._3, _p55), - _1: {ctor: '[]'} - }, - A2( - _seatgeek$wrecker_ui$Graph$filterGroups, - filteredGroups, - selectRunData( - A2(_seatgeek$wrecker_ui$Graph$assignColors, allGroups, runs)))); - } else { - var level = A2(_elm_lang$core$Maybe$withDefault, 0, concurrencyComparison); - var runData = A2( - _elm_lang$core$List$filter, - function (r) { - return _elm_lang$core$Native_Utils.eq(r.run.concurrency, level); - }, - runs); - var dates = _elm_lang$core$Dict$fromList( - A2( - _elm_lang$core$List$indexedMap, - F2( - function (index, date) { - return { - ctor: '_Tuple2', - _0: date, - _1: _elm_lang$core$Basics$toFloat(index) - }; - }), - _elm_lang$core$List$sort( - _elm_community$list_extra$List_Extra$unique( - A2( - _elm_lang$core$List$map, - function (_p53) { - return _elm_lang$core$Date$toTime( - function (_) { - return _.created; - }( - function (_) { - return _.run; - }(_p53))); - }, - runData))))); - var dateGetter = function (d) { - return A2( - _elm_lang$core$Maybe$withDefault, - 0, - A2( - _elm_lang$core$Dict$get, - _elm_lang$core$Date$toTime(d.run.created), - dates)); - }; - return A5( - _seatgeek$wrecker_ui$Graph$basicSeries, - _p55, - '', - _p52._0._0, - { - ctor: '::', - _0: A3(_seatgeek$wrecker_ui$Graph$linePlot, dateGetter, _p52._0._1, _p55), - _1: {ctor: '[]'} - }, - selectRunData( - A2(_seatgeek$wrecker_ui$Graph$assignColors, allGroups, runData))); - } - } else { - return _elm_lang$core$Native_Utils.crashCase( - 'Graph', - { - start: {line: 294, column: 9}, - end: {line: 331, column: 67} - }, - _p52)( - A2(_elm_lang$core$Basics_ops['++'], 'got invalid graph title: ', graph)); - } - }); - -var _seatgeek$wrecker_ui$Router$toQueryString = function (params) { - return function (s) { - return _elm_lang$core$Native_Utils.eq(s, '?') ? '' : s; - }( - A3( - _elm_lang$core$List$foldl, - F2( - function (q, acc) { - return A2( - _elm_lang$core$Basics_ops['++'], - acc, - A2(_elm_lang$core$Basics_ops['++'], q, '&')); - }), - '?', - A2( - _elm_lang$core$List$filterMap, - function (_p0) { - var _p1 = _p0; - return A2( - _elm_lang$core$Maybe$map, - function (v) { - return A2( - _elm_lang$core$Basics_ops['++'], - _p1._0, - A2( - _elm_lang$core$Basics_ops['++'], - '=', - _elm_lang$http$Http$encodeUri(v))); - }, - _p1._1); - }, - params))); -}; -var _seatgeek$wrecker_ui$Router$routeToString = function (page) { - var _p2 = function () { - var _p3 = page; - switch (_p3.ctor) { - case 'Home': - return { - ctor: '_Tuple2', - _0: {ctor: '[]'}, - _1: {ctor: '[]'} - }; - case 'ScheduleTest': - return { - ctor: '_Tuple2', - _0: { - ctor: '::', - _0: 'schedule', - _1: {ctor: '[]'} - }, - _1: {ctor: '[]'} - }; - case 'SimplePlot': - return { - ctor: '_Tuple2', - _0: { - ctor: '::', - _0: 'plot', - _1: { - ctor: '::', - _0: _elm_lang$core$Basics$toString(_p3._0), - _1: {ctor: '[]'} - } - }, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'test', _1: _p3._1}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'page', _1: _p3._2}, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'groupSet', - _1: A2(_elm_lang$core$Maybe$map, _elm_community$string_extra$String_Extra$fromInt, _p3._3) - }, - _1: {ctor: '[]'} - } - } - } - }; - default: - return { - ctor: '_Tuple2', - _0: { - ctor: '::', - _0: 'plot', - _1: { - ctor: '::', - _0: _elm_lang$core$Basics$toString(_p3._0), - _1: { - ctor: '::', - _0: _elm_lang$core$Basics$toString(_p3._1), - _1: {ctor: '[]'} - } - } - }, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'test', _1: _p3._2}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'page', _1: _p3._3}, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'groupSet', - _1: A2(_elm_lang$core$Maybe$map, _elm_community$string_extra$String_Extra$fromInt, _p3._4) - }, - _1: {ctor: '[]'} - } - } - } - }; - } - }(); - var path = _p2._0; - var query = _p2._1; - return A2( - _elm_lang$core$Basics_ops['++'], - _seatgeek$wrecker_ui$Router$toQueryString(query), - A2( - _elm_lang$core$Basics_ops['++'], - '#/', - A2(_elm_lang$core$String$join, '/', path))); -}; -var _seatgeek$wrecker_ui$Router$modifyUrl = function (_p4) { - return _elm_lang$navigation$Navigation$newUrlWithoutNotify( - _seatgeek$wrecker_ui$Router$routeToString(_p4)); -}; -var _seatgeek$wrecker_ui$Router$ComparisonPlot = F5( - function (a, b, c, d, e) { - return {ctor: 'ComparisonPlot', _0: a, _1: b, _2: c, _3: d, _4: e}; - }); -var _seatgeek$wrecker_ui$Router$SimplePlot = F4( - function (a, b, c, d) { - return {ctor: 'SimplePlot', _0: a, _1: b, _2: c, _3: d}; - }); -var _seatgeek$wrecker_ui$Router$ScheduleTest = {ctor: 'ScheduleTest'}; -var _seatgeek$wrecker_ui$Router$Home = {ctor: 'Home'}; -var _seatgeek$wrecker_ui$Router$route = _evancz$url_parser$UrlParser$oneOf( - { - ctor: '::', - _0: A2( - _evancz$url_parser$UrlParser$map, - _seatgeek$wrecker_ui$Router$Home, - _evancz$url_parser$UrlParser$s('')), - _1: { - ctor: '::', - _0: A2( - _evancz$url_parser$UrlParser$map, - _seatgeek$wrecker_ui$Router$ScheduleTest, - _evancz$url_parser$UrlParser$s('schedule')), - _1: { - ctor: '::', - _0: A2( - _evancz$url_parser$UrlParser$map, - _seatgeek$wrecker_ui$Router$SimplePlot, - A2( - _evancz$url_parser$UrlParser_ops[''], - _evancz$url_parser$UrlParser$s('plot'), - A2( - _evancz$url_parser$UrlParser_ops[''], - A2( - _evancz$url_parser$UrlParser_ops[''], - A2( - _evancz$url_parser$UrlParser_ops[''], - _evancz$url_parser$UrlParser$int, - _evancz$url_parser$UrlParser$stringParam('test')), - _evancz$url_parser$UrlParser$stringParam('page')), - _evancz$url_parser$UrlParser$intParam('groupSet')))), - _1: { - ctor: '::', - _0: A2( - _evancz$url_parser$UrlParser$map, - _seatgeek$wrecker_ui$Router$ComparisonPlot, - A2( - _evancz$url_parser$UrlParser_ops[''], - _evancz$url_parser$UrlParser$s('comparison'), - A2( - _evancz$url_parser$UrlParser_ops[''], - _evancz$url_parser$UrlParser$int, - A2( - _evancz$url_parser$UrlParser_ops[''], - A2( - _evancz$url_parser$UrlParser_ops[''], - A2( - _evancz$url_parser$UrlParser_ops[''], - _evancz$url_parser$UrlParser$int, - _evancz$url_parser$UrlParser$stringParam('test')), - _evancz$url_parser$UrlParser$stringParam('page')), - _evancz$url_parser$UrlParser$intParam('groupSet'))))), - _1: {ctor: '[]'} - } - } - } - }); -var _seatgeek$wrecker_ui$Router$fromLocation = function (location) { - return _elm_lang$core$String$isEmpty(location.hash) ? _elm_lang$core$Maybe$Just(_seatgeek$wrecker_ui$Router$Home) : A2(_evancz$url_parser$UrlParser$parseHash, _seatgeek$wrecker_ui$Router$route, location); -}; - -var _seatgeek$wrecker_ui$Util$onChangeInt = function (msg) { - var action = A2( - _elm_lang$core$Json_Decode$map, - msg, - A2( - _elm_lang$core$Json_Decode$andThen, - function (txt) { - var _p0 = _elm_lang$core$String$toInt(txt); - if (_p0.ctor === 'Ok') { - return _elm_lang$core$Json_Decode$succeed(_p0._0); - } else { - return _elm_lang$core$Json_Decode$fail(_p0._0); - } - }, - A2( - _elm_lang$core$Json_Decode$at, - { - ctor: '::', - _0: 'target', - _1: { - ctor: '::', - _0: 'value', - _1: {ctor: '[]'} - } - }, - _elm_lang$core$Json_Decode$string))); - return A2(_elm_lang$html$Html_Events$on, 'change', action); -}; -var _seatgeek$wrecker_ui$Util$onChange = function (msg) { - var action = A2( - _elm_lang$core$Json_Decode$map, - msg, - A2( - _elm_lang$core$Json_Decode$at, - { - ctor: '::', - _0: 'target', - _1: { - ctor: '::', - _0: 'value', - _1: {ctor: '[]'} - } - }, - _elm_lang$core$Json_Decode$string)); - return A2(_elm_lang$html$Html_Events$on, 'change', action); -}; -var _seatgeek$wrecker_ui$Util$onEnter = function (msg) { - var isEnter = function (code) { - return _elm_lang$core$Native_Utils.eq(code, 13) ? _elm_lang$core$Json_Decode$succeed(msg) : _elm_lang$core$Json_Decode$fail('not ENTER'); - }; - return A2( - _elm_lang$html$Html_Events$on, - 'keydown', - A2(_elm_lang$core$Json_Decode$andThen, isEnter, _elm_lang$html$Html_Events$keyCode)); -}; -var _seatgeek$wrecker_ui$Util$natSort = F2( - function (a, b) { - var _p1 = { - ctor: '_Tuple2', - _0: _elm_lang$core$String$toInt( - A2(_elm_community$string_extra$String_Extra$leftOf, ' -', a)), - _1: _elm_lang$core$String$toInt( - A2(_elm_community$string_extra$String_Extra$leftOf, ' -', b)) - }; - if (((_p1.ctor === '_Tuple2') && (_p1._0.ctor === 'Ok')) && (_p1._1.ctor === 'Ok')) { - return A2(_elm_lang$core$Basics$compare, _p1._0._0, _p1._1._0); - } else { - return A2(_elm_lang$core$Basics$compare, a, b); - } - }); -var _seatgeek$wrecker_ui$Util$return = _Fresheyeball$elm_return$Return$singleton; - -var _seatgeek$wrecker_ui$ServerState$getGroupSets = A2( - _elm_lang$http$Http$get, - '/group-sets', - A2( - _elm_lang$core$Json_Decode$at, - { - ctor: '::', - _0: 'groupSets', - _1: {ctor: '[]'} - }, - _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodeGroupSet))); -var _seatgeek$wrecker_ui$ServerState$update = F2( - function (msg, model) { - var _p0 = msg; - if (_p0.ctor === 'LoadTestSchedule') { - if (_p0._0.ctor === 'Err') { - return { - ctor: '_Tuple2', - _0: A2( - _elm_lang$core$Debug$log, - _elm_lang$core$Basics$toString(_p0._0._0), - model), - _1: _elm_lang$core$Platform_Cmd$none - }; - } else { - return _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - {testList: _p0._0._0})); - } - } else { - if (_p0._0.ctor === 'Err') { - return { - ctor: '_Tuple2', - _0: A2( - _elm_lang$core$Debug$log, - _elm_lang$core$Basics$toString(_p0._0._0), - model), - _1: _elm_lang$core$Platform_Cmd$none - }; - } else { - return _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - { - groupSets: A2( - _elm_lang$core$List$sortBy, - function (_p1) { - return _elm_lang$core$Date$toTime( - function (_) { - return _.created; - }(_p1)); - }, - _p0._0._0) - })); - } - } - }); -var _seatgeek$wrecker_ui$ServerState$State = F2( - function (a, b) { - return {testList: a, groupSets: b}; - }); -var _seatgeek$wrecker_ui$ServerState$NotYet = {ctor: 'NotYet'}; -var _seatgeek$wrecker_ui$ServerState$Scheduled = {ctor: 'Scheduled'}; -var _seatgeek$wrecker_ui$ServerState$Done = {ctor: 'Done'}; -var _seatgeek$wrecker_ui$ServerState$Running = {ctor: 'Running'}; -var _seatgeek$wrecker_ui$ServerState$decodeRunStatus = A2( - _elm_lang$core$Json_Decode$andThen, - function (s) { - var _p2 = s; - switch (_p2) { - case 'running': - return _elm_lang$core$Json_Decode$succeed(_seatgeek$wrecker_ui$ServerState$Running); - case 'done': - return _elm_lang$core$Json_Decode$succeed(_seatgeek$wrecker_ui$ServerState$Done); - case 'scheduled': - return _elm_lang$core$Json_Decode$succeed(_seatgeek$wrecker_ui$ServerState$Scheduled); - case 'none': - return _elm_lang$core$Json_Decode$succeed(_seatgeek$wrecker_ui$ServerState$NotYet); - default: - return _elm_lang$core$Json_Decode$fail( - A2( - _elm_lang$core$Basics_ops['++'], - 'Could not decode ', - A2(_elm_lang$core$Basics_ops['++'], s, ' as a RunStatus'))); - } - }, - _elm_lang$core$Json_Decode$string); -var _seatgeek$wrecker_ui$ServerState$TestList = function (a) { - return {ctor: 'TestList', _0: a}; -}; -var _seatgeek$wrecker_ui$ServerState$defaultState = A2( - _seatgeek$wrecker_ui$ServerState$State, - _seatgeek$wrecker_ui$ServerState$TestList(_elm_lang$core$Dict$empty), - {ctor: '[]'}); -var _seatgeek$wrecker_ui$ServerState$decodeTestList = A3( - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, - 'tests', - _elm_lang$core$Json_Decode$dict(_seatgeek$wrecker_ui$ServerState$decodeRunStatus), - _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$ServerState$TestList)); -var _seatgeek$wrecker_ui$ServerState$getTestList = A2(_elm_lang$http$Http$get, '/test-list', _seatgeek$wrecker_ui$ServerState$decodeTestList); -var _seatgeek$wrecker_ui$ServerState$LoadGroupSets = function (a) { - return {ctor: 'LoadGroupSets', _0: a}; -}; -var _seatgeek$wrecker_ui$ServerState$LoadTestSchedule = function (a) { - return {ctor: 'LoadTestSchedule', _0: a}; -}; -var _seatgeek$wrecker_ui$ServerState$init = A2( - _Fresheyeball$elm_return$Return$command, - A2(_elm_lang$http$Http$send, _seatgeek$wrecker_ui$ServerState$LoadGroupSets, _seatgeek$wrecker_ui$ServerState$getGroupSets), - A2( - _Fresheyeball$elm_return$Return$command, - A2(_elm_lang$http$Http$send, _seatgeek$wrecker_ui$ServerState$LoadTestSchedule, _seatgeek$wrecker_ui$ServerState$getTestList), - _seatgeek$wrecker_ui$Util$return(_seatgeek$wrecker_ui$ServerState$defaultState))); - -var _seatgeek$wrecker_ui$Scheduler$groupSetOption = function (groupSet) { - return A2( - _elm_lang$html$Html$option, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value( - _elm_lang$core$Basics$toString(groupSet.id)), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(groupSet.name), - _1: {ctor: '[]'} - }); -}; -var _seatgeek$wrecker_ui$Scheduler$buildTestItems = F3( - function (clickMsg, selected, _p0) { - var _p1 = _p0; - var _p3 = _p1._0; - var classes = { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'selected', - _1: _elm_lang$core$Native_Utils.eq(selected, _p3) - }, - _1: {ctor: '[]'} - }; - var showStatus = function (s) { - var _p2 = s; - if (_p2.ctor === 'NotYet') { - return _elm_lang$html$Html$text(''); - } else { - return A2( - _elm_lang$html$Html$span, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('status'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text( - A2( - _elm_lang$core$Basics_ops['++'], - ' - ', - _elm_lang$core$Basics$toString(s))), - _1: {ctor: '[]'} - }); - } - }; - return A2( - _elm_lang$html$Html$li, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$a, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick( - clickMsg(_p3)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$classList(classes), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(_p3), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: showStatus(_p1._1), - _1: {ctor: '[]'} - } - }); - }); -var _seatgeek$wrecker_ui$Scheduler$updateOptions = F3( - function (field, value, opts) { - var _p4 = field; - switch (_p4.ctor) { - case 'AnnotationTitle': - return _elm_lang$core$Native_Utils.update( - opts, - {annotationTitle: value}); - case 'Notes': - return _elm_lang$core$Native_Utils.update( - opts, - {notes: value}); - case 'ConcurrencyStart': - return _elm_lang$core$Native_Utils.update( - opts, - { - concurrencyStart: A2( - _elm_lang$core$Result$withDefault, - opts.concurrencyStart, - _elm_lang$core$String$toInt(value)) - }); - case 'ConcurrencyEnd': - return _elm_lang$core$Native_Utils.update( - opts, - { - concurrencyEnd: A2( - _elm_lang$core$Result$withDefault, - opts.concurrencyEnd, - _elm_lang$core$String$toInt(value)) - }); - case 'StepSize': - return _elm_lang$core$Native_Utils.update( - opts, - { - stepSize: A2( - _elm_lang$core$Result$withDefault, - opts.stepSize, - _elm_lang$core$String$toInt(value)) - }); - case 'RunTime': - return _elm_lang$core$Native_Utils.update( - opts, - { - runTime: A2( - _elm_lang$core$Result$withDefault, - opts.runTime, - _elm_lang$core$String$toInt(value)) - }); - default: - return _elm_lang$core$Native_Utils.update( - opts, - { - groupSetId: _elm_lang$core$Result$toMaybe( - _elm_lang$core$String$toInt(value)) - }); - } - }); -var _seatgeek$wrecker_ui$Scheduler$postGroupSet = function (options) { - var body = _elm_lang$http$Http$multipartBody( - { - ctor: '::', - _0: A2(_elm_lang$http$Http$stringPart, 'name', options.name), - _1: { - ctor: '::', - _0: A2(_elm_lang$http$Http$stringPart, 'description', options.description), - _1: {ctor: '[]'} - } - }); - return A3(_elm_lang$http$Http$post, '/group-sets', body, _elm_lang$core$Json_Decode$value); -}; -var _seatgeek$wrecker_ui$Scheduler$postTestSchedule = function (options) { - var groupPart = A2( - _elm_lang$core$Maybe$withDefault, - {ctor: '[]'}, - A2( - _elm_lang$core$Maybe$map, - function (p) { - return { - ctor: '::', - _0: p, - _1: {ctor: '[]'} - }; - }, - A2( - _elm_lang$core$Maybe$map, - function (_p5) { - return A2( - _elm_lang$http$Http$stringPart, - 'groupSetId', - _elm_community$string_extra$String_Extra$fromInt(_p5)); - }, - options.groupSetId))); - var body = _elm_lang$http$Http$multipartBody( - A2( - _elm_lang$core$Basics_ops['++'], - { - ctor: '::', - _0: A2(_elm_lang$http$Http$stringPart, 'testTitle', options.testTitle), - _1: { - ctor: '::', - _0: A2(_elm_lang$http$Http$stringPart, 'notes', options.notes), - _1: { - ctor: '::', - _0: A2(_elm_lang$http$Http$stringPart, 'groupName', options.annotationTitle), - _1: { - ctor: '::', - _0: A2( - _elm_lang$http$Http$stringPart, - 'concurrencyStart', - _elm_community$string_extra$String_Extra$fromInt(options.concurrencyStart)), - _1: { - ctor: '::', - _0: A2( - _elm_lang$http$Http$stringPart, - 'concurrencyEnd', - _elm_community$string_extra$String_Extra$fromInt(options.concurrencyEnd)), - _1: { - ctor: '::', - _0: A2( - _elm_lang$http$Http$stringPart, - 'stepSize', - _elm_community$string_extra$String_Extra$fromInt(options.stepSize)), - _1: { - ctor: '::', - _0: A2( - _elm_lang$http$Http$stringPart, - 'runTime', - _elm_community$string_extra$String_Extra$fromInt(options.runTime)), - _1: {ctor: '[]'} - } - } - } - } - } - } - }, - groupPart)); - return A3(_elm_lang$http$Http$post, '/test-list', body, _elm_lang$core$Json_Decode$value); -}; -var _seatgeek$wrecker_ui$Scheduler$SchedulerOptions = F8( - function (a, b, c, d, e, f, g, h) { - return {testTitle: a, annotationTitle: b, concurrencyStart: c, concurrencyEnd: d, stepSize: e, runTime: f, notes: g, groupSetId: h}; - }); -var _seatgeek$wrecker_ui$Scheduler$defaultOptions = F2( - function (title, groupSets) { - return A8( - _seatgeek$wrecker_ui$Scheduler$SchedulerOptions, - title, - '', - 10, - 300, - 10, - 10, - 'No Notes', - A2( - _elm_lang$core$Maybe$map, - function (_) { - return _.id; - }, - _elm_lang$core$List$head(groupSets))); - }); -var _seatgeek$wrecker_ui$Scheduler$GroupSetOptions = F2( - function (a, b) { - return {name: a, description: b}; - }); -var _seatgeek$wrecker_ui$Scheduler$defaultModel = { - schedulerOptions: _elm_lang$core$Maybe$Nothing, - showGroupsetForm: false, - groupSetOptions: A2(_seatgeek$wrecker_ui$Scheduler$GroupSetOptions, '', ''), - groupSetSaving: false -}; -var _seatgeek$wrecker_ui$Scheduler$init = {ctor: '_Tuple2', _0: _seatgeek$wrecker_ui$Scheduler$defaultModel, _1: _elm_lang$core$Platform_Cmd$none}; -var _seatgeek$wrecker_ui$Scheduler$Model = F4( - function (a, b, c, d) { - return {schedulerOptions: a, showGroupsetForm: b, groupSetOptions: c, groupSetSaving: d}; - }); -var _seatgeek$wrecker_ui$Scheduler$GroupSetOption = {ctor: 'GroupSetOption'}; -var _seatgeek$wrecker_ui$Scheduler$Notes = {ctor: 'Notes'}; -var _seatgeek$wrecker_ui$Scheduler$RunTime = {ctor: 'RunTime'}; -var _seatgeek$wrecker_ui$Scheduler$StepSize = {ctor: 'StepSize'}; -var _seatgeek$wrecker_ui$Scheduler$ConcurrencyEnd = {ctor: 'ConcurrencyEnd'}; -var _seatgeek$wrecker_ui$Scheduler$ConcurrencyStart = {ctor: 'ConcurrencyStart'}; -var _seatgeek$wrecker_ui$Scheduler$AnnotationTitle = {ctor: 'AnnotationTitle'}; -var _seatgeek$wrecker_ui$Scheduler$ScheduleTestSent = function (a) { - return {ctor: 'ScheduleTestSent', _0: a}; -}; -var _seatgeek$wrecker_ui$Scheduler$ScheduleTestClicked = {ctor: 'ScheduleTestClicked'}; -var _seatgeek$wrecker_ui$Scheduler$SchedulerGroupSetIdSet = function (a) { - return {ctor: 'SchedulerGroupSetIdSet', _0: a}; -}; -var _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged = F2( - function (a, b) { - return {ctor: 'SchedulerFieldChanged', _0: a, _1: b}; - }); -var _seatgeek$wrecker_ui$Scheduler$renderOptions = F2( - function (options, groupSets) { - var emptyAnnotation = _elm_lang$core$Native_Utils.eq( - _elm_lang$core$String$trim(options.annotationTitle), - ''); - var buttonOpts = emptyAnnotation ? {ctor: '[]'} : { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick(_seatgeek$wrecker_ui$Scheduler$ScheduleTestClicked), - _1: {ctor: '[]'} - }; - var duration = _elm_community$string_extra$String_Extra$fromInt(options.runTime); - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot--right__concurrency'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Test Set'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$select, - { - ctor: '::', - _0: _seatgeek$wrecker_ui$Util$onChange( - _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$GroupSetOption)), - _1: {ctor: '[]'} - }, - A2(_elm_lang$core$List$map, _seatgeek$wrecker_ui$Scheduler$groupSetOption, groupSets)), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$classList( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'field-error', _1: emptyAnnotation}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Test Annotation *'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$input, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onInput( - _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$AnnotationTitle)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$placeholder('E.g. Migrated to PHP 7'), - _1: {ctor: '[]'} - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Concurrency Start'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$input, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onInput( - _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$ConcurrencyStart)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$type_('number'), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value( - _elm_community$string_extra$String_Extra$fromInt(options.concurrencyStart)), - _1: {ctor: '[]'} - } - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Concurrency Target'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$input, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onInput( - _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$ConcurrencyEnd)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$type_('number'), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value( - _elm_community$string_extra$String_Extra$fromInt(options.concurrencyEnd)), - _1: {ctor: '[]'} - } - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Step Size'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$input, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onInput( - _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$StepSize)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$type_('number'), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value( - _elm_community$string_extra$String_Extra$fromInt(options.stepSize)), - _1: {ctor: '[]'} - } - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Duration (secs)'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$input, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onInput( - _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$RunTime)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$type_('number'), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value(duration), - _1: {ctor: '[]'} - } - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'width', _1: '100%'}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Test Notes (Markdown will be rendered)'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$textarea, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onInput( - _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$Notes)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value(options.notes), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$rows(20), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'width', _1: '640px'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'margin-top', _1: '10px'}, - _1: {ctor: '[]'} - } - }), - _1: {ctor: '[]'} - } - } - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$button, - buttonOpts, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Schedule Test'), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - } - } - } - } - } - } - }); - }); -var _seatgeek$wrecker_ui$Scheduler$GroupSetSent = function (a) { - return {ctor: 'GroupSetSent', _0: a}; -}; -var _seatgeek$wrecker_ui$Scheduler$update = F3( - function (groupSets, msg, model) { - var _p6 = msg; - switch (_p6.ctor) { - case 'TestTitleClicked': - var _p7 = _p6._0; - var schedulerOptions = A2( - _elm_lang$core$Maybe$withDefault, - A2(_seatgeek$wrecker_ui$Scheduler$defaultOptions, _p7, groupSets), - A2( - _elm_lang$core$Maybe$map, - function (s) { - return _elm_lang$core$Native_Utils.update( - s, - {testTitle: _p7}); - }, - model.schedulerOptions)); - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - { - schedulerOptions: _elm_lang$core$Maybe$Just(schedulerOptions), - showGroupsetForm: false - }), - _1: _elm_lang$core$Platform_Cmd$none, - _2: false - }; - case 'SchedulerFieldChanged': - var schedulerOptions = A2( - _elm_lang$core$Maybe$map, - A2(_seatgeek$wrecker_ui$Scheduler$updateOptions, _p6._0, _p6._1), - model.schedulerOptions); - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - {schedulerOptions: schedulerOptions}), - _1: _elm_lang$core$Platform_Cmd$none, - _2: false - }; - case 'SchedulerGroupSetIdSet': - var schedulerOptions = A2( - _elm_lang$core$Maybe$map, - function (opts) { - return _elm_lang$core$Native_Utils.update( - opts, - { - groupSetId: _elm_lang$core$Maybe$Just(_p6._0) - }); - }, - model.schedulerOptions); - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - {schedulerOptions: schedulerOptions}), - _1: _elm_lang$core$Platform_Cmd$none, - _2: false - }; - case 'ScheduleTestClicked': - var effect = A2( - _elm_lang$core$Maybe$withDefault, - _elm_lang$core$Platform_Cmd$none, - A2( - _elm_lang$core$Maybe$map, - function (o) { - return A2( - _elm_lang$http$Http$send, - _seatgeek$wrecker_ui$Scheduler$ScheduleTestSent, - _seatgeek$wrecker_ui$Scheduler$postTestSchedule(o)); - }, - model.schedulerOptions)); - return {ctor: '_Tuple3', _0: model, _1: effect, _2: false}; - case 'ScheduleTestSent': - if (_p6._0.ctor === 'Err') { - var _p8 = A2(_elm_lang$core$Debug$log, 'ScheduleTestSent', _p6._0._0); - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - {schedulerOptions: _elm_lang$core$Maybe$Nothing}), - _1: _elm_lang$core$Platform_Cmd$none, - _2: false - }; - } else { - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - {schedulerOptions: _elm_lang$core$Maybe$Nothing}), - _1: _elm_lang$core$Platform_Cmd$none, - _2: true - }; - } - case 'GroupSetButtonClicked': - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - {showGroupsetForm: true}), - _1: _elm_lang$core$Platform_Cmd$none, - _2: false - }; - case 'GroupSetNameChanged': - var groupSetOptions = model.groupSetOptions; - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - { - groupSetOptions: _elm_lang$core$Native_Utils.update( - groupSetOptions, - {name: _p6._0}) - }), - _1: _elm_lang$core$Platform_Cmd$none, - _2: false - }; - case 'GroupSetDescriptionChanged': - var groupSetOptions = model.groupSetOptions; - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - { - groupSetOptions: _elm_lang$core$Native_Utils.update( - groupSetOptions, - {description: _p6._0}) - }), - _1: _elm_lang$core$Platform_Cmd$none, - _2: false - }; - case 'GroupSetSaveClicked': - var effect = ((!_elm_lang$core$Native_Utils.eq( - _elm_lang$core$String$trim(model.groupSetOptions.name), - '')) && ((!_elm_lang$core$Native_Utils.eq( - _elm_lang$core$String$trim(model.groupSetOptions.description), - '')) && (!model.groupSetSaving))) ? A2( - _elm_lang$http$Http$send, - _seatgeek$wrecker_ui$Scheduler$GroupSetSent, - _seatgeek$wrecker_ui$Scheduler$postGroupSet(model.groupSetOptions)) : _elm_lang$core$Platform_Cmd$none; - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - {groupSetSaving: true}), - _1: effect, - _2: false - }; - default: - if (_p6._0.ctor === 'Err') { - var _p9 = A2(_elm_lang$core$Debug$log, 'GroupSetSent', _p6._0._0); - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - {groupSetSaving: false}), - _1: _elm_lang$core$Platform_Cmd$none, - _2: false - }; - } else { - return { - ctor: '_Tuple3', - _0: _elm_lang$core$Native_Utils.update( - model, - { - groupSetOptions: A2(_seatgeek$wrecker_ui$Scheduler$GroupSetOptions, '', ''), - showGroupsetForm: false, - groupSetSaving: false - }), - _1: _elm_lang$core$Platform_Cmd$none, - _2: true - }; - } - } - }); -var _seatgeek$wrecker_ui$Scheduler$GroupSetSaveClicked = {ctor: 'GroupSetSaveClicked'}; -var _seatgeek$wrecker_ui$Scheduler$GroupSetDescriptionChanged = function (a) { - return {ctor: 'GroupSetDescriptionChanged', _0: a}; -}; -var _seatgeek$wrecker_ui$Scheduler$GroupSetNameChanged = function (a) { - return {ctor: 'GroupSetNameChanged', _0: a}; -}; -var _seatgeek$wrecker_ui$Scheduler$renderGroupSetForm = function (opts) { - var hasDesc = !_elm_lang$core$Native_Utils.eq( - _elm_lang$core$String$trim(opts.description), - ''); - var hasName = !_elm_lang$core$Native_Utils.eq( - _elm_lang$core$String$trim(opts.name), - ''); - var buttonOpts = (!(hasName && hasDesc)) ? {ctor: '[]'} : { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick(_seatgeek$wrecker_ui$Scheduler$GroupSetSaveClicked), - _1: {ctor: '[]'} - }; - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot--right__concurrency'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$classList( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'field-error', _1: !hasName}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Name *'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$input, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onInput(_seatgeek$wrecker_ui$Scheduler$GroupSetNameChanged), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$placeholder('E.g. Changing EC2 instance sizes'), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'width', _1: '60%'}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$classList( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'field-error', _1: !hasDesc}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'width', _1: '100%'}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Group Notes (Markdown will be rendered) *'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$textarea, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onInput(_seatgeek$wrecker_ui$Scheduler$GroupSetDescriptionChanged), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$rows(20), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'width', _1: '640px'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'margin-top', _1: '10px'}, - _1: {ctor: '[]'} - } - }), - _1: {ctor: '[]'} - } - } - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$label, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$button, - buttonOpts, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Save Group'), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - } - }); -}; -var _seatgeek$wrecker_ui$Scheduler$GroupSetButtonClicked = {ctor: 'GroupSetButtonClicked'}; -var _seatgeek$wrecker_ui$Scheduler$TestTitleClicked = function (a) { - return {ctor: 'TestTitleClicked', _0: a}; -}; -var _seatgeek$wrecker_ui$Scheduler$view = F3( - function (testList, groupSets, _p10) { - var _p11 = _p10; - var _p19 = _p11.schedulerOptions; - var active = A2( - _elm_lang$core$Maybe$withDefault, - '', - A2( - _elm_lang$core$Maybe$map, - function (_) { - return _.testTitle; - }, - _p19)); - var testNames = function (_p12) { - var _p13 = _p12; - return A2( - _elm_lang$core$List$sortWith, - F2( - function (_p15, _p14) { - var _p16 = _p15; - var _p17 = _p14; - return A2(_seatgeek$wrecker_ui$Util$natSort, _p16._0, _p17._0); - }), - _elm_lang$core$Dict$toList(_p13._0)); - }; - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot view-plot__closed'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot--left'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('group-set-button'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$a, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick(_seatgeek$wrecker_ui$Scheduler$GroupSetButtonClicked), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('⛱ Add GroupSet'), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$h4, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('...or schedule a test 👩‍🔬'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$ul, - {ctor: '[]'}, - A2( - _elm_lang$core$List$map, - A2(_seatgeek$wrecker_ui$Scheduler$buildTestItems, _seatgeek$wrecker_ui$Scheduler$TestTitleClicked, active), - testNames(testList))), - _1: {ctor: '[]'} - } - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot--right view-plot--right__wide'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: function () { - var _p18 = {ctor: '_Tuple2', _0: _p19, _1: _p11.showGroupsetForm}; - _v8_2: - do { - if (_p18.ctor === '_Tuple2') { - if (_p18._1 === false) { - if (_p18._0.ctor === 'Just') { - return A2(_seatgeek$wrecker_ui$Scheduler$renderOptions, _p18._0._0, groupSets); - } else { - break _v8_2; - } - } else { - return _seatgeek$wrecker_ui$Scheduler$renderGroupSetForm(_p11.groupSetOptions); - } - } else { - break _v8_2; - } - } while(false); - return _elm_lang$html$Html$text(''); - }(), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }); - }); - -var _seatgeek$wrecker_ui$RunGroupPanel$panelItem = F2( - function (title, value) { - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--item'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--title'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(title), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--value'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(value), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }); - }); -var _seatgeek$wrecker_ui$RunGroupPanel$panelDetails = function (group) { - return A2( - _elm_lang$html$Html$div, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _seatgeek$wrecker_ui$RunGroupPanel$panelItem, - 'Concurrency Start', - _elm_community$string_extra$String_Extra$fromInt(group.concurrencyStart)), - _1: { - ctor: '::', - _0: A2( - _seatgeek$wrecker_ui$RunGroupPanel$panelItem, - 'Concurrency Target', - _elm_community$string_extra$String_Extra$fromInt(group.concurrencyTarget)), - _1: { - ctor: '::', - _0: A2( - _seatgeek$wrecker_ui$RunGroupPanel$panelItem, - 'Step Size', - _elm_community$string_extra$String_Extra$fromInt(group.rampupStep)), - _1: { - ctor: '::', - _0: A2( - _seatgeek$wrecker_ui$RunGroupPanel$panelItem, - 'Step duration time', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_community$string_extra$String_Extra$fromInt(group.runKeepTime), - ' secs')), - _1: { - ctor: '::', - _0: A2( - _seatgeek$wrecker_ui$RunGroupPanel$panelItem, - 'Run started', - A2(_mgold$elm_date_format$Date_Format$format, '%Y-%m-%d %H:%I:%S', group.created)), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$h5, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--notes-title'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Notes'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _evancz$elm_markdown$Markdown$toHtml, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--notes'), - _1: {ctor: '[]'} - }, - group.notes), - _1: {ctor: '[]'} - } - } - } - } - } - } - }); -}; -var _seatgeek$wrecker_ui$RunGroupPanel$onlyFiltered = F2( - function (filtered, allGroups) { - return A2( - _elm_lang$core$List$filter, - function (_p0) { - var _p1 = _p0; - return A2(_elm_lang$core$List$member, _p1._1, filtered); - }, - allGroups); - }); -var _seatgeek$wrecker_ui$RunGroupPanel$update = F2( - function (msg, model) { - var _p2 = msg; - if (_p2.ctor === 'Expand') { - return _elm_lang$core$Native_Utils.update( - model, - { - openPanels: {ctor: '::', _0: _p2._0, _1: model.openPanels} - }); - } else { - return _elm_lang$core$Native_Utils.update( - model, - { - openPanels: A2( - _elm_lang$core$List$filter, - F2( - function (x, y) { - return !_elm_lang$core$Native_Utils.eq(x, y); - })(_p2._0), - model.openPanels) - }); - } - }); -var _seatgeek$wrecker_ui$RunGroupPanel$Model = function (a) { - return {openPanels: a}; -}; -var _seatgeek$wrecker_ui$RunGroupPanel$init = _seatgeek$wrecker_ui$RunGroupPanel$Model( - {ctor: '[]'}); -var _seatgeek$wrecker_ui$RunGroupPanel$Collapse = function (a) { - return {ctor: 'Collapse', _0: a}; -}; -var _seatgeek$wrecker_ui$RunGroupPanel$Expand = function (a) { - return {ctor: 'Expand', _0: a}; -}; -var _seatgeek$wrecker_ui$RunGroupPanel$panel = F2( - function (openPanels, _p3) { - var _p4 = _p3; - var _p5 = _p4._1; - var expanded = A2(_elm_lang$core$List$member, _p5.id, openPanels); - var msg = expanded ? _seatgeek$wrecker_ui$RunGroupPanel$Collapse : _seatgeek$wrecker_ui$RunGroupPanel$Expand; - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--header'), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick( - msg(_p5.id)), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'color', _1: _p4._0}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('●'), - _1: { - ctor: '::', - _0: _elm_lang$html$Html$text(' '), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: _elm_lang$html$Html$text(_p5.title), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: expanded ? _seatgeek$wrecker_ui$RunGroupPanel$panelDetails(_p5) : _elm_lang$html$Html$text(''), - _1: {ctor: '[]'} - } - }); - }); -var _seatgeek$wrecker_ui$RunGroupPanel$view = F3( - function (groups, filteredGroups, _p6) { - var _p7 = _p6; - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('run-group-panel'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$h3, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Test Runs'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - {ctor: '[]'}, - A2( - _elm_lang$core$List$map, - _seatgeek$wrecker_ui$RunGroupPanel$panel(_p7.openPanels), - A2(_seatgeek$wrecker_ui$RunGroupPanel$onlyFiltered, filteredGroups, groups))), - _1: {ctor: '[]'} - } - }); - }); - -var _seatgeek$wrecker_ui$Main$extractSelectedPage = function (selection) { - return A2( - _elm_lang$core$Maybe$withDefault, - '', - A2( - _elm_lang$core$Maybe$map, - function (_p0) { - var _p1 = _p0; - return _p1._0; - }, - selection)); -}; -var _seatgeek$wrecker_ui$Main$graphTypeOption = F2( - function (current, _p2) { - var _p3 = _p2; - var _p4 = _p3._0; - return A2( - _elm_lang$html$Html$option, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value(_p4), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$selected( - _elm_lang$core$Native_Utils.eq(current, _p4)), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(_p4), - _1: {ctor: '[]'} - }); - }); -var _seatgeek$wrecker_ui$Main$groupSetOption = F2( - function (selectedGroupSet, _p5) { - var _p6 = _p5; - var _p7 = _p6.id; - var isSelected = A2( - _elm_lang$core$Maybe$withDefault, - false, - A2( - _elm_lang$core$Maybe$map, - function (s) { - return _elm_lang$core$Native_Utils.eq(s.id, _p7); - }, - selectedGroupSet)); - return A2( - _elm_lang$html$Html$option, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value( - _elm_community$string_extra$String_Extra$fromInt(_p7)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$selected(isSelected), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(_p6.name), - _1: {ctor: '[]'} - }); - }); -var _seatgeek$wrecker_ui$Main$getPageStats = F2( - function (ids, page) { - var idsQ = A3( - _elm_lang$core$List$foldl, - F2( - function (id, acc) { - return A2( - _elm_lang$core$Basics_ops['++'], - acc, - A2( - _elm_lang$core$Basics_ops['++'], - _elm_community$string_extra$String_Extra$fromInt(id), - ',')); - }), - '', - ids); - return A2( - _elm_lang$http$Http$get, - A2( - _elm_lang$core$Basics_ops['++'], - '/runs/page?ids=', - A2( - _elm_lang$core$Basics_ops['++'], - idsQ, - A2( - _elm_lang$core$Basics_ops['++'], - '&name=', - _elm_lang$http$Http$encodeUri(page)))), - _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodePage)); - }); -var _seatgeek$wrecker_ui$Main$getPageByRuns = F2( - function (runs, page) { - return A2( - _seatgeek$wrecker_ui$Main$getPageStats, - A2( - _elm_lang$core$List$map, - function (_p8) { - return function (_) { - return _.id; - }( - function (_) { - return _.run; - }(_p8)); - }, - runs), - page); - }); -var _seatgeek$wrecker_ui$Main$getManyRuns = F2( - function (match, groupSet) { - var groupSetParam = function () { - var _p9 = groupSet; - if (_p9.ctor === 'Just') { - return A2( - _elm_lang$core$Basics_ops['++'], - '&groupSet=', - _elm_lang$http$Http$encodeUri( - _elm_community$string_extra$String_Extra$fromInt(_p9._0))); - } else { - return ''; - } - }(); - return A2( - _elm_lang$http$Http$get, - A2( - _elm_lang$core$Basics_ops['++'], - '/runs/rollup/?match=', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$http$Http$encodeUri(match), - groupSetParam)), - _seatgeek$wrecker_ui$Data$decodeResults); - }); -var _seatgeek$wrecker_ui$Main$buildPlotRoute = function (model) { - var level = A2(_elm_lang$core$Maybe$withDefault, 0, model.concurrencyComparison); - var page = A2( - _elm_lang$core$Maybe$map, - function (_p10) { - var _p11 = _p10; - return _p11._0; - }, - model.selectedPage); - var graphIndex = _elm_lang$core$List$head( - A2( - _elm_lang$core$List$filterMap, - _elm_lang$core$Basics$identity, - A2( - _elm_lang$core$List$indexedMap, - F2( - function (index, _p12) { - var _p13 = _p12; - return _elm_lang$core$Native_Utils.eq(_p13._0, model.graph) ? _elm_lang$core$Maybe$Just( - {ctor: '_Tuple2', _0: index, _1: _p13._1}) : _elm_lang$core$Maybe$Nothing; - }), - _seatgeek$wrecker_ui$Graph$validGraphs))); - var _p14 = model.displayTestResults; - if (_p14.ctor === 'Nothing') { - return _seatgeek$wrecker_ui$Router$Home; - } else { - var _p15 = graphIndex; - if (_p15.ctor === 'Nothing') { - return _seatgeek$wrecker_ui$Router$Home; - } else { - if (_p15._0._1.ctor === 'Scatter') { - return A4( - _seatgeek$wrecker_ui$Router$SimplePlot, - _p15._0._0, - model.displayTestResults, - page, - A2( - _elm_lang$core$Maybe$map, - function (_) { - return _.id; - }, - model.selectedGroupSet)); - } else { - return A5( - _seatgeek$wrecker_ui$Router$ComparisonPlot, - _p15._0._0, - level, - model.displayTestResults, - page, - A2( - _elm_lang$core$Maybe$map, - function (_) { - return _.id; - }, - model.selectedGroupSet)); - } - } - } -}; -var _seatgeek$wrecker_ui$Main$updateTheUrl = function (m) { - return { - ctor: '_Tuple2', - _0: m, - _1: _seatgeek$wrecker_ui$Router$modifyUrl( - _seatgeek$wrecker_ui$Main$buildPlotRoute(m)) - }; -}; -var _seatgeek$wrecker_ui$Main$screenToRoute = F2( - function (screen, model) { - var _p16 = screen; - if (_p16.ctor === 'ScheduleRunScreen') { - return _seatgeek$wrecker_ui$Router$ScheduleTest; - } else { - return _seatgeek$wrecker_ui$Main$buildPlotRoute(model); - } - }); -var _seatgeek$wrecker_ui$Main$loadRunThenPage = F4( - function (action, maybeTestName, maybeGroupSet, maybePageName) { - return A2( - _elm_lang$core$Task$perform, - action, - A2( - _elm_lang$core$Task$onError, - function (e) { - return _elm_lang$core$Task$succeed( - _elm_lang$core$Result$Err(e)); - }, - A2( - _elm_lang$core$Task$andThen, - function (_p17) { - var _p18 = _p17; - var _p21 = _p18; - var _p19 = maybePageName; - if (_p19.ctor === 'Nothing') { - return _elm_lang$core$Task$succeed( - _elm_lang$core$Result$Ok( - {ctor: '_Tuple4', _0: _p21, _1: '', _2: _elm_lang$core$Maybe$Nothing, _3: maybeGroupSet})); - } else { - var _p20 = _p19._0; - return A2( - _elm_lang$core$Task$andThen, - function (stats) { - return _elm_lang$core$Task$succeed( - _elm_lang$core$Result$Ok( - { - ctor: '_Tuple4', - _0: _p21, - _1: _p20, - _2: _elm_lang$core$Maybe$Just(stats), - _3: maybeGroupSet - })); - }, - _elm_lang$http$Http$toTask( - A2(_seatgeek$wrecker_ui$Main$getPageByRuns, _p18.runs, _p20))); - } - }, - _elm_lang$http$Http$toTask( - A2( - _seatgeek$wrecker_ui$Main$getManyRuns, - A2(_elm_lang$core$Maybe$withDefault, '__', maybeTestName), - maybeGroupSet))))); - }); -var _seatgeek$wrecker_ui$Main$debugError = F3( - function (model, place, err) { - var _p22 = A2( - _elm_lang$core$Debug$log, - A2( - _elm_lang$core$Basics_ops['++'], - 'error at ', - A2(_elm_lang$core$Basics_ops['++'], place, ':')), - err); - return {ctor: '_Tuple2', _0: model, _1: _elm_lang$core$Platform_Cmd$none}; - }); -var _seatgeek$wrecker_ui$Main$startPollingForResults = F3( - function (testName, selectedSet, model) { - return _elm_lang$core$Native_Utils.update( - model, - { - displayTestResults: _elm_lang$core$Maybe$Just(testName), - selectedGroupSet: selectedSet - }); - }); -var _seatgeek$wrecker_ui$Main$setGroupSetSelection = F3( - function (maybeId, groupSets, model) { - var groupSetFromId = _elm_lang$core$List$head( - A2( - _elm_lang$core$List$filter, - function (set) { - return _elm_lang$core$Native_Utils.eq( - _elm_lang$core$Maybe$Just(set.id), - maybeId); - }, - groupSets)); - return _elm_lang$core$Native_Utils.update( - model, - {selectedGroupSet: groupSetFromId}); - }); -var _seatgeek$wrecker_ui$Main$setPageMap = F2( - function (pages, model) { - return _elm_lang$core$Native_Utils.update( - model, - {pages: pages}); - }); -var _seatgeek$wrecker_ui$Main$setRuns = F4( - function (runs, runGroups, availableGroupSets, model) { - return _elm_lang$core$Native_Utils.update( - model, - {runs: runs, currentRunGroups: runGroups, filteredGroups: runGroups, availableGroupSets: availableGroupSets}); - }); -var _seatgeek$wrecker_ui$Main$setGraphByIndex = F2( - function (index, model) { - var graph = A2( - _elm_lang$core$Maybe$map, - function (_p23) { - var _p24 = _p23; - return _p24._1._0; - }, - _elm_lang$core$List$head( - A2( - _elm_lang$core$List$filter, - function (_p25) { - var _p26 = _p25; - return _elm_lang$core$Native_Utils.eq(_p26._0, index); - }, - A2( - _elm_lang$core$List$indexedMap, - F2( - function (ix, graph) { - return {ctor: '_Tuple2', _0: ix, _1: graph}; - }), - _seatgeek$wrecker_ui$Graph$validGraphs)))); - return _elm_lang$core$Native_Utils.update( - model, - { - graph: A2(_elm_lang$core$Maybe$withDefault, model.graph, graph) - }); - }); -var _seatgeek$wrecker_ui$Main$resetRunsState = function (model) { - return _elm_lang$core$Native_Utils.update( - model, - { - runs: {ctor: '[]'}, - filteredGroups: {ctor: '[]'} - }); -}; -var _seatgeek$wrecker_ui$Main$Model = function (a) { - return function (b) { - return function (c) { - return function (d) { - return function (e) { - return function (f) { - return function (g) { - return function (h) { - return function (i) { - return function (j) { - return function (k) { - return function (l) { - return function (m) { - return function (n) { - return function (o) { - return {serverState: a, runs: b, pages: c, graph: d, graphState: e, currentRunGroups: f, filteredGroups: g, concurrencyComparison: h, selectedPage: i, currentScreen: j, schedulerState: k, displayTestResults: l, runGroupsPanel: m, selectedGroupSet: n, availableGroupSets: o}; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; - }; -}; -var _seatgeek$wrecker_ui$Main$ScheduleRunScreen = {ctor: 'ScheduleRunScreen'}; -var _seatgeek$wrecker_ui$Main$PlotScreen = {ctor: 'PlotScreen'}; -var _seatgeek$wrecker_ui$Main$PageSelection = F2( - function (a, b) { - return {ctor: 'PageSelection', _0: a, _1: b}; - }); -var _seatgeek$wrecker_ui$Main$setPageSelection = F3( - function (page, pages, model) { - var indexed = _elm_lang$core$Dict$fromList( - A2( - _elm_lang$core$List$map, - function (p) { - return {ctor: '_Tuple2', _0: p.runId, _1: p}; - }, - pages)); - return _elm_lang$core$Native_Utils.update( - model, - { - selectedPage: _elm_lang$core$Maybe$Just( - A2(_seatgeek$wrecker_ui$Main$PageSelection, page, indexed)) - }); - }); -var _seatgeek$wrecker_ui$Main$ChangeGroupSet = function (a) { - return {ctor: 'ChangeGroupSet', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$groupSetFilter = F2( - function (selectedSet, sets) { - var _p27 = A2(_elm_lang$core$Debug$log, 'selected dog', selectedSet); - var _p28 = A2(_elm_lang$core$Debug$log, 'crazy dog', sets); - return A2( - _elm_lang$html$Html$select, - { - ctor: '::', - _0: _seatgeek$wrecker_ui$Util$onChange( - function (_p29) { - return _seatgeek$wrecker_ui$Main$ChangeGroupSet( - A2( - _elm_lang$core$Result$withDefault, - -1, - _elm_lang$core$String$toInt(_p29))); - }), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$Basics_ops['++'], - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$option, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value(''), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('- All Sets -'), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$map, - _seatgeek$wrecker_ui$Main$groupSetOption(selectedSet), - sets))); - }); -var _seatgeek$wrecker_ui$Main$RunGroupPanelMsg = function (a) { - return {ctor: 'RunGroupPanelMsg', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$PollForResults = function (a) { - return {ctor: 'PollForResults', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$subscriptions = function (model) { - var _p30 = model.displayTestResults; - if (_p30.ctor === 'Nothing') { - return _elm_lang$core$Platform_Sub$none; - } else { - return A2( - _elm_lang$core$Time$every, - 30 * _elm_lang$core$Time$second, - function (_p31) { - return _seatgeek$wrecker_ui$Main$PollForResults(_p30._0); - }); - } -}; -var _seatgeek$wrecker_ui$Main$ServerStateMsg = function (a) { - return {ctor: 'ServerStateMsg', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$SchedulerMsg = function (a) { - return {ctor: 'SchedulerMsg', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$changeScreen = F2( - function (screen, model) { - var effect = function () { - var _p32 = screen; - if (_p32.ctor === 'ScheduleRunScreen') { - return A2( - _elm_lang$core$Platform_Cmd$map, - _seatgeek$wrecker_ui$Main$SchedulerMsg, - _elm_lang$core$Tuple$second(_seatgeek$wrecker_ui$Scheduler$init)); - } else { - return _elm_lang$core$Platform_Cmd$none; - } - }(); - var allEffects = _elm_lang$core$Platform_Cmd$batch( - { - ctor: '::', - _0: effect, - _1: { - ctor: '::', - _0: A2( - _elm_lang$core$Platform_Cmd$map, - _seatgeek$wrecker_ui$Main$ServerStateMsg, - _elm_lang$core$Tuple$second(_seatgeek$wrecker_ui$ServerState$init)), - _1: {ctor: '[]'} - } - }); - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Native_Utils.update( - model, - {currentScreen: screen}), - _1: allEffects - }; - }); -var _seatgeek$wrecker_ui$Main$ChangeScreen = function (a) { - return {ctor: 'ChangeScreen', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$ChangeConcurrencyComparison = function (a) { - return {ctor: 'ChangeConcurrencyComparison', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$concurrencySelector = F2( - function (current, runs) { - var _p33 = current; - if (_p33.ctor === 'Nothing') { - return _elm_lang$html$Html$text(''); - } else { - var buildOption = function (level) { - return A2( - _elm_lang$html$Html$option, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value( - _elm_lang$core$Basics$toString(level)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$selected( - _elm_lang$core$Native_Utils.eq(_p33._0, level)), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text( - _elm_lang$core$Basics$toString(level)), - _1: {ctor: '[]'} - }); - }; - var levels = _elm_lang$core$List$sort( - _elm_community$list_extra$List_Extra$unique( - A2( - _elm_lang$core$List$map, - function (_p34) { - return function (_) { - return _.concurrency; - }( - function (_) { - return _.run; - }(_p34)); - }, - runs))); - return A2( - _elm_lang$html$Html$select, - { - ctor: '::', - _0: _seatgeek$wrecker_ui$Util$onChangeInt(_seatgeek$wrecker_ui$Main$ChangeConcurrencyComparison), - _1: {ctor: '[]'} - }, - A2(_elm_lang$core$List$map, buildOption, levels)); - } - }); -var _seatgeek$wrecker_ui$Main$PageNameClicked = function (a) { - return {ctor: 'PageNameClicked', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$pageItem = F2( - function (selected, page) { - var classes = { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'selected', - _1: _elm_lang$core$Native_Utils.eq(selected, page) - }, - _1: {ctor: '[]'} - }; - return A2( - _elm_lang$html$Html$li, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$a, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$classList(classes), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick( - _seatgeek$wrecker_ui$Main$PageNameClicked(page)), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(page), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }); - }); -var _seatgeek$wrecker_ui$Main$pagesList = F2( - function (selected, pages) { - return A2( - _elm_lang$html$Html$ul, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot--right__pages'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$map, - _seatgeek$wrecker_ui$Main$pageItem(selected), - _elm_lang$core$Dict$keys(pages))); - }); -var _seatgeek$wrecker_ui$Main$ShowOnlyGroup = function (a) { - return {ctor: 'ShowOnlyGroup', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$ToggleFilterGroup = function (a) { - return {ctor: 'ToggleFilterGroup', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$groupItem = F2( - function (filtered, _p35) { - var _p36 = _p35; - var _p38 = _p36._1; - var isFiltered = function () { - var _p37 = filtered; - if (_p37.ctor === '[]') { - return false; - } else { - return _elm_lang$core$List$isEmpty( - A2( - _elm_lang$core$List$filter, - F2( - function (x, y) { - return _elm_lang$core$Native_Utils.eq(x, y); - })(_p38), - filtered)); - } - }(); - return A2( - _elm_lang$html$Html$li, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'cursor', _1: 'pointer'}, - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$classList( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'grayed-out', _1: isFiltered}, - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick( - _seatgeek$wrecker_ui$Main$ToggleFilterGroup(_p38.id)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Events$onDoubleClick( - _seatgeek$wrecker_ui$Main$ShowOnlyGroup(_p38.id)), - _1: {ctor: '[]'} - } - } - } - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$span, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'color', _1: _p36._0}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'font-size', _1: '25px'}, - _1: {ctor: '[]'} - } - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('●'), - _1: { - ctor: '::', - _0: _elm_lang$html$Html$text(' '), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: _elm_lang$html$Html$text(_p38.title), - _1: {ctor: '[]'} - } - }); - }); -var _seatgeek$wrecker_ui$Main$runGroupsList = F2( - function (allGroups, filteredGroups) { - return A2( - _elm_lang$html$Html$ul, - {ctor: '[]'}, - A2( - _elm_lang$core$List$map, - _seatgeek$wrecker_ui$Main$groupItem(filteredGroups), - _seatgeek$wrecker_ui$Graph$assignGroupColors(allGroups))); - }); -var _seatgeek$wrecker_ui$Main$ChangeGraphType = function (a) { - return {ctor: 'ChangeGraphType', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$graphTypeOptions = function (graph) { - return A2( - _elm_lang$html$Html$select, - { - ctor: '::', - _0: _seatgeek$wrecker_ui$Util$onChange(_seatgeek$wrecker_ui$Main$ChangeGraphType), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$map, - _seatgeek$wrecker_ui$Main$graphTypeOption(graph), - _seatgeek$wrecker_ui$Graph$validGraphs)); -}; -var _seatgeek$wrecker_ui$Main$rightmostPanel = function (_p39) { - var _p40 = _p39; - return A2( - _elm_lang$html$Html$div, - {ctor: '[]'}, - { - ctor: '::', - _0: A2(_seatgeek$wrecker_ui$Main$groupSetFilter, _p40.selectedGroupSet, _p40.availableGroupSets), - _1: { - ctor: '::', - _0: _seatgeek$wrecker_ui$Main$graphTypeOptions(_p40.graph), - _1: { - ctor: '::', - _0: A2(_seatgeek$wrecker_ui$Main$concurrencySelector, _p40.concurrencyComparison, _p40.runs), - _1: { - ctor: '::', - _0: A2(_seatgeek$wrecker_ui$Main$runGroupsList, _p40.currentRunGroups, _p40.filteredGroups), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$h4, - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Pages'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _seatgeek$wrecker_ui$Main$pagesList, - _seatgeek$wrecker_ui$Main$extractSelectedPage(_p40.selectedPage), - _p40.pages), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('scrollFader'), - _1: {ctor: '[]'} - }, - {ctor: '[]'}), - _1: {ctor: '[]'} - } - } - } - } - } - } - }); -}; -var _seatgeek$wrecker_ui$Main$RunTitleClicked = function (a) { - return {ctor: 'RunTitleClicked', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$runListItem = F2( - function (selected, _p41) { - var _p42 = _p41; - var _p44 = _p42._0; - var indicator = function () { - var _p43 = _p42._1; - switch (_p43.ctor) { - case 'Running': - return _elm_lang$html$Html$text(' ▶️'); - case 'Done': - return _elm_lang$html$Html$text(' ✅'); - default: - return _elm_lang$html$Html$text(''); - } - }(); - var classes = { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'selected', - _1: _elm_lang$core$Native_Utils.eq( - selected, - _elm_lang$core$Maybe$Just(_p44)) - }, - _1: {ctor: '[]'} - }; - return A2( - _elm_lang$html$Html$li, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick( - _seatgeek$wrecker_ui$Main$RunTitleClicked(_p44)), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$a, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$classList(classes), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(_p44), - _1: { - ctor: '::', - _0: indicator, - _1: {ctor: '[]'} - } - }), - _1: {ctor: '[]'} - }); - }); -var _seatgeek$wrecker_ui$Main$leftPanel = F3( - function (screen, defaultTitle, _p45) { - var _p46 = _p45; - var bottomItems = function () { - var _p47 = screen; - if (_p47.ctor === 'ScheduleRunScreen') { - return {ctor: '[]'}; - } else { - return { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-header__search'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$ul, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-header__runs'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$List$map, - _seatgeek$wrecker_ui$Main$runListItem(defaultTitle), - _elm_lang$core$Dict$toList(_p46._0))), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }; - } - }(); - return A2( - _elm_lang$html$Html$header, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-header'), - _1: {ctor: '[]'} - }, - A2( - _elm_lang$core$Basics_ops['++'], - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$a, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick( - _seatgeek$wrecker_ui$Main$ChangeScreen(_seatgeek$wrecker_ui$Main$ScheduleRunScreen)), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Schedule Run ➕ '), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$h1, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-header__title'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$a, - { - ctor: '::', - _0: _elm_lang$html$Html_Events$onClick( - _seatgeek$wrecker_ui$Main$ChangeScreen(_seatgeek$wrecker_ui$Main$PlotScreen)), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text('Wrecker-UI'), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }, - bottomItems)); - }); -var _seatgeek$wrecker_ui$Main$GraphMsg = function (a) { - return {ctor: 'GraphMsg', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$rightPlotPanel = function (model) { - var _p48 = model.runs; - if (_p48.ctor === '[]') { - return _elm_lang$html$Html$text(''); - } else { - return A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot view-plot__closed'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot--left'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$map, - _seatgeek$wrecker_ui$Main$GraphMsg, - A7( - _seatgeek$wrecker_ui$Graph$plotRuns, - model.graphState, - model.graph, - model.currentRunGroups, - model.runs, - model.filteredGroups, - model.concurrencyComparison, - A2( - _elm_lang$core$Maybe$map, - function (_p49) { - var _p50 = _p49; - return _p50._1; - }, - model.selectedPage))), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$map, - _seatgeek$wrecker_ui$Main$RunGroupPanelMsg, - A3( - _seatgeek$wrecker_ui$RunGroupPanel$view, - _seatgeek$wrecker_ui$Graph$assignGroupColors(model.currentRunGroups), - model.filteredGroups, - model.runGroupsPanel)), - _1: {ctor: '[]'} - } - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view-plot--right'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _seatgeek$wrecker_ui$Main$rightmostPanel(model), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }); - } -}; -var _seatgeek$wrecker_ui$Main$view = function (model) { - return A2( - _elm_lang$html$Html$div, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view--left'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A3(_seatgeek$wrecker_ui$Main$leftPanel, model.currentScreen, model.displayTestResults, model.serverState.testList), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$html$Html$div, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$class('view--right'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: function () { - var _p51 = model.currentScreen; - if (_p51.ctor === 'PlotScreen') { - return _seatgeek$wrecker_ui$Main$rightPlotPanel(model); - } else { - return A2( - _elm_lang$html$Html$map, - _seatgeek$wrecker_ui$Main$SchedulerMsg, - A3(_seatgeek$wrecker_ui$Scheduler$view, model.serverState.testList, model.serverState.groupSets, model.schedulerState)); - } - }(), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }), - _1: {ctor: '[]'} - }); -}; -var _seatgeek$wrecker_ui$Main$RefreshRunStats = function (a) { - return {ctor: 'RefreshRunStats', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$LoadFromLocation = function (a) { - return {ctor: 'LoadFromLocation', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$setRoute = F2( - function (maybeRoute, model) { - var _p52 = maybeRoute; - if (_p52.ctor === 'Nothing') { - return {ctor: '_Tuple2', _0: model, _1: _elm_lang$core$Platform_Cmd$none}; - } else { - switch (_p52._0.ctor) { - case 'Home': - return A2(_seatgeek$wrecker_ui$Main$changeScreen, _seatgeek$wrecker_ui$Main$PlotScreen, model); - case 'ScheduleTest': - return A2(_seatgeek$wrecker_ui$Main$changeScreen, _seatgeek$wrecker_ui$Main$ScheduleRunScreen, model); - case 'SimplePlot': - var _p53 = _p52._0._1; - return A2( - _Fresheyeball$elm_return$Return$command, - A4(_seatgeek$wrecker_ui$Main$loadRunThenPage, _seatgeek$wrecker_ui$Main$LoadFromLocation, _p53, _p52._0._3, _p52._0._2), - _seatgeek$wrecker_ui$Util$return( - A2( - _seatgeek$wrecker_ui$Main$setGraphByIndex, - _p52._0._0, - _elm_lang$core$Native_Utils.update( - model, - {displayTestResults: _p53})))); - default: - var _p54 = _p52._0._2; - return A2( - _Fresheyeball$elm_return$Return$command, - A4(_seatgeek$wrecker_ui$Main$loadRunThenPage, _seatgeek$wrecker_ui$Main$LoadFromLocation, _p54, _p52._0._4, _p52._0._3), - _seatgeek$wrecker_ui$Util$return( - A2( - _seatgeek$wrecker_ui$Main$setGraphByIndex, - _p52._0._0, - _elm_lang$core$Native_Utils.update( - model, - { - concurrencyComparison: _elm_lang$core$Maybe$Just(_p52._0._1), - displayTestResults: _p54 - })))); - } - } - }); -var _seatgeek$wrecker_ui$Main$init = function (location) { - var _p55 = _seatgeek$wrecker_ui$ServerState$init; - var serverState = _p55._0; - var serverStateInit = _p55._1; - var _p56 = _seatgeek$wrecker_ui$Scheduler$init; - var schedulerModel = _p56._0; - var scheduleInit = _p56._1; - var initialReturn = A2( - _seatgeek$wrecker_ui$Main$setRoute, - _seatgeek$wrecker_ui$Router$fromLocation(location), - { - serverState: serverState, - runs: {ctor: '[]'}, - pages: _elm_lang$core$Dict$empty, - graph: 'Mean Time / Concurrency', - graphState: _seatgeek$wrecker_ui$Graph$defaultModel, - currentRunGroups: {ctor: '[]'}, - filteredGroups: {ctor: '[]'}, - selectedPage: _elm_lang$core$Maybe$Nothing, - concurrencyComparison: _elm_lang$core$Maybe$Nothing, - currentScreen: _seatgeek$wrecker_ui$Main$PlotScreen, - schedulerState: schedulerModel, - displayTestResults: _elm_lang$core$Maybe$Nothing, - runGroupsPanel: _seatgeek$wrecker_ui$RunGroupPanel$init, - selectedGroupSet: _elm_lang$core$Maybe$Nothing, - availableGroupSets: {ctor: '[]'} - }); - return A2( - _Fresheyeball$elm_return$Return$command, - A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$ServerStateMsg, serverStateInit), - A2( - _Fresheyeball$elm_return$Return$command, - A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$SchedulerMsg, scheduleInit), - initialReturn)); -}; -var _seatgeek$wrecker_ui$Main$LoadPageStats = function (a) { - return {ctor: 'LoadPageStats', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$LoadRunStats = function (a) { - return {ctor: 'LoadRunStats', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$loadRunsData = F3( - function (testName, selectedSet, model) { - return A2( - _Fresheyeball$elm_return$Return$andThen, - _seatgeek$wrecker_ui$Main$updateTheUrl, - A2( - _Fresheyeball$elm_return$Return$command, - A2( - _elm_lang$http$Http$send, - _seatgeek$wrecker_ui$Main$LoadRunStats, - A2( - _seatgeek$wrecker_ui$Main$getManyRuns, - testName, - A2( - _elm_lang$core$Maybe$map, - function (_) { - return _.id; - }, - selectedSet))), - _seatgeek$wrecker_ui$Util$return( - _seatgeek$wrecker_ui$Main$resetRunsState( - A3(_seatgeek$wrecker_ui$Main$startPollingForResults, testName, selectedSet, model))))); - }); -var _seatgeek$wrecker_ui$Main$update = F2( - function (msg, model) { - var _p57 = msg; - switch (_p57.ctor) { - case 'SetRoute': - return A2(_seatgeek$wrecker_ui$Main$setRoute, _p57._0, model); - case 'ChangeScreen': - var _p58 = _p57._0; - return A2( - _Fresheyeball$elm_return$Return$command, - _seatgeek$wrecker_ui$Router$modifyUrl( - A2(_seatgeek$wrecker_ui$Main$screenToRoute, _p58, model)), - A2(_seatgeek$wrecker_ui$Main$changeScreen, _p58, model)); - case 'RunTitleClicked': - return A3( - _seatgeek$wrecker_ui$Main$loadRunsData, - _p57._0, - _elm_lang$core$Maybe$Nothing, - _elm_lang$core$Native_Utils.update( - model, - {selectedGroupSet: _elm_lang$core$Maybe$Nothing})); - case 'ChangeGroupSet': - var testName = A2(_elm_lang$core$Maybe$withDefault, '', model.displayTestResults); - var selectedSet = _elm_lang$core$List$head( - A2( - _elm_lang$core$List$filter, - function (set) { - return _elm_lang$core$Native_Utils.eq(set.id, _p57._0); - }, - model.availableGroupSets)); - return A3(_seatgeek$wrecker_ui$Main$loadRunsData, testName, selectedSet, model); - case 'LoadRunStats': - if (_p57._0.ctor === 'Err') { - return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadRunStats', _p57._0._0); - } else { - return _seatgeek$wrecker_ui$Util$return( - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p57._0._0.pages, - A4( - _seatgeek$wrecker_ui$Main$setRuns, - _p57._0._0.runs, - _p57._0._0.runGroups, - _p57._0._0.availableGroupSets, - _elm_lang$core$Native_Utils.update( - model, - {selectedPage: _elm_lang$core$Maybe$Nothing})))); - } - case 'LoadPageStats': - if (_p57._0.ctor === 'Err') { - return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadPageStats', _p57._0._0); - } else { - var _p59 = model.selectedPage; - if (_p59.ctor === 'Nothing') { - return _seatgeek$wrecker_ui$Util$return(model); - } else { - return _seatgeek$wrecker_ui$Util$return( - A3(_seatgeek$wrecker_ui$Main$setPageSelection, _p59._0._0, _p57._0._0, model)); - } - } - case 'LoadFromLocation': - if (_p57._0.ctor === 'Err') { - return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadFromLocation', _p57._0._0); - } else { - if (_p57._0._0._2.ctor === 'Just') { - var _p60 = _p57._0._0._0.availableGroupSets; - return _seatgeek$wrecker_ui$Util$return( - A3( - _seatgeek$wrecker_ui$Main$setGroupSetSelection, - _p57._0._0._3, - _p60, - A3( - _seatgeek$wrecker_ui$Main$setPageSelection, - _p57._0._0._1, - _p57._0._0._2._0, - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p57._0._0._0.pages, - A4(_seatgeek$wrecker_ui$Main$setRuns, _p57._0._0._0.runs, _p57._0._0._0.runGroups, _p60, model))))); - } else { - var _p61 = _p57._0._0._0.availableGroupSets; - return _seatgeek$wrecker_ui$Util$return( - A3( - _seatgeek$wrecker_ui$Main$setGroupSetSelection, - _p57._0._0._3, - _p61, - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p57._0._0._0.pages, - A4( - _seatgeek$wrecker_ui$Main$setRuns, - _p57._0._0._0.runs, - _p57._0._0._0.runGroups, - _p61, - _elm_lang$core$Native_Utils.update( - model, - {selectedPage: _elm_lang$core$Maybe$Nothing}))))); - } - } - case 'RefreshRunStats': - if (_p57._0.ctor === 'Err') { - return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'RefreshRunStats', _p57._0._0); - } else { - if (_p57._0._0._2.ctor === 'Just') { - var _p62 = _p57._0._0._0.availableGroupSets; - return _seatgeek$wrecker_ui$Util$return( - A3( - _seatgeek$wrecker_ui$Main$setGroupSetSelection, - _p57._0._0._3, - _p62, - A3( - _seatgeek$wrecker_ui$Main$setPageSelection, - _p57._0._0._1, - _p57._0._0._2._0, - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p57._0._0._0.pages, - _elm_lang$core$Native_Utils.update( - model, - {runs: _p57._0._0._0.runs, availableGroupSets: _p62, currentRunGroups: _p57._0._0._0.runGroups}))))); - } else { - var _p63 = _p57._0._0._0.availableGroupSets; - return _seatgeek$wrecker_ui$Util$return( - A3( - _seatgeek$wrecker_ui$Main$setGroupSetSelection, - _p57._0._0._3, - _p63, - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p57._0._0._0.pages, - _elm_lang$core$Native_Utils.update( - model, - {runs: _p57._0._0._0.runs, availableGroupSets: _p63, currentRunGroups: _p57._0._0._0.runGroups})))); - } - } - case 'GraphMsg': - var _p64 = A2(_seatgeek$wrecker_ui$Graph$update, _p57._0, model.graphState); - var m = _p64._0; - var c = _p64._1; - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Native_Utils.update( - model, - {graphState: m}), - _1: A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$GraphMsg, c) - }; - case 'ChangeGraphType': - var _p65 = A2(_seatgeek$wrecker_ui$Graph$chooseGraphType, _p57._0, model.runs); - var newType = _p65._0; - var newConcurrency = _p65._1; - return A2( - _Fresheyeball$elm_return$Return$andThen, - _seatgeek$wrecker_ui$Main$updateTheUrl, - _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - { - graph: A2(_elm_lang$core$Maybe$withDefault, model.graph, newType), - concurrencyComparison: newConcurrency - }))); - case 'ToggleFilterGroup': - var _p66 = _p57._0; - var filteredGroups = (!_elm_lang$core$Native_Utils.eq( - A2( - _elm_lang$core$List$filter, - function (g) { - return _elm_lang$core$Native_Utils.eq(g.id, _p66); - }, - model.filteredGroups), - {ctor: '[]'})) ? A2( - _elm_lang$core$List$filter, - function (g) { - return !_elm_lang$core$Native_Utils.eq(g.id, _p66); - }, - model.filteredGroups) : A2( - _elm_lang$core$List$append, - A2( - _elm_lang$core$List$filter, - function (g) { - return _elm_lang$core$Native_Utils.eq(g.id, _p66); - }, - model.currentRunGroups), - model.filteredGroups); - var newFilteredGroups = _elm_lang$core$List$isEmpty(filteredGroups) ? model.currentRunGroups : filteredGroups; - return _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - {filteredGroups: newFilteredGroups})); - case 'ShowOnlyGroup': - return _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - { - filteredGroups: A2( - _elm_lang$core$List$filter, - function (g) { - return _elm_lang$core$Native_Utils.eq(g.id, _p57._0); - }, - model.currentRunGroups) - })); - case 'PageNameClicked': - var _p68 = _p57._0; - var result = A2( - _Fresheyeball$elm_return$Return$andThen, - _seatgeek$wrecker_ui$Main$updateTheUrl, - A2( - _Fresheyeball$elm_return$Return$command, - A2( - _elm_lang$http$Http$send, - _seatgeek$wrecker_ui$Main$LoadPageStats, - A2(_seatgeek$wrecker_ui$Main$getPageByRuns, model.runs, _p68)), - _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - { - selectedPage: _elm_lang$core$Maybe$Just( - A2(_seatgeek$wrecker_ui$Main$PageSelection, _p68, _elm_lang$core$Dict$empty)) - })))); - var _p67 = model.selectedPage; - if (_p67.ctor === 'Nothing') { - return result; - } else { - return _elm_lang$core$Native_Utils.eq(_p68, _p67._0._0) ? A2( - _Fresheyeball$elm_return$Return$andThen, - _seatgeek$wrecker_ui$Main$updateTheUrl, - _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - {selectedPage: _elm_lang$core$Maybe$Nothing}))) : result; - } - case 'ChangeConcurrencyComparison': - return A2( - _Fresheyeball$elm_return$Return$andThen, - _seatgeek$wrecker_ui$Main$updateTheUrl, - _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - { - concurrencyComparison: _elm_lang$core$Maybe$Just(_p57._0) - }))); - case 'SchedulerMsg': - var _p69 = A3(_seatgeek$wrecker_ui$Scheduler$update, model.serverState.groupSets, _p57._0, model.schedulerState); - var m = _p69._0; - var c = _p69._1; - var reloadServerState = _p69._2; - var effect = A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$SchedulerMsg, c); - var allEffects = reloadServerState ? _elm_lang$core$Platform_Cmd$batch( - { - ctor: '::', - _0: effect, - _1: { - ctor: '::', - _0: A2( - _elm_lang$core$Platform_Cmd$map, - _seatgeek$wrecker_ui$Main$ServerStateMsg, - _elm_lang$core$Tuple$second(_seatgeek$wrecker_ui$ServerState$init)), - _1: {ctor: '[]'} - } - }) : effect; - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Native_Utils.update( - model, - {schedulerState: m}), - _1: allEffects - }; - case 'ServerStateMsg': - var _p70 = A2(_seatgeek$wrecker_ui$ServerState$update, _p57._0, model.serverState); - var m = _p70._0; - var c = _p70._1; - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Native_Utils.update( - model, - {serverState: m}), - _1: A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$ServerStateMsg, c) - }; - case 'RunGroupPanelMsg': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Native_Utils.update( - model, - { - runGroupsPanel: A2(_seatgeek$wrecker_ui$RunGroupPanel$update, _p57._0, model.runGroupsPanel) - }), - _1: _elm_lang$core$Platform_Cmd$none - }; - default: - return A2( - _Fresheyeball$elm_return$Return$command, - A2( - _elm_lang$core$Platform_Cmd$map, - _seatgeek$wrecker_ui$Main$ServerStateMsg, - _elm_lang$core$Tuple$second(_seatgeek$wrecker_ui$ServerState$init)), - A2( - _Fresheyeball$elm_return$Return$command, - A4( - _seatgeek$wrecker_ui$Main$loadRunThenPage, - _seatgeek$wrecker_ui$Main$RefreshRunStats, - _elm_lang$core$Maybe$Just(_p57._0), +var _elm_community$dict_extra$Dict_Extra$find = F2( + function (predicate, dict) { + return A3( + _elm_lang$core$Dict$foldl, + F3( + function (k, v, acc) { + var _p0 = acc; + if (_p0.ctor === 'Just') { + return acc; + } else { + return A2(predicate, k, v) ? _elm_lang$core$Maybe$Just( + {ctor: '_Tuple2', _0: k, _1: v}) : _elm_lang$core$Maybe$Nothing; + } + }), + _elm_lang$core$Maybe$Nothing, + dict); + }); +var _elm_community$dict_extra$Dict_Extra$invert = function (dict) { + return A3( + _elm_lang$core$Dict$foldl, + F3( + function (k, v, acc) { + return A3(_elm_lang$core$Dict$insert, v, k, acc); + }), + _elm_lang$core$Dict$empty, + dict); +}; +var _elm_community$dict_extra$Dict_Extra$filterMap = F2( + function (f, dict) { + return A3( + _elm_lang$core$Dict$foldl, + F3( + function (k, v, acc) { + var _p1 = A2(f, k, v); + if (_p1.ctor === 'Just') { + return A3(_elm_lang$core$Dict$insert, k, _p1._0, acc); + } else { + return acc; + } + }), + _elm_lang$core$Dict$empty, + dict); + }); +var _elm_community$dict_extra$Dict_Extra$mapKeys = F2( + function (keyMapper, dict) { + return A3( + _elm_lang$core$Dict$foldl, + F3( + function (k, v, acc) { + return A3( + _elm_lang$core$Dict$insert, + keyMapper(k), + v, + acc); + }), + _elm_lang$core$Dict$empty, + dict); + }); +var _elm_community$dict_extra$Dict_Extra$keepOnly = F2( + function (set, dict) { + return A3( + _elm_lang$core$Set$foldl, + F2( + function (k, acc) { + return A2( + _elm_lang$core$Maybe$withDefault, + acc, + A2( + _elm_lang$core$Maybe$map, + function (v) { + return A3(_elm_lang$core$Dict$insert, k, v, acc); + }, + A2(_elm_lang$core$Dict$get, k, dict))); + }), + _elm_lang$core$Dict$empty, + set); + }); +var _elm_community$dict_extra$Dict_Extra$insertDedupe = F4( + function (combine, key, value, dict) { + var $with = function (mbValue) { + var _p2 = mbValue; + if (_p2.ctor === 'Just') { + return _elm_lang$core$Maybe$Just( + A2(combine, _p2._0, value)); + } else { + return _elm_lang$core$Maybe$Just(value); + } + }; + return A3(_elm_lang$core$Dict$update, key, $with, dict); + }); +var _elm_community$dict_extra$Dict_Extra$removeMany = F2( + function (set, dict) { + return A3(_elm_lang$core$Set$foldl, _elm_lang$core$Dict$remove, dict, set); + }); +var _elm_community$dict_extra$Dict_Extra$removeWhen = F2( + function (pred, dict) { + return A2( + _elm_lang$core$Dict$filter, + F2( + function (k, v) { + return !A2(pred, k, v); + }), + dict); + }); +var _elm_community$dict_extra$Dict_Extra$frequencies = function (list) { + return A3( + _elm_lang$core$List$foldl, + F2( + function (el, counter) { + return function (count) { + return A3(_elm_lang$core$Dict$insert, el, count, counter); + }( + function (count) { + return count + 1; + }( + A2( + _elm_lang$core$Maybe$withDefault, + 0, + A2(_elm_lang$core$Dict$get, el, counter)))); + }), + _elm_lang$core$Dict$empty, + list); +}; +var _elm_community$dict_extra$Dict_Extra$fromListDedupeBy = F3( + function (combine, keyfn, xs) { + return A3( + _elm_lang$core$List$foldl, + F2( + function (x, acc) { + return A4( + _elm_community$dict_extra$Dict_Extra$insertDedupe, + combine, + keyfn(x), + x, + acc); + }), + _elm_lang$core$Dict$empty, + xs); + }); +var _elm_community$dict_extra$Dict_Extra$fromListDedupe = F2( + function (combine, xs) { + return A3( + _elm_lang$core$List$foldl, + F2( + function (_p3, acc) { + var _p4 = _p3; + return A4(_elm_community$dict_extra$Dict_Extra$insertDedupe, combine, _p4._0, _p4._1, acc); + }), + _elm_lang$core$Dict$empty, + xs); + }); +var _elm_community$dict_extra$Dict_Extra$fromListBy = F2( + function (keyfn, xs) { + return A3( + _elm_lang$core$List$foldl, + F2( + function (x, acc) { + return A3( + _elm_lang$core$Dict$insert, + keyfn(x), + x, + acc); + }), + _elm_lang$core$Dict$empty, + xs); + }); +var _elm_community$dict_extra$Dict_Extra$filterGroupBy = F2( + function (keyfn, list) { + return A3( + _elm_lang$core$List$foldr, + F2( + function (x, acc) { + var _p5 = keyfn(x); + if (_p5.ctor === 'Just') { + return A3( + _elm_lang$core$Dict$update, + _p5._0, + function (_p6) { + return _elm_lang$core$Maybe$Just( + A2( + _elm_lang$core$Maybe$withDefault, + { + ctor: '::', + _0: x, + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$Maybe$map, + F2( + function (x, y) { + return {ctor: '::', _0: x, _1: y}; + })(x), + _p6))); + }, + acc); + } else { + return acc; + } + }), + _elm_lang$core$Dict$empty, + list); + }); +var _elm_community$dict_extra$Dict_Extra$groupBy = F2( + function (keyfn, list) { + return A3( + _elm_lang$core$List$foldr, + F2( + function (x, acc) { + return A3( + _elm_lang$core$Dict$update, + keyfn(x), + function (_p7) { + return _elm_lang$core$Maybe$Just( + A2( + _elm_lang$core$Maybe$withDefault, + { + ctor: '::', + _0: x, + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$Maybe$map, + F2( + function (x, y) { + return {ctor: '::', _0: x, _1: y}; + })(x), + _p7))); + }, + acc); + }), + _elm_lang$core$Dict$empty, + list); + }); + +var _elm_community$list_extra$List_Extra$greedyGroupsOfWithStep = F3( + function (size, step, xs) { + var okayXs = _elm_lang$core$Native_Utils.cmp( + _elm_lang$core$List$length(xs), + 0) > 0; + var okayArgs = (_elm_lang$core$Native_Utils.cmp(size, 0) > 0) && (_elm_lang$core$Native_Utils.cmp(step, 0) > 0); + var xs_ = A2(_elm_lang$core$List$drop, step, xs); + var group = A2(_elm_lang$core$List$take, size, xs); + return (okayArgs && okayXs) ? { + ctor: '::', + _0: group, + _1: A3(_elm_community$list_extra$List_Extra$greedyGroupsOfWithStep, size, step, xs_) + } : {ctor: '[]'}; + }); +var _elm_community$list_extra$List_Extra$greedyGroupsOf = F2( + function (size, xs) { + return A3(_elm_community$list_extra$List_Extra$greedyGroupsOfWithStep, size, size, xs); + }); +var _elm_community$list_extra$List_Extra$groupsOfWithStep = F3( + function (size, step, xs) { + var okayArgs = (_elm_lang$core$Native_Utils.cmp(size, 0) > 0) && (_elm_lang$core$Native_Utils.cmp(step, 0) > 0); + var xs_ = A2(_elm_lang$core$List$drop, step, xs); + var group = A2(_elm_lang$core$List$take, size, xs); + var okayLength = _elm_lang$core$Native_Utils.eq( + size, + _elm_lang$core$List$length(group)); + return (okayArgs && okayLength) ? { + ctor: '::', + _0: group, + _1: A3(_elm_community$list_extra$List_Extra$groupsOfWithStep, size, step, xs_) + } : {ctor: '[]'}; + }); +var _elm_community$list_extra$List_Extra$groupsOf = F2( + function (size, xs) { + return A3(_elm_community$list_extra$List_Extra$groupsOfWithStep, size, size, xs); + }); +var _elm_community$list_extra$List_Extra$zip5 = _elm_lang$core$List$map5( + F5( + function (v0, v1, v2, v3, v4) { + return {ctor: '_Tuple5', _0: v0, _1: v1, _2: v2, _3: v3, _4: v4}; + })); +var _elm_community$list_extra$List_Extra$zip4 = _elm_lang$core$List$map4( + F4( + function (v0, v1, v2, v3) { + return {ctor: '_Tuple4', _0: v0, _1: v1, _2: v2, _3: v3}; + })); +var _elm_community$list_extra$List_Extra$zip3 = _elm_lang$core$List$map3( + F3( + function (v0, v1, v2) { + return {ctor: '_Tuple3', _0: v0, _1: v1, _2: v2}; + })); +var _elm_community$list_extra$List_Extra$zip = _elm_lang$core$List$map2( + F2( + function (v0, v1) { + return {ctor: '_Tuple2', _0: v0, _1: v1}; + })); +var _elm_community$list_extra$List_Extra$isPrefixOf = F2( + function (prefix, xs) { + var _p0 = {ctor: '_Tuple2', _0: prefix, _1: xs}; + if (_p0._0.ctor === '[]') { + return true; + } else { + if (_p0._1.ctor === '[]') { + return false; + } else { + return _elm_lang$core$Native_Utils.eq(_p0._0._0, _p0._1._0) && A2(_elm_community$list_extra$List_Extra$isPrefixOf, _p0._0._1, _p0._1._1); + } + } + }); +var _elm_community$list_extra$List_Extra$isSuffixOf = F2( + function (suffix, xs) { + return A2( + _elm_community$list_extra$List_Extra$isPrefixOf, + _elm_lang$core$List$reverse(suffix), + _elm_lang$core$List$reverse(xs)); + }); +var _elm_community$list_extra$List_Extra$selectSplit = function (xs) { + var _p1 = xs; + if (_p1.ctor === '[]') { + return {ctor: '[]'}; + } else { + var _p5 = _p1._1; + var _p4 = _p1._0; + return { + ctor: '::', + _0: { + ctor: '_Tuple3', + _0: {ctor: '[]'}, + _1: _p4, + _2: _p5 + }, + _1: A2( + _elm_lang$core$List$map, + function (_p2) { + var _p3 = _p2; + return { + ctor: '_Tuple3', + _0: {ctor: '::', _0: _p4, _1: _p3._0}, + _1: _p3._1, + _2: _p3._2 + }; + }, + _elm_community$list_extra$List_Extra$selectSplit(_p5)) + }; + } +}; +var _elm_community$list_extra$List_Extra$select = function (xs) { + var _p6 = xs; + if (_p6.ctor === '[]') { + return {ctor: '[]'}; + } else { + var _p10 = _p6._1; + var _p9 = _p6._0; + return { + ctor: '::', + _0: {ctor: '_Tuple2', _0: _p9, _1: _p10}, + _1: A2( + _elm_lang$core$List$map, + function (_p7) { + var _p8 = _p7; + return { + ctor: '_Tuple2', + _0: _p8._0, + _1: {ctor: '::', _0: _p9, _1: _p8._1} + }; + }, + _elm_community$list_extra$List_Extra$select(_p10)) + }; + } +}; +var _elm_community$list_extra$List_Extra$tailsHelp = F2( + function (e, list) { + var _p11 = list; + if (_p11.ctor === '::') { + var _p12 = _p11._0; + return { + ctor: '::', + _0: {ctor: '::', _0: e, _1: _p12}, + _1: {ctor: '::', _0: _p12, _1: _p11._1} + }; + } else { + return {ctor: '[]'}; + } + }); +var _elm_community$list_extra$List_Extra$tails = A2( + _elm_lang$core$List$foldr, + _elm_community$list_extra$List_Extra$tailsHelp, + { + ctor: '::', + _0: {ctor: '[]'}, + _1: {ctor: '[]'} + }); +var _elm_community$list_extra$List_Extra$isInfixOf = F2( + function (infix, xs) { + return A2( + _elm_lang$core$List$any, + _elm_community$list_extra$List_Extra$isPrefixOf(infix), + _elm_community$list_extra$List_Extra$tails(xs)); + }); +var _elm_community$list_extra$List_Extra$inits = A2( + _elm_lang$core$List$foldr, + F2( + function (e, acc) { + return { + ctor: '::', + _0: {ctor: '[]'}, + _1: A2( + _elm_lang$core$List$map, + F2( + function (x, y) { + return {ctor: '::', _0: x, _1: y}; + })(e), + acc) + }; + }), + { + ctor: '::', + _0: {ctor: '[]'}, + _1: {ctor: '[]'} + }); +var _elm_community$list_extra$List_Extra$groupWhileTransitively = F2( + function (cmp, xs_) { + var _p13 = xs_; + if (_p13.ctor === '[]') { + return {ctor: '[]'}; + } else { + if (_p13._1.ctor === '[]') { + return { + ctor: '::', + _0: { + ctor: '::', + _0: _p13._0, + _1: {ctor: '[]'} + }, + _1: {ctor: '[]'} + }; + } else { + var _p15 = _p13._0; + var _p14 = A2(_elm_community$list_extra$List_Extra$groupWhileTransitively, cmp, _p13._1); + if (_p14.ctor === '::') { + return A2(cmp, _p15, _p13._1._0) ? { + ctor: '::', + _0: {ctor: '::', _0: _p15, _1: _p14._0}, + _1: _p14._1 + } : { + ctor: '::', + _0: { + ctor: '::', + _0: _p15, + _1: {ctor: '[]'} + }, + _1: _p14 + }; + } else { + return {ctor: '[]'}; + } + } + } + }); +var _elm_community$list_extra$List_Extra$stripPrefix = F2( + function (prefix, xs) { + var step = F2( + function (e, m) { + var _p16 = m; + if (_p16.ctor === 'Nothing') { + return _elm_lang$core$Maybe$Nothing; + } else { + if (_p16._0.ctor === '[]') { + return _elm_lang$core$Maybe$Nothing; + } else { + return _elm_lang$core$Native_Utils.eq(e, _p16._0._0) ? _elm_lang$core$Maybe$Just(_p16._0._1) : _elm_lang$core$Maybe$Nothing; + } + } + }); + return A3( + _elm_lang$core$List$foldl, + step, + _elm_lang$core$Maybe$Just(xs), + prefix); + }); +var _elm_community$list_extra$List_Extra$dropWhileRight = function (p) { + return A2( + _elm_lang$core$List$foldr, + F2( + function (x, xs) { + return (p(x) && _elm_lang$core$List$isEmpty(xs)) ? {ctor: '[]'} : {ctor: '::', _0: x, _1: xs}; + }), + {ctor: '[]'}); +}; +var _elm_community$list_extra$List_Extra$takeWhileRight = function (p) { + var step = F2( + function (x, _p17) { + var _p18 = _p17; + var _p19 = _p18._0; + return (p(x) && _p18._1) ? { + ctor: '_Tuple2', + _0: {ctor: '::', _0: x, _1: _p19}, + _1: true + } : {ctor: '_Tuple2', _0: _p19, _1: false}; + }); + return function (_p20) { + return _elm_lang$core$Tuple$first( + A3( + _elm_lang$core$List$foldr, + step, + { + ctor: '_Tuple2', + _0: {ctor: '[]'}, + _1: true + }, + _p20)); + }; +}; +var _elm_community$list_extra$List_Extra$splitAt = F2( + function (n, xs) { + return { + ctor: '_Tuple2', + _0: A2(_elm_lang$core$List$take, n, xs), + _1: A2(_elm_lang$core$List$drop, n, xs) + }; + }); +var _elm_community$list_extra$List_Extra$groupsOfVarying_ = F3( + function (listOflengths, list, accu) { + groupsOfVarying_: + while (true) { + var _p21 = {ctor: '_Tuple2', _0: listOflengths, _1: list}; + if (((_p21.ctor === '_Tuple2') && (_p21._0.ctor === '::')) && (_p21._1.ctor === '::')) { + var _p22 = A2(_elm_community$list_extra$List_Extra$splitAt, _p21._0._0, list); + var head = _p22._0; + var tail = _p22._1; + var _v11 = _p21._0._1, + _v12 = tail, + _v13 = {ctor: '::', _0: head, _1: accu}; + listOflengths = _v11; + list = _v12; + accu = _v13; + continue groupsOfVarying_; + } else { + return _elm_lang$core$List$reverse(accu); + } + } + }); +var _elm_community$list_extra$List_Extra$groupsOfVarying = F2( + function (listOflengths, list) { + return A3( + _elm_community$list_extra$List_Extra$groupsOfVarying_, + listOflengths, + list, + {ctor: '[]'}); + }); +var _elm_community$list_extra$List_Extra$unfoldr = F2( + function (f, seed) { + var _p23 = f(seed); + if (_p23.ctor === 'Nothing') { + return {ctor: '[]'}; + } else { + return { + ctor: '::', + _0: _p23._0._0, + _1: A2(_elm_community$list_extra$List_Extra$unfoldr, f, _p23._0._1) + }; + } + }); +var _elm_community$list_extra$List_Extra$scanr1 = F2( + function (f, xs_) { + var _p24 = xs_; + if (_p24.ctor === '[]') { + return {ctor: '[]'}; + } else { + if (_p24._1.ctor === '[]') { + return { + ctor: '::', + _0: _p24._0, + _1: {ctor: '[]'} + }; + } else { + var _p25 = A2(_elm_community$list_extra$List_Extra$scanr1, f, _p24._1); + if (_p25.ctor === '::') { + return { + ctor: '::', + _0: A2(f, _p24._0, _p25._0), + _1: _p25 + }; + } else { + return {ctor: '[]'}; + } + } + } + }); +var _elm_community$list_extra$List_Extra$scanr = F3( + function (f, acc, xs_) { + var _p26 = xs_; + if (_p26.ctor === '[]') { + return { + ctor: '::', + _0: acc, + _1: {ctor: '[]'} + }; + } else { + var _p27 = A3(_elm_community$list_extra$List_Extra$scanr, f, acc, _p26._1); + if (_p27.ctor === '::') { + return { + ctor: '::', + _0: A2(f, _p26._0, _p27._0), + _1: _p27 + }; + } else { + return {ctor: '[]'}; + } + } + }); +var _elm_community$list_extra$List_Extra$scanl1 = F2( + function (f, xs_) { + var _p28 = xs_; + if (_p28.ctor === '[]') { + return {ctor: '[]'}; + } else { + return A3(_elm_lang$core$List$scanl, f, _p28._0, _p28._1); + } + }); +var _elm_community$list_extra$List_Extra$indexedFoldr = F3( + function (func, acc, list) { + var step = F2( + function (x, _p29) { + var _p30 = _p29; + var _p31 = _p30._0; + return { + ctor: '_Tuple2', + _0: _p31 - 1, + _1: A3(func, _p31, x, _p30._1) + }; + }); + return _elm_lang$core$Tuple$second( + A3( + _elm_lang$core$List$foldr, + step, + { + ctor: '_Tuple2', + _0: _elm_lang$core$List$length(list) - 1, + _1: acc + }, + list)); + }); +var _elm_community$list_extra$List_Extra$indexedFoldl = F3( + function (func, acc, list) { + var step = F2( + function (x, _p32) { + var _p33 = _p32; + var _p34 = _p33._0; + return { + ctor: '_Tuple2', + _0: _p34 + 1, + _1: A3(func, _p34, x, _p33._1) + }; + }); + return _elm_lang$core$Tuple$second( + A3( + _elm_lang$core$List$foldl, + step, + {ctor: '_Tuple2', _0: 0, _1: acc}, + list)); + }); +var _elm_community$list_extra$List_Extra$foldr1 = F2( + function (f, xs) { + var mf = F2( + function (x, m) { + return _elm_lang$core$Maybe$Just( + function () { + var _p35 = m; + if (_p35.ctor === 'Nothing') { + return x; + } else { + return A2(f, x, _p35._0); + } + }()); + }); + return A3(_elm_lang$core$List$foldr, mf, _elm_lang$core$Maybe$Nothing, xs); + }); +var _elm_community$list_extra$List_Extra$foldl1 = F2( + function (f, xs) { + var mf = F2( + function (x, m) { + return _elm_lang$core$Maybe$Just( + function () { + var _p36 = m; + if (_p36.ctor === 'Nothing') { + return x; + } else { + return A2(f, _p36._0, x); + } + }()); + }); + return A3(_elm_lang$core$List$foldl, mf, _elm_lang$core$Maybe$Nothing, xs); + }); +var _elm_community$list_extra$List_Extra$interweaveHelp = F3( + function (l1, l2, acc) { + interweaveHelp: + while (true) { + var _p37 = {ctor: '_Tuple2', _0: l1, _1: l2}; + _v24_1: + do { + if (_p37._0.ctor === '::') { + if (_p37._1.ctor === '::') { + var _v25 = _p37._0._1, + _v26 = _p37._1._1, + _v27 = A2( + _elm_lang$core$Basics_ops['++'], + acc, + { + ctor: '::', + _0: _p37._0._0, + _1: { + ctor: '::', + _0: _p37._1._0, + _1: {ctor: '[]'} + } + }); + l1 = _v25; + l2 = _v26; + acc = _v27; + continue interweaveHelp; + } else { + break _v24_1; + } + } else { + if (_p37._1.ctor === '[]') { + break _v24_1; + } else { + return A2(_elm_lang$core$Basics_ops['++'], acc, _p37._1); + } + } + } while(false); + return A2(_elm_lang$core$Basics_ops['++'], acc, _p37._0); + } + }); +var _elm_community$list_extra$List_Extra$interweave = F2( + function (l1, l2) { + return A3( + _elm_community$list_extra$List_Extra$interweaveHelp, + l1, + l2, + {ctor: '[]'}); + }); +var _elm_community$list_extra$List_Extra$permutations = function (xs_) { + var _p38 = xs_; + if (_p38.ctor === '[]') { + return { + ctor: '::', + _0: {ctor: '[]'}, + _1: {ctor: '[]'} + }; + } else { + var f = function (_p39) { + var _p40 = _p39; + return A2( + _elm_lang$core$List$map, + F2( + function (x, y) { + return {ctor: '::', _0: x, _1: y}; + })(_p40._0), + _elm_community$list_extra$List_Extra$permutations(_p40._1)); + }; + return A2( + _elm_lang$core$List$concatMap, + f, + _elm_community$list_extra$List_Extra$select(_p38)); + } +}; +var _elm_community$list_extra$List_Extra$isPermutationOf = F2( + function (permut, xs) { + return A2( + _elm_lang$core$List$member, + permut, + _elm_community$list_extra$List_Extra$permutations(xs)); + }); +var _elm_community$list_extra$List_Extra$subsequencesNonEmpty = function (xs) { + var _p41 = xs; + if (_p41.ctor === '[]') { + return {ctor: '[]'}; + } else { + var _p42 = _p41._0; + var f = F2( + function (ys, r) { + return { + ctor: '::', + _0: ys, + _1: { + ctor: '::', + _0: {ctor: '::', _0: _p42, _1: ys}, + _1: r + } + }; + }); + return { + ctor: '::', + _0: { + ctor: '::', + _0: _p42, + _1: {ctor: '[]'} + }, + _1: A3( + _elm_lang$core$List$foldr, + f, + {ctor: '[]'}, + _elm_community$list_extra$List_Extra$subsequencesNonEmpty(_p41._1)) + }; + } +}; +var _elm_community$list_extra$List_Extra$subsequences = function (xs) { + return { + ctor: '::', + _0: {ctor: '[]'}, + _1: _elm_community$list_extra$List_Extra$subsequencesNonEmpty(xs) + }; +}; +var _elm_community$list_extra$List_Extra$isSubsequenceOf = F2( + function (subseq, xs) { + return A2( + _elm_lang$core$List$member, + subseq, + _elm_community$list_extra$List_Extra$subsequences(xs)); + }); +var _elm_community$list_extra$List_Extra$transpose = function (ll) { + transpose: + while (true) { + var _p43 = ll; + if (_p43.ctor === '[]') { + return {ctor: '[]'}; + } else { + if (_p43._0.ctor === '[]') { + var _v32 = _p43._1; + ll = _v32; + continue transpose; + } else { + var _p44 = _p43._1; + var tails = A2(_elm_lang$core$List$filterMap, _elm_lang$core$List$tail, _p44); + var heads = A2(_elm_lang$core$List$filterMap, _elm_lang$core$List$head, _p44); + return { + ctor: '::', + _0: {ctor: '::', _0: _p43._0._0, _1: heads}, + _1: _elm_community$list_extra$List_Extra$transpose( + {ctor: '::', _0: _p43._0._1, _1: tails}) + }; + } + } + } +}; +var _elm_community$list_extra$List_Extra$intercalate = function (xs) { + return function (_p45) { + return _elm_lang$core$List$concat( + A2(_elm_lang$core$List$intersperse, xs, _p45)); + }; +}; +var _elm_community$list_extra$List_Extra$filterNot = F2( + function (pred, list) { + return A2( + _elm_lang$core$List$filter, + function (_p46) { + return !pred(_p46); + }, + list); + }); +var _elm_community$list_extra$List_Extra$removeAt = F2( + function (index, l) { + if (_elm_lang$core$Native_Utils.cmp(index, 0) < 0) { + return l; + } else { + var tail = _elm_lang$core$List$tail( + A2(_elm_lang$core$List$drop, index, l)); + var head = A2(_elm_lang$core$List$take, index, l); + var _p47 = tail; + if (_p47.ctor === 'Nothing') { + return l; + } else { + return A2(_elm_lang$core$List$append, head, _p47._0); + } + } + }); +var _elm_community$list_extra$List_Extra$stableSortWith = F2( + function (pred, list) { + var predWithIndex = F2( + function (_p49, _p48) { + var _p50 = _p49; + var _p51 = _p48; + var result = A2(pred, _p50._0, _p51._0); + var _p52 = result; + if (_p52.ctor === 'EQ') { + return A2(_elm_lang$core$Basics$compare, _p50._1, _p51._1); + } else { + return result; + } + }); + var listWithIndex = A2( + _elm_lang$core$List$indexedMap, + F2( + function (i, a) { + return {ctor: '_Tuple2', _0: a, _1: i}; + }), + list); + return A2( + _elm_lang$core$List$map, + _elm_lang$core$Tuple$first, + A2(_elm_lang$core$List$sortWith, predWithIndex, listWithIndex)); + }); +var _elm_community$list_extra$List_Extra$setAt = F3( + function (index, value, l) { + if (_elm_lang$core$Native_Utils.cmp(index, 0) < 0) { + return _elm_lang$core$Maybe$Nothing; + } else { + var tail = _elm_lang$core$List$tail( + A2(_elm_lang$core$List$drop, index, l)); + var head = A2(_elm_lang$core$List$take, index, l); + var _p53 = tail; + if (_p53.ctor === 'Nothing') { + return _elm_lang$core$Maybe$Nothing; + } else { + return _elm_lang$core$Maybe$Just( + A2( + _elm_lang$core$List$append, + head, + {ctor: '::', _0: value, _1: _p53._0})); + } + } + }); +var _elm_community$list_extra$List_Extra$remove = F2( + function (x, xs) { + var _p54 = xs; + if (_p54.ctor === '[]') { + return {ctor: '[]'}; + } else { + var _p56 = _p54._1; + var _p55 = _p54._0; + return _elm_lang$core$Native_Utils.eq(x, _p55) ? _p56 : { + ctor: '::', + _0: _p55, + _1: A2(_elm_community$list_extra$List_Extra$remove, x, _p56) + }; + } + }); +var _elm_community$list_extra$List_Extra$updateIfIndex = F3( + function (predicate, update, list) { + return A2( + _elm_lang$core$List$indexedMap, + F2( + function (i, x) { + return predicate(i) ? update(x) : x; + }), + list); + }); +var _elm_community$list_extra$List_Extra$updateAt = F3( + function (index, update, list) { + return ((_elm_lang$core$Native_Utils.cmp(index, 0) < 0) || (_elm_lang$core$Native_Utils.cmp( + index, + _elm_lang$core$List$length(list)) > -1)) ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$Maybe$Just( + A3( + _elm_community$list_extra$List_Extra$updateIfIndex, + F2( + function (x, y) { + return _elm_lang$core$Native_Utils.eq(x, y); + })(index), + update, + list)); + }); +var _elm_community$list_extra$List_Extra$updateIf = F3( + function (predicate, update, list) { + return A2( + _elm_lang$core$List$map, + function (item) { + return predicate(item) ? update(item) : item; + }, + list); + }); +var _elm_community$list_extra$List_Extra$replaceIf = F3( + function (predicate, replacement, list) { + return A3( + _elm_community$list_extra$List_Extra$updateIf, + predicate, + _elm_lang$core$Basics$always(replacement), + list); + }); +var _elm_community$list_extra$List_Extra$findIndices = function (p) { + return function (_p57) { + return A2( + _elm_lang$core$List$map, + _elm_lang$core$Tuple$first, + A2( + _elm_lang$core$List$filter, + function (_p58) { + var _p59 = _p58; + return p(_p59._1); + }, + A2( + _elm_lang$core$List$indexedMap, + F2( + function (v0, v1) { + return {ctor: '_Tuple2', _0: v0, _1: v1}; + }), + _p57))); + }; +}; +var _elm_community$list_extra$List_Extra$findIndex = function (p) { + return function (_p60) { + return _elm_lang$core$List$head( + A2(_elm_community$list_extra$List_Extra$findIndices, p, _p60)); + }; +}; +var _elm_community$list_extra$List_Extra$splitWhen = F2( + function (predicate, list) { + return A2( + _elm_lang$core$Maybe$map, + function (i) { + return A2(_elm_community$list_extra$List_Extra$splitAt, i, list); + }, + A2(_elm_community$list_extra$List_Extra$findIndex, predicate, list)); + }); +var _elm_community$list_extra$List_Extra$elemIndices = function (x) { + return _elm_community$list_extra$List_Extra$findIndices( + F2( + function (x, y) { + return _elm_lang$core$Native_Utils.eq(x, y); + })(x)); +}; +var _elm_community$list_extra$List_Extra$elemIndex = function (x) { + return _elm_community$list_extra$List_Extra$findIndex( + F2( + function (x, y) { + return _elm_lang$core$Native_Utils.eq(x, y); + })(x)); +}; +var _elm_community$list_extra$List_Extra$find = F2( + function (predicate, list) { + find: + while (true) { + var _p61 = list; + if (_p61.ctor === '[]') { + return _elm_lang$core$Maybe$Nothing; + } else { + var _p62 = _p61._0; + if (predicate(_p62)) { + return _elm_lang$core$Maybe$Just(_p62); + } else { + var _v41 = predicate, + _v42 = _p61._1; + predicate = _v41; + list = _v42; + continue find; + } + } + } + }); +var _elm_community$list_extra$List_Extra$notMember = function (x) { + return function (_p63) { + return !A2(_elm_lang$core$List$member, x, _p63); + }; +}; +var _elm_community$list_extra$List_Extra$andThen = _elm_lang$core$List$concatMap; +var _elm_community$list_extra$List_Extra$lift2 = F3( + function (f, la, lb) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (a) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (b) { + return { + ctor: '::', + _0: A2(f, a, b), + _1: {ctor: '[]'} + }; + }, + lb); + }, + la); + }); +var _elm_community$list_extra$List_Extra$lift3 = F4( + function (f, la, lb, lc) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (a) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (b) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (c) { + return { + ctor: '::', + _0: A3(f, a, b, c), + _1: {ctor: '[]'} + }; + }, + lc); + }, + lb); + }, + la); + }); +var _elm_community$list_extra$List_Extra$lift4 = F5( + function (f, la, lb, lc, ld) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (a) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (b) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (c) { + return A2( + _elm_community$list_extra$List_Extra$andThen, + function (d) { + return { + ctor: '::', + _0: A4(f, a, b, c, d), + _1: {ctor: '[]'} + }; + }, + ld); + }, + lc); + }, + lb); + }, + la); + }); +var _elm_community$list_extra$List_Extra$andMap = F2( + function (l, fl) { + return A3( + _elm_lang$core$List$map2, + F2( + function (x, y) { + return x(y); + }), + fl, + l); + }); +var _elm_community$list_extra$List_Extra$uniqueHelp = F3( + function (f, existing, remaining) { + uniqueHelp: + while (true) { + var _p64 = remaining; + if (_p64.ctor === '[]') { + return {ctor: '[]'}; + } else { + var _p66 = _p64._1; + var _p65 = _p64._0; + var computedFirst = f(_p65); + if (A2(_elm_lang$core$Set$member, computedFirst, existing)) { + var _v44 = f, + _v45 = existing, + _v46 = _p66; + f = _v44; + existing = _v45; + remaining = _v46; + continue uniqueHelp; + } else { + return { + ctor: '::', + _0: _p65, + _1: A3( + _elm_community$list_extra$List_Extra$uniqueHelp, + f, + A2(_elm_lang$core$Set$insert, computedFirst, existing), + _p66) + }; + } + } + } + }); +var _elm_community$list_extra$List_Extra$uniqueBy = F2( + function (f, list) { + return A3(_elm_community$list_extra$List_Extra$uniqueHelp, f, _elm_lang$core$Set$empty, list); + }); +var _elm_community$list_extra$List_Extra$allDifferentBy = F2( + function (f, list) { + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$List$length(list), + _elm_lang$core$List$length( + A2(_elm_community$list_extra$List_Extra$uniqueBy, f, list))); + }); +var _elm_community$list_extra$List_Extra$allDifferent = function (list) { + return A2(_elm_community$list_extra$List_Extra$allDifferentBy, _elm_lang$core$Basics$identity, list); +}; +var _elm_community$list_extra$List_Extra$unique = function (list) { + return A3(_elm_community$list_extra$List_Extra$uniqueHelp, _elm_lang$core$Basics$identity, _elm_lang$core$Set$empty, list); +}; +var _elm_community$list_extra$List_Extra$dropWhile = F2( + function (predicate, list) { + dropWhile: + while (true) { + var _p67 = list; + if (_p67.ctor === '[]') { + return {ctor: '[]'}; + } else { + if (predicate(_p67._0)) { + var _v48 = predicate, + _v49 = _p67._1; + predicate = _v48; + list = _v49; + continue dropWhile; + } else { + return list; + } + } + } + }); +var _elm_community$list_extra$List_Extra$takeWhile = function (predicate) { + var takeWhileMemo = F2( + function (memo, list) { + takeWhileMemo: + while (true) { + var _p68 = list; + if (_p68.ctor === '[]') { + return _elm_lang$core$List$reverse(memo); + } else { + var _p69 = _p68._0; + if (predicate(_p69)) { + var _v51 = {ctor: '::', _0: _p69, _1: memo}, + _v52 = _p68._1; + memo = _v51; + list = _v52; + continue takeWhileMemo; + } else { + return _elm_lang$core$List$reverse(memo); + } + } + } + }); + return takeWhileMemo( + {ctor: '[]'}); +}; +var _elm_community$list_extra$List_Extra$span = F2( + function (p, xs) { + return { + ctor: '_Tuple2', + _0: A2(_elm_community$list_extra$List_Extra$takeWhile, p, xs), + _1: A2(_elm_community$list_extra$List_Extra$dropWhile, p, xs) + }; + }); +var _elm_community$list_extra$List_Extra$break = function (p) { + return _elm_community$list_extra$List_Extra$span( + function (_p70) { + return !p(_p70); + }); +}; +var _elm_community$list_extra$List_Extra$groupWhile = F2( + function (eq, xs_) { + var _p71 = xs_; + if (_p71.ctor === '[]') { + return {ctor: '[]'}; + } else { + var _p73 = _p71._0; + var _p72 = A2( + _elm_community$list_extra$List_Extra$span, + eq(_p73), + _p71._1); + var ys = _p72._0; + var zs = _p72._1; + return { + ctor: '::', + _0: {ctor: '::', _0: _p73, _1: ys}, + _1: A2(_elm_community$list_extra$List_Extra$groupWhile, eq, zs) + }; + } + }); +var _elm_community$list_extra$List_Extra$group = _elm_community$list_extra$List_Extra$groupWhile( + F2( + function (x, y) { + return _elm_lang$core$Native_Utils.eq(x, y); + })); +var _elm_community$list_extra$List_Extra$minimumBy = F2( + function (f, ls) { + var minBy = F2( + function (x, _p74) { + var _p75 = _p74; + var _p76 = _p75._1; + var fx = f(x); + return (_elm_lang$core$Native_Utils.cmp(fx, _p76) < 0) ? {ctor: '_Tuple2', _0: x, _1: fx} : {ctor: '_Tuple2', _0: _p75._0, _1: _p76}; + }); + var _p77 = ls; + if (_p77.ctor === '::') { + if (_p77._1.ctor === '[]') { + return _elm_lang$core$Maybe$Just(_p77._0); + } else { + var _p78 = _p77._0; + return _elm_lang$core$Maybe$Just( + _elm_lang$core$Tuple$first( + A3( + _elm_lang$core$List$foldl, + minBy, + { + ctor: '_Tuple2', + _0: _p78, + _1: f(_p78) + }, + _p77._1))); + } + } else { + return _elm_lang$core$Maybe$Nothing; + } + }); +var _elm_community$list_extra$List_Extra$maximumBy = F2( + function (f, ls) { + var maxBy = F2( + function (x, _p79) { + var _p80 = _p79; + var _p81 = _p80._1; + var fx = f(x); + return (_elm_lang$core$Native_Utils.cmp(fx, _p81) > 0) ? {ctor: '_Tuple2', _0: x, _1: fx} : {ctor: '_Tuple2', _0: _p80._0, _1: _p81}; + }); + var _p82 = ls; + if (_p82.ctor === '::') { + if (_p82._1.ctor === '[]') { + return _elm_lang$core$Maybe$Just(_p82._0); + } else { + var _p83 = _p82._0; + return _elm_lang$core$Maybe$Just( + _elm_lang$core$Tuple$first( + A3( + _elm_lang$core$List$foldl, + maxBy, + { + ctor: '_Tuple2', + _0: _p83, + _1: f(_p83) + }, + _p82._1))); + } + } else { + return _elm_lang$core$Maybe$Nothing; + } + }); +var _elm_community$list_extra$List_Extra$uncons = function (xs) { + var _p84 = xs; + if (_p84.ctor === '[]') { + return _elm_lang$core$Maybe$Nothing; + } else { + return _elm_lang$core$Maybe$Just( + {ctor: '_Tuple2', _0: _p84._0, _1: _p84._1}); + } +}; +var _elm_community$list_extra$List_Extra$swapAt = F3( + function (index1, index2, l) { + swapAt: + while (true) { + if (_elm_lang$core$Native_Utils.eq(index1, index2)) { + return _elm_lang$core$Maybe$Just(l); + } else { + if (_elm_lang$core$Native_Utils.cmp(index1, index2) > 0) { + var _v59 = index2, + _v60 = index1, + _v61 = l; + index1 = _v59; + index2 = _v60; + l = _v61; + continue swapAt; + } else { + if (_elm_lang$core$Native_Utils.cmp(index1, 0) < 0) { + return _elm_lang$core$Maybe$Nothing; + } else { + var _p85 = A2(_elm_community$list_extra$List_Extra$splitAt, index1, l); + var part1 = _p85._0; + var tail1 = _p85._1; + var _p86 = A2(_elm_community$list_extra$List_Extra$splitAt, index2 - index1, tail1); + var head2 = _p86._0; + var tail2 = _p86._1; + return A3( + _elm_lang$core$Maybe$map2, + F2( + function (_p88, _p87) { + var _p89 = _p88; + var _p90 = _p87; + return _elm_lang$core$List$concat( + { + ctor: '::', + _0: part1, + _1: { + ctor: '::', + _0: {ctor: '::', _0: _p90._0, _1: _p89._1}, + _1: { + ctor: '::', + _0: {ctor: '::', _0: _p89._0, _1: _p90._1}, + _1: {ctor: '[]'} + } + } + }); + }), + _elm_community$list_extra$List_Extra$uncons(head2), + _elm_community$list_extra$List_Extra$uncons(tail2)); + } + } + } + } + }); +var _elm_community$list_extra$List_Extra$iterate = F2( + function (f, x) { + var _p91 = f(x); + if (_p91.ctor === 'Just') { + return { + ctor: '::', + _0: x, + _1: A2(_elm_community$list_extra$List_Extra$iterate, f, _p91._0) + }; + } else { + return { + ctor: '::', + _0: x, + _1: {ctor: '[]'} + }; + } + }); +var _elm_community$list_extra$List_Extra$getAt = F2( + function (idx, xs) { + return (_elm_lang$core$Native_Utils.cmp(idx, 0) < 0) ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$List$head( + A2(_elm_lang$core$List$drop, idx, xs)); + }); +var _elm_community$list_extra$List_Extra_ops = _elm_community$list_extra$List_Extra_ops || {}; +_elm_community$list_extra$List_Extra_ops['!!'] = _elm_lang$core$Basics$flip(_elm_community$list_extra$List_Extra$getAt); +var _elm_community$list_extra$List_Extra$init = function () { + var maybe = F2( + function (d, f) { + return function (_p92) { + return A2( + _elm_lang$core$Maybe$withDefault, + d, + A2(_elm_lang$core$Maybe$map, f, _p92)); + }; + }); + return A2( + _elm_lang$core$List$foldr, + function (x) { + return function (_p93) { + return _elm_lang$core$Maybe$Just( + A3( + maybe, + {ctor: '[]'}, + F2( + function (x, y) { + return {ctor: '::', _0: x, _1: y}; + })(x), + _p93)); + }; + }, + _elm_lang$core$Maybe$Nothing); +}(); +var _elm_community$list_extra$List_Extra$last = _elm_community$list_extra$List_Extra$foldl1( + _elm_lang$core$Basics$flip(_elm_lang$core$Basics$always)); + +//import Maybe, Native.List // + +var _elm_lang$core$Native_Regex = function() { + +function escape(str) +{ + return str.replace(/[-\/\\^$*+?.()|[\]{}]/g, '\\$&'); +} +function caseInsensitive(re) +{ + return new RegExp(re.source, 'gi'); +} +function regex(raw) +{ + return new RegExp(raw, 'g'); +} + +function contains(re, string) +{ + return string.match(re) !== null; +} + +function find(n, re, str) +{ + n = n.ctor === 'All' ? Infinity : n._0; + var out = []; + var number = 0; + var string = str; + var lastIndex = re.lastIndex; + var prevLastIndex = -1; + var result; + while (number++ < n && (result = re.exec(string))) + { + if (prevLastIndex === re.lastIndex) break; + var i = result.length - 1; + var subs = new Array(i); + while (i > 0) + { + var submatch = result[i]; + subs[--i] = submatch === undefined + ? _elm_lang$core$Maybe$Nothing + : _elm_lang$core$Maybe$Just(submatch); + } + out.push({ + match: result[0], + submatches: _elm_lang$core$Native_List.fromArray(subs), + index: result.index, + number: number + }); + prevLastIndex = re.lastIndex; + } + re.lastIndex = lastIndex; + return _elm_lang$core$Native_List.fromArray(out); +} + +function replace(n, re, replacer, string) +{ + n = n.ctor === 'All' ? Infinity : n._0; + var count = 0; + function jsReplacer(match) + { + if (count++ >= n) + { + return match; + } + var i = arguments.length - 3; + var submatches = new Array(i); + while (i > 0) + { + var submatch = arguments[i]; + submatches[--i] = submatch === undefined + ? _elm_lang$core$Maybe$Nothing + : _elm_lang$core$Maybe$Just(submatch); + } + return replacer({ + match: match, + submatches: _elm_lang$core$Native_List.fromArray(submatches), + index: arguments[arguments.length - 2], + number: count + }); + } + return string.replace(re, jsReplacer); +} + +function split(n, re, str) +{ + n = n.ctor === 'All' ? Infinity : n._0; + if (n === Infinity) + { + return _elm_lang$core$Native_List.fromArray(str.split(re)); + } + var string = str; + var result; + var out = []; + var start = re.lastIndex; + var restoreLastIndex = re.lastIndex; + while (n--) + { + if (!(result = re.exec(string))) break; + out.push(string.slice(start, result.index)); + start = re.lastIndex; + } + out.push(string.slice(start)); + re.lastIndex = restoreLastIndex; + return _elm_lang$core$Native_List.fromArray(out); +} + +return { + regex: regex, + caseInsensitive: caseInsensitive, + escape: escape, + + contains: F2(contains), + find: F3(find), + replace: F4(replace), + split: F3(split) +}; + +}(); + +var _elm_lang$core$Regex$split = _elm_lang$core$Native_Regex.split; +var _elm_lang$core$Regex$replace = _elm_lang$core$Native_Regex.replace; +var _elm_lang$core$Regex$find = _elm_lang$core$Native_Regex.find; +var _elm_lang$core$Regex$contains = _elm_lang$core$Native_Regex.contains; +var _elm_lang$core$Regex$caseInsensitive = _elm_lang$core$Native_Regex.caseInsensitive; +var _elm_lang$core$Regex$regex = _elm_lang$core$Native_Regex.regex; +var _elm_lang$core$Regex$escape = _elm_lang$core$Native_Regex.escape; +var _elm_lang$core$Regex$Match = F4( + function (a, b, c, d) { + return {match: a, submatches: b, index: c, number: d}; + }); +var _elm_lang$core$Regex$Regex = {ctor: 'Regex'}; +var _elm_lang$core$Regex$AtMost = function (a) { + return {ctor: 'AtMost', _0: a}; +}; +var _elm_lang$core$Regex$All = {ctor: 'All'}; + +var _elm_lang$core$Native_Bitwise = function() { + +return { + and: F2(function and(a, b) { return a & b; }), + or: F2(function or(a, b) { return a | b; }), + xor: F2(function xor(a, b) { return a ^ b; }), + complement: function complement(a) { return ~a; }, + shiftLeftBy: F2(function(offset, a) { return a << offset; }), + shiftRightBy: F2(function(offset, a) { return a >> offset; }), + shiftRightZfBy: F2(function(offset, a) { return a >>> offset; }) +}; + +}(); + +var _elm_lang$core$Bitwise$shiftRightZfBy = _elm_lang$core$Native_Bitwise.shiftRightZfBy; +var _elm_lang$core$Bitwise$shiftRightBy = _elm_lang$core$Native_Bitwise.shiftRightBy; +var _elm_lang$core$Bitwise$shiftLeftBy = _elm_lang$core$Native_Bitwise.shiftLeftBy; +var _elm_lang$core$Bitwise$complement = _elm_lang$core$Native_Bitwise.complement; +var _elm_lang$core$Bitwise$xor = _elm_lang$core$Native_Bitwise.xor; +var _elm_lang$core$Bitwise$or = _elm_lang$core$Native_Bitwise.or; +var _elm_lang$core$Bitwise$and = _elm_lang$core$Native_Bitwise.and; + +var _elm_community$string_extra$String_Extra$nonEmpty = function (string) { + return _elm_lang$core$String$isEmpty(string) ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$Maybe$Just(string); +}; +var _elm_community$string_extra$String_Extra$replacementCodePoint = 65533; +var _elm_community$string_extra$String_Extra$toCodePoints = function (string) { + var allCodeUnits = A2( + _elm_lang$core$List$map, + _elm_lang$core$Char$toCode, + _elm_lang$core$String$toList(string)); + var combineAndReverse = F2( + function (codeUnits, accumulated) { + combineAndReverse: + while (true) { + var _p0 = codeUnits; + if (_p0.ctor === '[]') { + return accumulated; + } else { + var _p4 = _p0._0; + var _p3 = _p0._1; + if ((_elm_lang$core$Native_Utils.cmp(_p4, 0) > -1) && (_elm_lang$core$Native_Utils.cmp(_p4, 55295) < 1)) { + var _v1 = _p3, + _v2 = {ctor: '::', _0: _p4, _1: accumulated}; + codeUnits = _v1; + accumulated = _v2; + continue combineAndReverse; + } else { + if ((_elm_lang$core$Native_Utils.cmp(_p4, 55296) > -1) && (_elm_lang$core$Native_Utils.cmp(_p4, 56319) < 1)) { + var _p1 = _p3; + if (_p1.ctor === '[]') { + return {ctor: '::', _0: _elm_community$string_extra$String_Extra$replacementCodePoint, _1: accumulated}; + } else { + var _p2 = _p1._0; + if ((_elm_lang$core$Native_Utils.cmp(_p2, 56320) > -1) && (_elm_lang$core$Native_Utils.cmp(_p2, 57343) < 1)) { + var codePoint = (65536 + ((_p4 - 55296) * 1024)) + (_p2 - 56320); + var _v4 = _p1._1, + _v5 = {ctor: '::', _0: codePoint, _1: accumulated}; + codeUnits = _v4; + accumulated = _v5; + continue combineAndReverse; + } else { + var _v6 = _p3, + _v7 = {ctor: '::', _0: _elm_community$string_extra$String_Extra$replacementCodePoint, _1: accumulated}; + codeUnits = _v6; + accumulated = _v7; + continue combineAndReverse; + } + } + } else { + if ((_elm_lang$core$Native_Utils.cmp(_p4, 57344) > -1) && (_elm_lang$core$Native_Utils.cmp(_p4, 65535) < 1)) { + var _v8 = _p3, + _v9 = {ctor: '::', _0: _p4, _1: accumulated}; + codeUnits = _v8; + accumulated = _v9; + continue combineAndReverse; + } else { + var _v10 = _p3, + _v11 = {ctor: '::', _0: _elm_community$string_extra$String_Extra$replacementCodePoint, _1: accumulated}; + codeUnits = _v10; + accumulated = _v11; + continue combineAndReverse; + } + } + } + } + } + }); + return _elm_lang$core$List$reverse( + A2( + combineAndReverse, + allCodeUnits, + {ctor: '[]'})); +}; +var _elm_community$string_extra$String_Extra$fromCodePoints = function (allCodePoints) { + var splitAndReverse = F2( + function (codePoints, accumulated) { + splitAndReverse: + while (true) { + var _p5 = codePoints; + if (_p5.ctor === '[]') { + return accumulated; + } else { + var _p7 = _p5._1; + var _p6 = _p5._0; + if ((_elm_lang$core$Native_Utils.cmp(_p6, 0) > -1) && (_elm_lang$core$Native_Utils.cmp(_p6, 55295) < 1)) { + var _v13 = _p7, + _v14 = {ctor: '::', _0: _p6, _1: accumulated}; + codePoints = _v13; + accumulated = _v14; + continue splitAndReverse; + } else { + if ((_elm_lang$core$Native_Utils.cmp(_p6, 65536) > -1) && (_elm_lang$core$Native_Utils.cmp(_p6, 1114111) < 1)) { + var subtracted = _p6 - 65536; + var leading = (subtracted >> 10) + 55296; + var trailing = (subtracted & 1023) + 56320; + var _v15 = _p7, + _v16 = { + ctor: '::', + _0: trailing, + _1: {ctor: '::', _0: leading, _1: accumulated} + }; + codePoints = _v15; + accumulated = _v16; + continue splitAndReverse; + } else { + if ((_elm_lang$core$Native_Utils.cmp(_p6, 57344) > -1) && (_elm_lang$core$Native_Utils.cmp(_p6, 65535) < 1)) { + var _v17 = _p7, + _v18 = {ctor: '::', _0: _p6, _1: accumulated}; + codePoints = _v17; + accumulated = _v18; + continue splitAndReverse; + } else { + var _v19 = _p7, + _v20 = {ctor: '::', _0: _elm_community$string_extra$String_Extra$replacementCodePoint, _1: accumulated}; + codePoints = _v19; + accumulated = _v20; + continue splitAndReverse; + } + } + } + } + } + }); + var allCodeUnits = _elm_lang$core$List$reverse( + A2( + splitAndReverse, + allCodePoints, + {ctor: '[]'})); + return _elm_lang$core$String$fromList( + A2(_elm_lang$core$List$map, _elm_lang$core$Char$fromCode, allCodeUnits)); +}; +var _elm_community$string_extra$String_Extra$fromFloat = _elm_lang$core$Basics$toString; +var _elm_community$string_extra$String_Extra$fromInt = _elm_lang$core$Basics$toString; +var _elm_community$string_extra$String_Extra$leftOfBack = F2( + function (pattern, string) { + return A2( + _elm_lang$core$Maybe$withDefault, + '', + A2( + _elm_lang$core$Maybe$map, + A2(_elm_lang$core$Basics$flip, _elm_lang$core$String$left, string), + _elm_lang$core$List$head( + _elm_lang$core$List$reverse( + A2(_elm_lang$core$String$indexes, pattern, string))))); + }); +var _elm_community$string_extra$String_Extra$rightOfBack = F2( + function (pattern, string) { + return A2( + _elm_lang$core$Maybe$withDefault, + '', + A2( + _elm_lang$core$Maybe$map, + function (_p8) { + return A3( + _elm_lang$core$Basics$flip, + _elm_lang$core$String$dropLeft, + string, + A2( + F2( + function (x, y) { + return x + y; + }), + _elm_lang$core$String$length(pattern), + _p8)); + }, + _elm_lang$core$List$head( + _elm_lang$core$List$reverse( + A2(_elm_lang$core$String$indexes, pattern, string))))); + }); +var _elm_community$string_extra$String_Extra$firstResultHelp = F2( + function ($default, list) { + firstResultHelp: + while (true) { + var _p9 = list; + if (_p9.ctor === '[]') { + return $default; + } else { + if (_p9._0.ctor === 'Just') { + return _p9._0._0; + } else { + var _v22 = $default, + _v23 = _p9._1; + $default = _v22; + list = _v23; + continue firstResultHelp; + } + } + } + }); +var _elm_community$string_extra$String_Extra$firstResult = function (list) { + return A2(_elm_community$string_extra$String_Extra$firstResultHelp, '', list); +}; +var _elm_community$string_extra$String_Extra$leftOf = F2( + function (pattern, string) { + return A2( + _elm_lang$core$String$join, + '', + A2( + _elm_lang$core$List$map, + function (_p10) { + return _elm_community$string_extra$String_Extra$firstResult( + function (_) { + return _.submatches; + }(_p10)); + }, + A3( + _elm_lang$core$Regex$find, + _elm_lang$core$Regex$AtMost(1), + _elm_lang$core$Regex$regex( + A2( + _elm_lang$core$Basics_ops['++'], + '^(.*?)', + _elm_lang$core$Regex$escape(pattern))), + string))); + }); +var _elm_community$string_extra$String_Extra$rightOf = F2( + function (pattern, string) { + return A2( + _elm_lang$core$String$join, + '', + A2( + _elm_lang$core$List$map, + function (_p11) { + return _elm_community$string_extra$String_Extra$firstResult( + function (_) { + return _.submatches; + }(_p11)); + }, + A3( + _elm_lang$core$Regex$find, + _elm_lang$core$Regex$AtMost(1), + _elm_lang$core$Regex$regex( + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Regex$escape(pattern), + '(.*)$')), + string))); + }); +var _elm_community$string_extra$String_Extra$pluralize = F3( + function (singular, plural, count) { + return _elm_lang$core$Native_Utils.eq(count, 1) ? A2(_elm_lang$core$Basics_ops['++'], '1 ', singular) : A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(count), + A2(_elm_lang$core$Basics_ops['++'], ' ', plural)); + }); +var _elm_community$string_extra$String_Extra$stripTags = function (string) { + return A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('<\\/?[^>]+>'), + _elm_lang$core$Basics$always(''), + string); +}; +var _elm_community$string_extra$String_Extra$toSentenceHelper = F3( + function (lastPart, sentence, list) { + toSentenceHelper: + while (true) { + var _p12 = list; + if (_p12.ctor === '[]') { + return sentence; + } else { + if (_p12._1.ctor === '[]') { + return A2( + _elm_lang$core$Basics_ops['++'], + sentence, + A2(_elm_lang$core$Basics_ops['++'], lastPart, _p12._0)); + } else { + var _v25 = lastPart, + _v26 = A2( + _elm_lang$core$Basics_ops['++'], + sentence, + A2(_elm_lang$core$Basics_ops['++'], ', ', _p12._0)), + _v27 = _p12._1; + lastPart = _v25; + sentence = _v26; + list = _v27; + continue toSentenceHelper; + } + } + } + }); +var _elm_community$string_extra$String_Extra$toSentenceBaseCase = function (list) { + var _p13 = list; + _v28_2: + do { + if (_p13.ctor === '::') { + if (_p13._1.ctor === '[]') { + return _p13._0; + } else { + if (_p13._1._1.ctor === '[]') { + return A2( + _elm_lang$core$Basics_ops['++'], + _p13._0, + A2(_elm_lang$core$Basics_ops['++'], ' and ', _p13._1._0)); + } else { + break _v28_2; + } + } + } else { + break _v28_2; + } + } while(false); + return ''; +}; +var _elm_community$string_extra$String_Extra$toSentenceOxford = function (list) { + var _p14 = list; + if (((_p14.ctor === '::') && (_p14._1.ctor === '::')) && (_p14._1._1.ctor === '::')) { + return A3( + _elm_community$string_extra$String_Extra$toSentenceHelper, + ', and ', + A2( + _elm_lang$core$Basics_ops['++'], + _p14._0, + A2(_elm_lang$core$Basics_ops['++'], ', ', _p14._1._0)), + {ctor: '::', _0: _p14._1._1._0, _1: _p14._1._1._1}); + } else { + return _elm_community$string_extra$String_Extra$toSentenceBaseCase(list); + } +}; +var _elm_community$string_extra$String_Extra$toSentence = function (list) { + var _p15 = list; + if (((_p15.ctor === '::') && (_p15._1.ctor === '::')) && (_p15._1._1.ctor === '::')) { + return A3( + _elm_community$string_extra$String_Extra$toSentenceHelper, + ' and ', + A2( + _elm_lang$core$Basics_ops['++'], + _p15._0, + A2(_elm_lang$core$Basics_ops['++'], ', ', _p15._1._0)), + {ctor: '::', _0: _p15._1._1._0, _1: _p15._1._1._1}); + } else { + return _elm_community$string_extra$String_Extra$toSentenceBaseCase(list); + } +}; +var _elm_community$string_extra$String_Extra$ellipsisWith = F3( + function (howLong, append, string) { + return (_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$String$length(string), + howLong) < 1) ? string : A2( + _elm_lang$core$Basics_ops['++'], + A2( + _elm_lang$core$String$left, + howLong - _elm_lang$core$String$length(append), + string), + append); + }); +var _elm_community$string_extra$String_Extra$ellipsis = F2( + function (howLong, string) { + return A3(_elm_community$string_extra$String_Extra$ellipsisWith, howLong, '...', string); + }); +var _elm_community$string_extra$String_Extra$countOccurrences = F2( + function (needle, haystack) { + return (_elm_lang$core$Native_Utils.eq( + _elm_lang$core$String$length(needle), + 0) || _elm_lang$core$Native_Utils.eq( + _elm_lang$core$String$length(haystack), + 0)) ? 0 : _elm_lang$core$List$length( + A2(_elm_lang$core$String$indexes, needle, haystack)); + }); +var _elm_community$string_extra$String_Extra$unindent = function (multilineSting) { + var isNotWhitespace = function ($char) { + return (!_elm_lang$core$Native_Utils.eq( + $char, + _elm_lang$core$Native_Utils.chr(' '))) && (!_elm_lang$core$Native_Utils.eq( + $char, + _elm_lang$core$Native_Utils.chr('\t'))); + }; + var countLeadingWhitespace = F2( + function (count, line) { + countLeadingWhitespace: + while (true) { + var _p16 = _elm_lang$core$String$uncons(line); + if (_p16.ctor === 'Nothing') { + return count; + } else { + var _p18 = _p16._0._1; + var _p17 = _p16._0._0; + switch (_p17.valueOf()) { + case ' ': + var _v33 = count + 1, + _v34 = _p18; + count = _v33; + line = _v34; + continue countLeadingWhitespace; + case '\t': + var _v35 = count + 1, + _v36 = _p18; + count = _v35; + line = _v36; + continue countLeadingWhitespace; + default: + return count; + } + } + } + }); + var lines = _elm_lang$core$String$lines(multilineSting); + var minLead = A2( + _elm_lang$core$Maybe$withDefault, + 0, + _elm_lang$core$List$minimum( + A2( + _elm_lang$core$List$map, + countLeadingWhitespace(0), + A2( + _elm_lang$core$List$filter, + _elm_lang$core$String$any(isNotWhitespace), + lines)))); + return A2( + _elm_lang$core$String$join, + '\n', + A2( + _elm_lang$core$List$map, + _elm_lang$core$String$dropLeft(minLead), + lines)); +}; +var _elm_community$string_extra$String_Extra$dasherize = function (string) { + return _elm_lang$core$String$toLower( + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('[_-\\s]+'), + _elm_lang$core$Basics$always('-'), + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('([A-Z])'), + function (_p19) { + return A2( + _elm_lang$core$String$append, + '-', + function (_) { + return _.match; + }(_p19)); + }, + _elm_lang$core$String$trim(string)))); +}; +var _elm_community$string_extra$String_Extra$underscored = function (string) { + return _elm_lang$core$String$toLower( + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('[_-\\s]+'), + _elm_lang$core$Basics$always('_'), + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('([a-z\\d])([A-Z]+)'), + function (_p20) { + return A2( + _elm_lang$core$String$join, + '_', + A2( + _elm_lang$core$List$filterMap, + _elm_lang$core$Basics$identity, + function (_) { + return _.submatches; + }(_p20))); + }, + _elm_lang$core$String$trim(string)))); +}; +var _elm_community$string_extra$String_Extra$unsurround = F2( + function (wrap, string) { + if (A2(_elm_lang$core$String$startsWith, wrap, string) && A2(_elm_lang$core$String$endsWith, wrap, string)) { + var length = _elm_lang$core$String$length(wrap); + return A2( + _elm_lang$core$String$dropRight, + length, + A2(_elm_lang$core$String$dropLeft, length, string)); + } else { + return string; + } + }); +var _elm_community$string_extra$String_Extra$unquote = function (string) { + return A2(_elm_community$string_extra$String_Extra$unsurround, '\"', string); +}; +var _elm_community$string_extra$String_Extra$surround = F2( + function (wrap, string) { + return A2( + _elm_lang$core$Basics_ops['++'], + wrap, + A2(_elm_lang$core$Basics_ops['++'], string, wrap)); + }); +var _elm_community$string_extra$String_Extra$quote = function (string) { + return A2(_elm_community$string_extra$String_Extra$surround, '\"', string); +}; +var _elm_community$string_extra$String_Extra$camelize = function (string) { + return A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('[-_\\s]+(.)?'), + function (_p21) { + var _p22 = _p21; + var _p23 = _p22.submatches; + if ((_p23.ctor === '::') && (_p23._0.ctor === 'Just')) { + return _elm_lang$core$String$toUpper(_p23._0._0); + } else { + return ''; + } + }, + _elm_lang$core$String$trim(string)); +}; +var _elm_community$string_extra$String_Extra$isBlank = function (string) { + return A2( + _elm_lang$core$Regex$contains, + _elm_lang$core$Regex$regex('^\\s*$'), + string); +}; +var _elm_community$string_extra$String_Extra$clean = function (string) { + return _elm_lang$core$String$trim( + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('\\s\\s+'), + _elm_lang$core$Basics$always(' '), + string)); +}; +var _elm_community$string_extra$String_Extra$softBreakRegexp = function (width) { + return _elm_lang$core$Regex$regex( + A2( + _elm_lang$core$Basics_ops['++'], + '.{1,', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(width), + '}(\\s+|$)|\\S+?(\\s+|$)'))); +}; +var _elm_community$string_extra$String_Extra$softEllipsis = F2( + function (howLong, string) { + return (_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$String$length(string), + howLong) < 1) ? string : A3( + _elm_lang$core$Basics$flip, + _elm_lang$core$String$append, + '...', + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('([\\.,;:\\s])+$'), + _elm_lang$core$Basics$always(''), + A2( + _elm_lang$core$String$join, + '', + A2( + _elm_lang$core$List$map, + function (_) { + return _.match; + }, + A3( + _elm_lang$core$Regex$find, + _elm_lang$core$Regex$AtMost(1), + _elm_community$string_extra$String_Extra$softBreakRegexp(howLong), + string))))); + }); +var _elm_community$string_extra$String_Extra$softBreak = F2( + function (width, string) { + return (_elm_lang$core$Native_Utils.cmp(width, 0) < 1) ? {ctor: '[]'} : A2( + _elm_lang$core$List$map, + function (_) { + return _.match; + }, + A3( + _elm_lang$core$Regex$find, + _elm_lang$core$Regex$All, + _elm_community$string_extra$String_Extra$softBreakRegexp(width), + string)); + }); +var _elm_community$string_extra$String_Extra$softWrapWith = F3( + function (width, separator, string) { + return A2( + _elm_lang$core$String$join, + separator, + A2(_elm_community$string_extra$String_Extra$softBreak, width, string)); + }); +var _elm_community$string_extra$String_Extra$softWrap = F2( + function (width, string) { + return A3(_elm_community$string_extra$String_Extra$softWrapWith, width, '\n', string); + }); +var _elm_community$string_extra$String_Extra$breaker = F3( + function (width, string, acc) { + breaker: + while (true) { + var _p24 = string; + if (_p24 === '') { + return _elm_lang$core$List$reverse(acc); + } else { + var _v40 = width, + _v41 = A2(_elm_lang$core$String$dropLeft, width, string), + _v42 = { + ctor: '::', + _0: A3(_elm_lang$core$String$slice, 0, width, string), + _1: acc + }; + width = _v40; + string = _v41; + acc = _v42; + continue breaker; + } + } + }); +var _elm_community$string_extra$String_Extra$break = F2( + function (width, string) { + return (_elm_lang$core$Native_Utils.eq(width, 0) || _elm_lang$core$Native_Utils.eq(string, '')) ? { + ctor: '::', + _0: string, + _1: {ctor: '[]'} + } : A3( + _elm_community$string_extra$String_Extra$breaker, + width, + string, + {ctor: '[]'}); + }); +var _elm_community$string_extra$String_Extra$wrapWith = F3( + function (width, separator, string) { + return A2( + _elm_lang$core$String$join, + separator, + A2(_elm_community$string_extra$String_Extra$break, width, string)); + }); +var _elm_community$string_extra$String_Extra$wrap = F2( + function (width, string) { + return A3(_elm_community$string_extra$String_Extra$wrapWith, width, '\n', string); + }); +var _elm_community$string_extra$String_Extra$replaceSlice = F4( + function (substitution, start, end, string) { + return A2( + _elm_lang$core$Basics_ops['++'], + A3(_elm_lang$core$String$slice, 0, start, string), + A2( + _elm_lang$core$Basics_ops['++'], + substitution, + A3( + _elm_lang$core$String$slice, + end, + _elm_lang$core$String$length(string), + string))); + }); +var _elm_community$string_extra$String_Extra$insertAt = F3( + function (insert, pos, string) { + return A4(_elm_community$string_extra$String_Extra$replaceSlice, insert, pos, pos, string); + }); +var _elm_community$string_extra$String_Extra$replace = F3( + function (search, substitution, string) { + return A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex( + _elm_lang$core$Regex$escape(search)), + function (_p25) { + return substitution; + }, + string); + }); +var _elm_community$string_extra$String_Extra$changeCase = F2( + function (mutator, word) { + return A2( + _elm_lang$core$Maybe$withDefault, + '', + A2( + _elm_lang$core$Maybe$map, + function (_p26) { + var _p27 = _p26; + return A2( + _elm_lang$core$String$cons, + mutator(_p27._0), + _p27._1); + }, + _elm_lang$core$String$uncons(word))); + }); +var _elm_community$string_extra$String_Extra$toSentenceCase = function (word) { + return A2(_elm_community$string_extra$String_Extra$changeCase, _elm_lang$core$Char$toUpper, word); +}; +var _elm_community$string_extra$String_Extra$toTitleCase = function (ws) { + var uppercaseMatch = A3( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('\\w+'), + function (_p28) { + return _elm_community$string_extra$String_Extra$toSentenceCase( + function (_) { + return _.match; + }(_p28)); + }); + return A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('^([a-z])|\\s+([a-z])'), + function (_p29) { + return uppercaseMatch( + function (_) { + return _.match; + }(_p29)); + }, + ws); +}; +var _elm_community$string_extra$String_Extra$classify = function (string) { + return _elm_community$string_extra$String_Extra$toSentenceCase( + A3( + _elm_community$string_extra$String_Extra$replace, + ' ', + '', + _elm_community$string_extra$String_Extra$camelize( + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('[\\W_]'), + _elm_lang$core$Basics$always(' '), + string)))); +}; +var _elm_community$string_extra$String_Extra$humanize = function (string) { + return _elm_community$string_extra$String_Extra$toSentenceCase( + _elm_lang$core$String$toLower( + _elm_lang$core$String$trim( + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('_id$|[-_\\s]+'), + _elm_lang$core$Basics$always(' '), + A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('[A-Z]'), + function (_p30) { + return A2( + _elm_lang$core$String$append, + '-', + function (_) { + return _.match; + }(_p30)); + }, + string))))); +}; +var _elm_community$string_extra$String_Extra$decapitalize = function (word) { + return A2(_elm_community$string_extra$String_Extra$changeCase, _elm_lang$core$Char$toLower, word); +}; + +var _elm_lang$core$Color$fmod = F2( + function (f, n) { + var integer = _elm_lang$core$Basics$floor(f); + return (_elm_lang$core$Basics$toFloat( + A2(_elm_lang$core$Basics_ops['%'], integer, n)) + f) - _elm_lang$core$Basics$toFloat(integer); + }); +var _elm_lang$core$Color$rgbToHsl = F3( + function (red, green, blue) { + var b = _elm_lang$core$Basics$toFloat(blue) / 255; + var g = _elm_lang$core$Basics$toFloat(green) / 255; + var r = _elm_lang$core$Basics$toFloat(red) / 255; + var cMax = A2( + _elm_lang$core$Basics$max, + A2(_elm_lang$core$Basics$max, r, g), + b); + var cMin = A2( + _elm_lang$core$Basics$min, + A2(_elm_lang$core$Basics$min, r, g), + b); + var c = cMax - cMin; + var lightness = (cMax + cMin) / 2; + var saturation = _elm_lang$core$Native_Utils.eq(lightness, 0) ? 0 : (c / (1 - _elm_lang$core$Basics$abs((2 * lightness) - 1))); + var hue = _elm_lang$core$Basics$degrees(60) * (_elm_lang$core$Native_Utils.eq(cMax, r) ? A2(_elm_lang$core$Color$fmod, (g - b) / c, 6) : (_elm_lang$core$Native_Utils.eq(cMax, g) ? (((b - r) / c) + 2) : (((r - g) / c) + 4))); + return {ctor: '_Tuple3', _0: hue, _1: saturation, _2: lightness}; + }); +var _elm_lang$core$Color$hslToRgb = F3( + function (hue, saturation, lightness) { + var normHue = hue / _elm_lang$core$Basics$degrees(60); + var chroma = (1 - _elm_lang$core$Basics$abs((2 * lightness) - 1)) * saturation; + var x = chroma * (1 - _elm_lang$core$Basics$abs( + A2(_elm_lang$core$Color$fmod, normHue, 2) - 1)); + var _p0 = (_elm_lang$core$Native_Utils.cmp(normHue, 0) < 0) ? {ctor: '_Tuple3', _0: 0, _1: 0, _2: 0} : ((_elm_lang$core$Native_Utils.cmp(normHue, 1) < 0) ? {ctor: '_Tuple3', _0: chroma, _1: x, _2: 0} : ((_elm_lang$core$Native_Utils.cmp(normHue, 2) < 0) ? {ctor: '_Tuple3', _0: x, _1: chroma, _2: 0} : ((_elm_lang$core$Native_Utils.cmp(normHue, 3) < 0) ? {ctor: '_Tuple3', _0: 0, _1: chroma, _2: x} : ((_elm_lang$core$Native_Utils.cmp(normHue, 4) < 0) ? {ctor: '_Tuple3', _0: 0, _1: x, _2: chroma} : ((_elm_lang$core$Native_Utils.cmp(normHue, 5) < 0) ? {ctor: '_Tuple3', _0: x, _1: 0, _2: chroma} : ((_elm_lang$core$Native_Utils.cmp(normHue, 6) < 0) ? {ctor: '_Tuple3', _0: chroma, _1: 0, _2: x} : {ctor: '_Tuple3', _0: 0, _1: 0, _2: 0})))))); + var r = _p0._0; + var g = _p0._1; + var b = _p0._2; + var m = lightness - (chroma / 2); + return {ctor: '_Tuple3', _0: r + m, _1: g + m, _2: b + m}; + }); +var _elm_lang$core$Color$toRgb = function (color) { + var _p1 = color; + if (_p1.ctor === 'RGBA') { + return {red: _p1._0, green: _p1._1, blue: _p1._2, alpha: _p1._3}; + } else { + var _p2 = A3(_elm_lang$core$Color$hslToRgb, _p1._0, _p1._1, _p1._2); + var r = _p2._0; + var g = _p2._1; + var b = _p2._2; + return { + red: _elm_lang$core$Basics$round(255 * r), + green: _elm_lang$core$Basics$round(255 * g), + blue: _elm_lang$core$Basics$round(255 * b), + alpha: _p1._3 + }; + } +}; +var _elm_lang$core$Color$toHsl = function (color) { + var _p3 = color; + if (_p3.ctor === 'HSLA') { + return {hue: _p3._0, saturation: _p3._1, lightness: _p3._2, alpha: _p3._3}; + } else { + var _p4 = A3(_elm_lang$core$Color$rgbToHsl, _p3._0, _p3._1, _p3._2); + var h = _p4._0; + var s = _p4._1; + var l = _p4._2; + return {hue: h, saturation: s, lightness: l, alpha: _p3._3}; + } +}; +var _elm_lang$core$Color$HSLA = F4( + function (a, b, c, d) { + return {ctor: 'HSLA', _0: a, _1: b, _2: c, _3: d}; + }); +var _elm_lang$core$Color$hsla = F4( + function (hue, saturation, lightness, alpha) { + return A4( + _elm_lang$core$Color$HSLA, + hue - _elm_lang$core$Basics$turns( + _elm_lang$core$Basics$toFloat( + _elm_lang$core$Basics$floor(hue / (2 * _elm_lang$core$Basics$pi)))), + saturation, + lightness, + alpha); + }); +var _elm_lang$core$Color$hsl = F3( + function (hue, saturation, lightness) { + return A4(_elm_lang$core$Color$hsla, hue, saturation, lightness, 1); + }); +var _elm_lang$core$Color$complement = function (color) { + var _p5 = color; + if (_p5.ctor === 'HSLA') { + return A4( + _elm_lang$core$Color$hsla, + _p5._0 + _elm_lang$core$Basics$degrees(180), + _p5._1, + _p5._2, + _p5._3); + } else { + var _p6 = A3(_elm_lang$core$Color$rgbToHsl, _p5._0, _p5._1, _p5._2); + var h = _p6._0; + var s = _p6._1; + var l = _p6._2; + return A4( + _elm_lang$core$Color$hsla, + h + _elm_lang$core$Basics$degrees(180), + s, + l, + _p5._3); + } +}; +var _elm_lang$core$Color$grayscale = function (p) { + return A4(_elm_lang$core$Color$HSLA, 0, 0, 1 - p, 1); +}; +var _elm_lang$core$Color$greyscale = function (p) { + return A4(_elm_lang$core$Color$HSLA, 0, 0, 1 - p, 1); +}; +var _elm_lang$core$Color$RGBA = F4( + function (a, b, c, d) { + return {ctor: 'RGBA', _0: a, _1: b, _2: c, _3: d}; + }); +var _elm_lang$core$Color$rgba = _elm_lang$core$Color$RGBA; +var _elm_lang$core$Color$rgb = F3( + function (r, g, b) { + return A4(_elm_lang$core$Color$RGBA, r, g, b, 1); + }); +var _elm_lang$core$Color$lightRed = A4(_elm_lang$core$Color$RGBA, 239, 41, 41, 1); +var _elm_lang$core$Color$red = A4(_elm_lang$core$Color$RGBA, 204, 0, 0, 1); +var _elm_lang$core$Color$darkRed = A4(_elm_lang$core$Color$RGBA, 164, 0, 0, 1); +var _elm_lang$core$Color$lightOrange = A4(_elm_lang$core$Color$RGBA, 252, 175, 62, 1); +var _elm_lang$core$Color$orange = A4(_elm_lang$core$Color$RGBA, 245, 121, 0, 1); +var _elm_lang$core$Color$darkOrange = A4(_elm_lang$core$Color$RGBA, 206, 92, 0, 1); +var _elm_lang$core$Color$lightYellow = A4(_elm_lang$core$Color$RGBA, 255, 233, 79, 1); +var _elm_lang$core$Color$yellow = A4(_elm_lang$core$Color$RGBA, 237, 212, 0, 1); +var _elm_lang$core$Color$darkYellow = A4(_elm_lang$core$Color$RGBA, 196, 160, 0, 1); +var _elm_lang$core$Color$lightGreen = A4(_elm_lang$core$Color$RGBA, 138, 226, 52, 1); +var _elm_lang$core$Color$green = A4(_elm_lang$core$Color$RGBA, 115, 210, 22, 1); +var _elm_lang$core$Color$darkGreen = A4(_elm_lang$core$Color$RGBA, 78, 154, 6, 1); +var _elm_lang$core$Color$lightBlue = A4(_elm_lang$core$Color$RGBA, 114, 159, 207, 1); +var _elm_lang$core$Color$blue = A4(_elm_lang$core$Color$RGBA, 52, 101, 164, 1); +var _elm_lang$core$Color$darkBlue = A4(_elm_lang$core$Color$RGBA, 32, 74, 135, 1); +var _elm_lang$core$Color$lightPurple = A4(_elm_lang$core$Color$RGBA, 173, 127, 168, 1); +var _elm_lang$core$Color$purple = A4(_elm_lang$core$Color$RGBA, 117, 80, 123, 1); +var _elm_lang$core$Color$darkPurple = A4(_elm_lang$core$Color$RGBA, 92, 53, 102, 1); +var _elm_lang$core$Color$lightBrown = A4(_elm_lang$core$Color$RGBA, 233, 185, 110, 1); +var _elm_lang$core$Color$brown = A4(_elm_lang$core$Color$RGBA, 193, 125, 17, 1); +var _elm_lang$core$Color$darkBrown = A4(_elm_lang$core$Color$RGBA, 143, 89, 2, 1); +var _elm_lang$core$Color$black = A4(_elm_lang$core$Color$RGBA, 0, 0, 0, 1); +var _elm_lang$core$Color$white = A4(_elm_lang$core$Color$RGBA, 255, 255, 255, 1); +var _elm_lang$core$Color$lightGrey = A4(_elm_lang$core$Color$RGBA, 238, 238, 236, 1); +var _elm_lang$core$Color$grey = A4(_elm_lang$core$Color$RGBA, 211, 215, 207, 1); +var _elm_lang$core$Color$darkGrey = A4(_elm_lang$core$Color$RGBA, 186, 189, 182, 1); +var _elm_lang$core$Color$lightGray = A4(_elm_lang$core$Color$RGBA, 238, 238, 236, 1); +var _elm_lang$core$Color$gray = A4(_elm_lang$core$Color$RGBA, 211, 215, 207, 1); +var _elm_lang$core$Color$darkGray = A4(_elm_lang$core$Color$RGBA, 186, 189, 182, 1); +var _elm_lang$core$Color$lightCharcoal = A4(_elm_lang$core$Color$RGBA, 136, 138, 133, 1); +var _elm_lang$core$Color$charcoal = A4(_elm_lang$core$Color$RGBA, 85, 87, 83, 1); +var _elm_lang$core$Color$darkCharcoal = A4(_elm_lang$core$Color$RGBA, 46, 52, 54, 1); +var _elm_lang$core$Color$Radial = F5( + function (a, b, c, d, e) { + return {ctor: 'Radial', _0: a, _1: b, _2: c, _3: d, _4: e}; + }); +var _elm_lang$core$Color$radial = _elm_lang$core$Color$Radial; +var _elm_lang$core$Color$Linear = F3( + function (a, b, c) { + return {ctor: 'Linear', _0: a, _1: b, _2: c}; + }); +var _elm_lang$core$Color$linear = _elm_lang$core$Color$Linear; + +//import Result // + +var _elm_lang$core$Native_Date = function() { + +function fromString(str) +{ + var date = new Date(str); + return isNaN(date.getTime()) + ? _elm_lang$core$Result$Err('Unable to parse \'' + str + '\' as a date. Dates must be in the ISO 8601 format.') + : _elm_lang$core$Result$Ok(date); +} + +var dayTable = ['Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat']; +var monthTable = + ['Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', + 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec']; + + +return { + fromString: fromString, + year: function(d) { return d.getFullYear(); }, + month: function(d) { return { ctor: monthTable[d.getMonth()] }; }, + day: function(d) { return d.getDate(); }, + hour: function(d) { return d.getHours(); }, + minute: function(d) { return d.getMinutes(); }, + second: function(d) { return d.getSeconds(); }, + millisecond: function(d) { return d.getMilliseconds(); }, + toTime: function(d) { return d.getTime(); }, + fromTime: function(t) { return new Date(t); }, + dayOfWeek: function(d) { return { ctor: dayTable[d.getDay()] }; } +}; + +}(); +var _elm_lang$core$Task$onError = _elm_lang$core$Native_Scheduler.onError; +var _elm_lang$core$Task$andThen = _elm_lang$core$Native_Scheduler.andThen; +var _elm_lang$core$Task$spawnCmd = F2( + function (router, _p0) { + var _p1 = _p0; + return _elm_lang$core$Native_Scheduler.spawn( + A2( + _elm_lang$core$Task$andThen, + _elm_lang$core$Platform$sendToApp(router), + _p1._0)); + }); +var _elm_lang$core$Task$fail = _elm_lang$core$Native_Scheduler.fail; +var _elm_lang$core$Task$mapError = F2( + function (convert, task) { + return A2( + _elm_lang$core$Task$onError, + function (_p2) { + return _elm_lang$core$Task$fail( + convert(_p2)); + }, + task); + }); +var _elm_lang$core$Task$succeed = _elm_lang$core$Native_Scheduler.succeed; +var _elm_lang$core$Task$map = F2( + function (func, taskA) { + return A2( + _elm_lang$core$Task$andThen, + function (a) { + return _elm_lang$core$Task$succeed( + func(a)); + }, + taskA); + }); +var _elm_lang$core$Task$map2 = F3( + function (func, taskA, taskB) { + return A2( + _elm_lang$core$Task$andThen, + function (a) { + return A2( + _elm_lang$core$Task$andThen, + function (b) { + return _elm_lang$core$Task$succeed( + A2(func, a, b)); + }, + taskB); + }, + taskA); + }); +var _elm_lang$core$Task$map3 = F4( + function (func, taskA, taskB, taskC) { + return A2( + _elm_lang$core$Task$andThen, + function (a) { + return A2( + _elm_lang$core$Task$andThen, + function (b) { + return A2( + _elm_lang$core$Task$andThen, + function (c) { + return _elm_lang$core$Task$succeed( + A3(func, a, b, c)); + }, + taskC); + }, + taskB); + }, + taskA); + }); +var _elm_lang$core$Task$map4 = F5( + function (func, taskA, taskB, taskC, taskD) { + return A2( + _elm_lang$core$Task$andThen, + function (a) { + return A2( + _elm_lang$core$Task$andThen, + function (b) { + return A2( + _elm_lang$core$Task$andThen, + function (c) { + return A2( + _elm_lang$core$Task$andThen, + function (d) { + return _elm_lang$core$Task$succeed( + A4(func, a, b, c, d)); + }, + taskD); + }, + taskC); + }, + taskB); + }, + taskA); + }); +var _elm_lang$core$Task$map5 = F6( + function (func, taskA, taskB, taskC, taskD, taskE) { + return A2( + _elm_lang$core$Task$andThen, + function (a) { + return A2( + _elm_lang$core$Task$andThen, + function (b) { + return A2( + _elm_lang$core$Task$andThen, + function (c) { + return A2( + _elm_lang$core$Task$andThen, + function (d) { + return A2( + _elm_lang$core$Task$andThen, + function (e) { + return _elm_lang$core$Task$succeed( + A5(func, a, b, c, d, e)); + }, + taskE); + }, + taskD); + }, + taskC); + }, + taskB); + }, + taskA); + }); +var _elm_lang$core$Task$sequence = function (tasks) { + var _p3 = tasks; + if (_p3.ctor === '[]') { + return _elm_lang$core$Task$succeed( + {ctor: '[]'}); + } else { + return A3( + _elm_lang$core$Task$map2, + F2( + function (x, y) { + return {ctor: '::', _0: x, _1: y}; + }), + _p3._0, + _elm_lang$core$Task$sequence(_p3._1)); + } +}; +var _elm_lang$core$Task$onEffects = F3( + function (router, commands, state) { + return A2( + _elm_lang$core$Task$map, + function (_p4) { + return {ctor: '_Tuple0'}; + }, + _elm_lang$core$Task$sequence( + A2( + _elm_lang$core$List$map, + _elm_lang$core$Task$spawnCmd(router), + commands))); + }); +var _elm_lang$core$Task$init = _elm_lang$core$Task$succeed( + {ctor: '_Tuple0'}); +var _elm_lang$core$Task$onSelfMsg = F3( + function (_p7, _p6, _p5) { + return _elm_lang$core$Task$succeed( + {ctor: '_Tuple0'}); + }); +var _elm_lang$core$Task$command = _elm_lang$core$Native_Platform.leaf('Task'); +var _elm_lang$core$Task$Perform = function (a) { + return {ctor: 'Perform', _0: a}; +}; +var _elm_lang$core$Task$perform = F2( + function (toMessage, task) { + return _elm_lang$core$Task$command( + _elm_lang$core$Task$Perform( + A2(_elm_lang$core$Task$map, toMessage, task))); + }); +var _elm_lang$core$Task$attempt = F2( + function (resultToMessage, task) { + return _elm_lang$core$Task$command( + _elm_lang$core$Task$Perform( + A2( + _elm_lang$core$Task$onError, + function (_p8) { + return _elm_lang$core$Task$succeed( + resultToMessage( + _elm_lang$core$Result$Err(_p8))); + }, + A2( + _elm_lang$core$Task$andThen, + function (_p9) { + return _elm_lang$core$Task$succeed( + resultToMessage( + _elm_lang$core$Result$Ok(_p9))); + }, + task)))); + }); +var _elm_lang$core$Task$cmdMap = F2( + function (tagger, _p10) { + var _p11 = _p10; + return _elm_lang$core$Task$Perform( + A2(_elm_lang$core$Task$map, tagger, _p11._0)); + }); +_elm_lang$core$Native_Platform.effectManagers['Task'] = {pkg: 'elm-lang/core', init: _elm_lang$core$Task$init, onEffects: _elm_lang$core$Task$onEffects, onSelfMsg: _elm_lang$core$Task$onSelfMsg, tag: 'cmd', cmdMap: _elm_lang$core$Task$cmdMap}; + +//import Native.Scheduler // + +var _elm_lang$core$Native_Time = function() { + +var now = _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) +{ + callback(_elm_lang$core$Native_Scheduler.succeed(Date.now())); +}); + +function setInterval_(interval, task) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + var id = setInterval(function() { + _elm_lang$core$Native_Scheduler.rawSpawn(task); + }, interval); + + return function() { clearInterval(id); }; + }); +} + +return { + now: now, + setInterval_: F2(setInterval_) +}; + +}(); +var _elm_lang$core$Time$setInterval = _elm_lang$core$Native_Time.setInterval_; +var _elm_lang$core$Time$spawnHelp = F3( + function (router, intervals, processes) { + var _p0 = intervals; + if (_p0.ctor === '[]') { + return _elm_lang$core$Task$succeed(processes); + } else { + var _p1 = _p0._0; + var spawnRest = function (id) { + return A3( + _elm_lang$core$Time$spawnHelp, + router, + _p0._1, + A3(_elm_lang$core$Dict$insert, _p1, id, processes)); + }; + var spawnTimer = _elm_lang$core$Native_Scheduler.spawn( + A2( + _elm_lang$core$Time$setInterval, + _p1, + A2(_elm_lang$core$Platform$sendToSelf, router, _p1))); + return A2(_elm_lang$core$Task$andThen, spawnRest, spawnTimer); + } + }); +var _elm_lang$core$Time$addMySub = F2( + function (_p2, state) { + var _p3 = _p2; + var _p6 = _p3._1; + var _p5 = _p3._0; + var _p4 = A2(_elm_lang$core$Dict$get, _p5, state); + if (_p4.ctor === 'Nothing') { + return A3( + _elm_lang$core$Dict$insert, + _p5, + { + ctor: '::', + _0: _p6, + _1: {ctor: '[]'} + }, + state); + } else { + return A3( + _elm_lang$core$Dict$insert, + _p5, + {ctor: '::', _0: _p6, _1: _p4._0}, + state); + } + }); +var _elm_lang$core$Time$inMilliseconds = function (t) { + return t; +}; +var _elm_lang$core$Time$millisecond = 1; +var _elm_lang$core$Time$second = 1000 * _elm_lang$core$Time$millisecond; +var _elm_lang$core$Time$minute = 60 * _elm_lang$core$Time$second; +var _elm_lang$core$Time$hour = 60 * _elm_lang$core$Time$minute; +var _elm_lang$core$Time$inHours = function (t) { + return t / _elm_lang$core$Time$hour; +}; +var _elm_lang$core$Time$inMinutes = function (t) { + return t / _elm_lang$core$Time$minute; +}; +var _elm_lang$core$Time$inSeconds = function (t) { + return t / _elm_lang$core$Time$second; +}; +var _elm_lang$core$Time$now = _elm_lang$core$Native_Time.now; +var _elm_lang$core$Time$onSelfMsg = F3( + function (router, interval, state) { + var _p7 = A2(_elm_lang$core$Dict$get, interval, state.taggers); + if (_p7.ctor === 'Nothing') { + return _elm_lang$core$Task$succeed(state); + } else { + var tellTaggers = function (time) { + return _elm_lang$core$Task$sequence( + A2( + _elm_lang$core$List$map, + function (tagger) { + return A2( + _elm_lang$core$Platform$sendToApp, + router, + tagger(time)); + }, + _p7._0)); + }; + return A2( + _elm_lang$core$Task$andThen, + function (_p8) { + return _elm_lang$core$Task$succeed(state); + }, + A2(_elm_lang$core$Task$andThen, tellTaggers, _elm_lang$core$Time$now)); + } + }); +var _elm_lang$core$Time$subscription = _elm_lang$core$Native_Platform.leaf('Time'); +var _elm_lang$core$Time$State = F2( + function (a, b) { + return {taggers: a, processes: b}; + }); +var _elm_lang$core$Time$init = _elm_lang$core$Task$succeed( + A2(_elm_lang$core$Time$State, _elm_lang$core$Dict$empty, _elm_lang$core$Dict$empty)); +var _elm_lang$core$Time$onEffects = F3( + function (router, subs, _p9) { + var _p10 = _p9; + var rightStep = F3( + function (_p12, id, _p11) { + var _p13 = _p11; + return { + ctor: '_Tuple3', + _0: _p13._0, + _1: _p13._1, + _2: A2( + _elm_lang$core$Task$andThen, + function (_p14) { + return _p13._2; + }, + _elm_lang$core$Native_Scheduler.kill(id)) + }; + }); + var bothStep = F4( + function (interval, taggers, id, _p15) { + var _p16 = _p15; + return { + ctor: '_Tuple3', + _0: _p16._0, + _1: A3(_elm_lang$core$Dict$insert, interval, id, _p16._1), + _2: _p16._2 + }; + }); + var leftStep = F3( + function (interval, taggers, _p17) { + var _p18 = _p17; + return { + ctor: '_Tuple3', + _0: {ctor: '::', _0: interval, _1: _p18._0}, + _1: _p18._1, + _2: _p18._2 + }; + }); + var newTaggers = A3(_elm_lang$core$List$foldl, _elm_lang$core$Time$addMySub, _elm_lang$core$Dict$empty, subs); + var _p19 = A6( + _elm_lang$core$Dict$merge, + leftStep, + bothStep, + rightStep, + newTaggers, + _p10.processes, + { + ctor: '_Tuple3', + _0: {ctor: '[]'}, + _1: _elm_lang$core$Dict$empty, + _2: _elm_lang$core$Task$succeed( + {ctor: '_Tuple0'}) + }); + var spawnList = _p19._0; + var existingDict = _p19._1; + var killTask = _p19._2; + return A2( + _elm_lang$core$Task$andThen, + function (newProcesses) { + return _elm_lang$core$Task$succeed( + A2(_elm_lang$core$Time$State, newTaggers, newProcesses)); + }, + A2( + _elm_lang$core$Task$andThen, + function (_p20) { + return A3(_elm_lang$core$Time$spawnHelp, router, spawnList, existingDict); + }, + killTask)); + }); +var _elm_lang$core$Time$Every = F2( + function (a, b) { + return {ctor: 'Every', _0: a, _1: b}; + }); +var _elm_lang$core$Time$every = F2( + function (interval, tagger) { + return _elm_lang$core$Time$subscription( + A2(_elm_lang$core$Time$Every, interval, tagger)); + }); +var _elm_lang$core$Time$subMap = F2( + function (f, _p21) { + var _p22 = _p21; + return A2( + _elm_lang$core$Time$Every, + _p22._0, + function (_p23) { + return f( + _p22._1(_p23)); + }); + }); +_elm_lang$core$Native_Platform.effectManagers['Time'] = {pkg: 'elm-lang/core', init: _elm_lang$core$Time$init, onEffects: _elm_lang$core$Time$onEffects, onSelfMsg: _elm_lang$core$Time$onSelfMsg, tag: 'sub', subMap: _elm_lang$core$Time$subMap}; + +var _elm_lang$core$Date$millisecond = _elm_lang$core$Native_Date.millisecond; +var _elm_lang$core$Date$second = _elm_lang$core$Native_Date.second; +var _elm_lang$core$Date$minute = _elm_lang$core$Native_Date.minute; +var _elm_lang$core$Date$hour = _elm_lang$core$Native_Date.hour; +var _elm_lang$core$Date$dayOfWeek = _elm_lang$core$Native_Date.dayOfWeek; +var _elm_lang$core$Date$day = _elm_lang$core$Native_Date.day; +var _elm_lang$core$Date$month = _elm_lang$core$Native_Date.month; +var _elm_lang$core$Date$year = _elm_lang$core$Native_Date.year; +var _elm_lang$core$Date$fromTime = _elm_lang$core$Native_Date.fromTime; +var _elm_lang$core$Date$toTime = _elm_lang$core$Native_Date.toTime; +var _elm_lang$core$Date$fromString = _elm_lang$core$Native_Date.fromString; +var _elm_lang$core$Date$now = A2(_elm_lang$core$Task$map, _elm_lang$core$Date$fromTime, _elm_lang$core$Time$now); +var _elm_lang$core$Date$Date = {ctor: 'Date'}; +var _elm_lang$core$Date$Sun = {ctor: 'Sun'}; +var _elm_lang$core$Date$Sat = {ctor: 'Sat'}; +var _elm_lang$core$Date$Fri = {ctor: 'Fri'}; +var _elm_lang$core$Date$Thu = {ctor: 'Thu'}; +var _elm_lang$core$Date$Wed = {ctor: 'Wed'}; +var _elm_lang$core$Date$Tue = {ctor: 'Tue'}; +var _elm_lang$core$Date$Mon = {ctor: 'Mon'}; +var _elm_lang$core$Date$Dec = {ctor: 'Dec'}; +var _elm_lang$core$Date$Nov = {ctor: 'Nov'}; +var _elm_lang$core$Date$Oct = {ctor: 'Oct'}; +var _elm_lang$core$Date$Sep = {ctor: 'Sep'}; +var _elm_lang$core$Date$Aug = {ctor: 'Aug'}; +var _elm_lang$core$Date$Jul = {ctor: 'Jul'}; +var _elm_lang$core$Date$Jun = {ctor: 'Jun'}; +var _elm_lang$core$Date$May = {ctor: 'May'}; +var _elm_lang$core$Date$Apr = {ctor: 'Apr'}; +var _elm_lang$core$Date$Mar = {ctor: 'Mar'}; +var _elm_lang$core$Date$Feb = {ctor: 'Feb'}; +var _elm_lang$core$Date$Jan = {ctor: 'Jan'}; + +var _elm_lang$core$Process$kill = _elm_lang$core$Native_Scheduler.kill; +var _elm_lang$core$Process$sleep = _elm_lang$core$Native_Scheduler.sleep; +var _elm_lang$core$Process$spawn = _elm_lang$core$Native_Scheduler.spawn; + +var _elm_lang$dom$Native_Dom = function() { + +var fakeNode = { + addEventListener: function() {}, + removeEventListener: function() {} +}; + +var onDocument = on(typeof document !== 'undefined' ? document : fakeNode); +var onWindow = on(typeof window !== 'undefined' ? window : fakeNode); + +function on(node) +{ + return function(eventName, decoder, toTask) + { + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) { + + function performTask(event) + { + var result = A2(_elm_lang$core$Json_Decode$decodeValue, decoder, event); + if (result.ctor === 'Ok') + { + _elm_lang$core$Native_Scheduler.rawSpawn(toTask(result._0)); + } + } + + node.addEventListener(eventName, performTask); + + return function() + { + node.removeEventListener(eventName, performTask); + }; + }); + }; +} + +var rAF = typeof requestAnimationFrame !== 'undefined' + ? requestAnimationFrame + : function(callback) { callback(); }; + +function withNode(id, doStuff) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + rAF(function() + { + var node = document.getElementById(id); + if (node === null) + { + callback(_elm_lang$core$Native_Scheduler.fail({ ctor: 'NotFound', _0: id })); + return; + } + callback(_elm_lang$core$Native_Scheduler.succeed(doStuff(node))); + }); + }); +} + + +// FOCUS + +function focus(id) +{ + return withNode(id, function(node) { + node.focus(); + return _elm_lang$core$Native_Utils.Tuple0; + }); +} + +function blur(id) +{ + return withNode(id, function(node) { + node.blur(); + return _elm_lang$core$Native_Utils.Tuple0; + }); +} + + +// SCROLLING + +function getScrollTop(id) +{ + return withNode(id, function(node) { + return node.scrollTop; + }); +} + +function setScrollTop(id, desiredScrollTop) +{ + return withNode(id, function(node) { + node.scrollTop = desiredScrollTop; + return _elm_lang$core$Native_Utils.Tuple0; + }); +} + +function toBottom(id) +{ + return withNode(id, function(node) { + node.scrollTop = node.scrollHeight; + return _elm_lang$core$Native_Utils.Tuple0; + }); +} + +function getScrollLeft(id) +{ + return withNode(id, function(node) { + return node.scrollLeft; + }); +} + +function setScrollLeft(id, desiredScrollLeft) +{ + return withNode(id, function(node) { + node.scrollLeft = desiredScrollLeft; + return _elm_lang$core$Native_Utils.Tuple0; + }); +} + +function toRight(id) +{ + return withNode(id, function(node) { + node.scrollLeft = node.scrollWidth; + return _elm_lang$core$Native_Utils.Tuple0; + }); +} + + +// SIZE + +function width(options, id) +{ + return withNode(id, function(node) { + switch (options.ctor) + { + case 'Content': + return node.scrollWidth; + case 'VisibleContent': + return node.clientWidth; + case 'VisibleContentWithBorders': + return node.offsetWidth; + case 'VisibleContentWithBordersAndMargins': + var rect = node.getBoundingClientRect(); + return rect.right - rect.left; + } + }); +} + +function height(options, id) +{ + return withNode(id, function(node) { + switch (options.ctor) + { + case 'Content': + return node.scrollHeight; + case 'VisibleContent': + return node.clientHeight; + case 'VisibleContentWithBorders': + return node.offsetHeight; + case 'VisibleContentWithBordersAndMargins': + var rect = node.getBoundingClientRect(); + return rect.bottom - rect.top; + } + }); +} + +return { + onDocument: F3(onDocument), + onWindow: F3(onWindow), + + focus: focus, + blur: blur, + + getScrollTop: getScrollTop, + setScrollTop: F2(setScrollTop), + getScrollLeft: getScrollLeft, + setScrollLeft: F2(setScrollLeft), + toBottom: toBottom, + toRight: toRight, + + height: F2(height), + width: F2(width) +}; + +}(); + +var _elm_lang$dom$Dom_LowLevel$onWindow = _elm_lang$dom$Native_Dom.onWindow; +var _elm_lang$dom$Dom_LowLevel$onDocument = _elm_lang$dom$Native_Dom.onDocument; + +var _elm_lang$virtual_dom$VirtualDom_Debug$wrap; +var _elm_lang$virtual_dom$VirtualDom_Debug$wrapWithFlags; + +var _elm_lang$virtual_dom$Native_VirtualDom = function() { + +var STYLE_KEY = 'STYLE'; +var EVENT_KEY = 'EVENT'; +var ATTR_KEY = 'ATTR'; +var ATTR_NS_KEY = 'ATTR_NS'; + +var localDoc = typeof document !== 'undefined' ? document : {}; + + +//////////// VIRTUAL DOM NODES //////////// + + +function text(string) +{ + return { + type: 'text', + text: string + }; +} + + +function node(tag) +{ + return F2(function(factList, kidList) { + return nodeHelp(tag, factList, kidList); + }); +} + + +function nodeHelp(tag, factList, kidList) +{ + var organized = organizeFacts(factList); + var namespace = organized.namespace; + var facts = organized.facts; + + var children = []; + var descendantsCount = 0; + while (kidList.ctor !== '[]') + { + var kid = kidList._0; + descendantsCount += (kid.descendantsCount || 0); + children.push(kid); + kidList = kidList._1; + } + descendantsCount += children.length; + + return { + type: 'node', + tag: tag, + facts: facts, + children: children, + namespace: namespace, + descendantsCount: descendantsCount + }; +} + + +function keyedNode(tag, factList, kidList) +{ + var organized = organizeFacts(factList); + var namespace = organized.namespace; + var facts = organized.facts; + + var children = []; + var descendantsCount = 0; + while (kidList.ctor !== '[]') + { + var kid = kidList._0; + descendantsCount += (kid._1.descendantsCount || 0); + children.push(kid); + kidList = kidList._1; + } + descendantsCount += children.length; + + return { + type: 'keyed-node', + tag: tag, + facts: facts, + children: children, + namespace: namespace, + descendantsCount: descendantsCount + }; +} + + +function custom(factList, model, impl) +{ + var facts = organizeFacts(factList).facts; + + return { + type: 'custom', + facts: facts, + model: model, + impl: impl + }; +} + + +function map(tagger, node) +{ + return { + type: 'tagger', + tagger: tagger, + node: node, + descendantsCount: 1 + (node.descendantsCount || 0) + }; +} + + +function thunk(func, args, thunk) +{ + return { + type: 'thunk', + func: func, + args: args, + thunk: thunk, + node: undefined + }; +} + +function lazy(fn, a) +{ + return thunk(fn, [a], function() { + return fn(a); + }); +} + +function lazy2(fn, a, b) +{ + return thunk(fn, [a,b], function() { + return A2(fn, a, b); + }); +} + +function lazy3(fn, a, b, c) +{ + return thunk(fn, [a,b,c], function() { + return A3(fn, a, b, c); + }); +} + + + +// FACTS + + +function organizeFacts(factList) +{ + var namespace, facts = {}; + + while (factList.ctor !== '[]') + { + var entry = factList._0; + var key = entry.key; + + if (key === ATTR_KEY || key === ATTR_NS_KEY || key === EVENT_KEY) + { + var subFacts = facts[key] || {}; + subFacts[entry.realKey] = entry.value; + facts[key] = subFacts; + } + else if (key === STYLE_KEY) + { + var styles = facts[key] || {}; + var styleList = entry.value; + while (styleList.ctor !== '[]') + { + var style = styleList._0; + styles[style._0] = style._1; + styleList = styleList._1; + } + facts[key] = styles; + } + else if (key === 'namespace') + { + namespace = entry.value; + } + else if (key === 'className') + { + var classes = facts[key]; + facts[key] = typeof classes === 'undefined' + ? entry.value + : classes + ' ' + entry.value; + } + else + { + facts[key] = entry.value; + } + factList = factList._1; + } + + return { + facts: facts, + namespace: namespace + }; +} + + + +//////////// PROPERTIES AND ATTRIBUTES //////////// + + +function style(value) +{ + return { + key: STYLE_KEY, + value: value + }; +} + + +function property(key, value) +{ + return { + key: key, + value: value + }; +} + + +function attribute(key, value) +{ + return { + key: ATTR_KEY, + realKey: key, + value: value + }; +} + + +function attributeNS(namespace, key, value) +{ + return { + key: ATTR_NS_KEY, + realKey: key, + value: { + value: value, + namespace: namespace + } + }; +} + + +function on(name, options, decoder) +{ + return { + key: EVENT_KEY, + realKey: name, + value: { + options: options, + decoder: decoder + } + }; +} + + +function equalEvents(a, b) +{ + if (a.options !== b.options) + { + if (a.options.stopPropagation !== b.options.stopPropagation || a.options.preventDefault !== b.options.preventDefault) + { + return false; + } + } + return _elm_lang$core$Native_Json.equality(a.decoder, b.decoder); +} + + +function mapProperty(func, property) +{ + if (property.key !== EVENT_KEY) + { + return property; + } + return on( + property.realKey, + property.value.options, + A2(_elm_lang$core$Json_Decode$map, func, property.value.decoder) + ); +} + + +//////////// RENDER //////////// + + +function render(vNode, eventNode) +{ + switch (vNode.type) + { + case 'thunk': + if (!vNode.node) + { + vNode.node = vNode.thunk(); + } + return render(vNode.node, eventNode); + + case 'tagger': + var subNode = vNode.node; + var tagger = vNode.tagger; + + while (subNode.type === 'tagger') + { + typeof tagger !== 'object' + ? tagger = [tagger, subNode.tagger] + : tagger.push(subNode.tagger); + + subNode = subNode.node; + } + + var subEventRoot = { tagger: tagger, parent: eventNode }; + var domNode = render(subNode, subEventRoot); + domNode.elm_event_node_ref = subEventRoot; + return domNode; + + case 'text': + return localDoc.createTextNode(vNode.text); + + case 'node': + var domNode = vNode.namespace + ? localDoc.createElementNS(vNode.namespace, vNode.tag) + : localDoc.createElement(vNode.tag); + + applyFacts(domNode, eventNode, vNode.facts); + + var children = vNode.children; + + for (var i = 0; i < children.length; i++) + { + domNode.appendChild(render(children[i], eventNode)); + } + + return domNode; + + case 'keyed-node': + var domNode = vNode.namespace + ? localDoc.createElementNS(vNode.namespace, vNode.tag) + : localDoc.createElement(vNode.tag); + + applyFacts(domNode, eventNode, vNode.facts); + + var children = vNode.children; + + for (var i = 0; i < children.length; i++) + { + domNode.appendChild(render(children[i]._1, eventNode)); + } + + return domNode; + + case 'custom': + var domNode = vNode.impl.render(vNode.model); + applyFacts(domNode, eventNode, vNode.facts); + return domNode; + } +} + + + +//////////// APPLY FACTS //////////// + + +function applyFacts(domNode, eventNode, facts) +{ + for (var key in facts) + { + var value = facts[key]; + + switch (key) + { + case STYLE_KEY: + applyStyles(domNode, value); + break; + + case EVENT_KEY: + applyEvents(domNode, eventNode, value); + break; + + case ATTR_KEY: + applyAttrs(domNode, value); + break; + + case ATTR_NS_KEY: + applyAttrsNS(domNode, value); + break; + + case 'value': + if (domNode[key] !== value) + { + domNode[key] = value; + } + break; + + default: + domNode[key] = value; + break; + } + } +} + +function applyStyles(domNode, styles) +{ + var domNodeStyle = domNode.style; + + for (var key in styles) + { + domNodeStyle[key] = styles[key]; + } +} + +function applyEvents(domNode, eventNode, events) +{ + var allHandlers = domNode.elm_handlers || {}; + + for (var key in events) + { + var handler = allHandlers[key]; + var value = events[key]; + + if (typeof value === 'undefined') + { + domNode.removeEventListener(key, handler); + allHandlers[key] = undefined; + } + else if (typeof handler === 'undefined') + { + var handler = makeEventHandler(eventNode, value); + domNode.addEventListener(key, handler); + allHandlers[key] = handler; + } + else + { + handler.info = value; + } + } + + domNode.elm_handlers = allHandlers; +} + +function makeEventHandler(eventNode, info) +{ + function eventHandler(event) + { + var info = eventHandler.info; + + var value = A2(_elm_lang$core$Native_Json.run, info.decoder, event); + + if (value.ctor === 'Ok') + { + var options = info.options; + if (options.stopPropagation) + { + event.stopPropagation(); + } + if (options.preventDefault) + { + event.preventDefault(); + } + + var message = value._0; + + var currentEventNode = eventNode; + while (currentEventNode) + { + var tagger = currentEventNode.tagger; + if (typeof tagger === 'function') + { + message = tagger(message); + } + else + { + for (var i = tagger.length; i--; ) + { + message = tagger[i](message); + } + } + currentEventNode = currentEventNode.parent; + } + } + }; + + eventHandler.info = info; + + return eventHandler; +} + +function applyAttrs(domNode, attrs) +{ + for (var key in attrs) + { + var value = attrs[key]; + if (typeof value === 'undefined') + { + domNode.removeAttribute(key); + } + else + { + domNode.setAttribute(key, value); + } + } +} + +function applyAttrsNS(domNode, nsAttrs) +{ + for (var key in nsAttrs) + { + var pair = nsAttrs[key]; + var namespace = pair.namespace; + var value = pair.value; + + if (typeof value === 'undefined') + { + domNode.removeAttributeNS(namespace, key); + } + else + { + domNode.setAttributeNS(namespace, key, value); + } + } +} + + + +//////////// DIFF //////////// + + +function diff(a, b) +{ + var patches = []; + diffHelp(a, b, patches, 0); + return patches; +} + + +function makePatch(type, index, data) +{ + return { + index: index, + type: type, + data: data, + domNode: undefined, + eventNode: undefined + }; +} + + +function diffHelp(a, b, patches, index) +{ + if (a === b) + { + return; + } + + var aType = a.type; + var bType = b.type; + + // Bail if you run into different types of nodes. Implies that the + // structure has changed significantly and it's not worth a diff. + if (aType !== bType) + { + patches.push(makePatch('p-redraw', index, b)); + return; + } + + // Now we know that both nodes are the same type. + switch (bType) + { + case 'thunk': + var aArgs = a.args; + var bArgs = b.args; + var i = aArgs.length; + var same = a.func === b.func && i === bArgs.length; + while (same && i--) + { + same = aArgs[i] === bArgs[i]; + } + if (same) + { + b.node = a.node; + return; + } + b.node = b.thunk(); + var subPatches = []; + diffHelp(a.node, b.node, subPatches, 0); + if (subPatches.length > 0) + { + patches.push(makePatch('p-thunk', index, subPatches)); + } + return; + + case 'tagger': + // gather nested taggers + var aTaggers = a.tagger; + var bTaggers = b.tagger; + var nesting = false; + + var aSubNode = a.node; + while (aSubNode.type === 'tagger') + { + nesting = true; + + typeof aTaggers !== 'object' + ? aTaggers = [aTaggers, aSubNode.tagger] + : aTaggers.push(aSubNode.tagger); + + aSubNode = aSubNode.node; + } + + var bSubNode = b.node; + while (bSubNode.type === 'tagger') + { + nesting = true; + + typeof bTaggers !== 'object' + ? bTaggers = [bTaggers, bSubNode.tagger] + : bTaggers.push(bSubNode.tagger); + + bSubNode = bSubNode.node; + } + + // Just bail if different numbers of taggers. This implies the + // structure of the virtual DOM has changed. + if (nesting && aTaggers.length !== bTaggers.length) + { + patches.push(makePatch('p-redraw', index, b)); + return; + } + + // check if taggers are "the same" + if (nesting ? !pairwiseRefEqual(aTaggers, bTaggers) : aTaggers !== bTaggers) + { + patches.push(makePatch('p-tagger', index, bTaggers)); + } + + // diff everything below the taggers + diffHelp(aSubNode, bSubNode, patches, index + 1); + return; + + case 'text': + if (a.text !== b.text) + { + patches.push(makePatch('p-text', index, b.text)); + return; + } + + return; + + case 'node': + // Bail if obvious indicators have changed. Implies more serious + // structural changes such that it's not worth it to diff. + if (a.tag !== b.tag || a.namespace !== b.namespace) + { + patches.push(makePatch('p-redraw', index, b)); + return; + } + + var factsDiff = diffFacts(a.facts, b.facts); + + if (typeof factsDiff !== 'undefined') + { + patches.push(makePatch('p-facts', index, factsDiff)); + } + + diffChildren(a, b, patches, index); + return; + + case 'keyed-node': + // Bail if obvious indicators have changed. Implies more serious + // structural changes such that it's not worth it to diff. + if (a.tag !== b.tag || a.namespace !== b.namespace) + { + patches.push(makePatch('p-redraw', index, b)); + return; + } + + var factsDiff = diffFacts(a.facts, b.facts); + + if (typeof factsDiff !== 'undefined') + { + patches.push(makePatch('p-facts', index, factsDiff)); + } + + diffKeyedChildren(a, b, patches, index); + return; + + case 'custom': + if (a.impl !== b.impl) + { + patches.push(makePatch('p-redraw', index, b)); + return; + } + + var factsDiff = diffFacts(a.facts, b.facts); + if (typeof factsDiff !== 'undefined') + { + patches.push(makePatch('p-facts', index, factsDiff)); + } + + var patch = b.impl.diff(a,b); + if (patch) + { + patches.push(makePatch('p-custom', index, patch)); + return; + } + + return; + } +} + + +// assumes the incoming arrays are the same length +function pairwiseRefEqual(as, bs) +{ + for (var i = 0; i < as.length; i++) + { + if (as[i] !== bs[i]) + { + return false; + } + } + + return true; +} + + +// TODO Instead of creating a new diff object, it's possible to just test if +// there *is* a diff. During the actual patch, do the diff again and make the +// modifications directly. This way, there's no new allocations. Worth it? +function diffFacts(a, b, category) +{ + var diff; + + // look for changes and removals + for (var aKey in a) + { + if (aKey === STYLE_KEY || aKey === EVENT_KEY || aKey === ATTR_KEY || aKey === ATTR_NS_KEY) + { + var subDiff = diffFacts(a[aKey], b[aKey] || {}, aKey); + if (subDiff) + { + diff = diff || {}; + diff[aKey] = subDiff; + } + continue; + } + + // remove if not in the new facts + if (!(aKey in b)) + { + diff = diff || {}; + diff[aKey] = + (typeof category === 'undefined') + ? (typeof a[aKey] === 'string' ? '' : null) + : + (category === STYLE_KEY) + ? '' + : + (category === EVENT_KEY || category === ATTR_KEY) + ? undefined + : + { namespace: a[aKey].namespace, value: undefined }; + + continue; + } + + var aValue = a[aKey]; + var bValue = b[aKey]; + + // reference equal, so don't worry about it + if (aValue === bValue && aKey !== 'value' + || category === EVENT_KEY && equalEvents(aValue, bValue)) + { + continue; + } + + diff = diff || {}; + diff[aKey] = bValue; + } + + // add new stuff + for (var bKey in b) + { + if (!(bKey in a)) + { + diff = diff || {}; + diff[bKey] = b[bKey]; + } + } + + return diff; +} + + +function diffChildren(aParent, bParent, patches, rootIndex) +{ + var aChildren = aParent.children; + var bChildren = bParent.children; + + var aLen = aChildren.length; + var bLen = bChildren.length; + + // FIGURE OUT IF THERE ARE INSERTS OR REMOVALS + + if (aLen > bLen) + { + patches.push(makePatch('p-remove-last', rootIndex, aLen - bLen)); + } + else if (aLen < bLen) + { + patches.push(makePatch('p-append', rootIndex, bChildren.slice(aLen))); + } + + // PAIRWISE DIFF EVERYTHING ELSE + + var index = rootIndex; + var minLen = aLen < bLen ? aLen : bLen; + for (var i = 0; i < minLen; i++) + { + index++; + var aChild = aChildren[i]; + diffHelp(aChild, bChildren[i], patches, index); + index += aChild.descendantsCount || 0; + } +} + + + +//////////// KEYED DIFF //////////// + + +function diffKeyedChildren(aParent, bParent, patches, rootIndex) +{ + var localPatches = []; + + var changes = {}; // Dict String Entry + var inserts = []; // Array { index : Int, entry : Entry } + // type Entry = { tag : String, vnode : VNode, index : Int, data : _ } + + var aChildren = aParent.children; + var bChildren = bParent.children; + var aLen = aChildren.length; + var bLen = bChildren.length; + var aIndex = 0; + var bIndex = 0; + + var index = rootIndex; + + while (aIndex < aLen && bIndex < bLen) + { + var a = aChildren[aIndex]; + var b = bChildren[bIndex]; + + var aKey = a._0; + var bKey = b._0; + var aNode = a._1; + var bNode = b._1; + + // check if keys match + + if (aKey === bKey) + { + index++; + diffHelp(aNode, bNode, localPatches, index); + index += aNode.descendantsCount || 0; + + aIndex++; + bIndex++; + continue; + } + + // look ahead 1 to detect insertions and removals. + + var aLookAhead = aIndex + 1 < aLen; + var bLookAhead = bIndex + 1 < bLen; + + if (aLookAhead) + { + var aNext = aChildren[aIndex + 1]; + var aNextKey = aNext._0; + var aNextNode = aNext._1; + var oldMatch = bKey === aNextKey; + } + + if (bLookAhead) + { + var bNext = bChildren[bIndex + 1]; + var bNextKey = bNext._0; + var bNextNode = bNext._1; + var newMatch = aKey === bNextKey; + } + + + // swap a and b + if (aLookAhead && bLookAhead && newMatch && oldMatch) + { + index++; + diffHelp(aNode, bNextNode, localPatches, index); + insertNode(changes, localPatches, aKey, bNode, bIndex, inserts); + index += aNode.descendantsCount || 0; + + index++; + removeNode(changes, localPatches, aKey, aNextNode, index); + index += aNextNode.descendantsCount || 0; + + aIndex += 2; + bIndex += 2; + continue; + } + + // insert b + if (bLookAhead && newMatch) + { + index++; + insertNode(changes, localPatches, bKey, bNode, bIndex, inserts); + diffHelp(aNode, bNextNode, localPatches, index); + index += aNode.descendantsCount || 0; + + aIndex += 1; + bIndex += 2; + continue; + } + + // remove a + if (aLookAhead && oldMatch) + { + index++; + removeNode(changes, localPatches, aKey, aNode, index); + index += aNode.descendantsCount || 0; + + index++; + diffHelp(aNextNode, bNode, localPatches, index); + index += aNextNode.descendantsCount || 0; + + aIndex += 2; + bIndex += 1; + continue; + } + + // remove a, insert b + if (aLookAhead && bLookAhead && aNextKey === bNextKey) + { + index++; + removeNode(changes, localPatches, aKey, aNode, index); + insertNode(changes, localPatches, bKey, bNode, bIndex, inserts); + index += aNode.descendantsCount || 0; + + index++; + diffHelp(aNextNode, bNextNode, localPatches, index); + index += aNextNode.descendantsCount || 0; + + aIndex += 2; + bIndex += 2; + continue; + } + + break; + } + + // eat up any remaining nodes with removeNode and insertNode + + while (aIndex < aLen) + { + index++; + var a = aChildren[aIndex]; + var aNode = a._1; + removeNode(changes, localPatches, a._0, aNode, index); + index += aNode.descendantsCount || 0; + aIndex++; + } + + var endInserts; + while (bIndex < bLen) + { + endInserts = endInserts || []; + var b = bChildren[bIndex]; + insertNode(changes, localPatches, b._0, b._1, undefined, endInserts); + bIndex++; + } + + if (localPatches.length > 0 || inserts.length > 0 || typeof endInserts !== 'undefined') + { + patches.push(makePatch('p-reorder', rootIndex, { + patches: localPatches, + inserts: inserts, + endInserts: endInserts + })); + } +} + + + +//////////// CHANGES FROM KEYED DIFF //////////// + + +var POSTFIX = '_elmW6BL'; + + +function insertNode(changes, localPatches, key, vnode, bIndex, inserts) +{ + var entry = changes[key]; + + // never seen this key before + if (typeof entry === 'undefined') + { + entry = { + tag: 'insert', + vnode: vnode, + index: bIndex, + data: undefined + }; + + inserts.push({ index: bIndex, entry: entry }); + changes[key] = entry; + + return; + } + + // this key was removed earlier, a match! + if (entry.tag === 'remove') + { + inserts.push({ index: bIndex, entry: entry }); + + entry.tag = 'move'; + var subPatches = []; + diffHelp(entry.vnode, vnode, subPatches, entry.index); + entry.index = bIndex; + entry.data.data = { + patches: subPatches, + entry: entry + }; + + return; + } + + // this key has already been inserted or moved, a duplicate! + insertNode(changes, localPatches, key + POSTFIX, vnode, bIndex, inserts); +} + + +function removeNode(changes, localPatches, key, vnode, index) +{ + var entry = changes[key]; + + // never seen this key before + if (typeof entry === 'undefined') + { + var patch = makePatch('p-remove', index, undefined); + localPatches.push(patch); + + changes[key] = { + tag: 'remove', + vnode: vnode, + index: index, + data: patch + }; + + return; + } + + // this key was inserted earlier, a match! + if (entry.tag === 'insert') + { + entry.tag = 'move'; + var subPatches = []; + diffHelp(vnode, entry.vnode, subPatches, index); + + var patch = makePatch('p-remove', index, { + patches: subPatches, + entry: entry + }); + localPatches.push(patch); + + return; + } + + // this key has already been removed or moved, a duplicate! + removeNode(changes, localPatches, key + POSTFIX, vnode, index); +} + + + +//////////// ADD DOM NODES //////////// +// +// Each DOM node has an "index" assigned in order of traversal. It is important +// to minimize our crawl over the actual DOM, so these indexes (along with the +// descendantsCount of virtual nodes) let us skip touching entire subtrees of +// the DOM if we know there are no patches there. + + +function addDomNodes(domNode, vNode, patches, eventNode) +{ + addDomNodesHelp(domNode, vNode, patches, 0, 0, vNode.descendantsCount, eventNode); +} + + +// assumes `patches` is non-empty and indexes increase monotonically. +function addDomNodesHelp(domNode, vNode, patches, i, low, high, eventNode) +{ + var patch = patches[i]; + var index = patch.index; + + while (index === low) + { + var patchType = patch.type; + + if (patchType === 'p-thunk') + { + addDomNodes(domNode, vNode.node, patch.data, eventNode); + } + else if (patchType === 'p-reorder') + { + patch.domNode = domNode; + patch.eventNode = eventNode; + + var subPatches = patch.data.patches; + if (subPatches.length > 0) + { + addDomNodesHelp(domNode, vNode, subPatches, 0, low, high, eventNode); + } + } + else if (patchType === 'p-remove') + { + patch.domNode = domNode; + patch.eventNode = eventNode; + + var data = patch.data; + if (typeof data !== 'undefined') + { + data.entry.data = domNode; + var subPatches = data.patches; + if (subPatches.length > 0) + { + addDomNodesHelp(domNode, vNode, subPatches, 0, low, high, eventNode); + } + } + } + else + { + patch.domNode = domNode; + patch.eventNode = eventNode; + } + + i++; + + if (!(patch = patches[i]) || (index = patch.index) > high) + { + return i; + } + } + + switch (vNode.type) + { + case 'tagger': + var subNode = vNode.node; + + while (subNode.type === "tagger") + { + subNode = subNode.node; + } + + return addDomNodesHelp(domNode, subNode, patches, i, low + 1, high, domNode.elm_event_node_ref); + + case 'node': + var vChildren = vNode.children; + var childNodes = domNode.childNodes; + for (var j = 0; j < vChildren.length; j++) + { + low++; + var vChild = vChildren[j]; + var nextLow = low + (vChild.descendantsCount || 0); + if (low <= index && index <= nextLow) + { + i = addDomNodesHelp(childNodes[j], vChild, patches, i, low, nextLow, eventNode); + if (!(patch = patches[i]) || (index = patch.index) > high) + { + return i; + } + } + low = nextLow; + } + return i; + + case 'keyed-node': + var vChildren = vNode.children; + var childNodes = domNode.childNodes; + for (var j = 0; j < vChildren.length; j++) + { + low++; + var vChild = vChildren[j]._1; + var nextLow = low + (vChild.descendantsCount || 0); + if (low <= index && index <= nextLow) + { + i = addDomNodesHelp(childNodes[j], vChild, patches, i, low, nextLow, eventNode); + if (!(patch = patches[i]) || (index = patch.index) > high) + { + return i; + } + } + low = nextLow; + } + return i; + + case 'text': + case 'thunk': + throw new Error('should never traverse `text` or `thunk` nodes like this'); + } +} + + + +//////////// APPLY PATCHES //////////// + + +function applyPatches(rootDomNode, oldVirtualNode, patches, eventNode) +{ + if (patches.length === 0) + { + return rootDomNode; + } + + addDomNodes(rootDomNode, oldVirtualNode, patches, eventNode); + return applyPatchesHelp(rootDomNode, patches); +} + +function applyPatchesHelp(rootDomNode, patches) +{ + for (var i = 0; i < patches.length; i++) + { + var patch = patches[i]; + var localDomNode = patch.domNode + var newNode = applyPatch(localDomNode, patch); + if (localDomNode === rootDomNode) + { + rootDomNode = newNode; + } + } + return rootDomNode; +} + +function applyPatch(domNode, patch) +{ + switch (patch.type) + { + case 'p-redraw': + return applyPatchRedraw(domNode, patch.data, patch.eventNode); + + case 'p-facts': + applyFacts(domNode, patch.eventNode, patch.data); + return domNode; + + case 'p-text': + domNode.replaceData(0, domNode.length, patch.data); + return domNode; + + case 'p-thunk': + return applyPatchesHelp(domNode, patch.data); + + case 'p-tagger': + if (typeof domNode.elm_event_node_ref !== 'undefined') + { + domNode.elm_event_node_ref.tagger = patch.data; + } + else + { + domNode.elm_event_node_ref = { tagger: patch.data, parent: patch.eventNode }; + } + return domNode; + + case 'p-remove-last': + var i = patch.data; + while (i--) + { + domNode.removeChild(domNode.lastChild); + } + return domNode; + + case 'p-append': + var newNodes = patch.data; + for (var i = 0; i < newNodes.length; i++) + { + domNode.appendChild(render(newNodes[i], patch.eventNode)); + } + return domNode; + + case 'p-remove': + var data = patch.data; + if (typeof data === 'undefined') + { + domNode.parentNode.removeChild(domNode); + return domNode; + } + var entry = data.entry; + if (typeof entry.index !== 'undefined') + { + domNode.parentNode.removeChild(domNode); + } + entry.data = applyPatchesHelp(domNode, data.patches); + return domNode; + + case 'p-reorder': + return applyPatchReorder(domNode, patch); + + case 'p-custom': + var impl = patch.data; + return impl.applyPatch(domNode, impl.data); + + default: + throw new Error('Ran into an unknown patch!'); + } +} + + +function applyPatchRedraw(domNode, vNode, eventNode) +{ + var parentNode = domNode.parentNode; + var newNode = render(vNode, eventNode); + + if (typeof newNode.elm_event_node_ref === 'undefined') + { + newNode.elm_event_node_ref = domNode.elm_event_node_ref; + } + + if (parentNode && newNode !== domNode) + { + parentNode.replaceChild(newNode, domNode); + } + return newNode; +} + + +function applyPatchReorder(domNode, patch) +{ + var data = patch.data; + + // remove end inserts + var frag = applyPatchReorderEndInsertsHelp(data.endInserts, patch); + + // removals + domNode = applyPatchesHelp(domNode, data.patches); + + // inserts + var inserts = data.inserts; + for (var i = 0; i < inserts.length; i++) + { + var insert = inserts[i]; + var entry = insert.entry; + var node = entry.tag === 'move' + ? entry.data + : render(entry.vnode, patch.eventNode); + domNode.insertBefore(node, domNode.childNodes[insert.index]); + } + + // add end inserts + if (typeof frag !== 'undefined') + { + domNode.appendChild(frag); + } + + return domNode; +} + + +function applyPatchReorderEndInsertsHelp(endInserts, patch) +{ + if (typeof endInserts === 'undefined') + { + return; + } + + var frag = localDoc.createDocumentFragment(); + for (var i = 0; i < endInserts.length; i++) + { + var insert = endInserts[i]; + var entry = insert.entry; + frag.appendChild(entry.tag === 'move' + ? entry.data + : render(entry.vnode, patch.eventNode) + ); + } + return frag; +} + + +// PROGRAMS + +var program = makeProgram(checkNoFlags); +var programWithFlags = makeProgram(checkYesFlags); + +function makeProgram(flagChecker) +{ + return F2(function(debugWrap, impl) + { + return function(flagDecoder) + { + return function(object, moduleName, debugMetadata) + { + var checker = flagChecker(flagDecoder, moduleName); + if (typeof debugMetadata === 'undefined') + { + normalSetup(impl, object, moduleName, checker); + } + else + { + debugSetup(A2(debugWrap, debugMetadata, impl), object, moduleName, checker); + } + }; + }; + }); +} + +function staticProgram(vNode) +{ + var nothing = _elm_lang$core$Native_Utils.Tuple2( + _elm_lang$core$Native_Utils.Tuple0, + _elm_lang$core$Platform_Cmd$none + ); + return A2(program, _elm_lang$virtual_dom$VirtualDom_Debug$wrap, { + init: nothing, + view: function() { return vNode; }, + update: F2(function() { return nothing; }), + subscriptions: function() { return _elm_lang$core$Platform_Sub$none; } + })(); +} + + +// FLAG CHECKERS + +function checkNoFlags(flagDecoder, moduleName) +{ + return function(init, flags, domNode) + { + if (typeof flags === 'undefined') + { + return init; + } + + var errorMessage = + 'The `' + moduleName + '` module does not need flags.\n' + + 'Initialize it with no arguments and you should be all set!'; + + crash(errorMessage, domNode); + }; +} + +function checkYesFlags(flagDecoder, moduleName) +{ + return function(init, flags, domNode) + { + if (typeof flagDecoder === 'undefined') + { + var errorMessage = + 'Are you trying to sneak a Never value into Elm? Trickster!\n' + + 'It looks like ' + moduleName + '.main is defined with `programWithFlags` but has type `Program Never`.\n' + + 'Use `program` instead if you do not want flags.' + + crash(errorMessage, domNode); + } + + var result = A2(_elm_lang$core$Native_Json.run, flagDecoder, flags); + if (result.ctor === 'Ok') + { + return init(result._0); + } + + var errorMessage = + 'Trying to initialize the `' + moduleName + '` module with an unexpected flag.\n' + + 'I tried to convert it to an Elm value, but ran into this problem:\n\n' + + result._0; + + crash(errorMessage, domNode); + }; +} + +function crash(errorMessage, domNode) +{ + if (domNode) + { + domNode.innerHTML = + '
    ' + + '

    Oops! Something went wrong when starting your Elm program.

    ' + + '
    ' + errorMessage + '
    ' + + '
    '; + } + + throw new Error(errorMessage); +} + + +// NORMAL SETUP + +function normalSetup(impl, object, moduleName, flagChecker) +{ + object['embed'] = function embed(node, flags) + { + while (node.lastChild) + { + node.removeChild(node.lastChild); + } + + return _elm_lang$core$Native_Platform.initialize( + flagChecker(impl.init, flags, node), + impl.update, + impl.subscriptions, + normalRenderer(node, impl.view) + ); + }; + + object['fullscreen'] = function fullscreen(flags) + { + return _elm_lang$core$Native_Platform.initialize( + flagChecker(impl.init, flags, document.body), + impl.update, + impl.subscriptions, + normalRenderer(document.body, impl.view) + ); + }; +} + +function normalRenderer(parentNode, view) +{ + return function(tagger, initialModel) + { + var eventNode = { tagger: tagger, parent: undefined }; + var initialVirtualNode = view(initialModel); + var domNode = render(initialVirtualNode, eventNode); + parentNode.appendChild(domNode); + return makeStepper(domNode, view, initialVirtualNode, eventNode); + }; +} + + +// STEPPER + +var rAF = + typeof requestAnimationFrame !== 'undefined' + ? requestAnimationFrame + : function(callback) { setTimeout(callback, 1000 / 60); }; + +function makeStepper(domNode, view, initialVirtualNode, eventNode) +{ + var state = 'NO_REQUEST'; + var currNode = initialVirtualNode; + var nextModel; + + function updateIfNeeded() + { + switch (state) + { + case 'NO_REQUEST': + throw new Error( + 'Unexpected draw callback.\n' + + 'Please report this to .' + ); + + case 'PENDING_REQUEST': + rAF(updateIfNeeded); + state = 'EXTRA_REQUEST'; + + var nextNode = view(nextModel); + var patches = diff(currNode, nextNode); + domNode = applyPatches(domNode, currNode, patches, eventNode); + currNode = nextNode; + + return; + + case 'EXTRA_REQUEST': + state = 'NO_REQUEST'; + return; + } + } + + return function stepper(model) + { + if (state === 'NO_REQUEST') + { + rAF(updateIfNeeded); + } + state = 'PENDING_REQUEST'; + nextModel = model; + }; +} + + +// DEBUG SETUP + +function debugSetup(impl, object, moduleName, flagChecker) +{ + object['fullscreen'] = function fullscreen(flags) + { + var popoutRef = { doc: undefined }; + return _elm_lang$core$Native_Platform.initialize( + flagChecker(impl.init, flags, document.body), + impl.update(scrollTask(popoutRef)), + impl.subscriptions, + debugRenderer(moduleName, document.body, popoutRef, impl.view, impl.viewIn, impl.viewOut) + ); + }; + + object['embed'] = function fullscreen(node, flags) + { + var popoutRef = { doc: undefined }; + return _elm_lang$core$Native_Platform.initialize( + flagChecker(impl.init, flags, node), + impl.update(scrollTask(popoutRef)), + impl.subscriptions, + debugRenderer(moduleName, node, popoutRef, impl.view, impl.viewIn, impl.viewOut) + ); + }; +} + +function scrollTask(popoutRef) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + var doc = popoutRef.doc; + if (doc) + { + var msgs = doc.getElementsByClassName('debugger-sidebar-messages')[0]; + if (msgs) + { + msgs.scrollTop = msgs.scrollHeight; + } + } + callback(_elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0)); + }); +} + + +function debugRenderer(moduleName, parentNode, popoutRef, view, viewIn, viewOut) +{ + return function(tagger, initialModel) + { + var appEventNode = { tagger: tagger, parent: undefined }; + var eventNode = { tagger: tagger, parent: undefined }; + + // make normal stepper + var appVirtualNode = view(initialModel); + var appNode = render(appVirtualNode, appEventNode); + parentNode.appendChild(appNode); + var appStepper = makeStepper(appNode, view, appVirtualNode, appEventNode); + + // make overlay stepper + var overVirtualNode = viewIn(initialModel)._1; + var overNode = render(overVirtualNode, eventNode); + parentNode.appendChild(overNode); + var wrappedViewIn = wrapViewIn(appEventNode, overNode, viewIn); + var overStepper = makeStepper(overNode, wrappedViewIn, overVirtualNode, eventNode); + + // make debugger stepper + var debugStepper = makeDebugStepper(initialModel, viewOut, eventNode, parentNode, moduleName, popoutRef); + + return function stepper(model) + { + appStepper(model); + overStepper(model); + debugStepper(model); + } + }; +} + +function makeDebugStepper(initialModel, view, eventNode, parentNode, moduleName, popoutRef) +{ + var curr; + var domNode; + + return function stepper(model) + { + if (!model.isDebuggerOpen) + { + return; + } + + if (!popoutRef.doc) + { + curr = view(model); + domNode = openDebugWindow(moduleName, popoutRef, curr, eventNode); + return; + } + + // switch to document of popout + localDoc = popoutRef.doc; + + var next = view(model); + var patches = diff(curr, next); + domNode = applyPatches(domNode, curr, patches, eventNode); + curr = next; + + // switch back to normal document + localDoc = document; + }; +} + +function openDebugWindow(moduleName, popoutRef, virtualNode, eventNode) +{ + var w = 900; + var h = 360; + var x = screen.width - w; + var y = screen.height - h; + var debugWindow = window.open('', '', 'width=' + w + ',height=' + h + ',left=' + x + ',top=' + y); + + // switch to window document + localDoc = debugWindow.document; + + popoutRef.doc = localDoc; + localDoc.title = 'Debugger - ' + moduleName; + localDoc.body.style.margin = '0'; + localDoc.body.style.padding = '0'; + var domNode = render(virtualNode, eventNode); + localDoc.body.appendChild(domNode); + + localDoc.addEventListener('keydown', function(event) { + if (event.metaKey && event.which === 82) + { + window.location.reload(); + } + if (event.which === 38) + { + eventNode.tagger({ ctor: 'Up' }); + event.preventDefault(); + } + if (event.which === 40) + { + eventNode.tagger({ ctor: 'Down' }); + event.preventDefault(); + } + }); + + function close() + { + popoutRef.doc = undefined; + debugWindow.close(); + } + window.addEventListener('unload', close); + debugWindow.addEventListener('unload', function() { + popoutRef.doc = undefined; + window.removeEventListener('unload', close); + eventNode.tagger({ ctor: 'Close' }); + }); + + // switch back to the normal document + localDoc = document; + + return domNode; +} + + +// BLOCK EVENTS + +function wrapViewIn(appEventNode, overlayNode, viewIn) +{ + var ignorer = makeIgnorer(overlayNode); + var blocking = 'Normal'; + var overflow; + + var normalTagger = appEventNode.tagger; + var blockTagger = function() {}; + + return function(model) + { + var tuple = viewIn(model); + var newBlocking = tuple._0.ctor; + appEventNode.tagger = newBlocking === 'Normal' ? normalTagger : blockTagger; + if (blocking !== newBlocking) + { + traverse('removeEventListener', ignorer, blocking); + traverse('addEventListener', ignorer, newBlocking); + + if (blocking === 'Normal') + { + overflow = document.body.style.overflow; + document.body.style.overflow = 'hidden'; + } + + if (newBlocking === 'Normal') + { + document.body.style.overflow = overflow; + } + + blocking = newBlocking; + } + return tuple._1; + } +} + +function traverse(verbEventListener, ignorer, blocking) +{ + switch(blocking) + { + case 'Normal': + return; + + case 'Pause': + return traverseHelp(verbEventListener, ignorer, mostEvents); + + case 'Message': + return traverseHelp(verbEventListener, ignorer, allEvents); + } +} + +function traverseHelp(verbEventListener, handler, eventNames) +{ + for (var i = 0; i < eventNames.length; i++) + { + document.body[verbEventListener](eventNames[i], handler, true); + } +} + +function makeIgnorer(overlayNode) +{ + return function(event) + { + if (event.type === 'keydown' && event.metaKey && event.which === 82) + { + return; + } + + var isScroll = event.type === 'scroll' || event.type === 'wheel'; + + var node = event.target; + while (node !== null) + { + if (node.className === 'elm-overlay-message-details' && isScroll) + { + return; + } + + if (node === overlayNode && !isScroll) + { + return; + } + node = node.parentNode; + } + + event.stopPropagation(); + event.preventDefault(); + } +} + +var mostEvents = [ + 'click', 'dblclick', 'mousemove', + 'mouseup', 'mousedown', 'mouseenter', 'mouseleave', + 'touchstart', 'touchend', 'touchcancel', 'touchmove', + 'pointerdown', 'pointerup', 'pointerover', 'pointerout', + 'pointerenter', 'pointerleave', 'pointermove', 'pointercancel', + 'dragstart', 'drag', 'dragend', 'dragenter', 'dragover', 'dragleave', 'drop', + 'keyup', 'keydown', 'keypress', + 'input', 'change', + 'focus', 'blur' +]; + +var allEvents = mostEvents.concat('wheel', 'scroll'); + + +return { + node: node, + text: text, + custom: custom, + map: F2(map), + + on: F3(on), + style: style, + property: F2(property), + attribute: F2(attribute), + attributeNS: F3(attributeNS), + mapProperty: F2(mapProperty), + + lazy: F2(lazy), + lazy2: F3(lazy2), + lazy3: F4(lazy3), + keyedNode: F3(keyedNode), + + program: program, + programWithFlags: programWithFlags, + staticProgram: staticProgram +}; + +}(); + +var _elm_lang$virtual_dom$VirtualDom$programWithFlags = function (impl) { + return A2(_elm_lang$virtual_dom$Native_VirtualDom.programWithFlags, _elm_lang$virtual_dom$VirtualDom_Debug$wrapWithFlags, impl); +}; +var _elm_lang$virtual_dom$VirtualDom$program = function (impl) { + return A2(_elm_lang$virtual_dom$Native_VirtualDom.program, _elm_lang$virtual_dom$VirtualDom_Debug$wrap, impl); +}; +var _elm_lang$virtual_dom$VirtualDom$keyedNode = _elm_lang$virtual_dom$Native_VirtualDom.keyedNode; +var _elm_lang$virtual_dom$VirtualDom$lazy3 = _elm_lang$virtual_dom$Native_VirtualDom.lazy3; +var _elm_lang$virtual_dom$VirtualDom$lazy2 = _elm_lang$virtual_dom$Native_VirtualDom.lazy2; +var _elm_lang$virtual_dom$VirtualDom$lazy = _elm_lang$virtual_dom$Native_VirtualDom.lazy; +var _elm_lang$virtual_dom$VirtualDom$defaultOptions = {stopPropagation: false, preventDefault: false}; +var _elm_lang$virtual_dom$VirtualDom$onWithOptions = _elm_lang$virtual_dom$Native_VirtualDom.on; +var _elm_lang$virtual_dom$VirtualDom$on = F2( + function (eventName, decoder) { + return A3(_elm_lang$virtual_dom$VirtualDom$onWithOptions, eventName, _elm_lang$virtual_dom$VirtualDom$defaultOptions, decoder); + }); +var _elm_lang$virtual_dom$VirtualDom$style = _elm_lang$virtual_dom$Native_VirtualDom.style; +var _elm_lang$virtual_dom$VirtualDom$mapProperty = _elm_lang$virtual_dom$Native_VirtualDom.mapProperty; +var _elm_lang$virtual_dom$VirtualDom$attributeNS = _elm_lang$virtual_dom$Native_VirtualDom.attributeNS; +var _elm_lang$virtual_dom$VirtualDom$attribute = _elm_lang$virtual_dom$Native_VirtualDom.attribute; +var _elm_lang$virtual_dom$VirtualDom$property = _elm_lang$virtual_dom$Native_VirtualDom.property; +var _elm_lang$virtual_dom$VirtualDom$map = _elm_lang$virtual_dom$Native_VirtualDom.map; +var _elm_lang$virtual_dom$VirtualDom$text = _elm_lang$virtual_dom$Native_VirtualDom.text; +var _elm_lang$virtual_dom$VirtualDom$node = _elm_lang$virtual_dom$Native_VirtualDom.node; +var _elm_lang$virtual_dom$VirtualDom$Options = F2( + function (a, b) { + return {stopPropagation: a, preventDefault: b}; + }); +var _elm_lang$virtual_dom$VirtualDom$Node = {ctor: 'Node'}; +var _elm_lang$virtual_dom$VirtualDom$Property = {ctor: 'Property'}; + +var _elm_lang$html$Html$programWithFlags = _elm_lang$virtual_dom$VirtualDom$programWithFlags; +var _elm_lang$html$Html$program = _elm_lang$virtual_dom$VirtualDom$program; +var _elm_lang$html$Html$beginnerProgram = function (_p0) { + var _p1 = _p0; + return _elm_lang$html$Html$program( + { + init: A2( + _elm_lang$core$Platform_Cmd_ops['!'], + _p1.model, + {ctor: '[]'}), + update: F2( + function (msg, model) { + return A2( + _elm_lang$core$Platform_Cmd_ops['!'], + A2(_p1.update, msg, model), + {ctor: '[]'}); + }), + view: _p1.view, + subscriptions: function (_p2) { + return _elm_lang$core$Platform_Sub$none; + } + }); +}; +var _elm_lang$html$Html$map = _elm_lang$virtual_dom$VirtualDom$map; +var _elm_lang$html$Html$text = _elm_lang$virtual_dom$VirtualDom$text; +var _elm_lang$html$Html$node = _elm_lang$virtual_dom$VirtualDom$node; +var _elm_lang$html$Html$body = _elm_lang$html$Html$node('body'); +var _elm_lang$html$Html$section = _elm_lang$html$Html$node('section'); +var _elm_lang$html$Html$nav = _elm_lang$html$Html$node('nav'); +var _elm_lang$html$Html$article = _elm_lang$html$Html$node('article'); +var _elm_lang$html$Html$aside = _elm_lang$html$Html$node('aside'); +var _elm_lang$html$Html$h1 = _elm_lang$html$Html$node('h1'); +var _elm_lang$html$Html$h2 = _elm_lang$html$Html$node('h2'); +var _elm_lang$html$Html$h3 = _elm_lang$html$Html$node('h3'); +var _elm_lang$html$Html$h4 = _elm_lang$html$Html$node('h4'); +var _elm_lang$html$Html$h5 = _elm_lang$html$Html$node('h5'); +var _elm_lang$html$Html$h6 = _elm_lang$html$Html$node('h6'); +var _elm_lang$html$Html$header = _elm_lang$html$Html$node('header'); +var _elm_lang$html$Html$footer = _elm_lang$html$Html$node('footer'); +var _elm_lang$html$Html$address = _elm_lang$html$Html$node('address'); +var _elm_lang$html$Html$main_ = _elm_lang$html$Html$node('main'); +var _elm_lang$html$Html$p = _elm_lang$html$Html$node('p'); +var _elm_lang$html$Html$hr = _elm_lang$html$Html$node('hr'); +var _elm_lang$html$Html$pre = _elm_lang$html$Html$node('pre'); +var _elm_lang$html$Html$blockquote = _elm_lang$html$Html$node('blockquote'); +var _elm_lang$html$Html$ol = _elm_lang$html$Html$node('ol'); +var _elm_lang$html$Html$ul = _elm_lang$html$Html$node('ul'); +var _elm_lang$html$Html$li = _elm_lang$html$Html$node('li'); +var _elm_lang$html$Html$dl = _elm_lang$html$Html$node('dl'); +var _elm_lang$html$Html$dt = _elm_lang$html$Html$node('dt'); +var _elm_lang$html$Html$dd = _elm_lang$html$Html$node('dd'); +var _elm_lang$html$Html$figure = _elm_lang$html$Html$node('figure'); +var _elm_lang$html$Html$figcaption = _elm_lang$html$Html$node('figcaption'); +var _elm_lang$html$Html$div = _elm_lang$html$Html$node('div'); +var _elm_lang$html$Html$a = _elm_lang$html$Html$node('a'); +var _elm_lang$html$Html$em = _elm_lang$html$Html$node('em'); +var _elm_lang$html$Html$strong = _elm_lang$html$Html$node('strong'); +var _elm_lang$html$Html$small = _elm_lang$html$Html$node('small'); +var _elm_lang$html$Html$s = _elm_lang$html$Html$node('s'); +var _elm_lang$html$Html$cite = _elm_lang$html$Html$node('cite'); +var _elm_lang$html$Html$q = _elm_lang$html$Html$node('q'); +var _elm_lang$html$Html$dfn = _elm_lang$html$Html$node('dfn'); +var _elm_lang$html$Html$abbr = _elm_lang$html$Html$node('abbr'); +var _elm_lang$html$Html$time = _elm_lang$html$Html$node('time'); +var _elm_lang$html$Html$code = _elm_lang$html$Html$node('code'); +var _elm_lang$html$Html$var = _elm_lang$html$Html$node('var'); +var _elm_lang$html$Html$samp = _elm_lang$html$Html$node('samp'); +var _elm_lang$html$Html$kbd = _elm_lang$html$Html$node('kbd'); +var _elm_lang$html$Html$sub = _elm_lang$html$Html$node('sub'); +var _elm_lang$html$Html$sup = _elm_lang$html$Html$node('sup'); +var _elm_lang$html$Html$i = _elm_lang$html$Html$node('i'); +var _elm_lang$html$Html$b = _elm_lang$html$Html$node('b'); +var _elm_lang$html$Html$u = _elm_lang$html$Html$node('u'); +var _elm_lang$html$Html$mark = _elm_lang$html$Html$node('mark'); +var _elm_lang$html$Html$ruby = _elm_lang$html$Html$node('ruby'); +var _elm_lang$html$Html$rt = _elm_lang$html$Html$node('rt'); +var _elm_lang$html$Html$rp = _elm_lang$html$Html$node('rp'); +var _elm_lang$html$Html$bdi = _elm_lang$html$Html$node('bdi'); +var _elm_lang$html$Html$bdo = _elm_lang$html$Html$node('bdo'); +var _elm_lang$html$Html$span = _elm_lang$html$Html$node('span'); +var _elm_lang$html$Html$br = _elm_lang$html$Html$node('br'); +var _elm_lang$html$Html$wbr = _elm_lang$html$Html$node('wbr'); +var _elm_lang$html$Html$ins = _elm_lang$html$Html$node('ins'); +var _elm_lang$html$Html$del = _elm_lang$html$Html$node('del'); +var _elm_lang$html$Html$img = _elm_lang$html$Html$node('img'); +var _elm_lang$html$Html$iframe = _elm_lang$html$Html$node('iframe'); +var _elm_lang$html$Html$embed = _elm_lang$html$Html$node('embed'); +var _elm_lang$html$Html$object = _elm_lang$html$Html$node('object'); +var _elm_lang$html$Html$param = _elm_lang$html$Html$node('param'); +var _elm_lang$html$Html$video = _elm_lang$html$Html$node('video'); +var _elm_lang$html$Html$audio = _elm_lang$html$Html$node('audio'); +var _elm_lang$html$Html$source = _elm_lang$html$Html$node('source'); +var _elm_lang$html$Html$track = _elm_lang$html$Html$node('track'); +var _elm_lang$html$Html$canvas = _elm_lang$html$Html$node('canvas'); +var _elm_lang$html$Html$math = _elm_lang$html$Html$node('math'); +var _elm_lang$html$Html$table = _elm_lang$html$Html$node('table'); +var _elm_lang$html$Html$caption = _elm_lang$html$Html$node('caption'); +var _elm_lang$html$Html$colgroup = _elm_lang$html$Html$node('colgroup'); +var _elm_lang$html$Html$col = _elm_lang$html$Html$node('col'); +var _elm_lang$html$Html$tbody = _elm_lang$html$Html$node('tbody'); +var _elm_lang$html$Html$thead = _elm_lang$html$Html$node('thead'); +var _elm_lang$html$Html$tfoot = _elm_lang$html$Html$node('tfoot'); +var _elm_lang$html$Html$tr = _elm_lang$html$Html$node('tr'); +var _elm_lang$html$Html$td = _elm_lang$html$Html$node('td'); +var _elm_lang$html$Html$th = _elm_lang$html$Html$node('th'); +var _elm_lang$html$Html$form = _elm_lang$html$Html$node('form'); +var _elm_lang$html$Html$fieldset = _elm_lang$html$Html$node('fieldset'); +var _elm_lang$html$Html$legend = _elm_lang$html$Html$node('legend'); +var _elm_lang$html$Html$label = _elm_lang$html$Html$node('label'); +var _elm_lang$html$Html$input = _elm_lang$html$Html$node('input'); +var _elm_lang$html$Html$button = _elm_lang$html$Html$node('button'); +var _elm_lang$html$Html$select = _elm_lang$html$Html$node('select'); +var _elm_lang$html$Html$datalist = _elm_lang$html$Html$node('datalist'); +var _elm_lang$html$Html$optgroup = _elm_lang$html$Html$node('optgroup'); +var _elm_lang$html$Html$option = _elm_lang$html$Html$node('option'); +var _elm_lang$html$Html$textarea = _elm_lang$html$Html$node('textarea'); +var _elm_lang$html$Html$keygen = _elm_lang$html$Html$node('keygen'); +var _elm_lang$html$Html$output = _elm_lang$html$Html$node('output'); +var _elm_lang$html$Html$progress = _elm_lang$html$Html$node('progress'); +var _elm_lang$html$Html$meter = _elm_lang$html$Html$node('meter'); +var _elm_lang$html$Html$details = _elm_lang$html$Html$node('details'); +var _elm_lang$html$Html$summary = _elm_lang$html$Html$node('summary'); +var _elm_lang$html$Html$menuitem = _elm_lang$html$Html$node('menuitem'); +var _elm_lang$html$Html$menu = _elm_lang$html$Html$node('menu'); + +var _elm_lang$html$Html_Attributes$map = _elm_lang$virtual_dom$VirtualDom$mapProperty; +var _elm_lang$html$Html_Attributes$attribute = _elm_lang$virtual_dom$VirtualDom$attribute; +var _elm_lang$html$Html_Attributes$contextmenu = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'contextmenu', value); +}; +var _elm_lang$html$Html_Attributes$draggable = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'draggable', value); +}; +var _elm_lang$html$Html_Attributes$itemprop = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'itemprop', value); +}; +var _elm_lang$html$Html_Attributes$tabindex = function (n) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'tabIndex', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$charset = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'charset', value); +}; +var _elm_lang$html$Html_Attributes$height = function (value) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'height', + _elm_lang$core$Basics$toString(value)); +}; +var _elm_lang$html$Html_Attributes$width = function (value) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'width', + _elm_lang$core$Basics$toString(value)); +}; +var _elm_lang$html$Html_Attributes$formaction = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'formAction', value); +}; +var _elm_lang$html$Html_Attributes$list = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'list', value); +}; +var _elm_lang$html$Html_Attributes$minlength = function (n) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'minLength', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$maxlength = function (n) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'maxlength', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$size = function (n) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'size', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$form = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'form', value); +}; +var _elm_lang$html$Html_Attributes$cols = function (n) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'cols', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$rows = function (n) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'rows', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$challenge = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'challenge', value); +}; +var _elm_lang$html$Html_Attributes$media = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'media', value); +}; +var _elm_lang$html$Html_Attributes$rel = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'rel', value); +}; +var _elm_lang$html$Html_Attributes$datetime = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'datetime', value); +}; +var _elm_lang$html$Html_Attributes$pubdate = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'pubdate', value); +}; +var _elm_lang$html$Html_Attributes$colspan = function (n) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'colspan', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$rowspan = function (n) { + return A2( + _elm_lang$html$Html_Attributes$attribute, + 'rowspan', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$manifest = function (value) { + return A2(_elm_lang$html$Html_Attributes$attribute, 'manifest', value); +}; +var _elm_lang$html$Html_Attributes$property = _elm_lang$virtual_dom$VirtualDom$property; +var _elm_lang$html$Html_Attributes$stringProperty = F2( + function (name, string) { + return A2( + _elm_lang$html$Html_Attributes$property, + name, + _elm_lang$core$Json_Encode$string(string)); + }); +var _elm_lang$html$Html_Attributes$class = function (name) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'className', name); +}; +var _elm_lang$html$Html_Attributes$id = function (name) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'id', name); +}; +var _elm_lang$html$Html_Attributes$title = function (name) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'title', name); +}; +var _elm_lang$html$Html_Attributes$accesskey = function ($char) { + return A2( + _elm_lang$html$Html_Attributes$stringProperty, + 'accessKey', + _elm_lang$core$String$fromChar($char)); +}; +var _elm_lang$html$Html_Attributes$dir = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'dir', value); +}; +var _elm_lang$html$Html_Attributes$dropzone = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'dropzone', value); +}; +var _elm_lang$html$Html_Attributes$lang = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'lang', value); +}; +var _elm_lang$html$Html_Attributes$content = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'content', value); +}; +var _elm_lang$html$Html_Attributes$httpEquiv = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'httpEquiv', value); +}; +var _elm_lang$html$Html_Attributes$language = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'language', value); +}; +var _elm_lang$html$Html_Attributes$src = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'src', value); +}; +var _elm_lang$html$Html_Attributes$alt = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'alt', value); +}; +var _elm_lang$html$Html_Attributes$preload = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'preload', value); +}; +var _elm_lang$html$Html_Attributes$poster = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'poster', value); +}; +var _elm_lang$html$Html_Attributes$kind = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'kind', value); +}; +var _elm_lang$html$Html_Attributes$srclang = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'srclang', value); +}; +var _elm_lang$html$Html_Attributes$sandbox = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'sandbox', value); +}; +var _elm_lang$html$Html_Attributes$srcdoc = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'srcdoc', value); +}; +var _elm_lang$html$Html_Attributes$type_ = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'type', value); +}; +var _elm_lang$html$Html_Attributes$value = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'value', value); +}; +var _elm_lang$html$Html_Attributes$defaultValue = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'defaultValue', value); +}; +var _elm_lang$html$Html_Attributes$placeholder = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'placeholder', value); +}; +var _elm_lang$html$Html_Attributes$accept = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'accept', value); +}; +var _elm_lang$html$Html_Attributes$acceptCharset = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'acceptCharset', value); +}; +var _elm_lang$html$Html_Attributes$action = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'action', value); +}; +var _elm_lang$html$Html_Attributes$autocomplete = function (bool) { + return A2( + _elm_lang$html$Html_Attributes$stringProperty, + 'autocomplete', + bool ? 'on' : 'off'); +}; +var _elm_lang$html$Html_Attributes$enctype = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'enctype', value); +}; +var _elm_lang$html$Html_Attributes$method = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'method', value); +}; +var _elm_lang$html$Html_Attributes$name = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'name', value); +}; +var _elm_lang$html$Html_Attributes$pattern = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'pattern', value); +}; +var _elm_lang$html$Html_Attributes$for = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'htmlFor', value); +}; +var _elm_lang$html$Html_Attributes$max = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'max', value); +}; +var _elm_lang$html$Html_Attributes$min = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'min', value); +}; +var _elm_lang$html$Html_Attributes$step = function (n) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'step', n); +}; +var _elm_lang$html$Html_Attributes$wrap = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'wrap', value); +}; +var _elm_lang$html$Html_Attributes$usemap = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'useMap', value); +}; +var _elm_lang$html$Html_Attributes$shape = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'shape', value); +}; +var _elm_lang$html$Html_Attributes$coords = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'coords', value); +}; +var _elm_lang$html$Html_Attributes$keytype = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'keytype', value); +}; +var _elm_lang$html$Html_Attributes$align = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'align', value); +}; +var _elm_lang$html$Html_Attributes$cite = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'cite', value); +}; +var _elm_lang$html$Html_Attributes$href = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'href', value); +}; +var _elm_lang$html$Html_Attributes$target = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'target', value); +}; +var _elm_lang$html$Html_Attributes$downloadAs = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'download', value); +}; +var _elm_lang$html$Html_Attributes$hreflang = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'hreflang', value); +}; +var _elm_lang$html$Html_Attributes$ping = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'ping', value); +}; +var _elm_lang$html$Html_Attributes$start = function (n) { + return A2( + _elm_lang$html$Html_Attributes$stringProperty, + 'start', + _elm_lang$core$Basics$toString(n)); +}; +var _elm_lang$html$Html_Attributes$headers = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'headers', value); +}; +var _elm_lang$html$Html_Attributes$scope = function (value) { + return A2(_elm_lang$html$Html_Attributes$stringProperty, 'scope', value); +}; +var _elm_lang$html$Html_Attributes$boolProperty = F2( + function (name, bool) { + return A2( + _elm_lang$html$Html_Attributes$property, + name, + _elm_lang$core$Json_Encode$bool(bool)); + }); +var _elm_lang$html$Html_Attributes$hidden = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'hidden', bool); +}; +var _elm_lang$html$Html_Attributes$contenteditable = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'contentEditable', bool); +}; +var _elm_lang$html$Html_Attributes$spellcheck = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'spellcheck', bool); +}; +var _elm_lang$html$Html_Attributes$async = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'async', bool); +}; +var _elm_lang$html$Html_Attributes$defer = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'defer', bool); +}; +var _elm_lang$html$Html_Attributes$scoped = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'scoped', bool); +}; +var _elm_lang$html$Html_Attributes$autoplay = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'autoplay', bool); +}; +var _elm_lang$html$Html_Attributes$controls = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'controls', bool); +}; +var _elm_lang$html$Html_Attributes$loop = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'loop', bool); +}; +var _elm_lang$html$Html_Attributes$default = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'default', bool); +}; +var _elm_lang$html$Html_Attributes$seamless = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'seamless', bool); +}; +var _elm_lang$html$Html_Attributes$checked = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'checked', bool); +}; +var _elm_lang$html$Html_Attributes$selected = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'selected', bool); +}; +var _elm_lang$html$Html_Attributes$autofocus = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'autofocus', bool); +}; +var _elm_lang$html$Html_Attributes$disabled = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'disabled', bool); +}; +var _elm_lang$html$Html_Attributes$multiple = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'multiple', bool); +}; +var _elm_lang$html$Html_Attributes$novalidate = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'noValidate', bool); +}; +var _elm_lang$html$Html_Attributes$readonly = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'readOnly', bool); +}; +var _elm_lang$html$Html_Attributes$required = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'required', bool); +}; +var _elm_lang$html$Html_Attributes$ismap = function (value) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'isMap', value); +}; +var _elm_lang$html$Html_Attributes$download = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'download', bool); +}; +var _elm_lang$html$Html_Attributes$reversed = function (bool) { + return A2(_elm_lang$html$Html_Attributes$boolProperty, 'reversed', bool); +}; +var _elm_lang$html$Html_Attributes$classList = function (list) { + return _elm_lang$html$Html_Attributes$class( + A2( + _elm_lang$core$String$join, + ' ', + A2( + _elm_lang$core$List$map, + _elm_lang$core$Tuple$first, + A2(_elm_lang$core$List$filter, _elm_lang$core$Tuple$second, list)))); +}; +var _elm_lang$html$Html_Attributes$style = _elm_lang$virtual_dom$VirtualDom$style; + +var _elm_lang$html$Html_Events$keyCode = A2(_elm_lang$core$Json_Decode$field, 'keyCode', _elm_lang$core$Json_Decode$int); +var _elm_lang$html$Html_Events$targetChecked = A2( + _elm_lang$core$Json_Decode$at, + { + ctor: '::', + _0: 'target', + _1: { + ctor: '::', + _0: 'checked', + _1: {ctor: '[]'} + } + }, + _elm_lang$core$Json_Decode$bool); +var _elm_lang$html$Html_Events$targetValue = A2( + _elm_lang$core$Json_Decode$at, + { + ctor: '::', + _0: 'target', + _1: { + ctor: '::', + _0: 'value', + _1: {ctor: '[]'} + } + }, + _elm_lang$core$Json_Decode$string); +var _elm_lang$html$Html_Events$defaultOptions = _elm_lang$virtual_dom$VirtualDom$defaultOptions; +var _elm_lang$html$Html_Events$onWithOptions = _elm_lang$virtual_dom$VirtualDom$onWithOptions; +var _elm_lang$html$Html_Events$on = _elm_lang$virtual_dom$VirtualDom$on; +var _elm_lang$html$Html_Events$onFocus = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'focus', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onBlur = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'blur', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onSubmitOptions = _elm_lang$core$Native_Utils.update( + _elm_lang$html$Html_Events$defaultOptions, + {preventDefault: true}); +var _elm_lang$html$Html_Events$onSubmit = function (msg) { + return A3( + _elm_lang$html$Html_Events$onWithOptions, + 'submit', + _elm_lang$html$Html_Events$onSubmitOptions, + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onCheck = function (tagger) { + return A2( + _elm_lang$html$Html_Events$on, + 'change', + A2(_elm_lang$core$Json_Decode$map, tagger, _elm_lang$html$Html_Events$targetChecked)); +}; +var _elm_lang$html$Html_Events$onInput = function (tagger) { + return A2( + _elm_lang$html$Html_Events$on, + 'input', + A2(_elm_lang$core$Json_Decode$map, tagger, _elm_lang$html$Html_Events$targetValue)); +}; +var _elm_lang$html$Html_Events$onMouseOut = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'mouseout', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onMouseOver = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'mouseover', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onMouseLeave = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'mouseleave', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onMouseEnter = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'mouseenter', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onMouseUp = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'mouseup', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onMouseDown = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'mousedown', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onDoubleClick = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'dblclick', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$onClick = function (msg) { + return A2( + _elm_lang$html$Html_Events$on, + 'click', + _elm_lang$core$Json_Decode$succeed(msg)); +}; +var _elm_lang$html$Html_Events$Options = F2( + function (a, b) { + return {stopPropagation: a, preventDefault: b}; + }); + +var _elm_lang$html$Html_Lazy$lazy3 = _elm_lang$virtual_dom$VirtualDom$lazy3; +var _elm_lang$html$Html_Lazy$lazy2 = _elm_lang$virtual_dom$VirtualDom$lazy2; +var _elm_lang$html$Html_Lazy$lazy = _elm_lang$virtual_dom$VirtualDom$lazy; + +var _elm_lang$http$Native_Http = function() { + + +// ENCODING AND DECODING + +function encodeUri(string) +{ + return encodeURIComponent(string); +} + +function decodeUri(string) +{ + try + { + return _elm_lang$core$Maybe$Just(decodeURIComponent(string)); + } + catch(e) + { + return _elm_lang$core$Maybe$Nothing; + } +} + + +// SEND REQUEST + +function toTask(request, maybeProgress) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + var xhr = new XMLHttpRequest(); + + configureProgress(xhr, maybeProgress); + + xhr.addEventListener('error', function() { + callback(_elm_lang$core$Native_Scheduler.fail({ ctor: 'NetworkError' })); + }); + xhr.addEventListener('timeout', function() { + callback(_elm_lang$core$Native_Scheduler.fail({ ctor: 'Timeout' })); + }); + xhr.addEventListener('load', function() { + callback(handleResponse(xhr, request.expect.responseToResult)); + }); + + try + { + xhr.open(request.method, request.url, true); + } + catch (e) + { + return callback(_elm_lang$core$Native_Scheduler.fail({ ctor: 'BadUrl', _0: request.url })); + } + + configureRequest(xhr, request); + send(xhr, request.body); + + return function() { xhr.abort(); }; + }); +} + +function configureProgress(xhr, maybeProgress) +{ + if (maybeProgress.ctor === 'Nothing') + { + return; + } + + xhr.addEventListener('progress', function(event) { + if (!event.lengthComputable) + { + return; + } + _elm_lang$core$Native_Scheduler.rawSpawn(maybeProgress._0({ + bytes: event.loaded, + bytesExpected: event.total + })); + }); +} + +function configureRequest(xhr, request) +{ + function setHeader(pair) + { + xhr.setRequestHeader(pair._0, pair._1); + } + + A2(_elm_lang$core$List$map, setHeader, request.headers); + xhr.responseType = request.expect.responseType; + xhr.withCredentials = request.withCredentials; + + if (request.timeout.ctor === 'Just') + { + xhr.timeout = request.timeout._0; + } +} + +function send(xhr, body) +{ + switch (body.ctor) + { + case 'EmptyBody': + xhr.send(); + return; + + case 'StringBody': + xhr.setRequestHeader('Content-Type', body._0); + xhr.send(body._1); + return; + + case 'FormDataBody': + xhr.send(body._0); + return; + } +} + + +// RESPONSES + +function handleResponse(xhr, responseToResult) +{ + var response = toResponse(xhr); + + if (xhr.status < 200 || 300 <= xhr.status) + { + response.body = xhr.responseText; + return _elm_lang$core$Native_Scheduler.fail({ + ctor: 'BadStatus', + _0: response + }); + } + + var result = responseToResult(response); + + if (result.ctor === 'Ok') + { + return _elm_lang$core$Native_Scheduler.succeed(result._0); + } + else + { + response.body = xhr.responseText; + return _elm_lang$core$Native_Scheduler.fail({ + ctor: 'BadPayload', + _0: result._0, + _1: response + }); + } +} + +function toResponse(xhr) +{ + return { + status: { code: xhr.status, message: xhr.statusText }, + headers: parseHeaders(xhr.getAllResponseHeaders()), + url: xhr.responseURL, + body: xhr.response + }; +} + +function parseHeaders(rawHeaders) +{ + var headers = _elm_lang$core$Dict$empty; + + if (!rawHeaders) + { + return headers; + } + + var headerPairs = rawHeaders.split('\u000d\u000a'); + for (var i = headerPairs.length; i--; ) + { + var headerPair = headerPairs[i]; + var index = headerPair.indexOf('\u003a\u0020'); + if (index > 0) + { + var key = headerPair.substring(0, index); + var value = headerPair.substring(index + 2); + + headers = A3(_elm_lang$core$Dict$update, key, function(oldValue) { + if (oldValue.ctor === 'Just') + { + return _elm_lang$core$Maybe$Just(value + ', ' + oldValue._0); + } + return _elm_lang$core$Maybe$Just(value); + }, headers); + } + } + + return headers; +} + + +// EXPECTORS + +function expectStringResponse(responseToResult) +{ + return { + responseType: 'text', + responseToResult: responseToResult + }; +} + +function mapExpect(func, expect) +{ + return { + responseType: expect.responseType, + responseToResult: function(response) { + var convertedResponse = expect.responseToResult(response); + return A2(_elm_lang$core$Result$map, func, convertedResponse); + } + }; +} + + +// BODY + +function multipart(parts) +{ + var formData = new FormData(); + + while (parts.ctor !== '[]') + { + var part = parts._0; + formData.append(part._0, part._1); + parts = parts._1; + } + + return { ctor: 'FormDataBody', _0: formData }; +} + +return { + toTask: F2(toTask), + expectStringResponse: expectStringResponse, + mapExpect: F2(mapExpect), + multipart: multipart, + encodeUri: encodeUri, + decodeUri: decodeUri +}; + +}(); + +var _elm_lang$http$Http_Internal$map = F2( + function (func, request) { + return _elm_lang$core$Native_Utils.update( + request, + { + expect: A2(_elm_lang$http$Native_Http.mapExpect, func, request.expect) + }); + }); +var _elm_lang$http$Http_Internal$RawRequest = F7( + function (a, b, c, d, e, f, g) { + return {method: a, headers: b, url: c, body: d, expect: e, timeout: f, withCredentials: g}; + }); +var _elm_lang$http$Http_Internal$Request = function (a) { + return {ctor: 'Request', _0: a}; +}; +var _elm_lang$http$Http_Internal$Expect = {ctor: 'Expect'}; +var _elm_lang$http$Http_Internal$FormDataBody = {ctor: 'FormDataBody'}; +var _elm_lang$http$Http_Internal$StringBody = F2( + function (a, b) { + return {ctor: 'StringBody', _0: a, _1: b}; + }); +var _elm_lang$http$Http_Internal$EmptyBody = {ctor: 'EmptyBody'}; +var _elm_lang$http$Http_Internal$Header = F2( + function (a, b) { + return {ctor: 'Header', _0: a, _1: b}; + }); + +var _elm_lang$http$Http$decodeUri = _elm_lang$http$Native_Http.decodeUri; +var _elm_lang$http$Http$encodeUri = _elm_lang$http$Native_Http.encodeUri; +var _elm_lang$http$Http$expectStringResponse = _elm_lang$http$Native_Http.expectStringResponse; +var _elm_lang$http$Http$expectJson = function (decoder) { + return _elm_lang$http$Http$expectStringResponse( + function (response) { + return A2(_elm_lang$core$Json_Decode$decodeString, decoder, response.body); + }); +}; +var _elm_lang$http$Http$expectString = _elm_lang$http$Http$expectStringResponse( + function (response) { + return _elm_lang$core$Result$Ok(response.body); + }); +var _elm_lang$http$Http$multipartBody = _elm_lang$http$Native_Http.multipart; +var _elm_lang$http$Http$stringBody = _elm_lang$http$Http_Internal$StringBody; +var _elm_lang$http$Http$jsonBody = function (value) { + return A2( + _elm_lang$http$Http_Internal$StringBody, + 'application/json', + A2(_elm_lang$core$Json_Encode$encode, 0, value)); +}; +var _elm_lang$http$Http$emptyBody = _elm_lang$http$Http_Internal$EmptyBody; +var _elm_lang$http$Http$header = _elm_lang$http$Http_Internal$Header; +var _elm_lang$http$Http$request = _elm_lang$http$Http_Internal$Request; +var _elm_lang$http$Http$post = F3( + function (url, body, decoder) { + return _elm_lang$http$Http$request( + { + method: 'POST', + headers: {ctor: '[]'}, + url: url, + body: body, + expect: _elm_lang$http$Http$expectJson(decoder), + timeout: _elm_lang$core$Maybe$Nothing, + withCredentials: false + }); + }); +var _elm_lang$http$Http$get = F2( + function (url, decoder) { + return _elm_lang$http$Http$request( + { + method: 'GET', + headers: {ctor: '[]'}, + url: url, + body: _elm_lang$http$Http$emptyBody, + expect: _elm_lang$http$Http$expectJson(decoder), + timeout: _elm_lang$core$Maybe$Nothing, + withCredentials: false + }); + }); +var _elm_lang$http$Http$getString = function (url) { + return _elm_lang$http$Http$request( + { + method: 'GET', + headers: {ctor: '[]'}, + url: url, + body: _elm_lang$http$Http$emptyBody, + expect: _elm_lang$http$Http$expectString, + timeout: _elm_lang$core$Maybe$Nothing, + withCredentials: false + }); +}; +var _elm_lang$http$Http$toTask = function (_p0) { + var _p1 = _p0; + return A2(_elm_lang$http$Native_Http.toTask, _p1._0, _elm_lang$core$Maybe$Nothing); +}; +var _elm_lang$http$Http$send = F2( + function (resultToMessage, request) { + return A2( + _elm_lang$core$Task$attempt, + resultToMessage, + _elm_lang$http$Http$toTask(request)); + }); +var _elm_lang$http$Http$Response = F4( + function (a, b, c, d) { + return {url: a, status: b, headers: c, body: d}; + }); +var _elm_lang$http$Http$BadPayload = F2( + function (a, b) { + return {ctor: 'BadPayload', _0: a, _1: b}; + }); +var _elm_lang$http$Http$BadStatus = function (a) { + return {ctor: 'BadStatus', _0: a}; +}; +var _elm_lang$http$Http$NetworkError = {ctor: 'NetworkError'}; +var _elm_lang$http$Http$Timeout = {ctor: 'Timeout'}; +var _elm_lang$http$Http$BadUrl = function (a) { + return {ctor: 'BadUrl', _0: a}; +}; +var _elm_lang$http$Http$StringPart = F2( + function (a, b) { + return {ctor: 'StringPart', _0: a, _1: b}; + }); +var _elm_lang$http$Http$stringPart = _elm_lang$http$Http$StringPart; + +var _elm_lang$navigation$Native_Navigation = function() { + + +// FAKE NAVIGATION + +function go(n) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + if (n !== 0) + { + history.go(n); + } + callback(_elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0)); + }); +} + +function pushState(url) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + history.pushState({}, '', url); + callback(_elm_lang$core$Native_Scheduler.succeed(getLocation())); + }); +} + +function replaceState(url) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + history.replaceState({}, '', url); + callback(_elm_lang$core$Native_Scheduler.succeed(getLocation())); + }); +} + + +// REAL NAVIGATION + +function reloadPage(skipCache) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + document.location.reload(skipCache); + callback(_elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0)); + }); +} + +function setLocation(url) +{ + return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) + { + try + { + window.location = url; + } + catch(err) + { + // Only Firefox can throw a NS_ERROR_MALFORMED_URI exception here. + // Other browsers reload the page, so let's be consistent about that. + document.location.reload(false); + } + callback(_elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0)); + }); +} + + +// GET LOCATION + +function getLocation() +{ + var location = document.location; + + return { + href: location.href, + host: location.host, + hostname: location.hostname, + protocol: location.protocol, + origin: location.origin, + port_: location.port, + pathname: location.pathname, + search: location.search, + hash: location.hash, + username: location.username, + password: location.password + }; +} + + +// DETECT IE11 PROBLEMS + +function isInternetExplorer11() +{ + return window.navigator.userAgent.indexOf('Trident') !== -1; +} + + +return { + go: go, + setLocation: setLocation, + reloadPage: reloadPage, + pushState: pushState, + replaceState: replaceState, + getLocation: getLocation, + isInternetExplorer11: isInternetExplorer11 +}; + +}(); + +var _elm_lang$navigation$Navigation$replaceState = _elm_lang$navigation$Native_Navigation.replaceState; +var _elm_lang$navigation$Navigation$pushState = _elm_lang$navigation$Native_Navigation.pushState; +var _elm_lang$navigation$Navigation$go = _elm_lang$navigation$Native_Navigation.go; +var _elm_lang$navigation$Navigation$reloadPage = _elm_lang$navigation$Native_Navigation.reloadPage; +var _elm_lang$navigation$Navigation$setLocation = _elm_lang$navigation$Native_Navigation.setLocation; +var _elm_lang$navigation$Navigation_ops = _elm_lang$navigation$Navigation_ops || {}; +_elm_lang$navigation$Navigation_ops['&>'] = F2( + function (task1, task2) { + return A2( + _elm_lang$core$Task$andThen, + function (_p0) { + return task2; + }, + task1); + }); +var _elm_lang$navigation$Navigation$notify = F3( + function (router, subs, location) { + var send = function (_p1) { + var _p2 = _p1; + return A2( + _elm_lang$core$Platform$sendToApp, + router, + _p2._0(location)); + }; + return A2( + _elm_lang$navigation$Navigation_ops['&>'], + _elm_lang$core$Task$sequence( + A2(_elm_lang$core$List$map, send, subs)), + _elm_lang$core$Task$succeed( + {ctor: '_Tuple0'})); + }); +var _elm_lang$navigation$Navigation$cmdHelp = F3( + function (router, subs, cmd) { + var _p3 = cmd; + switch (_p3.ctor) { + case 'Jump': + return _elm_lang$navigation$Navigation$go(_p3._0); + case 'New': + var _p5 = _p3._1; + var _p4 = _p3._0; + if (_p4.ctor === 'Notify') { + return A2( + _elm_lang$core$Task$andThen, + A2(_elm_lang$navigation$Navigation$notify, router, subs), + _elm_lang$navigation$Navigation$pushState(_p5)); + } else { + return A2( + _elm_lang$core$Task$andThen, + _elm_lang$core$Basics$always( + _elm_lang$core$Task$succeed( + {ctor: '_Tuple0'})), + _elm_lang$navigation$Navigation$pushState(_p5)); + } + case 'Modify': + var _p7 = _p3._1; + var _p6 = _p3._0; + if (_p6.ctor === 'Notify') { + return A2( + _elm_lang$core$Task$andThen, + A2(_elm_lang$navigation$Navigation$notify, router, subs), + _elm_lang$navigation$Navigation$replaceState(_p7)); + } else { + return A2( + _elm_lang$core$Task$andThen, + _elm_lang$core$Basics$always( + _elm_lang$core$Task$succeed( + {ctor: '_Tuple0'})), + _elm_lang$navigation$Navigation$replaceState(_p7)); + } + case 'Visit': + return _elm_lang$navigation$Navigation$setLocation(_p3._0); + default: + return _elm_lang$navigation$Navigation$reloadPage(_p3._0); + } + }); +var _elm_lang$navigation$Navigation$killPopWatcher = function (popWatcher) { + var _p8 = popWatcher; + if (_p8.ctor === 'Normal') { + return _elm_lang$core$Process$kill(_p8._0); + } else { + return A2( + _elm_lang$navigation$Navigation_ops['&>'], + _elm_lang$core$Process$kill(_p8._0), + _elm_lang$core$Process$kill(_p8._1)); + } +}; +var _elm_lang$navigation$Navigation$onSelfMsg = F3( + function (router, location, state) { + return A2( + _elm_lang$navigation$Navigation_ops['&>'], + A3(_elm_lang$navigation$Navigation$notify, router, state.subs, location), + _elm_lang$core$Task$succeed(state)); + }); +var _elm_lang$navigation$Navigation$subscription = _elm_lang$core$Native_Platform.leaf('Navigation'); +var _elm_lang$navigation$Navigation$command = _elm_lang$core$Native_Platform.leaf('Navigation'); +var _elm_lang$navigation$Navigation$Location = function (a) { + return function (b) { + return function (c) { + return function (d) { + return function (e) { + return function (f) { + return function (g) { + return function (h) { + return function (i) { + return function (j) { + return function (k) { + return {href: a, host: b, hostname: c, protocol: d, origin: e, port_: f, pathname: g, search: h, hash: i, username: j, password: k}; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; +}; +var _elm_lang$navigation$Navigation$State = F2( + function (a, b) { + return {subs: a, popWatcher: b}; + }); +var _elm_lang$navigation$Navigation$init = _elm_lang$core$Task$succeed( + A2( + _elm_lang$navigation$Navigation$State, + {ctor: '[]'}, + _elm_lang$core$Maybe$Nothing)); +var _elm_lang$navigation$Navigation$NoNotify = {ctor: 'NoNotify'}; +var _elm_lang$navigation$Navigation$Notify = {ctor: 'Notify'}; +var _elm_lang$navigation$Navigation$Reload = function (a) { + return {ctor: 'Reload', _0: a}; +}; +var _elm_lang$navigation$Navigation$reload = _elm_lang$navigation$Navigation$command( + _elm_lang$navigation$Navigation$Reload(false)); +var _elm_lang$navigation$Navigation$reloadAndSkipCache = _elm_lang$navigation$Navigation$command( + _elm_lang$navigation$Navigation$Reload(true)); +var _elm_lang$navigation$Navigation$Visit = function (a) { + return {ctor: 'Visit', _0: a}; +}; +var _elm_lang$navigation$Navigation$load = function (url) { + return _elm_lang$navigation$Navigation$command( + _elm_lang$navigation$Navigation$Visit(url)); +}; +var _elm_lang$navigation$Navigation$Modify = F2( + function (a, b) { + return {ctor: 'Modify', _0: a, _1: b}; + }); +var _elm_lang$navigation$Navigation$modifyUrl = function (url) { + return _elm_lang$navigation$Navigation$command( + A2(_elm_lang$navigation$Navigation$Modify, _elm_lang$navigation$Navigation$Notify, url)); +}; +var _elm_lang$navigation$Navigation$modifyUrlWithoutNotify = function (url) { + return _elm_lang$navigation$Navigation$command( + A2(_elm_lang$navigation$Navigation$Modify, _elm_lang$navigation$Navigation$NoNotify, url)); +}; +var _elm_lang$navigation$Navigation$New = F2( + function (a, b) { + return {ctor: 'New', _0: a, _1: b}; + }); +var _elm_lang$navigation$Navigation$newUrl = function (url) { + return _elm_lang$navigation$Navigation$command( + A2(_elm_lang$navigation$Navigation$New, _elm_lang$navigation$Navigation$Notify, url)); +}; +var _elm_lang$navigation$Navigation$newUrlWithoutNotify = function (url) { + return _elm_lang$navigation$Navigation$command( + A2(_elm_lang$navigation$Navigation$New, _elm_lang$navigation$Navigation$NoNotify, url)); +}; +var _elm_lang$navigation$Navigation$Jump = function (a) { + return {ctor: 'Jump', _0: a}; +}; +var _elm_lang$navigation$Navigation$back = function (n) { + return _elm_lang$navigation$Navigation$command( + _elm_lang$navigation$Navigation$Jump(0 - n)); +}; +var _elm_lang$navigation$Navigation$forward = function (n) { + return _elm_lang$navigation$Navigation$command( + _elm_lang$navigation$Navigation$Jump(n)); +}; +var _elm_lang$navigation$Navigation$cmdMap = F2( + function (_p9, myCmd) { + var _p10 = myCmd; + switch (_p10.ctor) { + case 'Jump': + return _elm_lang$navigation$Navigation$Jump(_p10._0); + case 'New': + return A2(_elm_lang$navigation$Navigation$New, _p10._0, _p10._1); + case 'Modify': + return A2(_elm_lang$navigation$Navigation$Modify, _p10._0, _p10._1); + case 'Visit': + return _elm_lang$navigation$Navigation$Visit(_p10._0); + default: + return _elm_lang$navigation$Navigation$Reload(_p10._0); + } + }); +var _elm_lang$navigation$Navigation$Monitor = function (a) { + return {ctor: 'Monitor', _0: a}; +}; +var _elm_lang$navigation$Navigation$program = F2( + function (locationToMessage, stuff) { + var init = stuff.init( + _elm_lang$navigation$Native_Navigation.getLocation( + {ctor: '_Tuple0'})); + var subs = function (model) { + return _elm_lang$core$Platform_Sub$batch( + { + ctor: '::', + _0: _elm_lang$navigation$Navigation$subscription( + _elm_lang$navigation$Navigation$Monitor(locationToMessage)), + _1: { + ctor: '::', + _0: stuff.subscriptions(model), + _1: {ctor: '[]'} + } + }); + }; + return _elm_lang$html$Html$program( + {init: init, view: stuff.view, update: stuff.update, subscriptions: subs}); + }); +var _elm_lang$navigation$Navigation$programWithFlags = F2( + function (locationToMessage, stuff) { + var init = function (flags) { + return A2( + stuff.init, + flags, + _elm_lang$navigation$Native_Navigation.getLocation( + {ctor: '_Tuple0'})); + }; + var subs = function (model) { + return _elm_lang$core$Platform_Sub$batch( + { + ctor: '::', + _0: _elm_lang$navigation$Navigation$subscription( + _elm_lang$navigation$Navigation$Monitor(locationToMessage)), + _1: { + ctor: '::', + _0: stuff.subscriptions(model), + _1: {ctor: '[]'} + } + }); + }; + return _elm_lang$html$Html$programWithFlags( + {init: init, view: stuff.view, update: stuff.update, subscriptions: subs}); + }); +var _elm_lang$navigation$Navigation$subMap = F2( + function (func, _p11) { + var _p12 = _p11; + return _elm_lang$navigation$Navigation$Monitor( + function (_p13) { + return func( + _p12._0(_p13)); + }); + }); +var _elm_lang$navigation$Navigation$InternetExplorer = F2( + function (a, b) { + return {ctor: 'InternetExplorer', _0: a, _1: b}; + }); +var _elm_lang$navigation$Navigation$Normal = function (a) { + return {ctor: 'Normal', _0: a}; +}; +var _elm_lang$navigation$Navigation$spawnPopWatcher = function (router) { + var reportLocation = function (_p14) { + return A2( + _elm_lang$core$Platform$sendToSelf, + router, + _elm_lang$navigation$Native_Navigation.getLocation( + {ctor: '_Tuple0'})); + }; + return _elm_lang$navigation$Native_Navigation.isInternetExplorer11( + {ctor: '_Tuple0'}) ? A3( + _elm_lang$core$Task$map2, + _elm_lang$navigation$Navigation$InternetExplorer, + _elm_lang$core$Process$spawn( + A3(_elm_lang$dom$Dom_LowLevel$onWindow, 'popstate', _elm_lang$core$Json_Decode$value, reportLocation)), + _elm_lang$core$Process$spawn( + A3(_elm_lang$dom$Dom_LowLevel$onWindow, 'hashchange', _elm_lang$core$Json_Decode$value, reportLocation))) : A2( + _elm_lang$core$Task$map, + _elm_lang$navigation$Navigation$Normal, + _elm_lang$core$Process$spawn( + A3(_elm_lang$dom$Dom_LowLevel$onWindow, 'popstate', _elm_lang$core$Json_Decode$value, reportLocation))); +}; +var _elm_lang$navigation$Navigation$onEffects = F4( + function (router, cmds, subs, _p15) { + var _p16 = _p15; + var _p19 = _p16.popWatcher; + var stepState = function () { + var _p17 = {ctor: '_Tuple2', _0: subs, _1: _p19}; + _v8_2: + do { + if (_p17._0.ctor === '[]') { + if (_p17._1.ctor === 'Just') { + return A2( + _elm_lang$navigation$Navigation_ops['&>'], + _elm_lang$navigation$Navigation$killPopWatcher(_p17._1._0), + _elm_lang$core$Task$succeed( + A2(_elm_lang$navigation$Navigation$State, subs, _elm_lang$core$Maybe$Nothing))); + } else { + break _v8_2; + } + } else { + if (_p17._1.ctor === 'Nothing') { + return A2( + _elm_lang$core$Task$map, + function (_p18) { + return A2( + _elm_lang$navigation$Navigation$State, + subs, + _elm_lang$core$Maybe$Just(_p18)); + }, + _elm_lang$navigation$Navigation$spawnPopWatcher(router)); + } else { + break _v8_2; + } + } + } while(false); + return _elm_lang$core$Task$succeed( + A2(_elm_lang$navigation$Navigation$State, subs, _p19)); + }(); + return A2( + _elm_lang$navigation$Navigation_ops['&>'], + _elm_lang$core$Task$sequence( + A2( + _elm_lang$core$List$map, + A2(_elm_lang$navigation$Navigation$cmdHelp, router, subs), + cmds)), + stepState); + }); +_elm_lang$core$Native_Platform.effectManagers['Navigation'] = {pkg: 'elm-lang/navigation', init: _elm_lang$navigation$Navigation$init, onEffects: _elm_lang$navigation$Navigation$onEffects, onSelfMsg: _elm_lang$navigation$Navigation$onSelfMsg, tag: 'fx', cmdMap: _elm_lang$navigation$Navigation$cmdMap, subMap: _elm_lang$navigation$Navigation$subMap}; + +var _elm_lang$svg$Svg$map = _elm_lang$virtual_dom$VirtualDom$map; +var _elm_lang$svg$Svg$text = _elm_lang$virtual_dom$VirtualDom$text; +var _elm_lang$svg$Svg$svgNamespace = A2( + _elm_lang$virtual_dom$VirtualDom$property, + 'namespace', + _elm_lang$core$Json_Encode$string('http://www.w3.org/2000/svg')); +var _elm_lang$svg$Svg$node = F3( + function (name, attributes, children) { + return A3( + _elm_lang$virtual_dom$VirtualDom$node, + name, + {ctor: '::', _0: _elm_lang$svg$Svg$svgNamespace, _1: attributes}, + children); + }); +var _elm_lang$svg$Svg$svg = _elm_lang$svg$Svg$node('svg'); +var _elm_lang$svg$Svg$foreignObject = _elm_lang$svg$Svg$node('foreignObject'); +var _elm_lang$svg$Svg$animate = _elm_lang$svg$Svg$node('animate'); +var _elm_lang$svg$Svg$animateColor = _elm_lang$svg$Svg$node('animateColor'); +var _elm_lang$svg$Svg$animateMotion = _elm_lang$svg$Svg$node('animateMotion'); +var _elm_lang$svg$Svg$animateTransform = _elm_lang$svg$Svg$node('animateTransform'); +var _elm_lang$svg$Svg$mpath = _elm_lang$svg$Svg$node('mpath'); +var _elm_lang$svg$Svg$set = _elm_lang$svg$Svg$node('set'); +var _elm_lang$svg$Svg$a = _elm_lang$svg$Svg$node('a'); +var _elm_lang$svg$Svg$defs = _elm_lang$svg$Svg$node('defs'); +var _elm_lang$svg$Svg$g = _elm_lang$svg$Svg$node('g'); +var _elm_lang$svg$Svg$marker = _elm_lang$svg$Svg$node('marker'); +var _elm_lang$svg$Svg$mask = _elm_lang$svg$Svg$node('mask'); +var _elm_lang$svg$Svg$pattern = _elm_lang$svg$Svg$node('pattern'); +var _elm_lang$svg$Svg$switch = _elm_lang$svg$Svg$node('switch'); +var _elm_lang$svg$Svg$symbol = _elm_lang$svg$Svg$node('symbol'); +var _elm_lang$svg$Svg$desc = _elm_lang$svg$Svg$node('desc'); +var _elm_lang$svg$Svg$metadata = _elm_lang$svg$Svg$node('metadata'); +var _elm_lang$svg$Svg$title = _elm_lang$svg$Svg$node('title'); +var _elm_lang$svg$Svg$feBlend = _elm_lang$svg$Svg$node('feBlend'); +var _elm_lang$svg$Svg$feColorMatrix = _elm_lang$svg$Svg$node('feColorMatrix'); +var _elm_lang$svg$Svg$feComponentTransfer = _elm_lang$svg$Svg$node('feComponentTransfer'); +var _elm_lang$svg$Svg$feComposite = _elm_lang$svg$Svg$node('feComposite'); +var _elm_lang$svg$Svg$feConvolveMatrix = _elm_lang$svg$Svg$node('feConvolveMatrix'); +var _elm_lang$svg$Svg$feDiffuseLighting = _elm_lang$svg$Svg$node('feDiffuseLighting'); +var _elm_lang$svg$Svg$feDisplacementMap = _elm_lang$svg$Svg$node('feDisplacementMap'); +var _elm_lang$svg$Svg$feFlood = _elm_lang$svg$Svg$node('feFlood'); +var _elm_lang$svg$Svg$feFuncA = _elm_lang$svg$Svg$node('feFuncA'); +var _elm_lang$svg$Svg$feFuncB = _elm_lang$svg$Svg$node('feFuncB'); +var _elm_lang$svg$Svg$feFuncG = _elm_lang$svg$Svg$node('feFuncG'); +var _elm_lang$svg$Svg$feFuncR = _elm_lang$svg$Svg$node('feFuncR'); +var _elm_lang$svg$Svg$feGaussianBlur = _elm_lang$svg$Svg$node('feGaussianBlur'); +var _elm_lang$svg$Svg$feImage = _elm_lang$svg$Svg$node('feImage'); +var _elm_lang$svg$Svg$feMerge = _elm_lang$svg$Svg$node('feMerge'); +var _elm_lang$svg$Svg$feMergeNode = _elm_lang$svg$Svg$node('feMergeNode'); +var _elm_lang$svg$Svg$feMorphology = _elm_lang$svg$Svg$node('feMorphology'); +var _elm_lang$svg$Svg$feOffset = _elm_lang$svg$Svg$node('feOffset'); +var _elm_lang$svg$Svg$feSpecularLighting = _elm_lang$svg$Svg$node('feSpecularLighting'); +var _elm_lang$svg$Svg$feTile = _elm_lang$svg$Svg$node('feTile'); +var _elm_lang$svg$Svg$feTurbulence = _elm_lang$svg$Svg$node('feTurbulence'); +var _elm_lang$svg$Svg$font = _elm_lang$svg$Svg$node('font'); +var _elm_lang$svg$Svg$linearGradient = _elm_lang$svg$Svg$node('linearGradient'); +var _elm_lang$svg$Svg$radialGradient = _elm_lang$svg$Svg$node('radialGradient'); +var _elm_lang$svg$Svg$stop = _elm_lang$svg$Svg$node('stop'); +var _elm_lang$svg$Svg$circle = _elm_lang$svg$Svg$node('circle'); +var _elm_lang$svg$Svg$ellipse = _elm_lang$svg$Svg$node('ellipse'); +var _elm_lang$svg$Svg$image = _elm_lang$svg$Svg$node('image'); +var _elm_lang$svg$Svg$line = _elm_lang$svg$Svg$node('line'); +var _elm_lang$svg$Svg$path = _elm_lang$svg$Svg$node('path'); +var _elm_lang$svg$Svg$polygon = _elm_lang$svg$Svg$node('polygon'); +var _elm_lang$svg$Svg$polyline = _elm_lang$svg$Svg$node('polyline'); +var _elm_lang$svg$Svg$rect = _elm_lang$svg$Svg$node('rect'); +var _elm_lang$svg$Svg$use = _elm_lang$svg$Svg$node('use'); +var _elm_lang$svg$Svg$feDistantLight = _elm_lang$svg$Svg$node('feDistantLight'); +var _elm_lang$svg$Svg$fePointLight = _elm_lang$svg$Svg$node('fePointLight'); +var _elm_lang$svg$Svg$feSpotLight = _elm_lang$svg$Svg$node('feSpotLight'); +var _elm_lang$svg$Svg$altGlyph = _elm_lang$svg$Svg$node('altGlyph'); +var _elm_lang$svg$Svg$altGlyphDef = _elm_lang$svg$Svg$node('altGlyphDef'); +var _elm_lang$svg$Svg$altGlyphItem = _elm_lang$svg$Svg$node('altGlyphItem'); +var _elm_lang$svg$Svg$glyph = _elm_lang$svg$Svg$node('glyph'); +var _elm_lang$svg$Svg$glyphRef = _elm_lang$svg$Svg$node('glyphRef'); +var _elm_lang$svg$Svg$textPath = _elm_lang$svg$Svg$node('textPath'); +var _elm_lang$svg$Svg$text_ = _elm_lang$svg$Svg$node('text'); +var _elm_lang$svg$Svg$tref = _elm_lang$svg$Svg$node('tref'); +var _elm_lang$svg$Svg$tspan = _elm_lang$svg$Svg$node('tspan'); +var _elm_lang$svg$Svg$clipPath = _elm_lang$svg$Svg$node('clipPath'); +var _elm_lang$svg$Svg$colorProfile = _elm_lang$svg$Svg$node('colorProfile'); +var _elm_lang$svg$Svg$cursor = _elm_lang$svg$Svg$node('cursor'); +var _elm_lang$svg$Svg$filter = _elm_lang$svg$Svg$node('filter'); +var _elm_lang$svg$Svg$script = _elm_lang$svg$Svg$node('script'); +var _elm_lang$svg$Svg$style = _elm_lang$svg$Svg$node('style'); +var _elm_lang$svg$Svg$view = _elm_lang$svg$Svg$node('view'); + +var _elm_lang$svg$Svg_Attributes$writingMode = _elm_lang$virtual_dom$VirtualDom$attribute('writing-mode'); +var _elm_lang$svg$Svg_Attributes$wordSpacing = _elm_lang$virtual_dom$VirtualDom$attribute('word-spacing'); +var _elm_lang$svg$Svg_Attributes$visibility = _elm_lang$virtual_dom$VirtualDom$attribute('visibility'); +var _elm_lang$svg$Svg_Attributes$unicodeBidi = _elm_lang$virtual_dom$VirtualDom$attribute('unicode-bidi'); +var _elm_lang$svg$Svg_Attributes$textRendering = _elm_lang$virtual_dom$VirtualDom$attribute('text-rendering'); +var _elm_lang$svg$Svg_Attributes$textDecoration = _elm_lang$virtual_dom$VirtualDom$attribute('text-decoration'); +var _elm_lang$svg$Svg_Attributes$textAnchor = _elm_lang$virtual_dom$VirtualDom$attribute('text-anchor'); +var _elm_lang$svg$Svg_Attributes$stroke = _elm_lang$virtual_dom$VirtualDom$attribute('stroke'); +var _elm_lang$svg$Svg_Attributes$strokeWidth = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-width'); +var _elm_lang$svg$Svg_Attributes$strokeOpacity = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-opacity'); +var _elm_lang$svg$Svg_Attributes$strokeMiterlimit = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-miterlimit'); +var _elm_lang$svg$Svg_Attributes$strokeLinejoin = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-linejoin'); +var _elm_lang$svg$Svg_Attributes$strokeLinecap = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-linecap'); +var _elm_lang$svg$Svg_Attributes$strokeDashoffset = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-dashoffset'); +var _elm_lang$svg$Svg_Attributes$strokeDasharray = _elm_lang$virtual_dom$VirtualDom$attribute('stroke-dasharray'); +var _elm_lang$svg$Svg_Attributes$stopOpacity = _elm_lang$virtual_dom$VirtualDom$attribute('stop-opacity'); +var _elm_lang$svg$Svg_Attributes$stopColor = _elm_lang$virtual_dom$VirtualDom$attribute('stop-color'); +var _elm_lang$svg$Svg_Attributes$shapeRendering = _elm_lang$virtual_dom$VirtualDom$attribute('shape-rendering'); +var _elm_lang$svg$Svg_Attributes$pointerEvents = _elm_lang$virtual_dom$VirtualDom$attribute('pointer-events'); +var _elm_lang$svg$Svg_Attributes$overflow = _elm_lang$virtual_dom$VirtualDom$attribute('overflow'); +var _elm_lang$svg$Svg_Attributes$opacity = _elm_lang$virtual_dom$VirtualDom$attribute('opacity'); +var _elm_lang$svg$Svg_Attributes$mask = _elm_lang$virtual_dom$VirtualDom$attribute('mask'); +var _elm_lang$svg$Svg_Attributes$markerStart = _elm_lang$virtual_dom$VirtualDom$attribute('marker-start'); +var _elm_lang$svg$Svg_Attributes$markerMid = _elm_lang$virtual_dom$VirtualDom$attribute('marker-mid'); +var _elm_lang$svg$Svg_Attributes$markerEnd = _elm_lang$virtual_dom$VirtualDom$attribute('marker-end'); +var _elm_lang$svg$Svg_Attributes$lightingColor = _elm_lang$virtual_dom$VirtualDom$attribute('lighting-color'); +var _elm_lang$svg$Svg_Attributes$letterSpacing = _elm_lang$virtual_dom$VirtualDom$attribute('letter-spacing'); +var _elm_lang$svg$Svg_Attributes$kerning = _elm_lang$virtual_dom$VirtualDom$attribute('kerning'); +var _elm_lang$svg$Svg_Attributes$imageRendering = _elm_lang$virtual_dom$VirtualDom$attribute('image-rendering'); +var _elm_lang$svg$Svg_Attributes$glyphOrientationVertical = _elm_lang$virtual_dom$VirtualDom$attribute('glyph-orientation-vertical'); +var _elm_lang$svg$Svg_Attributes$glyphOrientationHorizontal = _elm_lang$virtual_dom$VirtualDom$attribute('glyph-orientation-horizontal'); +var _elm_lang$svg$Svg_Attributes$fontWeight = _elm_lang$virtual_dom$VirtualDom$attribute('font-weight'); +var _elm_lang$svg$Svg_Attributes$fontVariant = _elm_lang$virtual_dom$VirtualDom$attribute('font-variant'); +var _elm_lang$svg$Svg_Attributes$fontStyle = _elm_lang$virtual_dom$VirtualDom$attribute('font-style'); +var _elm_lang$svg$Svg_Attributes$fontStretch = _elm_lang$virtual_dom$VirtualDom$attribute('font-stretch'); +var _elm_lang$svg$Svg_Attributes$fontSize = _elm_lang$virtual_dom$VirtualDom$attribute('font-size'); +var _elm_lang$svg$Svg_Attributes$fontSizeAdjust = _elm_lang$virtual_dom$VirtualDom$attribute('font-size-adjust'); +var _elm_lang$svg$Svg_Attributes$fontFamily = _elm_lang$virtual_dom$VirtualDom$attribute('font-family'); +var _elm_lang$svg$Svg_Attributes$floodOpacity = _elm_lang$virtual_dom$VirtualDom$attribute('flood-opacity'); +var _elm_lang$svg$Svg_Attributes$floodColor = _elm_lang$virtual_dom$VirtualDom$attribute('flood-color'); +var _elm_lang$svg$Svg_Attributes$filter = _elm_lang$virtual_dom$VirtualDom$attribute('filter'); +var _elm_lang$svg$Svg_Attributes$fill = _elm_lang$virtual_dom$VirtualDom$attribute('fill'); +var _elm_lang$svg$Svg_Attributes$fillRule = _elm_lang$virtual_dom$VirtualDom$attribute('fill-rule'); +var _elm_lang$svg$Svg_Attributes$fillOpacity = _elm_lang$virtual_dom$VirtualDom$attribute('fill-opacity'); +var _elm_lang$svg$Svg_Attributes$enableBackground = _elm_lang$virtual_dom$VirtualDom$attribute('enable-background'); +var _elm_lang$svg$Svg_Attributes$dominantBaseline = _elm_lang$virtual_dom$VirtualDom$attribute('dominant-baseline'); +var _elm_lang$svg$Svg_Attributes$display = _elm_lang$virtual_dom$VirtualDom$attribute('display'); +var _elm_lang$svg$Svg_Attributes$direction = _elm_lang$virtual_dom$VirtualDom$attribute('direction'); +var _elm_lang$svg$Svg_Attributes$cursor = _elm_lang$virtual_dom$VirtualDom$attribute('cursor'); +var _elm_lang$svg$Svg_Attributes$color = _elm_lang$virtual_dom$VirtualDom$attribute('color'); +var _elm_lang$svg$Svg_Attributes$colorRendering = _elm_lang$virtual_dom$VirtualDom$attribute('color-rendering'); +var _elm_lang$svg$Svg_Attributes$colorProfile = _elm_lang$virtual_dom$VirtualDom$attribute('color-profile'); +var _elm_lang$svg$Svg_Attributes$colorInterpolation = _elm_lang$virtual_dom$VirtualDom$attribute('color-interpolation'); +var _elm_lang$svg$Svg_Attributes$colorInterpolationFilters = _elm_lang$virtual_dom$VirtualDom$attribute('color-interpolation-filters'); +var _elm_lang$svg$Svg_Attributes$clip = _elm_lang$virtual_dom$VirtualDom$attribute('clip'); +var _elm_lang$svg$Svg_Attributes$clipRule = _elm_lang$virtual_dom$VirtualDom$attribute('clip-rule'); +var _elm_lang$svg$Svg_Attributes$clipPath = _elm_lang$virtual_dom$VirtualDom$attribute('clip-path'); +var _elm_lang$svg$Svg_Attributes$baselineShift = _elm_lang$virtual_dom$VirtualDom$attribute('baseline-shift'); +var _elm_lang$svg$Svg_Attributes$alignmentBaseline = _elm_lang$virtual_dom$VirtualDom$attribute('alignment-baseline'); +var _elm_lang$svg$Svg_Attributes$zoomAndPan = _elm_lang$virtual_dom$VirtualDom$attribute('zoomAndPan'); +var _elm_lang$svg$Svg_Attributes$z = _elm_lang$virtual_dom$VirtualDom$attribute('z'); +var _elm_lang$svg$Svg_Attributes$yChannelSelector = _elm_lang$virtual_dom$VirtualDom$attribute('yChannelSelector'); +var _elm_lang$svg$Svg_Attributes$y2 = _elm_lang$virtual_dom$VirtualDom$attribute('y2'); +var _elm_lang$svg$Svg_Attributes$y1 = _elm_lang$virtual_dom$VirtualDom$attribute('y1'); +var _elm_lang$svg$Svg_Attributes$y = _elm_lang$virtual_dom$VirtualDom$attribute('y'); +var _elm_lang$svg$Svg_Attributes$xmlSpace = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/XML/1998/namespace', 'xml:space'); +var _elm_lang$svg$Svg_Attributes$xmlLang = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/XML/1998/namespace', 'xml:lang'); +var _elm_lang$svg$Svg_Attributes$xmlBase = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/XML/1998/namespace', 'xml:base'); +var _elm_lang$svg$Svg_Attributes$xlinkType = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:type'); +var _elm_lang$svg$Svg_Attributes$xlinkTitle = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:title'); +var _elm_lang$svg$Svg_Attributes$xlinkShow = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:show'); +var _elm_lang$svg$Svg_Attributes$xlinkRole = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:role'); +var _elm_lang$svg$Svg_Attributes$xlinkHref = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:href'); +var _elm_lang$svg$Svg_Attributes$xlinkArcrole = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:arcrole'); +var _elm_lang$svg$Svg_Attributes$xlinkActuate = A2(_elm_lang$virtual_dom$VirtualDom$attributeNS, 'http://www.w3.org/1999/xlink', 'xlink:actuate'); +var _elm_lang$svg$Svg_Attributes$xChannelSelector = _elm_lang$virtual_dom$VirtualDom$attribute('xChannelSelector'); +var _elm_lang$svg$Svg_Attributes$x2 = _elm_lang$virtual_dom$VirtualDom$attribute('x2'); +var _elm_lang$svg$Svg_Attributes$x1 = _elm_lang$virtual_dom$VirtualDom$attribute('x1'); +var _elm_lang$svg$Svg_Attributes$xHeight = _elm_lang$virtual_dom$VirtualDom$attribute('x-height'); +var _elm_lang$svg$Svg_Attributes$x = _elm_lang$virtual_dom$VirtualDom$attribute('x'); +var _elm_lang$svg$Svg_Attributes$widths = _elm_lang$virtual_dom$VirtualDom$attribute('widths'); +var _elm_lang$svg$Svg_Attributes$width = _elm_lang$virtual_dom$VirtualDom$attribute('width'); +var _elm_lang$svg$Svg_Attributes$viewTarget = _elm_lang$virtual_dom$VirtualDom$attribute('viewTarget'); +var _elm_lang$svg$Svg_Attributes$viewBox = _elm_lang$virtual_dom$VirtualDom$attribute('viewBox'); +var _elm_lang$svg$Svg_Attributes$vertOriginY = _elm_lang$virtual_dom$VirtualDom$attribute('vert-origin-y'); +var _elm_lang$svg$Svg_Attributes$vertOriginX = _elm_lang$virtual_dom$VirtualDom$attribute('vert-origin-x'); +var _elm_lang$svg$Svg_Attributes$vertAdvY = _elm_lang$virtual_dom$VirtualDom$attribute('vert-adv-y'); +var _elm_lang$svg$Svg_Attributes$version = _elm_lang$virtual_dom$VirtualDom$attribute('version'); +var _elm_lang$svg$Svg_Attributes$values = _elm_lang$virtual_dom$VirtualDom$attribute('values'); +var _elm_lang$svg$Svg_Attributes$vMathematical = _elm_lang$virtual_dom$VirtualDom$attribute('v-mathematical'); +var _elm_lang$svg$Svg_Attributes$vIdeographic = _elm_lang$virtual_dom$VirtualDom$attribute('v-ideographic'); +var _elm_lang$svg$Svg_Attributes$vHanging = _elm_lang$virtual_dom$VirtualDom$attribute('v-hanging'); +var _elm_lang$svg$Svg_Attributes$vAlphabetic = _elm_lang$virtual_dom$VirtualDom$attribute('v-alphabetic'); +var _elm_lang$svg$Svg_Attributes$unitsPerEm = _elm_lang$virtual_dom$VirtualDom$attribute('units-per-em'); +var _elm_lang$svg$Svg_Attributes$unicodeRange = _elm_lang$virtual_dom$VirtualDom$attribute('unicode-range'); +var _elm_lang$svg$Svg_Attributes$unicode = _elm_lang$virtual_dom$VirtualDom$attribute('unicode'); +var _elm_lang$svg$Svg_Attributes$underlineThickness = _elm_lang$virtual_dom$VirtualDom$attribute('underline-thickness'); +var _elm_lang$svg$Svg_Attributes$underlinePosition = _elm_lang$virtual_dom$VirtualDom$attribute('underline-position'); +var _elm_lang$svg$Svg_Attributes$u2 = _elm_lang$virtual_dom$VirtualDom$attribute('u2'); +var _elm_lang$svg$Svg_Attributes$u1 = _elm_lang$virtual_dom$VirtualDom$attribute('u1'); +var _elm_lang$svg$Svg_Attributes$type_ = _elm_lang$virtual_dom$VirtualDom$attribute('type'); +var _elm_lang$svg$Svg_Attributes$transform = _elm_lang$virtual_dom$VirtualDom$attribute('transform'); +var _elm_lang$svg$Svg_Attributes$to = _elm_lang$virtual_dom$VirtualDom$attribute('to'); +var _elm_lang$svg$Svg_Attributes$title = _elm_lang$virtual_dom$VirtualDom$attribute('title'); +var _elm_lang$svg$Svg_Attributes$textLength = _elm_lang$virtual_dom$VirtualDom$attribute('textLength'); +var _elm_lang$svg$Svg_Attributes$targetY = _elm_lang$virtual_dom$VirtualDom$attribute('targetY'); +var _elm_lang$svg$Svg_Attributes$targetX = _elm_lang$virtual_dom$VirtualDom$attribute('targetX'); +var _elm_lang$svg$Svg_Attributes$target = _elm_lang$virtual_dom$VirtualDom$attribute('target'); +var _elm_lang$svg$Svg_Attributes$tableValues = _elm_lang$virtual_dom$VirtualDom$attribute('tableValues'); +var _elm_lang$svg$Svg_Attributes$systemLanguage = _elm_lang$virtual_dom$VirtualDom$attribute('systemLanguage'); +var _elm_lang$svg$Svg_Attributes$surfaceScale = _elm_lang$virtual_dom$VirtualDom$attribute('surfaceScale'); +var _elm_lang$svg$Svg_Attributes$style = _elm_lang$virtual_dom$VirtualDom$attribute('style'); +var _elm_lang$svg$Svg_Attributes$string = _elm_lang$virtual_dom$VirtualDom$attribute('string'); +var _elm_lang$svg$Svg_Attributes$strikethroughThickness = _elm_lang$virtual_dom$VirtualDom$attribute('strikethrough-thickness'); +var _elm_lang$svg$Svg_Attributes$strikethroughPosition = _elm_lang$virtual_dom$VirtualDom$attribute('strikethrough-position'); +var _elm_lang$svg$Svg_Attributes$stitchTiles = _elm_lang$virtual_dom$VirtualDom$attribute('stitchTiles'); +var _elm_lang$svg$Svg_Attributes$stemv = _elm_lang$virtual_dom$VirtualDom$attribute('stemv'); +var _elm_lang$svg$Svg_Attributes$stemh = _elm_lang$virtual_dom$VirtualDom$attribute('stemh'); +var _elm_lang$svg$Svg_Attributes$stdDeviation = _elm_lang$virtual_dom$VirtualDom$attribute('stdDeviation'); +var _elm_lang$svg$Svg_Attributes$startOffset = _elm_lang$virtual_dom$VirtualDom$attribute('startOffset'); +var _elm_lang$svg$Svg_Attributes$spreadMethod = _elm_lang$virtual_dom$VirtualDom$attribute('spreadMethod'); +var _elm_lang$svg$Svg_Attributes$speed = _elm_lang$virtual_dom$VirtualDom$attribute('speed'); +var _elm_lang$svg$Svg_Attributes$specularExponent = _elm_lang$virtual_dom$VirtualDom$attribute('specularExponent'); +var _elm_lang$svg$Svg_Attributes$specularConstant = _elm_lang$virtual_dom$VirtualDom$attribute('specularConstant'); +var _elm_lang$svg$Svg_Attributes$spacing = _elm_lang$virtual_dom$VirtualDom$attribute('spacing'); +var _elm_lang$svg$Svg_Attributes$slope = _elm_lang$virtual_dom$VirtualDom$attribute('slope'); +var _elm_lang$svg$Svg_Attributes$seed = _elm_lang$virtual_dom$VirtualDom$attribute('seed'); +var _elm_lang$svg$Svg_Attributes$scale = _elm_lang$virtual_dom$VirtualDom$attribute('scale'); +var _elm_lang$svg$Svg_Attributes$ry = _elm_lang$virtual_dom$VirtualDom$attribute('ry'); +var _elm_lang$svg$Svg_Attributes$rx = _elm_lang$virtual_dom$VirtualDom$attribute('rx'); +var _elm_lang$svg$Svg_Attributes$rotate = _elm_lang$virtual_dom$VirtualDom$attribute('rotate'); +var _elm_lang$svg$Svg_Attributes$result = _elm_lang$virtual_dom$VirtualDom$attribute('result'); +var _elm_lang$svg$Svg_Attributes$restart = _elm_lang$virtual_dom$VirtualDom$attribute('restart'); +var _elm_lang$svg$Svg_Attributes$requiredFeatures = _elm_lang$virtual_dom$VirtualDom$attribute('requiredFeatures'); +var _elm_lang$svg$Svg_Attributes$requiredExtensions = _elm_lang$virtual_dom$VirtualDom$attribute('requiredExtensions'); +var _elm_lang$svg$Svg_Attributes$repeatDur = _elm_lang$virtual_dom$VirtualDom$attribute('repeatDur'); +var _elm_lang$svg$Svg_Attributes$repeatCount = _elm_lang$virtual_dom$VirtualDom$attribute('repeatCount'); +var _elm_lang$svg$Svg_Attributes$renderingIntent = _elm_lang$virtual_dom$VirtualDom$attribute('rendering-intent'); +var _elm_lang$svg$Svg_Attributes$refY = _elm_lang$virtual_dom$VirtualDom$attribute('refY'); +var _elm_lang$svg$Svg_Attributes$refX = _elm_lang$virtual_dom$VirtualDom$attribute('refX'); +var _elm_lang$svg$Svg_Attributes$radius = _elm_lang$virtual_dom$VirtualDom$attribute('radius'); +var _elm_lang$svg$Svg_Attributes$r = _elm_lang$virtual_dom$VirtualDom$attribute('r'); +var _elm_lang$svg$Svg_Attributes$primitiveUnits = _elm_lang$virtual_dom$VirtualDom$attribute('primitiveUnits'); +var _elm_lang$svg$Svg_Attributes$preserveAspectRatio = _elm_lang$virtual_dom$VirtualDom$attribute('preserveAspectRatio'); +var _elm_lang$svg$Svg_Attributes$preserveAlpha = _elm_lang$virtual_dom$VirtualDom$attribute('preserveAlpha'); +var _elm_lang$svg$Svg_Attributes$pointsAtZ = _elm_lang$virtual_dom$VirtualDom$attribute('pointsAtZ'); +var _elm_lang$svg$Svg_Attributes$pointsAtY = _elm_lang$virtual_dom$VirtualDom$attribute('pointsAtY'); +var _elm_lang$svg$Svg_Attributes$pointsAtX = _elm_lang$virtual_dom$VirtualDom$attribute('pointsAtX'); +var _elm_lang$svg$Svg_Attributes$points = _elm_lang$virtual_dom$VirtualDom$attribute('points'); +var _elm_lang$svg$Svg_Attributes$pointOrder = _elm_lang$virtual_dom$VirtualDom$attribute('point-order'); +var _elm_lang$svg$Svg_Attributes$patternUnits = _elm_lang$virtual_dom$VirtualDom$attribute('patternUnits'); +var _elm_lang$svg$Svg_Attributes$patternTransform = _elm_lang$virtual_dom$VirtualDom$attribute('patternTransform'); +var _elm_lang$svg$Svg_Attributes$patternContentUnits = _elm_lang$virtual_dom$VirtualDom$attribute('patternContentUnits'); +var _elm_lang$svg$Svg_Attributes$pathLength = _elm_lang$virtual_dom$VirtualDom$attribute('pathLength'); +var _elm_lang$svg$Svg_Attributes$path = _elm_lang$virtual_dom$VirtualDom$attribute('path'); +var _elm_lang$svg$Svg_Attributes$panose1 = _elm_lang$virtual_dom$VirtualDom$attribute('panose-1'); +var _elm_lang$svg$Svg_Attributes$overlineThickness = _elm_lang$virtual_dom$VirtualDom$attribute('overline-thickness'); +var _elm_lang$svg$Svg_Attributes$overlinePosition = _elm_lang$virtual_dom$VirtualDom$attribute('overline-position'); +var _elm_lang$svg$Svg_Attributes$origin = _elm_lang$virtual_dom$VirtualDom$attribute('origin'); +var _elm_lang$svg$Svg_Attributes$orientation = _elm_lang$virtual_dom$VirtualDom$attribute('orientation'); +var _elm_lang$svg$Svg_Attributes$orient = _elm_lang$virtual_dom$VirtualDom$attribute('orient'); +var _elm_lang$svg$Svg_Attributes$order = _elm_lang$virtual_dom$VirtualDom$attribute('order'); +var _elm_lang$svg$Svg_Attributes$operator = _elm_lang$virtual_dom$VirtualDom$attribute('operator'); +var _elm_lang$svg$Svg_Attributes$offset = _elm_lang$virtual_dom$VirtualDom$attribute('offset'); +var _elm_lang$svg$Svg_Attributes$numOctaves = _elm_lang$virtual_dom$VirtualDom$attribute('numOctaves'); +var _elm_lang$svg$Svg_Attributes$name = _elm_lang$virtual_dom$VirtualDom$attribute('name'); +var _elm_lang$svg$Svg_Attributes$mode = _elm_lang$virtual_dom$VirtualDom$attribute('mode'); +var _elm_lang$svg$Svg_Attributes$min = _elm_lang$virtual_dom$VirtualDom$attribute('min'); +var _elm_lang$svg$Svg_Attributes$method = _elm_lang$virtual_dom$VirtualDom$attribute('method'); +var _elm_lang$svg$Svg_Attributes$media = _elm_lang$virtual_dom$VirtualDom$attribute('media'); +var _elm_lang$svg$Svg_Attributes$max = _elm_lang$virtual_dom$VirtualDom$attribute('max'); +var _elm_lang$svg$Svg_Attributes$mathematical = _elm_lang$virtual_dom$VirtualDom$attribute('mathematical'); +var _elm_lang$svg$Svg_Attributes$maskUnits = _elm_lang$virtual_dom$VirtualDom$attribute('maskUnits'); +var _elm_lang$svg$Svg_Attributes$maskContentUnits = _elm_lang$virtual_dom$VirtualDom$attribute('maskContentUnits'); +var _elm_lang$svg$Svg_Attributes$markerWidth = _elm_lang$virtual_dom$VirtualDom$attribute('markerWidth'); +var _elm_lang$svg$Svg_Attributes$markerUnits = _elm_lang$virtual_dom$VirtualDom$attribute('markerUnits'); +var _elm_lang$svg$Svg_Attributes$markerHeight = _elm_lang$virtual_dom$VirtualDom$attribute('markerHeight'); +var _elm_lang$svg$Svg_Attributes$local = _elm_lang$virtual_dom$VirtualDom$attribute('local'); +var _elm_lang$svg$Svg_Attributes$limitingConeAngle = _elm_lang$virtual_dom$VirtualDom$attribute('limitingConeAngle'); +var _elm_lang$svg$Svg_Attributes$lengthAdjust = _elm_lang$virtual_dom$VirtualDom$attribute('lengthAdjust'); +var _elm_lang$svg$Svg_Attributes$lang = _elm_lang$virtual_dom$VirtualDom$attribute('lang'); +var _elm_lang$svg$Svg_Attributes$keyTimes = _elm_lang$virtual_dom$VirtualDom$attribute('keyTimes'); +var _elm_lang$svg$Svg_Attributes$keySplines = _elm_lang$virtual_dom$VirtualDom$attribute('keySplines'); +var _elm_lang$svg$Svg_Attributes$keyPoints = _elm_lang$virtual_dom$VirtualDom$attribute('keyPoints'); +var _elm_lang$svg$Svg_Attributes$kernelUnitLength = _elm_lang$virtual_dom$VirtualDom$attribute('kernelUnitLength'); +var _elm_lang$svg$Svg_Attributes$kernelMatrix = _elm_lang$virtual_dom$VirtualDom$attribute('kernelMatrix'); +var _elm_lang$svg$Svg_Attributes$k4 = _elm_lang$virtual_dom$VirtualDom$attribute('k4'); +var _elm_lang$svg$Svg_Attributes$k3 = _elm_lang$virtual_dom$VirtualDom$attribute('k3'); +var _elm_lang$svg$Svg_Attributes$k2 = _elm_lang$virtual_dom$VirtualDom$attribute('k2'); +var _elm_lang$svg$Svg_Attributes$k1 = _elm_lang$virtual_dom$VirtualDom$attribute('k1'); +var _elm_lang$svg$Svg_Attributes$k = _elm_lang$virtual_dom$VirtualDom$attribute('k'); +var _elm_lang$svg$Svg_Attributes$intercept = _elm_lang$virtual_dom$VirtualDom$attribute('intercept'); +var _elm_lang$svg$Svg_Attributes$in2 = _elm_lang$virtual_dom$VirtualDom$attribute('in2'); +var _elm_lang$svg$Svg_Attributes$in_ = _elm_lang$virtual_dom$VirtualDom$attribute('in'); +var _elm_lang$svg$Svg_Attributes$ideographic = _elm_lang$virtual_dom$VirtualDom$attribute('ideographic'); +var _elm_lang$svg$Svg_Attributes$id = _elm_lang$virtual_dom$VirtualDom$attribute('id'); +var _elm_lang$svg$Svg_Attributes$horizOriginY = _elm_lang$virtual_dom$VirtualDom$attribute('horiz-origin-y'); +var _elm_lang$svg$Svg_Attributes$horizOriginX = _elm_lang$virtual_dom$VirtualDom$attribute('horiz-origin-x'); +var _elm_lang$svg$Svg_Attributes$horizAdvX = _elm_lang$virtual_dom$VirtualDom$attribute('horiz-adv-x'); +var _elm_lang$svg$Svg_Attributes$height = _elm_lang$virtual_dom$VirtualDom$attribute('height'); +var _elm_lang$svg$Svg_Attributes$hanging = _elm_lang$virtual_dom$VirtualDom$attribute('hanging'); +var _elm_lang$svg$Svg_Attributes$gradientUnits = _elm_lang$virtual_dom$VirtualDom$attribute('gradientUnits'); +var _elm_lang$svg$Svg_Attributes$gradientTransform = _elm_lang$virtual_dom$VirtualDom$attribute('gradientTransform'); +var _elm_lang$svg$Svg_Attributes$glyphRef = _elm_lang$virtual_dom$VirtualDom$attribute('glyphRef'); +var _elm_lang$svg$Svg_Attributes$glyphName = _elm_lang$virtual_dom$VirtualDom$attribute('glyph-name'); +var _elm_lang$svg$Svg_Attributes$g2 = _elm_lang$virtual_dom$VirtualDom$attribute('g2'); +var _elm_lang$svg$Svg_Attributes$g1 = _elm_lang$virtual_dom$VirtualDom$attribute('g1'); +var _elm_lang$svg$Svg_Attributes$fy = _elm_lang$virtual_dom$VirtualDom$attribute('fy'); +var _elm_lang$svg$Svg_Attributes$fx = _elm_lang$virtual_dom$VirtualDom$attribute('fx'); +var _elm_lang$svg$Svg_Attributes$from = _elm_lang$virtual_dom$VirtualDom$attribute('from'); +var _elm_lang$svg$Svg_Attributes$format = _elm_lang$virtual_dom$VirtualDom$attribute('format'); +var _elm_lang$svg$Svg_Attributes$filterUnits = _elm_lang$virtual_dom$VirtualDom$attribute('filterUnits'); +var _elm_lang$svg$Svg_Attributes$filterRes = _elm_lang$virtual_dom$VirtualDom$attribute('filterRes'); +var _elm_lang$svg$Svg_Attributes$externalResourcesRequired = _elm_lang$virtual_dom$VirtualDom$attribute('externalResourcesRequired'); +var _elm_lang$svg$Svg_Attributes$exponent = _elm_lang$virtual_dom$VirtualDom$attribute('exponent'); +var _elm_lang$svg$Svg_Attributes$end = _elm_lang$virtual_dom$VirtualDom$attribute('end'); +var _elm_lang$svg$Svg_Attributes$elevation = _elm_lang$virtual_dom$VirtualDom$attribute('elevation'); +var _elm_lang$svg$Svg_Attributes$edgeMode = _elm_lang$virtual_dom$VirtualDom$attribute('edgeMode'); +var _elm_lang$svg$Svg_Attributes$dy = _elm_lang$virtual_dom$VirtualDom$attribute('dy'); +var _elm_lang$svg$Svg_Attributes$dx = _elm_lang$virtual_dom$VirtualDom$attribute('dx'); +var _elm_lang$svg$Svg_Attributes$dur = _elm_lang$virtual_dom$VirtualDom$attribute('dur'); +var _elm_lang$svg$Svg_Attributes$divisor = _elm_lang$virtual_dom$VirtualDom$attribute('divisor'); +var _elm_lang$svg$Svg_Attributes$diffuseConstant = _elm_lang$virtual_dom$VirtualDom$attribute('diffuseConstant'); +var _elm_lang$svg$Svg_Attributes$descent = _elm_lang$virtual_dom$VirtualDom$attribute('descent'); +var _elm_lang$svg$Svg_Attributes$decelerate = _elm_lang$virtual_dom$VirtualDom$attribute('decelerate'); +var _elm_lang$svg$Svg_Attributes$d = _elm_lang$virtual_dom$VirtualDom$attribute('d'); +var _elm_lang$svg$Svg_Attributes$cy = _elm_lang$virtual_dom$VirtualDom$attribute('cy'); +var _elm_lang$svg$Svg_Attributes$cx = _elm_lang$virtual_dom$VirtualDom$attribute('cx'); +var _elm_lang$svg$Svg_Attributes$contentStyleType = _elm_lang$virtual_dom$VirtualDom$attribute('contentStyleType'); +var _elm_lang$svg$Svg_Attributes$contentScriptType = _elm_lang$virtual_dom$VirtualDom$attribute('contentScriptType'); +var _elm_lang$svg$Svg_Attributes$clipPathUnits = _elm_lang$virtual_dom$VirtualDom$attribute('clipPathUnits'); +var _elm_lang$svg$Svg_Attributes$class = _elm_lang$virtual_dom$VirtualDom$attribute('class'); +var _elm_lang$svg$Svg_Attributes$capHeight = _elm_lang$virtual_dom$VirtualDom$attribute('cap-height'); +var _elm_lang$svg$Svg_Attributes$calcMode = _elm_lang$virtual_dom$VirtualDom$attribute('calcMode'); +var _elm_lang$svg$Svg_Attributes$by = _elm_lang$virtual_dom$VirtualDom$attribute('by'); +var _elm_lang$svg$Svg_Attributes$bias = _elm_lang$virtual_dom$VirtualDom$attribute('bias'); +var _elm_lang$svg$Svg_Attributes$begin = _elm_lang$virtual_dom$VirtualDom$attribute('begin'); +var _elm_lang$svg$Svg_Attributes$bbox = _elm_lang$virtual_dom$VirtualDom$attribute('bbox'); +var _elm_lang$svg$Svg_Attributes$baseProfile = _elm_lang$virtual_dom$VirtualDom$attribute('baseProfile'); +var _elm_lang$svg$Svg_Attributes$baseFrequency = _elm_lang$virtual_dom$VirtualDom$attribute('baseFrequency'); +var _elm_lang$svg$Svg_Attributes$azimuth = _elm_lang$virtual_dom$VirtualDom$attribute('azimuth'); +var _elm_lang$svg$Svg_Attributes$autoReverse = _elm_lang$virtual_dom$VirtualDom$attribute('autoReverse'); +var _elm_lang$svg$Svg_Attributes$attributeType = _elm_lang$virtual_dom$VirtualDom$attribute('attributeType'); +var _elm_lang$svg$Svg_Attributes$attributeName = _elm_lang$virtual_dom$VirtualDom$attribute('attributeName'); +var _elm_lang$svg$Svg_Attributes$ascent = _elm_lang$virtual_dom$VirtualDom$attribute('ascent'); +var _elm_lang$svg$Svg_Attributes$arabicForm = _elm_lang$virtual_dom$VirtualDom$attribute('arabic-form'); +var _elm_lang$svg$Svg_Attributes$amplitude = _elm_lang$virtual_dom$VirtualDom$attribute('amplitude'); +var _elm_lang$svg$Svg_Attributes$allowReorder = _elm_lang$virtual_dom$VirtualDom$attribute('allowReorder'); +var _elm_lang$svg$Svg_Attributes$alphabetic = _elm_lang$virtual_dom$VirtualDom$attribute('alphabetic'); +var _elm_lang$svg$Svg_Attributes$additive = _elm_lang$virtual_dom$VirtualDom$attribute('additive'); +var _elm_lang$svg$Svg_Attributes$accumulate = _elm_lang$virtual_dom$VirtualDom$attribute('accumulate'); +var _elm_lang$svg$Svg_Attributes$accelerate = _elm_lang$virtual_dom$VirtualDom$attribute('accelerate'); +var _elm_lang$svg$Svg_Attributes$accentHeight = _elm_lang$virtual_dom$VirtualDom$attribute('accent-height'); + +var _elm_lang$svg$Svg_Events$on = _elm_lang$virtual_dom$VirtualDom$on; +var _elm_lang$svg$Svg_Events$simpleOn = F2( + function (name, msg) { + return A2( + _elm_lang$svg$Svg_Events$on, + name, + _elm_lang$core$Json_Decode$succeed(msg)); + }); +var _elm_lang$svg$Svg_Events$onBegin = _elm_lang$svg$Svg_Events$simpleOn('begin'); +var _elm_lang$svg$Svg_Events$onEnd = _elm_lang$svg$Svg_Events$simpleOn('end'); +var _elm_lang$svg$Svg_Events$onRepeat = _elm_lang$svg$Svg_Events$simpleOn('repeat'); +var _elm_lang$svg$Svg_Events$onAbort = _elm_lang$svg$Svg_Events$simpleOn('abort'); +var _elm_lang$svg$Svg_Events$onError = _elm_lang$svg$Svg_Events$simpleOn('error'); +var _elm_lang$svg$Svg_Events$onResize = _elm_lang$svg$Svg_Events$simpleOn('resize'); +var _elm_lang$svg$Svg_Events$onScroll = _elm_lang$svg$Svg_Events$simpleOn('scroll'); +var _elm_lang$svg$Svg_Events$onLoad = _elm_lang$svg$Svg_Events$simpleOn('load'); +var _elm_lang$svg$Svg_Events$onUnload = _elm_lang$svg$Svg_Events$simpleOn('unload'); +var _elm_lang$svg$Svg_Events$onZoom = _elm_lang$svg$Svg_Events$simpleOn('zoom'); +var _elm_lang$svg$Svg_Events$onActivate = _elm_lang$svg$Svg_Events$simpleOn('activate'); +var _elm_lang$svg$Svg_Events$onClick = _elm_lang$svg$Svg_Events$simpleOn('click'); +var _elm_lang$svg$Svg_Events$onFocusIn = _elm_lang$svg$Svg_Events$simpleOn('focusin'); +var _elm_lang$svg$Svg_Events$onFocusOut = _elm_lang$svg$Svg_Events$simpleOn('focusout'); +var _elm_lang$svg$Svg_Events$onMouseDown = _elm_lang$svg$Svg_Events$simpleOn('mousedown'); +var _elm_lang$svg$Svg_Events$onMouseMove = _elm_lang$svg$Svg_Events$simpleOn('mousemove'); +var _elm_lang$svg$Svg_Events$onMouseOut = _elm_lang$svg$Svg_Events$simpleOn('mouseout'); +var _elm_lang$svg$Svg_Events$onMouseOver = _elm_lang$svg$Svg_Events$simpleOn('mouseover'); +var _elm_lang$svg$Svg_Events$onMouseUp = _elm_lang$svg$Svg_Events$simpleOn('mouseup'); + +var _fredcy$elm_parseint$ParseInt$charFromInt = function (i) { + return (_elm_lang$core$Native_Utils.cmp(i, 10) < 0) ? _elm_lang$core$Char$fromCode( + i + _elm_lang$core$Char$toCode( + _elm_lang$core$Native_Utils.chr('0'))) : ((_elm_lang$core$Native_Utils.cmp(i, 36) < 0) ? _elm_lang$core$Char$fromCode( + (i - 10) + _elm_lang$core$Char$toCode( + _elm_lang$core$Native_Utils.chr('A'))) : _elm_lang$core$Native_Utils.crash( + 'ParseInt', + { + start: {line: 158, column: 9}, + end: {line: 158, column: 20} + })( + _elm_lang$core$Basics$toString(i))); +}; +var _fredcy$elm_parseint$ParseInt$toRadixUnsafe = F2( + function (radix, i) { + return (_elm_lang$core$Native_Utils.cmp(i, radix) < 0) ? _elm_lang$core$String$fromChar( + _fredcy$elm_parseint$ParseInt$charFromInt(i)) : A2( + _elm_lang$core$Basics_ops['++'], + A2(_fredcy$elm_parseint$ParseInt$toRadixUnsafe, radix, (i / radix) | 0), + _elm_lang$core$String$fromChar( + _fredcy$elm_parseint$ParseInt$charFromInt( + A2(_elm_lang$core$Basics_ops['%'], i, radix)))); + }); +var _fredcy$elm_parseint$ParseInt$toOct = _fredcy$elm_parseint$ParseInt$toRadixUnsafe(8); +var _fredcy$elm_parseint$ParseInt$toHex = _fredcy$elm_parseint$ParseInt$toRadixUnsafe(16); +var _fredcy$elm_parseint$ParseInt$isBetween = F3( + function (lower, upper, c) { + var ci = _elm_lang$core$Char$toCode(c); + return (_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$Char$toCode(lower), + ci) < 1) && (_elm_lang$core$Native_Utils.cmp( + ci, + _elm_lang$core$Char$toCode(upper)) < 1); + }); +var _fredcy$elm_parseint$ParseInt$charOffset = F2( + function (basis, c) { + return _elm_lang$core$Char$toCode(c) - _elm_lang$core$Char$toCode(basis); + }); +var _fredcy$elm_parseint$ParseInt$InvalidRadix = function (a) { + return {ctor: 'InvalidRadix', _0: a}; +}; +var _fredcy$elm_parseint$ParseInt$toRadix = F2( + function (radix, i) { + return ((_elm_lang$core$Native_Utils.cmp(2, radix) < 1) && (_elm_lang$core$Native_Utils.cmp(radix, 36) < 1)) ? ((_elm_lang$core$Native_Utils.cmp(i, 0) < 0) ? _elm_lang$core$Result$Ok( + A2( + _elm_lang$core$Basics_ops['++'], + '-', + A2(_fredcy$elm_parseint$ParseInt$toRadixUnsafe, radix, 0 - i))) : _elm_lang$core$Result$Ok( + A2(_fredcy$elm_parseint$ParseInt$toRadixUnsafe, radix, i))) : _elm_lang$core$Result$Err( + _fredcy$elm_parseint$ParseInt$InvalidRadix(radix)); + }); +var _fredcy$elm_parseint$ParseInt$OutOfRange = function (a) { + return {ctor: 'OutOfRange', _0: a}; +}; +var _fredcy$elm_parseint$ParseInt$InvalidChar = function (a) { + return {ctor: 'InvalidChar', _0: a}; +}; +var _fredcy$elm_parseint$ParseInt$intFromChar = F2( + function (radix, c) { + var validInt = function (i) { + return (_elm_lang$core$Native_Utils.cmp(i, radix) < 0) ? _elm_lang$core$Result$Ok(i) : _elm_lang$core$Result$Err( + _fredcy$elm_parseint$ParseInt$OutOfRange(c)); + }; + var toInt = A3( + _fredcy$elm_parseint$ParseInt$isBetween, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Native_Utils.chr('9'), + c) ? _elm_lang$core$Result$Ok( + A2( + _fredcy$elm_parseint$ParseInt$charOffset, + _elm_lang$core$Native_Utils.chr('0'), + c)) : (A3( + _fredcy$elm_parseint$ParseInt$isBetween, + _elm_lang$core$Native_Utils.chr('a'), + _elm_lang$core$Native_Utils.chr('z'), + c) ? _elm_lang$core$Result$Ok( + 10 + A2( + _fredcy$elm_parseint$ParseInt$charOffset, + _elm_lang$core$Native_Utils.chr('a'), + c)) : (A3( + _fredcy$elm_parseint$ParseInt$isBetween, + _elm_lang$core$Native_Utils.chr('A'), + _elm_lang$core$Native_Utils.chr('Z'), + c) ? _elm_lang$core$Result$Ok( + 10 + A2( + _fredcy$elm_parseint$ParseInt$charOffset, + _elm_lang$core$Native_Utils.chr('A'), + c)) : _elm_lang$core$Result$Err( + _fredcy$elm_parseint$ParseInt$InvalidChar(c)))); + return A2(_elm_lang$core$Result$andThen, validInt, toInt); + }); +var _fredcy$elm_parseint$ParseInt$parseIntR = F2( + function (radix, rstring) { + var _p0 = _elm_lang$core$String$uncons(rstring); + if (_p0.ctor === 'Nothing') { + return _elm_lang$core$Result$Ok(0); + } else { + return A2( + _elm_lang$core$Result$andThen, + function (ci) { + return A2( + _elm_lang$core$Result$andThen, + function (ri) { + return _elm_lang$core$Result$Ok(ci + (ri * radix)); + }, + A2(_fredcy$elm_parseint$ParseInt$parseIntR, radix, _p0._0._1)); + }, + A2(_fredcy$elm_parseint$ParseInt$intFromChar, radix, _p0._0._0)); + } + }); +var _fredcy$elm_parseint$ParseInt$parseIntRadix = F2( + function (radix, string) { + return ((_elm_lang$core$Native_Utils.cmp(2, radix) < 1) && (_elm_lang$core$Native_Utils.cmp(radix, 36) < 1)) ? A2( + _fredcy$elm_parseint$ParseInt$parseIntR, + radix, + _elm_lang$core$String$reverse(string)) : _elm_lang$core$Result$Err( + _fredcy$elm_parseint$ParseInt$InvalidRadix(radix)); + }); +var _fredcy$elm_parseint$ParseInt$parseInt = _fredcy$elm_parseint$ParseInt$parseIntRadix(10); +var _fredcy$elm_parseint$ParseInt$parseIntOct = _fredcy$elm_parseint$ParseInt$parseIntRadix(8); +var _fredcy$elm_parseint$ParseInt$parseIntHex = _fredcy$elm_parseint$ParseInt$parseIntRadix(16); + +var _eskimoblood$elm_color_extra$Color_Convert$xyzToColor = function (_p0) { + var _p1 = _p0; + var c = function (ch) { + var ch_ = (_elm_lang$core$Native_Utils.cmp(ch, 3.1308e-3) > 0) ? ((1.055 * Math.pow(ch, 1 / 2.4)) - 5.5e-2) : (12.92 * ch); + return _elm_lang$core$Basics$round( + A3(_elm_lang$core$Basics$clamp, 0, 255, ch_ * 255)); + }; + var z_ = _p1.z / 100; + var y_ = _p1.y / 100; + var x_ = _p1.x / 100; + var r = ((x_ * 3.2404542) + (y_ * -1.5371385)) + (z_ * -0.4986); + var g = ((x_ * -0.969266) + (y_ * 1.8760108)) + (z_ * 4.1556e-2); + var b = ((x_ * 5.56434e-2) + (y_ * -0.2040259)) + (z_ * 1.0572252); + return A3( + _elm_lang$core$Color$rgb, + c(r), + c(g), + c(b)); +}; +var _eskimoblood$elm_color_extra$Color_Convert$labToXyz = function (_p2) { + var _p3 = _p2; + var y = (_p3.l + 16) / 116; + var c = function (ch) { + var ch_ = (ch * ch) * ch; + return (_elm_lang$core$Native_Utils.cmp(ch_, 8.856e-3) > 0) ? ch_ : ((ch - (16 / 116)) / 7.787); + }; + return { + y: c(y) * 100, + x: c(y + (_p3.a / 500)) * 95.047, + z: c(y - (_p3.b / 200)) * 108.883 + }; +}; +var _eskimoblood$elm_color_extra$Color_Convert$labToColor = function (_p4) { + return _eskimoblood$elm_color_extra$Color_Convert$xyzToColor( + _eskimoblood$elm_color_extra$Color_Convert$labToXyz(_p4)); +}; +var _eskimoblood$elm_color_extra$Color_Convert$xyzToLab = function (_p5) { + var _p6 = _p5; + var c = function (ch) { + return (_elm_lang$core$Native_Utils.cmp(ch, 8.856e-3) > 0) ? Math.pow(ch, 1 / 3) : ((7.787 * ch) + (16 / 116)); + }; + var x_ = c(_p6.x / 95.047); + var y_ = c(_p6.y / 100); + var z_ = c(_p6.z / 108.883); + return {l: (116 * y_) - 16, a: 500 * (x_ - y_), b: 200 * (y_ - z_)}; +}; +var _eskimoblood$elm_color_extra$Color_Convert$colorToXyz = function (cl) { + var _p7 = _elm_lang$core$Color$toRgb(cl); + var red = _p7.red; + var green = _p7.green; + var blue = _p7.blue; + var c = function (ch) { + var ch_ = _elm_lang$core$Basics$toFloat(ch) / 255; + var ch__ = (_elm_lang$core$Native_Utils.cmp(ch_, 4.045e-2) > 0) ? Math.pow((ch_ + 5.5e-2) / 1.055, 2.4) : (ch_ / 12.92); + return ch__ * 100; + }; + var r = c(red); + var g = c(green); + var b = c(blue); + return {x: ((r * 0.4124) + (g * 0.3576)) + (b * 0.1805), y: ((r * 0.2126) + (g * 0.7152)) + (b * 7.22e-2), z: ((r * 1.93e-2) + (g * 0.1192)) + (b * 0.9505)}; +}; +var _eskimoblood$elm_color_extra$Color_Convert$colorToLab = function (_p8) { + return _eskimoblood$elm_color_extra$Color_Convert$xyzToLab( + _eskimoblood$elm_color_extra$Color_Convert$colorToXyz(_p8)); +}; +var _eskimoblood$elm_color_extra$Color_Convert$toRadix = function (n) { + var getChr = function (c) { + return (_elm_lang$core$Native_Utils.cmp(c, 10) < 0) ? _elm_lang$core$Basics$toString(c) : _elm_lang$core$String$fromChar( + _elm_lang$core$Char$fromCode(87 + c)); + }; + return (_elm_lang$core$Native_Utils.cmp(n, 16) < 0) ? getChr(n) : A2( + _elm_lang$core$Basics_ops['++'], + _eskimoblood$elm_color_extra$Color_Convert$toRadix((n / 16) | 0), + getChr( + A2(_elm_lang$core$Basics_ops['%'], n, 16))); +}; +var _eskimoblood$elm_color_extra$Color_Convert$toHex = function (_p9) { + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _eskimoblood$elm_color_extra$Color_Convert$toRadix(_p9)); +}; +var _eskimoblood$elm_color_extra$Color_Convert$colorToHex = function (cl) { + var _p10 = _elm_lang$core$Color$toRgb(cl); + var red = _p10.red; + var green = _p10.green; + var blue = _p10.blue; + return A2( + _elm_lang$core$String$join, + '', + A2( + F2( + function (x, y) { + return {ctor: '::', _0: x, _1: y}; + }), + '#', + A2( + _elm_lang$core$List$map, + _eskimoblood$elm_color_extra$Color_Convert$toHex, + { + ctor: '::', + _0: red, + _1: { + ctor: '::', + _0: green, + _1: { + ctor: '::', + _0: blue, + _1: {ctor: '[]'} + } + } + }))); +}; +var _eskimoblood$elm_color_extra$Color_Convert$hexToColor = function () { + var pattern = A2( + _elm_lang$core$Basics_ops['++'], + '', + A2( + _elm_lang$core$Basics_ops['++'], + '^', + A2( + _elm_lang$core$Basics_ops['++'], + '#?', + A2( + _elm_lang$core$Basics_ops['++'], + '(?:', + A2( + _elm_lang$core$Basics_ops['++'], + '(?:([a-f\\d]{2})([a-f\\d]{2})([a-f\\d]{2}))', + A2( + _elm_lang$core$Basics_ops['++'], + '|', + A2( + _elm_lang$core$Basics_ops['++'], + '(?:([a-f\\d])([a-f\\d])([a-f\\d]))', + A2(_elm_lang$core$Basics_ops['++'], ')', '$')))))))); + var extend = function (token) { + var _p11 = _elm_lang$core$String$toList(token); + if ((_p11.ctor === '::') && (_p11._1.ctor === '[]')) { + var _p12 = _p11._0; + return _elm_lang$core$String$fromList( + { + ctor: '::', + _0: _p12, + _1: { + ctor: '::', + _0: _p12, + _1: {ctor: '[]'} + } + }); + } else { + return token; + } + }; + return function (_p13) { + return A2( + _elm_lang$core$Result$andThen, + function (colors) { + var _p15 = A2( + _elm_lang$core$List$map, + function (_p14) { + return _fredcy$elm_parseint$ParseInt$parseIntHex( + extend(_p14)); + }, + colors); + if (((((((_p15.ctor === '::') && (_p15._0.ctor === 'Ok')) && (_p15._1.ctor === '::')) && (_p15._1._0.ctor === 'Ok')) && (_p15._1._1.ctor === '::')) && (_p15._1._1._0.ctor === 'Ok')) && (_p15._1._1._1.ctor === '[]')) { + return _elm_lang$core$Result$Ok( + A3(_elm_lang$core$Color$rgb, _p15._0._0, _p15._1._0._0, _p15._1._1._0._0)); + } else { + return _elm_lang$core$Result$Err('Parsing ints from hex failed'); + } + }, + A2( + _elm_lang$core$Result$fromMaybe, + 'Parsing hex regex failed', + A2( + _elm_lang$core$Maybe$map, + _elm_lang$core$List$filterMap(_elm_lang$core$Basics$identity), + A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.submatches; + }, + _elm_lang$core$List$head( + A3( + _elm_lang$core$Regex$find, + _elm_lang$core$Regex$AtMost(1), + _elm_lang$core$Regex$regex(pattern), + _elm_lang$core$String$toLower(_p13))))))); + }; +}(); +var _eskimoblood$elm_color_extra$Color_Convert$cssColorString = F2( + function (kind, values) { + return A2( + _elm_lang$core$Basics_ops['++'], + kind, + A2( + _elm_lang$core$Basics_ops['++'], + '(', + A2( + _elm_lang$core$Basics_ops['++'], + A2(_elm_lang$core$String$join, ', ', values), + ')'))); + }); +var _eskimoblood$elm_color_extra$Color_Convert$toPercentString = function (_p16) { + return A3( + _elm_lang$core$Basics$flip, + F2( + function (x, y) { + return A2(_elm_lang$core$Basics_ops['++'], x, y); + }), + '%', + _elm_lang$core$Basics$toString( + _elm_lang$core$Basics$round( + A2( + F2( + function (x, y) { + return x * y; + }), + 100, + _p16)))); +}; +var _eskimoblood$elm_color_extra$Color_Convert$hueToString = function (_p17) { + return _elm_lang$core$Basics$toString( + _elm_lang$core$Basics$round( + A3( + _elm_lang$core$Basics$flip, + F2( + function (x, y) { + return x / y; + }), + _elm_lang$core$Basics$pi, + A2( + F2( + function (x, y) { + return x * y; + }), + 180, + _p17)))); +}; +var _eskimoblood$elm_color_extra$Color_Convert$colorToCssHsla = function (cl) { + var _p18 = _elm_lang$core$Color$toHsl(cl); + var hue = _p18.hue; + var saturation = _p18.saturation; + var lightness = _p18.lightness; + var alpha = _p18.alpha; + return A2( + _eskimoblood$elm_color_extra$Color_Convert$cssColorString, + 'hsla', + { + ctor: '::', + _0: _eskimoblood$elm_color_extra$Color_Convert$hueToString(hue), + _1: { + ctor: '::', + _0: _eskimoblood$elm_color_extra$Color_Convert$toPercentString(saturation), + _1: { + ctor: '::', + _0: _eskimoblood$elm_color_extra$Color_Convert$toPercentString(lightness), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(alpha), + _1: {ctor: '[]'} + } + } + } + }); +}; +var _eskimoblood$elm_color_extra$Color_Convert$colorToCssHsl = function (cl) { + var _p19 = _elm_lang$core$Color$toHsl(cl); + var hue = _p19.hue; + var saturation = _p19.saturation; + var lightness = _p19.lightness; + var alpha = _p19.alpha; + return A2( + _eskimoblood$elm_color_extra$Color_Convert$cssColorString, + 'hsl', + { + ctor: '::', + _0: _eskimoblood$elm_color_extra$Color_Convert$hueToString(hue), + _1: { + ctor: '::', + _0: _eskimoblood$elm_color_extra$Color_Convert$toPercentString(saturation), + _1: { + ctor: '::', + _0: _eskimoblood$elm_color_extra$Color_Convert$toPercentString(lightness), + _1: {ctor: '[]'} + } + } + }); +}; +var _eskimoblood$elm_color_extra$Color_Convert$colorToCssRgba = function (cl) { + var _p20 = _elm_lang$core$Color$toRgb(cl); + var red = _p20.red; + var green = _p20.green; + var blue = _p20.blue; + var alpha = _p20.alpha; + return A2( + _eskimoblood$elm_color_extra$Color_Convert$cssColorString, + 'rgba', + { + ctor: '::', + _0: _elm_lang$core$Basics$toString(red), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(green), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(blue), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(alpha), + _1: {ctor: '[]'} + } + } + } + }); +}; +var _eskimoblood$elm_color_extra$Color_Convert$colorToCssRgb = function (cl) { + var _p21 = _elm_lang$core$Color$toRgb(cl); + var red = _p21.red; + var green = _p21.green; + var blue = _p21.blue; + var alpha = _p21.alpha; + return A2( + _eskimoblood$elm_color_extra$Color_Convert$cssColorString, + 'rgb', + { + ctor: '::', + _0: _elm_lang$core$Basics$toString(red), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(green), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(blue), + _1: {ctor: '[]'} + } + } + }); +}; +var _eskimoblood$elm_color_extra$Color_Convert$XYZ = F3( + function (a, b, c) { + return {x: a, y: b, z: c}; + }); +var _eskimoblood$elm_color_extra$Color_Convert$Lab = F3( + function (a, b, c) { + return {l: a, a: b, b: c}; + }); + +var _evancz$elm_markdown$Native_Markdown = function() { + + +// VIRTUAL-DOM WIDGETS + +function toHtml(options, factList, rawMarkdown) +{ + var model = { + options: options, + markdown: rawMarkdown + }; + return _elm_lang$virtual_dom$Native_VirtualDom.custom(factList, model, implementation); +} + + +// WIDGET IMPLEMENTATION + +var implementation = { + render: render, + diff: diff +}; + +function render(model) +{ + var html = marked(model.markdown, formatOptions(model.options)); + var div = document.createElement('div'); + div.innerHTML = html; + return div; +} + +function diff(a, b) +{ + + if (a.model.markdown === b.model.markdown && a.model.options === b.model.options) + { + return null; + } + + return { + applyPatch: applyPatch, + data: marked(b.model.markdown, formatOptions(b.model.options)) + }; +} + +function applyPatch(domNode, data) +{ + domNode.innerHTML = data; + return domNode; +} + + +// ACTUAL MARKDOWN PARSER + +var marked = function() { + // catch the `marked` object regardless of the outer environment. + // (ex. a CommonJS module compatible environment.) + // note that this depends on marked's implementation of environment detection. + var module = {}; + var exports = module.exports = {}; + + /** + * marked - a markdown parser + * Copyright (c) 2011-2014, Christopher Jeffrey. (MIT Licensed) + * https://github.com/chjj/marked + * commit cd2f6f5b7091154c5526e79b5f3bfb4d15995a51 + */ + (function(){var block={newline:/^\n+/,code:/^( {4}[^\n]+\n*)+/,fences:noop,hr:/^( *[-*_]){3,} *(?:\n+|$)/,heading:/^ *(#{1,6}) *([^\n]+?) *#* *(?:\n+|$)/,nptable:noop,lheading:/^([^\n]+)\n *(=|-){2,} *(?:\n+|$)/,blockquote:/^( *>[^\n]+(\n(?!def)[^\n]+)*\n*)+/,list:/^( *)(bull) [\s\S]+?(?:hr|def|\n{2,}(?! )(?!\1bull )\n*|\s*$)/,html:/^ *(?:comment *(?:\n|\s*$)|closed *(?:\n{2,}|\s*$)|closing *(?:\n{2,}|\s*$))/,def:/^ *\[([^\]]+)\]: *]+)>?(?: +["(]([^\n]+)[")])? *(?:\n+|$)/,table:noop,paragraph:/^((?:[^\n]+\n?(?!hr|heading|lheading|blockquote|tag|def))+)\n*/,text:/^[^\n]+/};block.bullet=/(?:[*+-]|\d+\.)/;block.item=/^( *)(bull) [^\n]*(?:\n(?!\1bull )[^\n]*)*/;block.item=replace(block.item,"gm")(/bull/g,block.bullet)();block.list=replace(block.list)(/bull/g,block.bullet)("hr","\\n+(?=\\1?(?:[-*_] *){3,}(?:\\n+|$))")("def","\\n+(?="+block.def.source+")")();block.blockquote=replace(block.blockquote)("def",block.def)();block._tag="(?!(?:"+"a|em|strong|small|s|cite|q|dfn|abbr|data|time|code"+"|var|samp|kbd|sub|sup|i|b|u|mark|ruby|rt|rp|bdi|bdo"+"|span|br|wbr|ins|del|img)\\b)\\w+(?!:/|[^\\w\\s@]*@)\\b";block.html=replace(block.html)("comment",//)("closed",/<(tag)[\s\S]+?<\/\1>/)("closing",/])*?>/)(/tag/g,block._tag)();block.paragraph=replace(block.paragraph)("hr",block.hr)("heading",block.heading)("lheading",block.lheading)("blockquote",block.blockquote)("tag","<"+block._tag)("def",block.def)();block.normal=merge({},block);block.gfm=merge({},block.normal,{fences:/^ *(`{3,}|~{3,})[ \.]*(\S+)? *\n([\s\S]*?)\s*\1 *(?:\n+|$)/,paragraph:/^/,heading:/^ *(#{1,6}) +([^\n]+?) *#* *(?:\n+|$)/});block.gfm.paragraph=replace(block.paragraph)("(?!","(?!"+block.gfm.fences.source.replace("\\1","\\2")+"|"+block.list.source.replace("\\1","\\3")+"|")();block.tables=merge({},block.gfm,{nptable:/^ *(\S.*\|.*)\n *([-:]+ *\|[-| :]*)\n((?:.*\|.*(?:\n|$))*)\n*/,table:/^ *\|(.+)\n *\|( *[-:]+[-| :]*)\n((?: *\|.*(?:\n|$))*)\n*/});function Lexer(options){this.tokens=[];this.tokens.links={};this.options=options||marked.defaults;this.rules=block.normal;if(this.options.gfm){if(this.options.tables){this.rules=block.tables}else{this.rules=block.gfm}}}Lexer.rules=block;Lexer.lex=function(src,options){var lexer=new Lexer(options);return lexer.lex(src)};Lexer.prototype.lex=function(src){src=src.replace(/\r\n|\r/g,"\n").replace(/\t/g," ").replace(/\u00a0/g," ").replace(/\u2424/g,"\n");return this.token(src,true)};Lexer.prototype.token=function(src,top,bq){var src=src.replace(/^ +$/gm,""),next,loose,cap,bull,b,item,space,i,l;while(src){if(cap=this.rules.newline.exec(src)){src=src.substring(cap[0].length);if(cap[0].length>1){this.tokens.push({type:"space"})}}if(cap=this.rules.code.exec(src)){src=src.substring(cap[0].length);cap=cap[0].replace(/^ {4}/gm,"");this.tokens.push({type:"code",text:!this.options.pedantic?cap.replace(/\n+$/,""):cap});continue}if(cap=this.rules.fences.exec(src)){src=src.substring(cap[0].length);this.tokens.push({type:"code",lang:cap[2],text:cap[3]||""});continue}if(cap=this.rules.heading.exec(src)){src=src.substring(cap[0].length);this.tokens.push({type:"heading",depth:cap[1].length,text:cap[2]});continue}if(top&&(cap=this.rules.nptable.exec(src))){src=src.substring(cap[0].length);item={type:"table",header:cap[1].replace(/^ *| *\| *$/g,"").split(/ *\| */),align:cap[2].replace(/^ *|\| *$/g,"").split(/ *\| */),cells:cap[3].replace(/\n$/,"").split("\n")};for(i=0;i ?/gm,"");this.token(cap,top,true);this.tokens.push({type:"blockquote_end"});continue}if(cap=this.rules.list.exec(src)){src=src.substring(cap[0].length);bull=cap[2];this.tokens.push({type:"list_start",ordered:bull.length>1});cap=cap[0].match(this.rules.item);next=false;l=cap.length;i=0;for(;i1&&b.length>1)){src=cap.slice(i+1).join("\n")+src;i=l-1}}loose=next||/\n\n(?!\s*$)/.test(item);if(i!==l-1){next=item.charAt(item.length-1)==="\n";if(!loose)loose=next}this.tokens.push({type:loose?"loose_item_start":"list_item_start"});this.token(item,false,bq);this.tokens.push({type:"list_item_end"})}this.tokens.push({type:"list_end"});continue}if(cap=this.rules.html.exec(src)){src=src.substring(cap[0].length);this.tokens.push({type:this.options.sanitize?"paragraph":"html",pre:!this.options.sanitizer&&(cap[1]==="pre"||cap[1]==="script"||cap[1]==="style"),text:cap[0]});continue}if(!bq&&top&&(cap=this.rules.def.exec(src))){src=src.substring(cap[0].length);this.tokens.links[cap[1].toLowerCase()]={href:cap[2],title:cap[3]};continue}if(top&&(cap=this.rules.table.exec(src))){src=src.substring(cap[0].length);item={type:"table",header:cap[1].replace(/^ *| *\| *$/g,"").split(/ *\| */),align:cap[2].replace(/^ *|\| *$/g,"").split(/ *\| */),cells:cap[3].replace(/(?: *\| *)?\n$/,"").split("\n")};for(i=0;i])/,autolink:/^<([^ >]+(@|:\/)[^ >]+)>/,url:noop,tag:/^|^<\/?\w+(?:"[^"]*"|'[^']*'|[^'">])*?>/,link:/^!?\[(inside)\]\(href\)/,reflink:/^!?\[(inside)\]\s*\[([^\]]*)\]/,nolink:/^!?\[((?:\[[^\]]*\]|[^\[\]])*)\]/,strong:/^__([\s\S]+?)__(?!_)|^\*\*([\s\S]+?)\*\*(?!\*)/,em:/^\b_((?:[^_]|__)+?)_\b|^\*((?:\*\*|[\s\S])+?)\*(?!\*)/,code:/^(`+)\s*([\s\S]*?[^`])\s*\1(?!`)/,br:/^ {2,}\n(?!\s*$)/,del:noop,text:/^[\s\S]+?(?=[\\?(?:\s+['"]([\s\S]*?)['"])?\s*/;inline.link=replace(inline.link)("inside",inline._inside)("href",inline._href)();inline.reflink=replace(inline.reflink)("inside",inline._inside)();inline.normal=merge({},inline);inline.pedantic=merge({},inline.normal,{strong:/^__(?=\S)([\s\S]*?\S)__(?!_)|^\*\*(?=\S)([\s\S]*?\S)\*\*(?!\*)/,em:/^_(?=\S)([\s\S]*?\S)_(?!_)|^\*(?=\S)([\s\S]*?\S)\*(?!\*)/});inline.gfm=merge({},inline.normal,{escape:replace(inline.escape)("])","~|])")(),url:/^(https?:\/\/[^\s<]+[^<.,:;"')\]\s])/,del:/^~~(?=\S)([\s\S]*?\S)~~/,text:replace(inline.text)("]|","~]|")("|","|https?://|")()});inline.breaks=merge({},inline.gfm,{br:replace(inline.br)("{2,}","*")(),text:replace(inline.gfm.text)("{2,}","*")()});function InlineLexer(links,options){this.options=options||marked.defaults;this.links=links;this.rules=inline.normal;this.renderer=this.options.renderer||new Renderer;this.renderer.options=this.options;if(!this.links){throw new Error("Tokens array requires a `links` property.")}if(this.options.gfm){if(this.options.breaks){this.rules=inline.breaks}else{this.rules=inline.gfm}}else if(this.options.pedantic){this.rules=inline.pedantic}}InlineLexer.rules=inline;InlineLexer.output=function(src,links,options){var inline=new InlineLexer(links,options);return inline.output(src)};InlineLexer.prototype.output=function(src){var out="",link,text,href,cap;while(src){if(cap=this.rules.escape.exec(src)){src=src.substring(cap[0].length);out+=cap[1];continue}if(cap=this.rules.autolink.exec(src)){src=src.substring(cap[0].length);if(cap[2]==="@"){text=cap[1].charAt(6)===":"?this.mangle(cap[1].substring(7)):this.mangle(cap[1]);href=this.mangle("mailto:")+text}else{text=escape(cap[1]);href=text}out+=this.renderer.link(href,null,text);continue}if(!this.inLink&&(cap=this.rules.url.exec(src))){src=src.substring(cap[0].length);text=escape(cap[1]);href=text;out+=this.renderer.link(href,null,text);continue}if(cap=this.rules.tag.exec(src)){if(!this.inLink&&/^    /i.test(cap[0])){this.inLink=false}src=src.substring(cap[0].length);out+=this.options.sanitize?this.options.sanitizer?this.options.sanitizer(cap[0]):escape(cap[0]):cap[0];continue}if(cap=this.rules.link.exec(src)){src=src.substring(cap[0].length);this.inLink=true;out+=this.outputLink(cap,{href:cap[2],title:cap[3]});this.inLink=false;continue}if((cap=this.rules.reflink.exec(src))||(cap=this.rules.nolink.exec(src))){src=src.substring(cap[0].length);link=(cap[2]||cap[1]).replace(/\s+/g," ");link=this.links[link.toLowerCase()];if(!link||!link.href){out+=cap[0].charAt(0);src=cap[0].substring(1)+src;continue}this.inLink=true;out+=this.outputLink(cap,link);this.inLink=false;continue}if(cap=this.rules.strong.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.strong(this.output(cap[2]||cap[1]));continue}if(cap=this.rules.em.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.em(this.output(cap[2]||cap[1]));continue}if(cap=this.rules.code.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.codespan(escape(cap[2],true));continue}if(cap=this.rules.br.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.br();continue}if(cap=this.rules.del.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.del(this.output(cap[1]));continue}if(cap=this.rules.text.exec(src)){src=src.substring(cap[0].length);out+=this.renderer.text(escape(this.smartypants(cap[0])));continue}if(src){throw new Error("Infinite loop on byte: "+src.charCodeAt(0))}}return out};InlineLexer.prototype.outputLink=function(cap,link){var href=escape(link.href),title=link.title?escape(link.title):null;return cap[0].charAt(0)!=="!"?this.renderer.link(href,title,this.output(cap[1])):this.renderer.image(href,title,escape(cap[1]))};InlineLexer.prototype.smartypants=function(text){if(!this.options.smartypants)return text;return text.replace(/---/g,"—").replace(/--/g,"–").replace(/(^|[-\u2014\/(\[{"\s])'/g,"$1‘").replace(/'/g,"’").replace(/(^|[-\u2014\/(\[{\u2018\s])"/g,"$1“").replace(/"/g,"”").replace(/\.{3}/g,"…")};InlineLexer.prototype.mangle=function(text){if(!this.options.mangle)return text;var out="",l=text.length,i=0,ch;for(;i.5){ch="x"+ch.toString(16)}out+="&#"+ch+";"}return out};function Renderer(options){this.options=options||{}}Renderer.prototype.code=function(code,lang,escaped){if(this.options.highlight){var out=this.options.highlight(code,lang);if(out!=null&&out!==code){escaped=true;code=out}}if(!lang){return"
    "+(escaped?code:escape(code,true))+"\n
    "}return'
    '+(escaped?code:escape(code,true))+"\n
    \n"};Renderer.prototype.blockquote=function(quote){return"
    \n"+quote+"
    \n"};Renderer.prototype.html=function(html){return html};Renderer.prototype.heading=function(text,level,raw){return"'+text+"\n"};Renderer.prototype.hr=function(){return this.options.xhtml?"
    \n":"
    \n"};Renderer.prototype.list=function(body,ordered){var type=ordered?"ol":"ul";return"<"+type+">\n"+body+"\n"};Renderer.prototype.listitem=function(text){return"
  • "+text+"
    • \n"};Renderer.prototype.paragraph=function(text){return"

    "+text+"

    \n"};Renderer.prototype.table=function(header,body){return"\n"+"\n"+header+"\n"+"\n"+body+"\n"+"
    \n"};Renderer.prototype.tablerow=function(content){return"\n"+content+"\n"};Renderer.prototype.tablecell=function(content,flags){var type=flags.header?"th":"td";var tag=flags.align?"<"+type+' style="text-align:'+flags.align+'">':"<"+type+">";return tag+content+"\n"};Renderer.prototype.strong=function(text){return""+text+""};Renderer.prototype.em=function(text){return""+text+""};Renderer.prototype.codespan=function(text){return""+text+""};Renderer.prototype.br=function(){return this.options.xhtml?"
    ":"
    "};Renderer.prototype.del=function(text){return""+text+""};Renderer.prototype.link=function(href,title,text){if(this.options.sanitize){try{var prot=decodeURIComponent(unescape(href)).replace(/[^\w:]/g,"").toLowerCase()}catch(e){return""}if(prot.indexOf("javascript:")===0||prot.indexOf("vbscript:")===0||prot.indexOf("data:")===0){return""}}var out='    ";return out};Renderer.prototype.image=function(href,title,text){var out=''+text+'":">";return out};Renderer.prototype.text=function(text){return text};function Parser(options){this.tokens=[];this.token=null;this.options=options||marked.defaults;this.options.renderer=this.options.renderer||new Renderer;this.renderer=this.options.renderer;this.renderer.options=this.options}Parser.parse=function(src,options,renderer){var parser=new Parser(options,renderer);return parser.parse(src)};Parser.prototype.parse=function(src){this.inline=new InlineLexer(src.links,this.options,this.renderer);this.tokens=src.reverse();var out="";while(this.next()){out+=this.tok()}return out};Parser.prototype.next=function(){return this.token=this.tokens.pop()};Parser.prototype.peek=function(){return this.tokens[this.tokens.length-1]||0};Parser.prototype.parseText=function(){var body=this.token.text;while(this.peek().type==="text"){body+="\n"+this.next().text}return this.inline.output(body)};Parser.prototype.tok=function(){switch(this.token.type){case"space":{return""}case"hr":{return this.renderer.hr()}case"heading":{return this.renderer.heading(this.inline.output(this.token.text),this.token.depth,this.token.text)}case"code":{return this.renderer.code(this.token.text,this.token.lang,this.token.escaped)}case"table":{var header="",body="",i,row,cell,flags,j;cell="";for(i=0;i/g,">").replace(/"/g,""").replace(/'/g,"'")}function unescape(html){return html.replace(/&(#(?:\d+)|(?:#x[0-9A-Fa-f]+)|(?:\w+));?/g,function(_,n){n=n.toLowerCase();if(n==="colon")return":";if(n.charAt(0)==="#"){return n.charAt(1)==="x"?String.fromCharCode(parseInt(n.substring(2),16)):String.fromCharCode(+n.substring(1))}return""})}function replace(regex,opt){regex=regex.source;opt=opt||"";return function self(name,val){if(!name)return new RegExp(regex,opt);val=val.source||val;val=val.replace(/(^|[^\[])\^/g,"$1");regex=regex.replace(name,val);return self}}function noop(){}noop.exec=noop;function merge(obj){var i=1,target,key;for(;iAn error occured:

    "+escape(e.message+"",true)+"
    "}throw e}}marked.options=marked.setOptions=function(opt){merge(marked.defaults,opt);return marked};marked.defaults={gfm:true,tables:true,breaks:false,pedantic:false,sanitize:false,sanitizer:null,mangle:true,smartLists:false,silent:false,highlight:null,langPrefix:"lang-",smartypants:false,headerPrefix:"",renderer:new Renderer,xhtml:false};marked.Parser=Parser;marked.parser=Parser.parse;marked.Renderer=Renderer;marked.Lexer=Lexer;marked.lexer=Lexer.lex;marked.InlineLexer=InlineLexer;marked.inlineLexer=InlineLexer.output;marked.parse=marked;if(typeof module!=="undefined"&&typeof exports==="object"){module.exports=marked}else if(typeof define==="function"&&define.amd){define(function(){return marked})}else{this.marked=marked}}).call(function(){return this||(typeof window!=="undefined"?window:global)}()); + + return module.exports; +}(); + + +// FORMAT OPTIONS FOR MARKED IMPLEMENTATION + +function formatOptions(options) +{ + function toHighlight(code, lang) + { + if (!lang && options.defaultHighlighting.ctor === 'Just') + { + lang = options.defaultHighlighting._0; + } + + if (typeof hljs !== 'undefined' && lang && hljs.listLanguages().indexOf(lang) >= 0) + { + return hljs.highlight(lang, code, true).value; + } + + return code; + } + + var gfm = options.githubFlavored; + if (gfm.ctor === 'Just') + { + return { + highlight: toHighlight, + gfm: true, + tables: gfm._0.tables, + breaks: gfm._0.breaks, + sanitize: options.sanitize, + smartypants: options.smartypants + }; + } + + return { + highlight: toHighlight, + gfm: false, + tables: false, + breaks: false, + sanitize: options.sanitize, + smartypants: options.smartypants + }; +} + + +// EXPORTS + +return { + toHtml: F3(toHtml) +}; + +}(); + +var _evancz$elm_markdown$Markdown$toHtmlWith = _evancz$elm_markdown$Native_Markdown.toHtml; +var _evancz$elm_markdown$Markdown$defaultOptions = { + githubFlavored: _elm_lang$core$Maybe$Just( + {tables: false, breaks: false}), + defaultHighlighting: _elm_lang$core$Maybe$Nothing, + sanitize: false, + smartypants: false +}; +var _evancz$elm_markdown$Markdown$toHtml = F2( + function (attrs, string) { + return A3(_evancz$elm_markdown$Native_Markdown.toHtml, _evancz$elm_markdown$Markdown$defaultOptions, attrs, string); + }); +var _evancz$elm_markdown$Markdown$Options = F4( + function (a, b, c, d) { + return {githubFlavored: a, defaultHighlighting: b, sanitize: c, smartypants: d}; + }); + +var _evancz$url_parser$UrlParser$toKeyValuePair = function (segment) { + var _p0 = A2(_elm_lang$core$String$split, '=', segment); + if (((_p0.ctor === '::') && (_p0._1.ctor === '::')) && (_p0._1._1.ctor === '[]')) { + return A3( + _elm_lang$core$Maybe$map2, + F2( + function (v0, v1) { + return {ctor: '_Tuple2', _0: v0, _1: v1}; + }), + _elm_lang$http$Http$decodeUri(_p0._0), + _elm_lang$http$Http$decodeUri(_p0._1._0)); + } else { + return _elm_lang$core$Maybe$Nothing; + } +}; +var _evancz$url_parser$UrlParser$parseParams = function (queryString) { + return _elm_lang$core$Dict$fromList( + A2( + _elm_lang$core$List$filterMap, + _evancz$url_parser$UrlParser$toKeyValuePair, + A2( + _elm_lang$core$String$split, + '&', + A2(_elm_lang$core$String$dropLeft, 1, queryString)))); +}; +var _evancz$url_parser$UrlParser$splitUrl = function (url) { + var _p1 = A2(_elm_lang$core$String$split, '/', url); + if ((_p1.ctor === '::') && (_p1._0 === '')) { + return _p1._1; + } else { + return _p1; + } +}; +var _evancz$url_parser$UrlParser$parseHelp = function (states) { + parseHelp: + while (true) { + var _p2 = states; + if (_p2.ctor === '[]') { + return _elm_lang$core$Maybe$Nothing; + } else { + var _p4 = _p2._0; + var _p3 = _p4.unvisited; + if (_p3.ctor === '[]') { + return _elm_lang$core$Maybe$Just(_p4.value); + } else { + if ((_p3._0 === '') && (_p3._1.ctor === '[]')) { + return _elm_lang$core$Maybe$Just(_p4.value); + } else { + var _v4 = _p2._1; + states = _v4; + continue parseHelp; + } + } + } + } +}; +var _evancz$url_parser$UrlParser$parse = F3( + function (_p5, url, params) { + var _p6 = _p5; + return _evancz$url_parser$UrlParser$parseHelp( + _p6._0( + { + visited: {ctor: '[]'}, + unvisited: _evancz$url_parser$UrlParser$splitUrl(url), + params: params, + value: _elm_lang$core$Basics$identity + })); + }); +var _evancz$url_parser$UrlParser$parseHash = F2( + function (parser, location) { + return A3( + _evancz$url_parser$UrlParser$parse, + parser, + A2(_elm_lang$core$String$dropLeft, 1, location.hash), + _evancz$url_parser$UrlParser$parseParams(location.search)); + }); +var _evancz$url_parser$UrlParser$parsePath = F2( + function (parser, location) { + return A3( + _evancz$url_parser$UrlParser$parse, + parser, + location.pathname, + _evancz$url_parser$UrlParser$parseParams(location.search)); + }); +var _evancz$url_parser$UrlParser$intParamHelp = function (maybeValue) { + var _p7 = maybeValue; + if (_p7.ctor === 'Nothing') { + return _elm_lang$core$Maybe$Nothing; + } else { + return _elm_lang$core$Result$toMaybe( + _elm_lang$core$String$toInt(_p7._0)); + } +}; +var _evancz$url_parser$UrlParser$mapHelp = F2( + function (func, _p8) { + var _p9 = _p8; + return { + visited: _p9.visited, + unvisited: _p9.unvisited, + params: _p9.params, + value: func(_p9.value) + }; + }); +var _evancz$url_parser$UrlParser$State = F4( + function (a, b, c, d) { + return {visited: a, unvisited: b, params: c, value: d}; + }); +var _evancz$url_parser$UrlParser$Parser = function (a) { + return {ctor: 'Parser', _0: a}; +}; +var _evancz$url_parser$UrlParser$s = function (str) { + return _evancz$url_parser$UrlParser$Parser( + function (_p10) { + var _p11 = _p10; + var _p12 = _p11.unvisited; + if (_p12.ctor === '[]') { + return {ctor: '[]'}; + } else { + var _p13 = _p12._0; + return _elm_lang$core$Native_Utils.eq(_p13, str) ? { + ctor: '::', + _0: A4( + _evancz$url_parser$UrlParser$State, + {ctor: '::', _0: _p13, _1: _p11.visited}, + _p12._1, + _p11.params, + _p11.value), + _1: {ctor: '[]'} + } : {ctor: '[]'}; + } + }); +}; +var _evancz$url_parser$UrlParser$custom = F2( + function (tipe, stringToSomething) { + return _evancz$url_parser$UrlParser$Parser( + function (_p14) { + var _p15 = _p14; + var _p16 = _p15.unvisited; + if (_p16.ctor === '[]') { + return {ctor: '[]'}; + } else { + var _p18 = _p16._0; + var _p17 = stringToSomething(_p18); + if (_p17.ctor === 'Ok') { + return { + ctor: '::', + _0: A4( + _evancz$url_parser$UrlParser$State, + {ctor: '::', _0: _p18, _1: _p15.visited}, + _p16._1, + _p15.params, + _p15.value(_p17._0)), + _1: {ctor: '[]'} + }; + } else { + return {ctor: '[]'}; + } + } + }); + }); +var _evancz$url_parser$UrlParser$string = A2(_evancz$url_parser$UrlParser$custom, 'STRING', _elm_lang$core$Result$Ok); +var _evancz$url_parser$UrlParser$int = A2(_evancz$url_parser$UrlParser$custom, 'NUMBER', _elm_lang$core$String$toInt); +var _evancz$url_parser$UrlParser_ops = _evancz$url_parser$UrlParser_ops || {}; +_evancz$url_parser$UrlParser_ops[''] = F2( + function (_p20, _p19) { + var _p21 = _p20; + var _p22 = _p19; + return _evancz$url_parser$UrlParser$Parser( + function (state) { + return A2( + _elm_lang$core$List$concatMap, + _p22._0, + _p21._0(state)); + }); + }); +var _evancz$url_parser$UrlParser$map = F2( + function (subValue, _p23) { + var _p24 = _p23; + return _evancz$url_parser$UrlParser$Parser( + function (_p25) { + var _p26 = _p25; + return A2( + _elm_lang$core$List$map, + _evancz$url_parser$UrlParser$mapHelp(_p26.value), + _p24._0( + {visited: _p26.visited, unvisited: _p26.unvisited, params: _p26.params, value: subValue})); + }); + }); +var _evancz$url_parser$UrlParser$oneOf = function (parsers) { + return _evancz$url_parser$UrlParser$Parser( + function (state) { + return A2( + _elm_lang$core$List$concatMap, + function (_p27) { + var _p28 = _p27; + return _p28._0(state); + }, + parsers); + }); +}; +var _evancz$url_parser$UrlParser$top = _evancz$url_parser$UrlParser$Parser( + function (state) { + return { + ctor: '::', + _0: state, + _1: {ctor: '[]'} + }; + }); +var _evancz$url_parser$UrlParser_ops = _evancz$url_parser$UrlParser_ops || {}; +_evancz$url_parser$UrlParser_ops[''] = F2( + function (_p30, _p29) { + var _p31 = _p30; + var _p32 = _p29; + return _evancz$url_parser$UrlParser$Parser( + function (state) { + return A2( + _elm_lang$core$List$concatMap, + _p32._0, + _p31._0(state)); + }); + }); +var _evancz$url_parser$UrlParser$QueryParser = function (a) { + return {ctor: 'QueryParser', _0: a}; +}; +var _evancz$url_parser$UrlParser$customParam = F2( + function (key, func) { + return _evancz$url_parser$UrlParser$QueryParser( + function (_p33) { + var _p34 = _p33; + var _p35 = _p34.params; + return { + ctor: '::', + _0: A4( + _evancz$url_parser$UrlParser$State, + _p34.visited, + _p34.unvisited, + _p35, + _p34.value( + func( + A2(_elm_lang$core$Dict$get, key, _p35)))), + _1: {ctor: '[]'} + }; + }); + }); +var _evancz$url_parser$UrlParser$stringParam = function (name) { + return A2(_evancz$url_parser$UrlParser$customParam, name, _elm_lang$core$Basics$identity); +}; +var _evancz$url_parser$UrlParser$intParam = function (name) { + return A2(_evancz$url_parser$UrlParser$customParam, name, _evancz$url_parser$UrlParser$intParamHelp); +}; + +var _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerSecond = 1000; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute = 60 * _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerSecond; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerHour = 60 * _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerDay = 24 * _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerHour; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$dayOfWeekFromWeekdayNumber = function (n) { + var _p0 = n; + switch (_p0) { + case 1: + return _elm_lang$core$Date$Mon; + case 2: + return _elm_lang$core$Date$Tue; + case 3: + return _elm_lang$core$Date$Wed; + case 4: + return _elm_lang$core$Date$Thu; + case 5: + return _elm_lang$core$Date$Fri; + case 6: + return _elm_lang$core$Date$Sat; + default: + return _elm_lang$core$Date$Sun; + } +}; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$weekdayNumberFromDayOfWeek = function (d) { + var _p1 = d; + switch (_p1.ctor) { + case 'Mon': + return 1; + case 'Tue': + return 2; + case 'Wed': + return 3; + case 'Thu': + return 4; + case 'Fri': + return 5; + case 'Sat': + return 6; + default: + return 7; + } +}; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$monthFromMonthNumber = function (n) { + var _p2 = n; + switch (_p2) { + case 1: + return _elm_lang$core$Date$Jan; + case 2: + return _elm_lang$core$Date$Feb; + case 3: + return _elm_lang$core$Date$Mar; + case 4: + return _elm_lang$core$Date$Apr; + case 5: + return _elm_lang$core$Date$May; + case 6: + return _elm_lang$core$Date$Jun; + case 7: + return _elm_lang$core$Date$Jul; + case 8: + return _elm_lang$core$Date$Aug; + case 9: + return _elm_lang$core$Date$Sep; + case 10: + return _elm_lang$core$Date$Oct; + case 11: + return _elm_lang$core$Date$Nov; + default: + return _elm_lang$core$Date$Dec; + } +}; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$monthNumberFromMonth = function (m) { + var _p3 = m; + switch (_p3.ctor) { + case 'Jan': + return 1; + case 'Feb': + return 2; + case 'Mar': + return 3; + case 'Apr': + return 4; + case 'May': + return 5; + case 'Jun': + return 6; + case 'Jul': + return 7; + case 'Aug': + return 8; + case 'Sep': + return 9; + case 'Oct': + return 10; + case 'Nov': + return 11; + default: + return 12; + } +}; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$months = { + ctor: '::', + _0: _elm_lang$core$Date$Jan, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Feb, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Mar, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Apr, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$May, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Jun, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Jul, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Aug, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Sep, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Oct, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Nov, + _1: { + ctor: '::', + _0: _elm_lang$core$Date$Dec, + _1: {ctor: '[]'} + } + } + } + } + } + } + } + } + } + } + } +}; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear = function (y) { + return (_elm_lang$core$Native_Utils.eq( + A2(_elm_lang$core$Basics_ops['%'], y, 4), + 0) && (!_elm_lang$core$Native_Utils.eq( + A2(_elm_lang$core$Basics_ops['%'], y, 100), + 0))) || _elm_lang$core$Native_Utils.eq( + A2(_elm_lang$core$Basics_ops['%'], y, 400), + 0); +}; +var _justinmimbs$elm_date_extra$Date_Extra_Facts$daysInMonth = F2( + function (y, m) { + var _p4 = m; + switch (_p4.ctor) { + case 'Jan': + return 31; + case 'Feb': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 29 : 28; + case 'Mar': + return 31; + case 'Apr': + return 30; + case 'May': + return 31; + case 'Jun': + return 30; + case 'Jul': + return 31; + case 'Aug': + return 31; + case 'Sep': + return 30; + case 'Oct': + return 31; + case 'Nov': + return 30; + default: + return 31; + } + }); +var _justinmimbs$elm_date_extra$Date_Extra_Facts$daysBeforeStartOfMonth = F2( + function (y, m) { + var _p5 = m; + switch (_p5.ctor) { + case 'Jan': + return 0; + case 'Feb': + return 31; + case 'Mar': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 60 : 59; + case 'Apr': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 91 : 90; + case 'May': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 121 : 120; + case 'Jun': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 152 : 151; + case 'Jul': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 182 : 181; + case 'Aug': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 213 : 212; + case 'Sep': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 244 : 243; + case 'Oct': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 274 : 273; + case 'Nov': + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 305 : 304; + default: + return _justinmimbs$elm_date_extra$Date_Extra_Facts$isLeapYear(y) ? 335 : 334; + } + }); + +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$divideInt = F2( + function (a, b) { + return { + ctor: '_Tuple2', + _0: (a / b) | 0, + _1: A2(_elm_lang$core$Basics$rem, a, b) + }; + }); +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$year = function (rd) { + var _p0 = A2(_justinmimbs$elm_date_extra$Date_Internal_RataDie$divideInt, rd, 146097); + var n400 = _p0._0; + var r400 = _p0._1; + var _p1 = A2(_justinmimbs$elm_date_extra$Date_Internal_RataDie$divideInt, r400, 36524); + var n100 = _p1._0; + var r100 = _p1._1; + var _p2 = A2(_justinmimbs$elm_date_extra$Date_Internal_RataDie$divideInt, r100, 1461); + var n4 = _p2._0; + var r4 = _p2._1; + var _p3 = A2(_justinmimbs$elm_date_extra$Date_Internal_RataDie$divideInt, r4, 365); + var n1 = _p3._0; + var r1 = _p3._1; + var n = _elm_lang$core$Native_Utils.eq(r1, 0) ? 0 : 1; + return ((((n400 * 400) + (n100 * 100)) + (n4 * 4)) + n1) + n; +}; +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$weekdayNumber = function (rd) { + var _p4 = A2(_elm_lang$core$Basics_ops['%'], rd, 7); + if (_p4 === 0) { + return 7; + } else { + return _p4; + } +}; +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$daysBeforeYear = function (y1) { + var y = y1 - 1; + var leapYears = (((y / 4) | 0) - ((y / 100) | 0)) + ((y / 400) | 0); + return (365 * y) + leapYears; +}; +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$daysBeforeWeekYear = function (y) { + var jan4 = _justinmimbs$elm_date_extra$Date_Internal_RataDie$daysBeforeYear(y) + 4; + return jan4 - _justinmimbs$elm_date_extra$Date_Internal_RataDie$weekdayNumber(jan4); +}; +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$weekYear = function (rd) { + return _justinmimbs$elm_date_extra$Date_Internal_RataDie$year( + rd + (4 - _justinmimbs$elm_date_extra$Date_Internal_RataDie$weekdayNumber(rd))); +}; +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$weekNumber = function (rd) { + var week1Day1 = _justinmimbs$elm_date_extra$Date_Internal_RataDie$daysBeforeWeekYear( + _justinmimbs$elm_date_extra$Date_Internal_RataDie$weekYear(rd)) + 1; + return (((rd - week1Day1) / 7) | 0) + 1; +}; +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$fromWeekDate = F3( + function (wy, wn, wdn) { + return (_justinmimbs$elm_date_extra$Date_Internal_RataDie$daysBeforeWeekYear(wy) + ((wn - 1) * 7)) + wdn; + }); +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$fromCalendarDate = F3( + function (y, m, d) { + return (_justinmimbs$elm_date_extra$Date_Internal_RataDie$daysBeforeYear(y) + A2(_justinmimbs$elm_date_extra$Date_Extra_Facts$daysBeforeStartOfMonth, y, m)) + d; + }); +var _justinmimbs$elm_date_extra$Date_Internal_RataDie$fromOrdinalDate = F2( + function (y, od) { + return _justinmimbs$elm_date_extra$Date_Internal_RataDie$daysBeforeYear(y) + od; + }); + +var _justinmimbs$elm_date_extra$Date_Internal_Core$msFromTimeParts = F4( + function (hh, mm, ss, ms) { + return (((_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerHour * hh) + (_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute * mm)) + (_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerSecond * ss)) + ms; + }); +var _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromRataDie = function (rd) { + return (rd - 719163) * _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerDay; +}; +var _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromOrdinalDate = F2( + function (y, d) { + return _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromRataDie( + A2(_justinmimbs$elm_date_extra$Date_Internal_RataDie$fromOrdinalDate, y, d)); + }); +var _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromCalendarDate = F3( + function (y, m, d) { + return _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromRataDie( + A3(_justinmimbs$elm_date_extra$Date_Internal_RataDie$fromCalendarDate, y, m, d)); + }); +var _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromParts = F7( + function (y, m, d, hh, mm, ss, ms) { + return A3(_justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromCalendarDate, y, m, d) + A4(_justinmimbs$elm_date_extra$Date_Internal_Core$msFromTimeParts, hh, mm, ss, ms); + }); +var _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromWeekDate = F3( + function (y, w, d) { + return _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromRataDie( + A3(_justinmimbs$elm_date_extra$Date_Internal_RataDie$fromWeekDate, y, w, d)); + }); +var _justinmimbs$elm_date_extra$Date_Internal_Core$weekNumberFromCalendarDate = F3( + function (y, m, d) { + return _justinmimbs$elm_date_extra$Date_Internal_RataDie$weekNumber( + A3(_justinmimbs$elm_date_extra$Date_Internal_RataDie$fromCalendarDate, y, m, d)); + }); +var _justinmimbs$elm_date_extra$Date_Internal_Core$weekYearFromCalendarDate = F3( + function (y, m, d) { + return _justinmimbs$elm_date_extra$Date_Internal_RataDie$weekYear( + A3(_justinmimbs$elm_date_extra$Date_Internal_RataDie$fromCalendarDate, y, m, d)); + }); + +var _justinmimbs$elm_date_extra$Date_Internal_Extract$msOffsetFromUtc = function (date) { + var utcTime = _elm_lang$core$Date$toTime(date); + var localTime = _elm_lang$core$Basics$toFloat( + A7( + _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromParts, + _elm_lang$core$Date$year(date), + _elm_lang$core$Date$month(date), + _elm_lang$core$Date$day(date), + _elm_lang$core$Date$hour(date), + _elm_lang$core$Date$minute(date), + _elm_lang$core$Date$second(date), + _elm_lang$core$Date$millisecond(date))); + return _elm_lang$core$Basics$floor(localTime - utcTime); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Extract$offsetFromUtc = function (date) { + return (_justinmimbs$elm_date_extra$Date_Internal_Extract$msOffsetFromUtc(date) / _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute) | 0; +}; +var _justinmimbs$elm_date_extra$Date_Internal_Extract$weekYear = function (date) { + return A3( + _justinmimbs$elm_date_extra$Date_Internal_Core$weekYearFromCalendarDate, + _elm_lang$core$Date$year(date), + _elm_lang$core$Date$month(date), + _elm_lang$core$Date$day(date)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Extract$weekNumber = function (date) { + return A3( + _justinmimbs$elm_date_extra$Date_Internal_Core$weekNumberFromCalendarDate, + _elm_lang$core$Date$year(date), + _elm_lang$core$Date$month(date), + _elm_lang$core$Date$day(date)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Extract$weekdayNumber = function (_p0) { + return _justinmimbs$elm_date_extra$Date_Extra_Facts$weekdayNumberFromDayOfWeek( + _elm_lang$core$Date$dayOfWeek(_p0)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Extract$fractionalDay = function (date) { + var timeOfDayMS = A4( + _justinmimbs$elm_date_extra$Date_Internal_Core$msFromTimeParts, + _elm_lang$core$Date$hour(date), + _elm_lang$core$Date$minute(date), + _elm_lang$core$Date$second(date), + _elm_lang$core$Date$millisecond(date)); + return _elm_lang$core$Basics$toFloat(timeOfDayMS) / _elm_lang$core$Basics$toFloat(_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerDay); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Extract$ordinalDay = function (date) { + return A2( + _justinmimbs$elm_date_extra$Date_Extra_Facts$daysBeforeStartOfMonth, + _elm_lang$core$Date$year(date), + _elm_lang$core$Date$month(date)) + _elm_lang$core$Date$day(date); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Extract$monthNumber = function (_p1) { + return _justinmimbs$elm_date_extra$Date_Extra_Facts$monthNumberFromMonth( + _elm_lang$core$Date$month(_p1)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Extract$quarter = function (date) { + return _elm_lang$core$Basics$ceiling( + function (n) { + return n / 3; + }( + _elm_lang$core$Basics$toFloat( + _justinmimbs$elm_date_extra$Date_Internal_Extract$monthNumber(date)))); +}; + +var _justinmimbs$elm_date_extra$Date_Internal_Format$toUtc = function (date) { + return _elm_lang$core$Date$fromTime( + _elm_lang$core$Date$toTime(date) - _elm_lang$core$Basics$toFloat( + _justinmimbs$elm_date_extra$Date_Internal_Extract$offsetFromUtc(date) * _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$nameForm = function (length) { + var _p0 = length; + switch (_p0) { + case 1: + return 'abbreviated'; + case 2: + return 'abbreviated'; + case 3: + return 'abbreviated'; + case 4: + return 'full'; + case 5: + return 'narrow'; + case 6: + return 'short'; + default: + return 'invalid'; + } +}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$patternMatches = _elm_lang$core$Regex$regex('([yYQMwdDEeabhHmsSXx])\\1*|\'(?:[^\']|\'\')*?\'(?!\')'); +var _justinmimbs$elm_date_extra$Date_Internal_Format$formatTimeOffset = F3( + function (separator, minutesOptional, offset) { + var mm = A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + A2( + _elm_lang$core$Basics_ops['%'], + _elm_lang$core$Basics$abs(offset), + 60))); + var hh = A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + (_elm_lang$core$Basics$abs(offset) / 60) | 0)); + var sign = (_elm_lang$core$Native_Utils.cmp(offset, 0) > -1) ? '+' : '-'; + return (minutesOptional && _elm_lang$core$Native_Utils.eq(mm, '00')) ? A2(_elm_lang$core$Basics_ops['++'], sign, hh) : A2( + _elm_lang$core$Basics_ops['++'], + sign, + A2( + _elm_lang$core$Basics_ops['++'], + hh, + A2(_elm_lang$core$Basics_ops['++'], separator, mm))); + }); +var _justinmimbs$elm_date_extra$Date_Internal_Format$ordinalSuffix = function (n) { + var nn = A2(_elm_lang$core$Basics_ops['%'], n, 100); + var _p1 = A2( + _elm_lang$core$Basics$min, + (_elm_lang$core$Native_Utils.cmp(nn, 20) < 0) ? nn : A2(_elm_lang$core$Basics_ops['%'], nn, 10), + 4); + switch (_p1) { + case 0: + return 'th'; + case 1: + return 'st'; + case 2: + return 'nd'; + case 3: + return 'rd'; + case 4: + return 'th'; + default: + return ''; + } +}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$withOrdinalSuffix = function (n) { + return A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(n), + _justinmimbs$elm_date_extra$Date_Internal_Format$ordinalSuffix(n)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$hour12 = function (date) { + var _p2 = A2( + _elm_lang$core$Basics_ops['%'], + _elm_lang$core$Date$hour(date), + 12); + if (_p2 === 0) { + return 12; + } else { + return _p2; + } +}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$dayOfWeekName = function (d) { + var _p3 = d; + switch (_p3.ctor) { + case 'Mon': + return 'Monday'; + case 'Tue': + return 'Tuesday'; + case 'Wed': + return 'Wednesday'; + case 'Thu': + return 'Thursday'; + case 'Fri': + return 'Friday'; + case 'Sat': + return 'Saturday'; + default: + return 'Sunday'; + } +}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$monthName = function (m) { + var _p4 = m; + switch (_p4.ctor) { + case 'Jan': + return 'January'; + case 'Feb': + return 'February'; + case 'Mar': + return 'March'; + case 'Apr': + return 'April'; + case 'May': + return 'May'; + case 'Jun': + return 'June'; + case 'Jul': + return 'July'; + case 'Aug': + return 'August'; + case 'Sep': + return 'September'; + case 'Oct': + return 'October'; + case 'Nov': + return 'November'; + default: + return 'December'; + } +}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$PM = {ctor: 'PM'}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$Noon = {ctor: 'Noon'}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$AM = {ctor: 'AM'}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$Midnight = {ctor: 'Midnight'}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$dayPeriod = function (date) { + var onTheHour = _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$minute(date), + 0) && (_elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$second(date), + 0) && _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$millisecond(date), + 0)); + var hh = _elm_lang$core$Date$hour(date); + return (_elm_lang$core$Native_Utils.eq(hh, 0) && onTheHour) ? _justinmimbs$elm_date_extra$Date_Internal_Format$Midnight : ((_elm_lang$core$Native_Utils.cmp(hh, 12) < 0) ? _justinmimbs$elm_date_extra$Date_Internal_Format$AM : ((_elm_lang$core$Native_Utils.eq(hh, 12) && onTheHour) ? _justinmimbs$elm_date_extra$Date_Internal_Format$Noon : _justinmimbs$elm_date_extra$Date_Internal_Format$PM)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Format$format = F3( + function (asUtc, date, match) { + format: + while (true) { + var length = _elm_lang$core$String$length(match); + var $char = A2(_elm_lang$core$String$left, 1, match); + var _p5 = $char; + switch (_p5) { + case 'y': + var _p6 = length; + if (_p6 === 2) { + return A2( + _elm_lang$core$String$right, + 2, + A3( + _elm_lang$core$String$padLeft, + length, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _elm_lang$core$Date$year(date)))); + } else { + return A3( + _elm_lang$core$String$padLeft, + length, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _elm_lang$core$Date$year(date))); + } + case 'Y': + var _p7 = length; + if (_p7 === 2) { + return A2( + _elm_lang$core$String$right, + 2, + A3( + _elm_lang$core$String$padLeft, + length, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$weekYear(date)))); + } else { + return A3( + _elm_lang$core$String$padLeft, + length, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$weekYear(date))); + } + case 'Q': + var _p8 = length; + switch (_p8) { + case 1: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$quarter(date)); + case 2: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$quarter(date)); + case 3: + return A2( + F2( + function (x, y) { + return A2(_elm_lang$core$Basics_ops['++'], x, y); + }), + 'Q', + _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$quarter(date))); + case 4: + return _justinmimbs$elm_date_extra$Date_Internal_Format$withOrdinalSuffix( + _justinmimbs$elm_date_extra$Date_Internal_Extract$quarter(date)); + case 5: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$quarter(date)); + default: + return ''; + } + case 'M': + var _p9 = length; + switch (_p9) { + case 1: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$monthNumber(date)); + case 2: + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$monthNumber(date))); + case 3: + return A2( + _elm_lang$core$String$left, + 3, + _justinmimbs$elm_date_extra$Date_Internal_Format$monthName( + _elm_lang$core$Date$month(date))); + case 4: + return _justinmimbs$elm_date_extra$Date_Internal_Format$monthName( + _elm_lang$core$Date$month(date)); + case 5: + return A2( + _elm_lang$core$String$left, + 1, + _justinmimbs$elm_date_extra$Date_Internal_Format$monthName( + _elm_lang$core$Date$month(date))); + default: + return ''; + } + case 'w': + var _p10 = length; + switch (_p10) { + case 1: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$weekNumber(date)); + case 2: + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$weekNumber(date))); + default: + return ''; + } + case 'd': + var _p11 = length; + switch (_p11) { + case 1: + return _elm_lang$core$Basics$toString( + _elm_lang$core$Date$day(date)); + case 2: + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _elm_lang$core$Date$day(date))); + case 3: + return _justinmimbs$elm_date_extra$Date_Internal_Format$withOrdinalSuffix( + _elm_lang$core$Date$day(date)); + default: + return ''; + } + case 'D': + var _p12 = length; + switch (_p12) { + case 1: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$ordinalDay(date)); + case 2: + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$ordinalDay(date))); + case 3: + return A3( + _elm_lang$core$String$padLeft, + 3, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$ordinalDay(date))); + default: + return ''; + } + case 'E': + var _p13 = _justinmimbs$elm_date_extra$Date_Internal_Format$nameForm(length); + switch (_p13) { + case 'abbreviated': + return A2( + _elm_lang$core$String$left, + 3, + _justinmimbs$elm_date_extra$Date_Internal_Format$dayOfWeekName( + _elm_lang$core$Date$dayOfWeek(date))); + case 'full': + return _justinmimbs$elm_date_extra$Date_Internal_Format$dayOfWeekName( + _elm_lang$core$Date$dayOfWeek(date)); + case 'narrow': + return A2( + _elm_lang$core$String$left, + 1, + _justinmimbs$elm_date_extra$Date_Internal_Format$dayOfWeekName( + _elm_lang$core$Date$dayOfWeek(date))); + case 'short': + return A2( + _elm_lang$core$String$left, + 2, + _justinmimbs$elm_date_extra$Date_Internal_Format$dayOfWeekName( + _elm_lang$core$Date$dayOfWeek(date))); + default: + return ''; + } + case 'e': + var _p14 = length; + switch (_p14) { + case 1: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$weekdayNumber(date)); + case 2: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Extract$weekdayNumber(date)); + default: + var _v15 = asUtc, + _v16 = date, + _v17 = _elm_lang$core$String$toUpper(match); + asUtc = _v15; + date = _v16; + match = _v17; + continue format; + } + case 'a': + var p = _justinmimbs$elm_date_extra$Date_Internal_Format$dayPeriod(date); + var m = (_elm_lang$core$Native_Utils.eq(p, _justinmimbs$elm_date_extra$Date_Internal_Format$Midnight) || _elm_lang$core$Native_Utils.eq(p, _justinmimbs$elm_date_extra$Date_Internal_Format$AM)) ? 'A' : 'P'; + var _p15 = _justinmimbs$elm_date_extra$Date_Internal_Format$nameForm(length); + switch (_p15) { + case 'abbreviated': + return A2(_elm_lang$core$Basics_ops['++'], m, 'M'); + case 'full': + return A2(_elm_lang$core$Basics_ops['++'], m, '.M.'); + case 'narrow': + return m; + default: + return ''; + } + case 'b': + var _p16 = _justinmimbs$elm_date_extra$Date_Internal_Format$nameForm(length); + switch (_p16) { + case 'abbreviated': + var _p17 = _justinmimbs$elm_date_extra$Date_Internal_Format$dayPeriod(date); + switch (_p17.ctor) { + case 'Midnight': + return 'mid.'; + case 'AM': + return 'am'; + case 'Noon': + return 'noon'; + default: + return 'pm'; + } + case 'full': + var _p18 = _justinmimbs$elm_date_extra$Date_Internal_Format$dayPeriod(date); + switch (_p18.ctor) { + case 'Midnight': + return 'midnight'; + case 'AM': + return 'a.m.'; + case 'Noon': + return 'noon'; + default: + return 'p.m.'; + } + case 'narrow': + var _p19 = _justinmimbs$elm_date_extra$Date_Internal_Format$dayPeriod(date); + switch (_p19.ctor) { + case 'Midnight': + return 'md'; + case 'AM': + return 'a'; + case 'Noon': + return 'nn'; + default: + return 'p'; + } + default: + return ''; + } + case 'h': + var _p20 = length; + switch (_p20) { + case 1: + return _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Format$hour12(date)); + case 2: + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _justinmimbs$elm_date_extra$Date_Internal_Format$hour12(date))); + default: + return ''; + } + case 'H': + var _p21 = length; + switch (_p21) { + case 1: + return _elm_lang$core$Basics$toString( + _elm_lang$core$Date$hour(date)); + case 2: + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _elm_lang$core$Date$hour(date))); + default: + return ''; + } + case 'm': + var _p22 = length; + switch (_p22) { + case 1: + return _elm_lang$core$Basics$toString( + _elm_lang$core$Date$minute(date)); + case 2: + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _elm_lang$core$Date$minute(date))); + default: + return ''; + } + case 's': + var _p23 = length; + switch (_p23) { + case 1: + return _elm_lang$core$Basics$toString( + _elm_lang$core$Date$second(date)); + case 2: + return A3( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _elm_lang$core$Date$second(date))); + default: + return ''; + } + case 'S': + return A3( + _elm_lang$core$String$padRight, + length, + _elm_lang$core$Native_Utils.chr('0'), + A2( + _elm_lang$core$String$left, + length, + A3( + _elm_lang$core$String$padLeft, + 3, + _elm_lang$core$Native_Utils.chr('0'), + _elm_lang$core$Basics$toString( + _elm_lang$core$Date$millisecond(date))))); + case 'X': + if ((_elm_lang$core$Native_Utils.cmp(length, 4) < 0) && (asUtc || _elm_lang$core$Native_Utils.eq( + _justinmimbs$elm_date_extra$Date_Internal_Extract$offsetFromUtc(date), + 0))) { + return 'Z'; + } else { + var _v27 = asUtc, + _v28 = date, + _v29 = _elm_lang$core$String$toLower(match); + asUtc = _v27; + date = _v28; + match = _v29; + continue format; + } + case 'x': + var offset = asUtc ? 0 : _justinmimbs$elm_date_extra$Date_Internal_Extract$offsetFromUtc(date); + var _p24 = length; + switch (_p24) { + case 1: + return A3(_justinmimbs$elm_date_extra$Date_Internal_Format$formatTimeOffset, '', true, offset); + case 2: + return A3(_justinmimbs$elm_date_extra$Date_Internal_Format$formatTimeOffset, '', false, offset); + case 3: + return A3(_justinmimbs$elm_date_extra$Date_Internal_Format$formatTimeOffset, ':', false, offset); + default: + return ''; + } + case '\'': + return _elm_lang$core$Native_Utils.eq(match, '\'\'') ? '\'' : A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _elm_lang$core$Regex$regex('\'\''), + function (_p25) { + return '\''; + }, + A3(_elm_lang$core$String$slice, 1, -1, match)); + default: + return ''; + } + } + }); +var _justinmimbs$elm_date_extra$Date_Internal_Format$toFormattedString = F3( + function (asUtc, pattern, date) { + var date_ = asUtc ? _justinmimbs$elm_date_extra$Date_Internal_Format$toUtc(date) : date; + return A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _justinmimbs$elm_date_extra$Date_Internal_Format$patternMatches, + function (_p26) { + return A3( + _justinmimbs$elm_date_extra$Date_Internal_Format$format, + asUtc, + date_, + function (_) { + return _.match; + }(_p26)); + }, + pattern); + }); + +var _justinmimbs$elm_date_extra$Date_Internal_Parse$isoDateRegex = function () { + var time = 'T(\\d{2})(?:(\\:)?(\\d{2})(?:\\10(\\d{2}))?)?(\\.\\d+)?(?:(Z)|(?:([+\\-])(\\d{2})(?:\\:?(\\d{2}))?))?'; + var ord = '\\-?(\\d{3})'; + var week = '(\\-)?W(\\d{2})(?:\\5(\\d))?'; + var cal = '(\\-)?(\\d{2})(?:\\2(\\d{2}))?'; + var year = '(\\d{4})'; + return _elm_lang$core$Regex$regex( + A2( + _elm_lang$core$Basics_ops['++'], + '^', + A2( + _elm_lang$core$Basics_ops['++'], + year, + A2( + _elm_lang$core$Basics_ops['++'], + '(?:', + A2( + _elm_lang$core$Basics_ops['++'], + cal, + A2( + _elm_lang$core$Basics_ops['++'], + '|', + A2( + _elm_lang$core$Basics_ops['++'], + week, + A2( + _elm_lang$core$Basics_ops['++'], + '|', + A2( + _elm_lang$core$Basics_ops['++'], + ord, + A2( + _elm_lang$core$Basics_ops['++'], + ')?', + A2( + _elm_lang$core$Basics_ops['++'], + '(?:', + A2(_elm_lang$core$Basics_ops['++'], time, ')?$')))))))))))); +}(); +var _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToFloat = function (_p0) { + return _elm_lang$core$Result$toMaybe( + _elm_lang$core$String$toFloat(_p0)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Parse$msFromMatches = F4( + function (timeHH, timeMM, timeSS, timeF) { + var fractional = A2( + _elm_lang$core$Maybe$withDefault, + 0.0, + A2(_elm_lang$core$Maybe$andThen, _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToFloat, timeF)); + var _p1 = function () { + var _p2 = A2( + _elm_lang$core$List$map, + _elm_lang$core$Maybe$andThen(_justinmimbs$elm_date_extra$Date_Internal_Parse$stringToFloat), + { + ctor: '::', + _0: timeHH, + _1: { + ctor: '::', + _0: timeMM, + _1: { + ctor: '::', + _0: timeSS, + _1: {ctor: '[]'} + } + } + }); + _v0_3: + do { + if (((_p2.ctor === '::') && (_p2._0.ctor === 'Just')) && (_p2._1.ctor === '::')) { + if (_p2._1._0.ctor === 'Just') { + if (_p2._1._1.ctor === '::') { + if (_p2._1._1._0.ctor === 'Just') { + if (_p2._1._1._1.ctor === '[]') { + return {ctor: '_Tuple3', _0: _p2._0._0, _1: _p2._1._0._0, _2: _p2._1._1._0._0 + fractional}; + } else { + break _v0_3; + } + } else { + if (_p2._1._1._1.ctor === '[]') { + return {ctor: '_Tuple3', _0: _p2._0._0, _1: _p2._1._0._0 + fractional, _2: 0.0}; + } else { + break _v0_3; + } + } + } else { + break _v0_3; + } + } else { + if (((_p2._1._1.ctor === '::') && (_p2._1._1._0.ctor === 'Nothing')) && (_p2._1._1._1.ctor === '[]')) { + return {ctor: '_Tuple3', _0: _p2._0._0 + fractional, _1: 0.0, _2: 0.0}; + } else { + break _v0_3; + } + } + } else { + break _v0_3; + } + } while(false); + return {ctor: '_Tuple3', _0: 0.0, _1: 0.0, _2: 0.0}; + }(); + var hh = _p1._0; + var mm = _p1._1; + var ss = _p1._2; + return _elm_lang$core$Basics$round( + ((hh * _elm_lang$core$Basics$toFloat(_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerHour)) + (mm * _elm_lang$core$Basics$toFloat(_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute))) + (ss * _elm_lang$core$Basics$toFloat(_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerSecond))); + }); +var _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt = function (_p3) { + return _elm_lang$core$Result$toMaybe( + _elm_lang$core$String$toInt(_p3)); +}; +var _justinmimbs$elm_date_extra$Date_Internal_Parse$unixTimeFromMatches = F6( + function (yyyy, calMM, calDD, weekWW, weekD, ordDDD) { + var y = A2( + _elm_lang$core$Maybe$withDefault, + 1, + _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt(yyyy)); + var _p4 = {ctor: '_Tuple2', _0: calMM, _1: weekWW}; + _v1_2: + do { + if (_p4.ctor === '_Tuple2') { + if (_p4._0.ctor === 'Just') { + if (_p4._1.ctor === 'Nothing') { + return A3( + _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromCalendarDate, + y, + _justinmimbs$elm_date_extra$Date_Extra_Facts$monthFromMonthNumber( + A2( + _elm_lang$core$Maybe$withDefault, + 1, + A2(_elm_lang$core$Maybe$andThen, _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt, calMM))), + A2( + _elm_lang$core$Maybe$withDefault, + 1, + A2(_elm_lang$core$Maybe$andThen, _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt, calDD))); + } else { + break _v1_2; + } + } else { + if (_p4._1.ctor === 'Just') { + return A3( + _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromWeekDate, + y, + A2( + _elm_lang$core$Maybe$withDefault, + 1, + A2(_elm_lang$core$Maybe$andThen, _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt, weekWW)), + A2( + _elm_lang$core$Maybe$withDefault, + 1, + A2(_elm_lang$core$Maybe$andThen, _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt, weekD))); + } else { + break _v1_2; + } + } + } else { + break _v1_2; + } + } while(false); + return A2( + _justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromOrdinalDate, + y, + A2( + _elm_lang$core$Maybe$withDefault, + 1, + A2(_elm_lang$core$Maybe$andThen, _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt, ordDDD))); + }); +var _justinmimbs$elm_date_extra$Date_Internal_Parse$offsetFromMatches = F4( + function (tzZ, tzSign, tzHH, tzMM) { + var _p5 = {ctor: '_Tuple2', _0: tzZ, _1: tzSign}; + _v2_2: + do { + if (_p5.ctor === '_Tuple2') { + if (_p5._0.ctor === 'Just') { + if ((_p5._0._0 === 'Z') && (_p5._1.ctor === 'Nothing')) { + return _elm_lang$core$Maybe$Just(0); + } else { + break _v2_2; + } + } else { + if (_p5._1.ctor === 'Just') { + var mm = A2( + _elm_lang$core$Maybe$withDefault, + 0, + A2(_elm_lang$core$Maybe$andThen, _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt, tzMM)); + var hh = A2( + _elm_lang$core$Maybe$withDefault, + 0, + A2(_elm_lang$core$Maybe$andThen, _justinmimbs$elm_date_extra$Date_Internal_Parse$stringToInt, tzHH)); + return _elm_lang$core$Maybe$Just( + (_elm_lang$core$Native_Utils.eq(_p5._1._0, '+') ? 1 : -1) * ((hh * 60) + mm)); + } else { + break _v2_2; + } + } + } else { + break _v2_2; + } + } while(false); + return _elm_lang$core$Maybe$Nothing; + }); +var _justinmimbs$elm_date_extra$Date_Internal_Parse$offsetTimeFromMatches = function (matches) { + var _p6 = matches; + if (((((((((((((((((((_p6.ctor === '::') && (_p6._0.ctor === 'Just')) && (_p6._1.ctor === '::')) && (_p6._1._1.ctor === '::')) && (_p6._1._1._1.ctor === '::')) && (_p6._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1.ctor === '::')) && (_p6._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1.ctor === '[]')) { + var offset = A4(_justinmimbs$elm_date_extra$Date_Internal_Parse$offsetFromMatches, _p6._1._1._1._1._1._1._1._1._1._1._1._1._1._0, _p6._1._1._1._1._1._1._1._1._1._1._1._1._1._1._0, _p6._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1._0, _p6._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1._0); + var timeMS = A4(_justinmimbs$elm_date_extra$Date_Internal_Parse$msFromMatches, _p6._1._1._1._1._1._1._1._1._0, _p6._1._1._1._1._1._1._1._1._1._1._0, _p6._1._1._1._1._1._1._1._1._1._1._1._0, _p6._1._1._1._1._1._1._1._1._1._1._1._1._0); + var dateMS = A6(_justinmimbs$elm_date_extra$Date_Internal_Parse$unixTimeFromMatches, _p6._0._0, _p6._1._1._0, _p6._1._1._1._0, _p6._1._1._1._1._1._0, _p6._1._1._1._1._1._1._0, _p6._1._1._1._1._1._1._1._0); + return _elm_lang$core$Maybe$Just( + {ctor: '_Tuple2', _0: offset, _1: dateMS + timeMS}); + } else { + return _elm_lang$core$Maybe$Nothing; + } +}; +var _justinmimbs$elm_date_extra$Date_Internal_Parse$offsetTimeFromIsoString = function (s) { + return A2( + _elm_lang$core$Maybe$andThen, + _justinmimbs$elm_date_extra$Date_Internal_Parse$offsetTimeFromMatches, + A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.submatches; + }, + _elm_lang$core$List$head( + A3( + _elm_lang$core$Regex$find, + _elm_lang$core$Regex$AtMost(1), + _justinmimbs$elm_date_extra$Date_Internal_Parse$isoDateRegex, + s)))); +}; + +var _justinmimbs$elm_date_extra$Date_Extra$toRataDie = function (date) { + return A3( + _justinmimbs$elm_date_extra$Date_Internal_RataDie$fromCalendarDate, + _elm_lang$core$Date$year(date), + _elm_lang$core$Date$month(date), + _elm_lang$core$Date$day(date)); +}; +var _justinmimbs$elm_date_extra$Date_Extra$toParts = function (date) { + return { + ctor: '_Tuple7', + _0: _elm_lang$core$Date$year(date), + _1: _elm_lang$core$Date$month(date), + _2: _elm_lang$core$Date$day(date), + _3: _elm_lang$core$Date$hour(date), + _4: _elm_lang$core$Date$minute(date), + _5: _elm_lang$core$Date$second(date), + _6: _elm_lang$core$Date$millisecond(date) + }; +}; +var _justinmimbs$elm_date_extra$Date_Extra$monthFromQuarter = function (q) { + var _p0 = q; + switch (_p0) { + case 1: + return _elm_lang$core$Date$Jan; + case 2: + return _elm_lang$core$Date$Apr; + case 3: + return _elm_lang$core$Date$Jul; + default: + return _elm_lang$core$Date$Oct; + } +}; +var _justinmimbs$elm_date_extra$Date_Extra$clamp = F3( + function (min, max, date) { + return (_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$Date$toTime(date), + _elm_lang$core$Date$toTime(min)) < 0) ? min : ((_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$Date$toTime(date), + _elm_lang$core$Date$toTime(max)) > 0) ? max : date); + }); +var _justinmimbs$elm_date_extra$Date_Extra$comparableIsBetween = F3( + function (a, b, x) { + return ((_elm_lang$core$Native_Utils.cmp(a, x) < 1) && (_elm_lang$core$Native_Utils.cmp(x, b) < 1)) || ((_elm_lang$core$Native_Utils.cmp(b, x) < 1) && (_elm_lang$core$Native_Utils.cmp(x, a) < 1)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$isBetween = F3( + function (date1, date2, date) { + return A3( + _justinmimbs$elm_date_extra$Date_Extra$comparableIsBetween, + _elm_lang$core$Date$toTime(date1), + _elm_lang$core$Date$toTime(date2), + _elm_lang$core$Date$toTime(date)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$compare = F2( + function (a, b) { + return A2( + _elm_lang$core$Basics$compare, + _elm_lang$core$Date$toTime(a), + _elm_lang$core$Date$toTime(b)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$equal = F2( + function (a, b) { + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$toTime(a), + _elm_lang$core$Date$toTime(b)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$offsetFromUtc = _justinmimbs$elm_date_extra$Date_Internal_Extract$offsetFromUtc; +var _justinmimbs$elm_date_extra$Date_Extra$weekYear = _justinmimbs$elm_date_extra$Date_Internal_Extract$weekYear; +var _justinmimbs$elm_date_extra$Date_Extra$weekNumber = _justinmimbs$elm_date_extra$Date_Internal_Extract$weekNumber; +var _justinmimbs$elm_date_extra$Date_Extra$weekdayNumber = _justinmimbs$elm_date_extra$Date_Internal_Extract$weekdayNumber; +var _justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek = F2( + function (d, date) { + return _elm_lang$core$Basics$negate( + A2( + _elm_lang$core$Basics_ops['%'], + (_justinmimbs$elm_date_extra$Date_Extra$weekdayNumber(date) - _justinmimbs$elm_date_extra$Date_Extra_Facts$weekdayNumberFromDayOfWeek(d)) + 7, + 7)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$fractionalDay = _justinmimbs$elm_date_extra$Date_Internal_Extract$fractionalDay; +var _justinmimbs$elm_date_extra$Date_Extra$ordinalDay = _justinmimbs$elm_date_extra$Date_Internal_Extract$ordinalDay; +var _justinmimbs$elm_date_extra$Date_Extra$quarter = _justinmimbs$elm_date_extra$Date_Internal_Extract$quarter; +var _justinmimbs$elm_date_extra$Date_Extra$monthNumber = _justinmimbs$elm_date_extra$Date_Internal_Extract$monthNumber; +var _justinmimbs$elm_date_extra$Date_Extra$ordinalMonth = function (date) { + return (_elm_lang$core$Date$year(date) * 12) + _justinmimbs$elm_date_extra$Date_Extra$monthNumber(date); +}; +var _justinmimbs$elm_date_extra$Date_Extra$diffMonth = F2( + function (date1, date2) { + var fractionalMonth = function (date) { + return (_elm_lang$core$Basics$toFloat( + _elm_lang$core$Date$day(date) - 1) + _justinmimbs$elm_date_extra$Date_Extra$fractionalDay(date)) / 31; + }; + var ordinalMonthFloat = function (date) { + return _elm_lang$core$Basics$toFloat( + _justinmimbs$elm_date_extra$Date_Extra$ordinalMonth(date)) + fractionalMonth(date); + }; + return _elm_lang$core$Basics$truncate( + ordinalMonthFloat(date2) - ordinalMonthFloat(date1)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$toUtcFormattedString = _justinmimbs$elm_date_extra$Date_Internal_Format$toFormattedString(true); +var _justinmimbs$elm_date_extra$Date_Extra$toUtcIsoString = _justinmimbs$elm_date_extra$Date_Extra$toUtcFormattedString('yyyy-MM-dd\'T\'HH:mm:ss.SSSXXX'); +var _justinmimbs$elm_date_extra$Date_Extra$toFormattedString = _justinmimbs$elm_date_extra$Date_Internal_Format$toFormattedString(false); +var _justinmimbs$elm_date_extra$Date_Extra$toIsoString = _justinmimbs$elm_date_extra$Date_Extra$toFormattedString('yyyy-MM-dd\'T\'HH:mm:ss.SSSxxx'); +var _justinmimbs$elm_date_extra$Date_Extra$fromTime = function (_p1) { + return _elm_lang$core$Date$fromTime( + _elm_lang$core$Basics$toFloat(_p1)); +}; +var _justinmimbs$elm_date_extra$Date_Extra$fromOffsetTime = function (_p2) { + var _p3 = _p2; + var _p5 = _p3._1; + var _p4 = _p3._0; + if (_p4.ctor === 'Just') { + return _justinmimbs$elm_date_extra$Date_Extra$fromTime(_p5 - (_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute * _p4._0)); + } else { + var offset0 = _justinmimbs$elm_date_extra$Date_Extra$offsetFromUtc( + _justinmimbs$elm_date_extra$Date_Extra$fromTime(_p5)); + var date1 = _justinmimbs$elm_date_extra$Date_Extra$fromTime(_p5 - (_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute * offset0)); + var offset1 = _justinmimbs$elm_date_extra$Date_Extra$offsetFromUtc(date1); + if (_elm_lang$core$Native_Utils.eq(offset0, offset1)) { + return date1; + } else { + var date2 = _justinmimbs$elm_date_extra$Date_Extra$fromTime(_p5 - (_justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute * offset1)); + var offset2 = _justinmimbs$elm_date_extra$Date_Extra$offsetFromUtc(date2); + return _elm_lang$core$Native_Utils.eq(offset1, offset2) ? date2 : date1; + } + } +}; +var _justinmimbs$elm_date_extra$Date_Extra$fromParts = F7( + function (y, m, d, hh, mm, ss, ms) { + return _justinmimbs$elm_date_extra$Date_Extra$fromOffsetTime( + { + ctor: '_Tuple2', + _0: _elm_lang$core$Maybe$Nothing, + _1: A7(_justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromParts, y, m, d, hh, mm, ss, ms) + }); + }); +var _justinmimbs$elm_date_extra$Date_Extra$addMonths = F2( + function (n, date) { + var om = (_justinmimbs$elm_date_extra$Date_Extra$ordinalMonth(date) + n) + -1; + var y_ = (om / 12) | 0; + var m_ = _justinmimbs$elm_date_extra$Date_Extra_Facts$monthFromMonthNumber( + A2(_elm_lang$core$Basics_ops['%'], om, 12) + 1); + var _p6 = _justinmimbs$elm_date_extra$Date_Extra$toParts(date); + var y = _p6._0; + var m = _p6._1; + var d = _p6._2; + var hh = _p6._3; + var mm = _p6._4; + var ss = _p6._5; + var ms = _p6._6; + var d_ = A2( + _elm_lang$core$Basics$min, + d, + A2(_justinmimbs$elm_date_extra$Date_Extra_Facts$daysInMonth, y_, m_)); + return A7(_justinmimbs$elm_date_extra$Date_Extra$fromParts, y_, m_, d_, hh, mm, ss, ms); + }); +var _justinmimbs$elm_date_extra$Date_Extra$add = F3( + function (interval, n, date) { + var _p7 = _justinmimbs$elm_date_extra$Date_Extra$toParts(date); + var y = _p7._0; + var m = _p7._1; + var d = _p7._2; + var hh = _p7._3; + var mm = _p7._4; + var ss = _p7._5; + var ms = _p7._6; + var _p8 = interval; + switch (_p8.ctor) { + case 'Millisecond': + return _elm_lang$core$Date$fromTime( + _elm_lang$core$Date$toTime(date) + _elm_lang$core$Basics$toFloat(n)); + case 'Second': + return _elm_lang$core$Date$fromTime( + _elm_lang$core$Date$toTime(date) + _elm_lang$core$Basics$toFloat(n * _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerSecond)); + case 'Minute': + return _elm_lang$core$Date$fromTime( + _elm_lang$core$Date$toTime(date) + _elm_lang$core$Basics$toFloat(n * _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute)); + case 'Hour': + return _elm_lang$core$Date$fromTime( + _elm_lang$core$Date$toTime(date) + _elm_lang$core$Basics$toFloat(n * _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerHour)); + case 'Day': + return A7(_justinmimbs$elm_date_extra$Date_Extra$fromParts, y, m, d + n, hh, mm, ss, ms); + case 'Month': + return A2(_justinmimbs$elm_date_extra$Date_Extra$addMonths, n, date); + case 'Year': + return A2(_justinmimbs$elm_date_extra$Date_Extra$addMonths, n * 12, date); + case 'Quarter': + return A2(_justinmimbs$elm_date_extra$Date_Extra$addMonths, n * 3, date); + case 'Week': + return A7(_justinmimbs$elm_date_extra$Date_Extra$fromParts, y, m, d + (n * 7), hh, mm, ss, ms); + default: + return A7(_justinmimbs$elm_date_extra$Date_Extra$fromParts, y, m, d + (n * 7), hh, mm, ss, ms); + } + }); +var _justinmimbs$elm_date_extra$Date_Extra$rangeHelp = F5( + function (interval, step, end, revList, date) { + rangeHelp: + while (true) { + if (_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$Date$toTime(date), + _elm_lang$core$Date$toTime(end)) < 0) { + var _v4 = interval, + _v5 = step, + _v6 = end, + _v7 = {ctor: '::', _0: date, _1: revList}, + _v8 = A3(_justinmimbs$elm_date_extra$Date_Extra$add, interval, step, date); + interval = _v4; + step = _v5; + end = _v6; + revList = _v7; + date = _v8; + continue rangeHelp; + } else { + return _elm_lang$core$List$reverse(revList); + } + } + }); +var _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate = F3( + function (y, m, d) { + return _justinmimbs$elm_date_extra$Date_Extra$fromOffsetTime( + { + ctor: '_Tuple2', + _0: _elm_lang$core$Maybe$Nothing, + _1: A3(_justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromCalendarDate, y, m, d) + }); + }); +var _justinmimbs$elm_date_extra$Date_Extra$floor = F2( + function (interval, date) { + var _p9 = _justinmimbs$elm_date_extra$Date_Extra$toParts(date); + var y = _p9._0; + var m = _p9._1; + var d = _p9._2; + var hh = _p9._3; + var mm = _p9._4; + var ss = _p9._5; + var _p10 = interval; + switch (_p10.ctor) { + case 'Millisecond': + return date; + case 'Second': + return A7(_justinmimbs$elm_date_extra$Date_Extra$fromParts, y, m, d, hh, mm, ss, 0); + case 'Minute': + return A7(_justinmimbs$elm_date_extra$Date_Extra$fromParts, y, m, d, hh, mm, 0, 0); + case 'Hour': + return A7(_justinmimbs$elm_date_extra$Date_Extra$fromParts, y, m, d, hh, 0, 0, 0); + case 'Day': + return A3(_justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, y, m, d); + case 'Month': + return A3(_justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, y, m, 1); + case 'Year': + return A3(_justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, y, _elm_lang$core$Date$Jan, 1); + case 'Quarter': + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + _justinmimbs$elm_date_extra$Date_Extra$monthFromQuarter( + _justinmimbs$elm_date_extra$Date_Extra$quarter(date)), + 1); + case 'Week': + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + m, + d + A2(_justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek, _elm_lang$core$Date$Mon, date)); + case 'Monday': + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + m, + d + A2(_justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek, _elm_lang$core$Date$Mon, date)); + case 'Tuesday': + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + m, + d + A2(_justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek, _elm_lang$core$Date$Tue, date)); + case 'Wednesday': + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + m, + d + A2(_justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek, _elm_lang$core$Date$Wed, date)); + case 'Thursday': + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + m, + d + A2(_justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek, _elm_lang$core$Date$Thu, date)); + case 'Friday': + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + m, + d + A2(_justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek, _elm_lang$core$Date$Fri, date)); + case 'Saturday': + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + m, + d + A2(_justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek, _elm_lang$core$Date$Sat, date)); + default: + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, + y, + m, + d + A2(_justinmimbs$elm_date_extra$Date_Extra$daysToPreviousDayOfWeek, _elm_lang$core$Date$Sun, date)); + } + }); +var _justinmimbs$elm_date_extra$Date_Extra$ceiling = F2( + function (interval, date) { + var floored = A2(_justinmimbs$elm_date_extra$Date_Extra$floor, interval, date); + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$toTime(date), + _elm_lang$core$Date$toTime(floored)) ? date : A3(_justinmimbs$elm_date_extra$Date_Extra$add, interval, 1, floored); + }); +var _justinmimbs$elm_date_extra$Date_Extra$range = F4( + function (interval, step, start, end) { + var first = A2(_justinmimbs$elm_date_extra$Date_Extra$ceiling, interval, start); + return (_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$Date$toTime(first), + _elm_lang$core$Date$toTime(end)) < 0) ? A5( + _justinmimbs$elm_date_extra$Date_Extra$rangeHelp, + interval, + A2(_elm_lang$core$Basics$max, 1, step), + end, + {ctor: '[]'}, + first) : {ctor: '[]'}; + }); +var _justinmimbs$elm_date_extra$Date_Extra$fromIsoString = function (_p11) { + return A2( + _elm_lang$core$Maybe$map, + _justinmimbs$elm_date_extra$Date_Extra$fromOffsetTime, + _justinmimbs$elm_date_extra$Date_Internal_Parse$offsetTimeFromIsoString(_p11)); +}; +var _justinmimbs$elm_date_extra$Date_Extra$fromSpec = F3( + function (_p14, _p13, _p12) { + var _p15 = _p14; + var _p16 = _p13; + var _p17 = _p12; + return _justinmimbs$elm_date_extra$Date_Extra$fromOffsetTime( + {ctor: '_Tuple2', _0: _p15._0, _1: _p17._0 + _p16._0}); + }); +var _justinmimbs$elm_date_extra$Date_Extra$Offset = function (a) { + return {ctor: 'Offset', _0: a}; +}; +var _justinmimbs$elm_date_extra$Date_Extra$utc = _justinmimbs$elm_date_extra$Date_Extra$Offset( + _elm_lang$core$Maybe$Just(0)); +var _justinmimbs$elm_date_extra$Date_Extra$offset = function (minutes) { + return _justinmimbs$elm_date_extra$Date_Extra$Offset( + _elm_lang$core$Maybe$Just(minutes)); +}; +var _justinmimbs$elm_date_extra$Date_Extra$local = _justinmimbs$elm_date_extra$Date_Extra$Offset(_elm_lang$core$Maybe$Nothing); +var _justinmimbs$elm_date_extra$Date_Extra$TimeMS = function (a) { + return {ctor: 'TimeMS', _0: a}; +}; +var _justinmimbs$elm_date_extra$Date_Extra$noTime = _justinmimbs$elm_date_extra$Date_Extra$TimeMS(0); +var _justinmimbs$elm_date_extra$Date_Extra$atTime = F4( + function (hh, mm, ss, ms) { + return _justinmimbs$elm_date_extra$Date_Extra$TimeMS( + A4(_justinmimbs$elm_date_extra$Date_Internal_Core$msFromTimeParts, hh, mm, ss, ms)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$DateMS = function (a) { + return {ctor: 'DateMS', _0: a}; +}; +var _justinmimbs$elm_date_extra$Date_Extra$calendarDate = F3( + function (y, m, d) { + return _justinmimbs$elm_date_extra$Date_Extra$DateMS( + A3(_justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromCalendarDate, y, m, d)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$ordinalDate = F2( + function (y, d) { + return _justinmimbs$elm_date_extra$Date_Extra$DateMS( + A2(_justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromOrdinalDate, y, d)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$weekDate = F3( + function (y, w, d) { + return _justinmimbs$elm_date_extra$Date_Extra$DateMS( + A3(_justinmimbs$elm_date_extra$Date_Internal_Core$unixTimeFromWeekDate, y, w, d)); + }); +var _justinmimbs$elm_date_extra$Date_Extra$Sunday = {ctor: 'Sunday'}; +var _justinmimbs$elm_date_extra$Date_Extra$Saturday = {ctor: 'Saturday'}; +var _justinmimbs$elm_date_extra$Date_Extra$Friday = {ctor: 'Friday'}; +var _justinmimbs$elm_date_extra$Date_Extra$Thursday = {ctor: 'Thursday'}; +var _justinmimbs$elm_date_extra$Date_Extra$Wednesday = {ctor: 'Wednesday'}; +var _justinmimbs$elm_date_extra$Date_Extra$Tuesday = {ctor: 'Tuesday'}; +var _justinmimbs$elm_date_extra$Date_Extra$Monday = {ctor: 'Monday'}; +var _justinmimbs$elm_date_extra$Date_Extra$Week = {ctor: 'Week'}; +var _justinmimbs$elm_date_extra$Date_Extra$Quarter = {ctor: 'Quarter'}; +var _justinmimbs$elm_date_extra$Date_Extra$Year = {ctor: 'Year'}; +var _justinmimbs$elm_date_extra$Date_Extra$Month = {ctor: 'Month'}; +var _justinmimbs$elm_date_extra$Date_Extra$Day = {ctor: 'Day'}; +var _justinmimbs$elm_date_extra$Date_Extra$diff = F3( + function (interval, date1, date2) { + var diffMS = _elm_lang$core$Basics$floor( + _elm_lang$core$Date$toTime(date2) - _elm_lang$core$Date$toTime(date1)); + var _p18 = interval; + switch (_p18.ctor) { + case 'Millisecond': + return diffMS; + case 'Second': + return (diffMS / _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerSecond) | 0; + case 'Minute': + return (diffMS / _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerMinute) | 0; + case 'Hour': + return (diffMS / _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerHour) | 0; + case 'Day': + return (diffMS / _justinmimbs$elm_date_extra$Date_Extra_Facts$msPerDay) | 0; + case 'Month': + return A2(_justinmimbs$elm_date_extra$Date_Extra$diffMonth, date1, date2); + case 'Year': + return (A2(_justinmimbs$elm_date_extra$Date_Extra$diffMonth, date1, date2) / 12) | 0; + case 'Quarter': + return (A2(_justinmimbs$elm_date_extra$Date_Extra$diffMonth, date1, date2) / 3) | 0; + case 'Week': + return (A3(_justinmimbs$elm_date_extra$Date_Extra$diff, _justinmimbs$elm_date_extra$Date_Extra$Day, date1, date2) / 7) | 0; + default: + var _p19 = _p18; + return (A3( + _justinmimbs$elm_date_extra$Date_Extra$diff, + _justinmimbs$elm_date_extra$Date_Extra$Day, + A2(_justinmimbs$elm_date_extra$Date_Extra$floor, _p19, date1), + A2(_justinmimbs$elm_date_extra$Date_Extra$floor, _p19, date2)) / 7) | 0; + } + }); +var _justinmimbs$elm_date_extra$Date_Extra$fromRataDie = function (rd) { + return A3( + _justinmimbs$elm_date_extra$Date_Extra$add, + _justinmimbs$elm_date_extra$Date_Extra$Day, + rd - 719163, + A3(_justinmimbs$elm_date_extra$Date_Extra$fromCalendarDate, 1970, _elm_lang$core$Date$Jan, 1)); +}; +var _justinmimbs$elm_date_extra$Date_Extra$Hour = {ctor: 'Hour'}; +var _justinmimbs$elm_date_extra$Date_Extra$Minute = {ctor: 'Minute'}; +var _justinmimbs$elm_date_extra$Date_Extra$equalBy = F3( + function (interval, date1, date2) { + equalBy: + while (true) { + var _p20 = interval; + switch (_p20.ctor) { + case 'Millisecond': + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$toTime(date1), + _elm_lang$core$Date$toTime(date2)); + case 'Second': + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$second(date1), + _elm_lang$core$Date$second(date2)) && A3(_justinmimbs$elm_date_extra$Date_Extra$equalBy, _justinmimbs$elm_date_extra$Date_Extra$Minute, date1, date2); + case 'Minute': + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$minute(date1), + _elm_lang$core$Date$minute(date2)) && A3(_justinmimbs$elm_date_extra$Date_Extra$equalBy, _justinmimbs$elm_date_extra$Date_Extra$Hour, date1, date2); + case 'Hour': + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$hour(date1), + _elm_lang$core$Date$hour(date2)) && A3(_justinmimbs$elm_date_extra$Date_Extra$equalBy, _justinmimbs$elm_date_extra$Date_Extra$Day, date1, date2); + case 'Day': + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$day(date1), + _elm_lang$core$Date$day(date2)) && A3(_justinmimbs$elm_date_extra$Date_Extra$equalBy, _justinmimbs$elm_date_extra$Date_Extra$Month, date1, date2); + case 'Month': + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$month(date1), + _elm_lang$core$Date$month(date2)) && A3(_justinmimbs$elm_date_extra$Date_Extra$equalBy, _justinmimbs$elm_date_extra$Date_Extra$Year, date1, date2); + case 'Year': + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Date$year(date1), + _elm_lang$core$Date$year(date2)); + case 'Quarter': + return _elm_lang$core$Native_Utils.eq( + _justinmimbs$elm_date_extra$Date_Extra$quarter(date1), + _justinmimbs$elm_date_extra$Date_Extra$quarter(date2)) && A3(_justinmimbs$elm_date_extra$Date_Extra$equalBy, _justinmimbs$elm_date_extra$Date_Extra$Year, date1, date2); + case 'Week': + return _elm_lang$core$Native_Utils.eq( + _justinmimbs$elm_date_extra$Date_Extra$weekNumber(date1), + _justinmimbs$elm_date_extra$Date_Extra$weekNumber(date2)) && _elm_lang$core$Native_Utils.eq( + _justinmimbs$elm_date_extra$Date_Extra$weekYear(date1), + _justinmimbs$elm_date_extra$Date_Extra$weekYear(date2)); + default: + var _p21 = _p20; + var _v15 = _justinmimbs$elm_date_extra$Date_Extra$Day, + _v16 = A2(_justinmimbs$elm_date_extra$Date_Extra$floor, _p21, date1), + _v17 = A2(_justinmimbs$elm_date_extra$Date_Extra$floor, _p21, date2); + interval = _v15; + date1 = _v16; + date2 = _v17; + continue equalBy; + } + } + }); +var _justinmimbs$elm_date_extra$Date_Extra$Second = {ctor: 'Second'}; +var _justinmimbs$elm_date_extra$Date_Extra$Millisecond = {ctor: 'Millisecond'}; + +var _mgold$elm_date_format$Date_Local$brazilian = { + date: { + months: {jan: 'Janeiro', feb: 'Fevereiro', mar: 'Março', apr: 'Abril', may: 'Maio', jun: 'Junho', jul: 'Julho', aug: 'Agosto', sep: 'Setembro', oct: 'Outubro', nov: 'Novembro', dec: 'Dezembro'}, + monthsAbbrev: {jan: 'Jan', feb: 'Fev', mar: 'Mar', apr: 'Abr', may: 'Mai', jun: 'Jun', jul: 'Jul', aug: 'Ago', sep: 'Set', oct: 'Out', nov: 'Nov', dec: 'Dez'}, + wdays: {mon: 'Segunda-feira', tue: 'Terça-feira', wed: 'Quarta-feira', thu: 'Quinta-feira', fri: 'Sexta-feira', sat: 'Sábado', sun: 'Domingo'}, + wdaysAbbrev: {mon: 'Seg', tue: 'Ter', wed: 'Qua', thu: 'Qui', fri: 'Sex', sat: 'Sáb', sun: 'Dom'}, + defaultFormat: _elm_lang$core$Maybe$Just('%e de %B de %Y') + }, + time: { + am: 'am', + pm: 'pm', + defaultFormat: _elm_lang$core$Maybe$Just('%k:%M') + }, + timeZones: _elm_lang$core$Maybe$Nothing, + defaultFormat: _elm_lang$core$Maybe$Nothing +}; +var _mgold$elm_date_format$Date_Local$french = { + date: { + months: {jan: 'Janvier', feb: 'Février', mar: 'Mars', apr: 'Avril', may: 'Mai', jun: 'Juin', jul: 'Juillet', aug: 'Août', sep: 'Septembre', oct: 'Octobre', nov: 'Novembre', dec: 'Décembre'}, + monthsAbbrev: {jan: 'Jan', feb: 'Fév', mar: 'Mar', apr: 'Avr', may: 'Mai', jun: 'Jui', jul: 'Jul', aug: 'Aoû', sep: 'Sep', oct: 'Oct', nov: 'Nov', dec: 'Déc'}, + wdays: {mon: 'Lundi', tue: 'Mardi', wed: 'Mercredi', thu: 'Jeudi', fri: 'Vendredi', sat: 'Samedi', sun: 'Dimanche'}, + wdaysAbbrev: {mon: 'Lun', tue: 'Mar', wed: 'Mer', thu: 'Jeu', fri: 'Ven', sat: 'Sam', sun: 'Dim'}, + defaultFormat: _elm_lang$core$Maybe$Nothing + }, + time: {am: 'am', pm: 'pm', defaultFormat: _elm_lang$core$Maybe$Nothing}, + timeZones: _elm_lang$core$Maybe$Nothing, + defaultFormat: _elm_lang$core$Maybe$Nothing +}; +var _mgold$elm_date_format$Date_Local$international = { + date: { + months: {jan: 'January', feb: 'February', mar: 'March', apr: 'April', may: 'May', jun: 'June', jul: 'July', aug: 'August', sep: 'September', oct: 'October', nov: 'November', dec: 'December'}, + monthsAbbrev: {jan: 'Jan', feb: 'Feb', mar: 'Mar', apr: 'Apr', may: 'May', jun: 'Jun', jul: 'Jul', aug: 'Aug', sep: 'Sep', oct: 'Oct', nov: 'Nov', dec: 'Dec'}, + wdays: {mon: 'Monday', tue: 'Tuesday', wed: 'Wednesday', thu: 'Thursday', fri: 'Friday', sat: 'Saturday', sun: 'Sunday'}, + wdaysAbbrev: {mon: 'Mon', tue: 'Tue', wed: 'Wed', thu: 'Thu', fri: 'Fri', sat: 'Sat', sun: 'Sun'}, + defaultFormat: _elm_lang$core$Maybe$Nothing + }, + time: {am: 'am', pm: 'pm', defaultFormat: _elm_lang$core$Maybe$Nothing}, + timeZones: _elm_lang$core$Maybe$Nothing, + defaultFormat: _elm_lang$core$Maybe$Nothing +}; +var _mgold$elm_date_format$Date_Local$Local = F4( + function (a, b, c, d) { + return {date: a, time: b, timeZones: c, defaultFormat: d}; + }); +var _mgold$elm_date_format$Date_Local$Months = function (a) { + return function (b) { + return function (c) { + return function (d) { + return function (e) { + return function (f) { + return function (g) { + return function (h) { + return function (i) { + return function (j) { + return function (k) { + return function (l) { + return {jan: a, feb: b, mar: c, apr: d, may: e, jun: f, jul: g, aug: h, sep: i, oct: j, nov: k, dec: l}; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; +}; +var _mgold$elm_date_format$Date_Local$WeekDays = F7( + function (a, b, c, d, e, f, g) { + return {mon: a, tue: b, wed: c, thu: d, fri: e, sat: f, sun: g}; + }); + +var _mgold$elm_date_format$Date_Format$padWith = function (padding) { + var padder = function () { + var _p0 = padding; + switch (_p0.ctor) { + case 'NoPadding': + return _elm_lang$core$Basics$identity; + case 'Zero': + return A2( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr('0')); + case 'ZeroThreeDigits': + return A2( + _elm_lang$core$String$padLeft, + 3, + _elm_lang$core$Native_Utils.chr('0')); + default: + return A2( + _elm_lang$core$String$padLeft, + 2, + _elm_lang$core$Native_Utils.chr(' ')); + } + }(); + return function (_p1) { + return padder( + _elm_lang$core$Basics$toString(_p1)); + }; +}; +var _mgold$elm_date_format$Date_Format$zero2twelve = function (n) { + return _elm_lang$core$Native_Utils.eq(n, 0) ? 12 : n; +}; +var _mgold$elm_date_format$Date_Format$mod12 = function (h) { + return A2(_elm_lang$core$Basics_ops['%'], h, 12); +}; +var _mgold$elm_date_format$Date_Format$dayOfWeekToWord = F2( + function (loc, dow) { + var _p2 = dow; + switch (_p2.ctor) { + case 'Mon': + return loc.mon; + case 'Tue': + return loc.tue; + case 'Wed': + return loc.wed; + case 'Thu': + return loc.thu; + case 'Fri': + return loc.fri; + case 'Sat': + return loc.sat; + default: + return loc.sun; + } + }); +var _mgold$elm_date_format$Date_Format$monthToWord = F2( + function (loc, m) { + var _p3 = m; + switch (_p3.ctor) { + case 'Jan': + return loc.jan; + case 'Feb': + return loc.feb; + case 'Mar': + return loc.mar; + case 'Apr': + return loc.apr; + case 'May': + return loc.may; + case 'Jun': + return loc.jun; + case 'Jul': + return loc.jul; + case 'Aug': + return loc.aug; + case 'Sep': + return loc.sep; + case 'Oct': + return loc.oct; + case 'Nov': + return loc.nov; + default: + return loc.dec; + } + }); +var _mgold$elm_date_format$Date_Format$monthToInt = function (m) { + var _p4 = m; + switch (_p4.ctor) { + case 'Jan': + return 1; + case 'Feb': + return 2; + case 'Mar': + return 3; + case 'Apr': + return 4; + case 'May': + return 5; + case 'Jun': + return 6; + case 'Jul': + return 7; + case 'Aug': + return 8; + case 'Sep': + return 9; + case 'Oct': + return 10; + case 'Nov': + return 11; + default: + return 12; + } +}; +var _mgold$elm_date_format$Date_Format$re = _elm_lang$core$Regex$regex('%(_|-|0)?(%|Y|y|m|B|b|d|e|a|A|H|k|I|l|L|p|P|M|S)'); +var _mgold$elm_date_format$Date_Format$ZeroThreeDigits = {ctor: 'ZeroThreeDigits'}; +var _mgold$elm_date_format$Date_Format$Zero = {ctor: 'Zero'}; +var _mgold$elm_date_format$Date_Format$Space = {ctor: 'Space'}; +var _mgold$elm_date_format$Date_Format$NoPadding = {ctor: 'NoPadding'}; +var _mgold$elm_date_format$Date_Format$formatToken = F3( + function (loc, d, m) { + var _p5 = function () { + var _p6 = m.submatches; + _v4_4: + do { + if (_p6.ctor === '::') { + if (_p6._0.ctor === 'Just') { + if (((_p6._1.ctor === '::') && (_p6._1._0.ctor === 'Just')) && (_p6._1._1.ctor === '[]')) { + switch (_p6._0._0) { + case '-': + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Maybe$Just(_mgold$elm_date_format$Date_Format$NoPadding), + _1: _p6._1._0._0 + }; + case '_': + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Maybe$Just(_mgold$elm_date_format$Date_Format$Space), + _1: _p6._1._0._0 + }; + case '0': + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Maybe$Just(_mgold$elm_date_format$Date_Format$Zero), + _1: _p6._1._0._0 + }; + default: + break _v4_4; + } + } else { + break _v4_4; + } + } else { + if (((_p6._1.ctor === '::') && (_p6._1._0.ctor === 'Just')) && (_p6._1._1.ctor === '[]')) { + return {ctor: '_Tuple2', _0: _elm_lang$core$Maybe$Nothing, _1: _p6._1._0._0}; + } else { + break _v4_4; + } + } + } else { + break _v4_4; + } + } while(false); + return {ctor: '_Tuple2', _0: _elm_lang$core$Maybe$Nothing, _1: ' '}; + }(); + var padding = _p5._0; + var symbol = _p5._1; + var _p7 = symbol; + switch (_p7) { + case '%': + return '%'; + case 'Y': + return _elm_lang$core$Basics$toString( + _elm_lang$core$Date$year(d)); + case 'y': + return A2( + _elm_lang$core$String$right, + 2, + _elm_lang$core$Basics$toString( + _elm_lang$core$Date$year(d))); + case 'm': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), + _mgold$elm_date_format$Date_Format$monthToInt( + _elm_lang$core$Date$month(d))); + case 'B': + return A2( + _mgold$elm_date_format$Date_Format$monthToWord, + loc.date.months, + _elm_lang$core$Date$month(d)); + case 'b': + return A2( + _mgold$elm_date_format$Date_Format$monthToWord, + loc.date.monthsAbbrev, + _elm_lang$core$Date$month(d)); + case 'd': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), + _elm_lang$core$Date$day(d)); + case 'e': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Space, padding), + _elm_lang$core$Date$day(d)); + case 'a': + return A2( + _mgold$elm_date_format$Date_Format$dayOfWeekToWord, + loc.date.wdaysAbbrev, + _elm_lang$core$Date$dayOfWeek(d)); + case 'A': + return A2( + _mgold$elm_date_format$Date_Format$dayOfWeekToWord, + loc.date.wdays, + _elm_lang$core$Date$dayOfWeek(d)); + case 'H': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), + _elm_lang$core$Date$hour(d)); + case 'k': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Space, padding), + _elm_lang$core$Date$hour(d)); + case 'I': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), + _mgold$elm_date_format$Date_Format$zero2twelve( + _mgold$elm_date_format$Date_Format$mod12( + _elm_lang$core$Date$hour(d)))); + case 'l': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Space, padding), + _mgold$elm_date_format$Date_Format$zero2twelve( + _mgold$elm_date_format$Date_Format$mod12( + _elm_lang$core$Date$hour(d)))); + case 'p': + return (_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$Date$hour(d), + 12) < 0) ? _elm_lang$core$String$toUpper(loc.time.am) : _elm_lang$core$String$toUpper(loc.time.pm); + case 'P': + return (_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$Date$hour(d), + 12) < 0) ? loc.time.am : loc.time.pm; + case 'M': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), + _elm_lang$core$Date$minute(d)); + case 'S': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$Zero, padding), + _elm_lang$core$Date$second(d)); + case 'L': + return A2( + _mgold$elm_date_format$Date_Format$padWith, + A2(_elm_lang$core$Maybe$withDefault, _mgold$elm_date_format$Date_Format$ZeroThreeDigits, padding), + _elm_lang$core$Date$millisecond(d)); + default: + return ''; + } + }); +var _mgold$elm_date_format$Date_Format$localFormat = F3( + function (loc, s, d) { + return A4( + _elm_lang$core$Regex$replace, + _elm_lang$core$Regex$All, + _mgold$elm_date_format$Date_Format$re, + A2(_mgold$elm_date_format$Date_Format$formatToken, loc, d), + s); + }); +var _mgold$elm_date_format$Date_Format$format = F2( + function (s, d) { + return A3(_mgold$elm_date_format$Date_Format$localFormat, _mgold$elm_date_format$Date_Local$international, s, d); + }); +var _mgold$elm_date_format$Date_Format$formatISO8601 = _mgold$elm_date_format$Date_Format$format('%Y-%m-%dT%H:%M:%SZ'); + +var _myrho$elm_round$Round$funNum = F3( + function (fun, s, fl) { + return A2( + _elm_lang$core$Maybe$withDefault, + 1 / 0, + _elm_lang$core$Result$toMaybe( + _elm_lang$core$String$toFloat( + A2(fun, s, fl)))); + }); +var _myrho$elm_round$Round$splitComma = function (str) { + var _p0 = A2(_elm_lang$core$String$split, '.', str); + if (_p0.ctor === '::') { + if (_p0._1.ctor === '::') { + return {ctor: '_Tuple2', _0: _p0._0, _1: _p0._1._0}; + } else { + return {ctor: '_Tuple2', _0: _p0._0, _1: '0'}; + } + } else { + return {ctor: '_Tuple2', _0: '0', _1: '0'}; + } +}; +var _myrho$elm_round$Round$toDecimal = function (fl) { + var _p1 = A2( + _elm_lang$core$String$split, + 'e', + _elm_lang$core$Basics$toString(fl)); + if (_p1.ctor === '::') { + if (_p1._1.ctor === '::') { + var _p4 = _p1._1._0; + var _p2 = function () { + var hasSign = _elm_lang$core$Native_Utils.cmp(fl, 0) < 0; + var _p3 = _myrho$elm_round$Round$splitComma(_p1._0); + var b = _p3._0; + var a = _p3._1; + return { + ctor: '_Tuple3', + _0: hasSign ? '-' : '', + _1: hasSign ? A2(_elm_lang$core$String$dropLeft, 1, b) : b, + _2: a + }; + }(); + var sign = _p2._0; + var before = _p2._1; + var after = _p2._2; + var e = A2( + _elm_lang$core$Maybe$withDefault, + 0, + _elm_lang$core$Result$toMaybe( + _elm_lang$core$String$toInt( + A2(_elm_lang$core$String$startsWith, '+', _p4) ? A2(_elm_lang$core$String$dropLeft, 1, _p4) : _p4))); + var newBefore = (_elm_lang$core$Native_Utils.cmp(e, 0) > -1) ? before : ((_elm_lang$core$Native_Utils.cmp( + _elm_lang$core$Basics$abs(e), + _elm_lang$core$String$length(before)) < 0) ? A2( + _elm_lang$core$Basics_ops['++'], + A2( + _elm_lang$core$String$left, + _elm_lang$core$String$length(before) - _elm_lang$core$Basics$abs(e), + before), + A2( + _elm_lang$core$Basics_ops['++'], + '.', + A2( + _elm_lang$core$String$right, + _elm_lang$core$Basics$abs(e), + before))) : A2( + _elm_lang$core$Basics_ops['++'], + '0.', + A2( + _elm_lang$core$Basics_ops['++'], + A2( + _elm_lang$core$String$repeat, + _elm_lang$core$Basics$abs(e) - _elm_lang$core$String$length(before), + '0'), + before))); + var newAfter = (_elm_lang$core$Native_Utils.cmp(e, 0) < 1) ? after : ((_elm_lang$core$Native_Utils.cmp( + e, + _elm_lang$core$String$length(after)) < 0) ? A2( + _elm_lang$core$Basics_ops['++'], + A2(_elm_lang$core$String$left, e, after), + A2( + _elm_lang$core$Basics_ops['++'], + '.', + A2( + _elm_lang$core$String$right, + _elm_lang$core$String$length(after) - e, + after))) : A2( + _elm_lang$core$Basics_ops['++'], + after, + A2( + _elm_lang$core$String$repeat, + e - _elm_lang$core$String$length(after), + '0'))); + return A2( + _elm_lang$core$Basics_ops['++'], + sign, + A2(_elm_lang$core$Basics_ops['++'], newBefore, newAfter)); + } else { + return _p1._0; + } + } else { + return ''; + } +}; +var _myrho$elm_round$Round$truncate = function (n) { + return (_elm_lang$core$Native_Utils.cmp(n, 0) < 0) ? _elm_lang$core$Basics$ceiling(n) : _elm_lang$core$Basics$floor(n); +}; +var _myrho$elm_round$Round$roundFun = F3( + function (functor, s, fl) { + if (_elm_lang$core$Native_Utils.eq(s, 0)) { + return _elm_lang$core$Basics$toString( + functor(fl)); + } else { + if (_elm_lang$core$Native_Utils.cmp(s, 0) < 0) { + return function (r) { + return (!_elm_lang$core$Native_Utils.eq(r, '0')) ? A2( + _elm_lang$core$Basics_ops['++'], + r, + A2( + _elm_lang$core$String$repeat, + _elm_lang$core$Basics$abs(s), + '0')) : r; + }( + A3( + _myrho$elm_round$Round$roundFun, + functor, + 0, + A2( + F2( + function (x, y) { + return x / y; + }), + fl, + A2( + F2( + function (x, y) { + return Math.pow(x, y); + }), + 10, + _elm_lang$core$Basics$abs( + _elm_lang$core$Basics$toFloat(s)))))); + } else { + var dd = (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? 2 : 1; + var n = (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? -1 : 1; + var e = Math.pow(10, s); + var _p5 = _myrho$elm_round$Round$splitComma( + _myrho$elm_round$Round$toDecimal(fl)); + var before = _p5._0; + var after = _p5._1; + var a = A3( + _elm_lang$core$String$padRight, + s + 1, + _elm_lang$core$Native_Utils.chr('0'), + after); + var b = A2(_elm_lang$core$String$left, s, a); + var c = A2(_elm_lang$core$String$dropLeft, s, a); + var f = functor( + A2( + _elm_lang$core$Maybe$withDefault, + _elm_lang$core$Basics$toFloat(e), + _elm_lang$core$Result$toMaybe( + _elm_lang$core$String$toFloat( + A2( + _elm_lang$core$Basics_ops['++'], + (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? '-' : '', + A2( + _elm_lang$core$Basics_ops['++'], + '1', + A2( + _elm_lang$core$Basics_ops['++'], + b, + A2(_elm_lang$core$Basics_ops['++'], '.', c)))))))); + var g = A2( + _elm_lang$core$String$dropLeft, + dd, + _elm_lang$core$Basics$toString(f)); + var h = _myrho$elm_round$Round$truncate(fl) + (_elm_lang$core$Native_Utils.eq(f - (e * n), e * n) ? ((_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? -1 : 1) : 0); + var j = _elm_lang$core$Basics$toString(h); + var i = (_elm_lang$core$Native_Utils.eq(j, '0') && ((!_elm_lang$core$Native_Utils.eq(f - (e * n), 0)) && ((_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) && (_elm_lang$core$Native_Utils.cmp(fl, -1) > 0)))) ? A2(_elm_lang$core$Basics_ops['++'], '-', j) : j; + return A2( + _elm_lang$core$Basics_ops['++'], + i, + A2(_elm_lang$core$Basics_ops['++'], '.', g)); + } + } + }); +var _myrho$elm_round$Round$round = _myrho$elm_round$Round$roundFun(_elm_lang$core$Basics$round); +var _myrho$elm_round$Round$roundNum = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$round); +var _myrho$elm_round$Round$ceiling = _myrho$elm_round$Round$roundFun(_elm_lang$core$Basics$ceiling); +var _myrho$elm_round$Round$ceilingNum = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$ceiling); +var _myrho$elm_round$Round$floor = _myrho$elm_round$Round$roundFun(_elm_lang$core$Basics$floor); +var _myrho$elm_round$Round$floorCom = F2( + function (s, fl) { + return (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? A2(_myrho$elm_round$Round$ceiling, s, fl) : A2(_myrho$elm_round$Round$floor, s, fl); + }); +var _myrho$elm_round$Round$floorNumCom = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$floorCom); +var _myrho$elm_round$Round$ceilingCom = F2( + function (s, fl) { + return (_elm_lang$core$Native_Utils.cmp(fl, 0) < 0) ? A2(_myrho$elm_round$Round$floor, s, fl) : A2(_myrho$elm_round$Round$ceiling, s, fl); + }); +var _myrho$elm_round$Round$ceilingNumCom = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$ceilingCom); +var _myrho$elm_round$Round$floorNum = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$floor); +var _myrho$elm_round$Round$roundCom = _myrho$elm_round$Round$roundFun( + function (fl) { + var dec = fl - _elm_lang$core$Basics$toFloat( + _myrho$elm_round$Round$truncate(fl)); + return (_elm_lang$core$Native_Utils.cmp(dec, 0.5) > -1) ? _elm_lang$core$Basics$ceiling(fl) : ((_elm_lang$core$Native_Utils.cmp(dec, -0.5) < 1) ? _elm_lang$core$Basics$floor(fl) : _elm_lang$core$Basics$round(fl)); + }); +var _myrho$elm_round$Round$roundNumCom = _myrho$elm_round$Round$funNum(_myrho$elm_round$Round$roundCom); + +var _seatgeek$wrecker_ui$Data$decodeDateTime = function (datetimeString) { + var _p0 = _elm_lang$core$Date$fromString(datetimeString); + if (_p0.ctor === 'Err') { + return _elm_lang$core$Json_Decode$fail(_p0._0); + } else { + return _elm_lang$core$Json_Decode$succeed(_p0._0); + } +}; +var _seatgeek$wrecker_ui$Data$Stats = function (a) { + return function (b) { + return function (c) { + return function (d) { + return function (e) { + return function (f) { + return function (g) { + return function (h) { + return function (i) { + return function (j) { + return function (k) { + return {meanTime: a, successHits: b, serverErrorHits: c, maxTime: d, minTime: e, userErrorHits: f, totalTime: g, failedHits: h, variance: i, hits: j, quantile95: k}; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; +}; +var _seatgeek$wrecker_ui$Data$decodeStats = A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'quantile95', + _elm_lang$core$Json_Decode$float, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'hits', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'variance', + _elm_lang$core$Json_Decode$float, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'failedHits', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'totalTime', + _elm_lang$core$Json_Decode$float, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'userErrorHits', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'minTime', + _elm_lang$core$Json_Decode$float, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'maxTime', + _elm_lang$core$Json_Decode$float, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'serverErrorHits', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'successHits', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'meanTime', + _elm_lang$core$Json_Decode$float, + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$Stats)))))))))))); +var _seatgeek$wrecker_ui$Data$GroupSet = F4( + function (a, b, c, d) { + return {id: a, name: b, description: c, created: d}; + }); +var _seatgeek$wrecker_ui$Data$decodeGroupSet = A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'created', + A2(_elm_lang$core$Json_Decode$andThen, _seatgeek$wrecker_ui$Data$decodeDateTime, _elm_lang$core$Json_Decode$string), + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'description', + _elm_lang$core$Json_Decode$string, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'name', + _elm_lang$core$Json_Decode$string, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'id', + _elm_lang$core$Json_Decode$int, + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$GroupSet))))); +var _seatgeek$wrecker_ui$Data$RunGroup = F9( + function (a, b, c, d, e, f, g, h, i) { + return {id: a, groupSetId: b, title: c, notes: d, concurrencyStart: e, concurrencyTarget: f, rampupStep: g, runKeepTime: h, created: i}; + }); +var _seatgeek$wrecker_ui$Data$decodeRunGroup = A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'created', + A2(_elm_lang$core$Json_Decode$andThen, _seatgeek$wrecker_ui$Data$decodeDateTime, _elm_lang$core$Json_Decode$string), + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'runKeepTime', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'rampupStep', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'concurrencyTarget', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'concurrencyStart', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'notes', + _elm_lang$core$Json_Decode$string, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'title', + _elm_lang$core$Json_Decode$string, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'groupSetId', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'id', + _elm_lang$core$Json_Decode$int, + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$RunGroup)))))))))); +var _seatgeek$wrecker_ui$Data$RunInfo = F5( + function (a, b, c, d, e) { + return {created: a, concurrency: b, runGroupId: c, id: d, match: e}; + }); +var _seatgeek$wrecker_ui$Data$decodeRunInfo = A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'match', + _elm_lang$core$Json_Decode$string, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'id', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'runGroupId', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'concurrency', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'created', + A2(_elm_lang$core$Json_Decode$andThen, _seatgeek$wrecker_ui$Data$decodeDateTime, _elm_lang$core$Json_Decode$string), + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$RunInfo)))))); +var _seatgeek$wrecker_ui$Data$Run = F2( + function (a, b) { + return {stats: a, run: b}; + }); +var _seatgeek$wrecker_ui$Data$decodeRun = A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'run', + _seatgeek$wrecker_ui$Data$decodeRunInfo, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'stats', + _seatgeek$wrecker_ui$Data$decodeStats, + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$Run))); +var _seatgeek$wrecker_ui$Data$Page = F3( + function (a, b, c) { + return {url: a, runId: b, stats: c}; + }); +var _seatgeek$wrecker_ui$Data$decodePage = A2( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$custom, + _seatgeek$wrecker_ui$Data$decodeStats, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'runId', + _elm_lang$core$Json_Decode$int, + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'url', + _elm_lang$core$Json_Decode$string, + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$Page)))); +var _seatgeek$wrecker_ui$Data$Results = F4( + function (a, b, c, d) { + return {runs: a, pages: b, runGroups: c, availableGroupSets: d}; + }); +var _seatgeek$wrecker_ui$Data$decodeResults = A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'availableGroupSets', + _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodeGroupSet), + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'runGroups', + _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodeRunGroup), + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'pages', + _elm_lang$core$Json_Decode$dict( + _elm_lang$core$Json_Decode$list(_elm_lang$core$Json_Decode$int)), + A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'runs', + _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodeRun), + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$Data$Results))))); + +var _terezka$line_charts$Internal_Coordinate$largestRange = F2( + function (data, range) { + return { + min: A2(_elm_lang$core$Basics$min, data.min, range.min), + max: A2(_elm_lang$core$Basics$max, data.max, range.max) + }; + }); +var _terezka$line_charts$Internal_Coordinate$smallestRange = F2( + function (data, range) { + return { + min: A2(_elm_lang$core$Basics$max, data.min, range.min), + max: A2(_elm_lang$core$Basics$min, data.max, range.max) + }; + }); +var _terezka$line_charts$Internal_Coordinate$lengthY = function (system) { + return A2(_elm_lang$core$Basics$max, 1, (system.frame.size.height - system.frame.margin.bottom) - system.frame.margin.top); +}; +var _terezka$line_charts$Internal_Coordinate$lengthX = function (system) { + return A2(_elm_lang$core$Basics$max, 1, (system.frame.size.width - system.frame.margin.left) - system.frame.margin.right); +}; +var _terezka$line_charts$Internal_Coordinate$reachY = function (system) { + var diff = system.y.max - system.y.min; + return (_elm_lang$core$Native_Utils.cmp(diff, 0) > 0) ? diff : 1; +}; +var _terezka$line_charts$Internal_Coordinate$reachX = function (system) { + var diff = system.x.max - system.x.min; + return (_elm_lang$core$Native_Utils.cmp(diff, 0) > 0) ? diff : 1; +}; +var _terezka$line_charts$Internal_Coordinate$ground = function (range) { + return _elm_lang$core$Native_Utils.update( + range, + { + min: A2(_elm_lang$core$Basics$min, range.min, 0) + }); +}; +var _terezka$line_charts$Internal_Coordinate$maximum = function (toValue) { + return function (_p0) { + return A2( + _elm_lang$core$Maybe$withDefault, + 1, + _elm_lang$core$List$maximum( + A2(_elm_lang$core$List$map, toValue, _p0))); + }; +}; +var _terezka$line_charts$Internal_Coordinate$minimum = function (toValue) { + return function (_p1) { + return A2( + _elm_lang$core$Maybe$withDefault, + 0, + _elm_lang$core$List$minimum( + A2(_elm_lang$core$List$map, toValue, _p1))); + }; +}; +var _terezka$line_charts$Internal_Coordinate$minimumOrZero = function (toValue) { + return function (_p2) { + return A2( + _elm_lang$core$Basics$min, + 0, + A2(_terezka$line_charts$Internal_Coordinate$minimum, toValue, _p2)); + }; +}; +var _terezka$line_charts$Internal_Coordinate$range = F2( + function (toValue, data) { + var range = { + min: A2(_terezka$line_charts$Internal_Coordinate$minimum, toValue, data), + max: A2(_terezka$line_charts$Internal_Coordinate$maximum, toValue, data) + }; + return _elm_lang$core$Native_Utils.eq(range.min, range.max) ? _elm_lang$core$Native_Utils.update( + range, + {max: range.max + 1}) : range; + }); +var _terezka$line_charts$Internal_Coordinate$System = F6( + function (a, b, c, d, e, f) { + return {frame: a, x: b, y: c, xData: d, yData: e, id: f}; + }); +var _terezka$line_charts$Internal_Coordinate$Frame = F2( + function (a, b) { + return {margin: a, size: b}; + }); +var _terezka$line_charts$Internal_Coordinate$Size = F2( + function (a, b) { + return {width: a, height: b}; + }); +var _terezka$line_charts$Internal_Coordinate$Margin = F4( + function (a, b, c, d) { + return {top: a, right: b, bottom: c, left: d}; + }); +var _terezka$line_charts$Internal_Coordinate$Range = F2( + function (a, b) { + return {min: a, max: b}; + }); + +var _terezka$line_charts$Internal_Container$sizeStyles = F3( + function (_p0, width, height) { + var _p1 = _p0; + var _p2 = _p1._0.size; + if (_p2.ctor === 'Static') { + return { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'height', + _1: A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(height), + 'px') + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'width', + _1: A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(width), + 'px') + }, + _1: {ctor: '[]'} + } + }; + } else { + return {ctor: '[]'}; + } + }); +var _terezka$line_charts$Internal_Container$properties = F2( + function (f, _p3) { + var _p4 = _p3; + return f(_p4._0); + }); +var _terezka$line_charts$Internal_Container$Properties = F5( + function (a, b, c, d, e) { + return {attributesHtml: a, attributesSvg: b, size: c, margin: d, id: e}; + }); +var _terezka$line_charts$Internal_Container$Margin = F4( + function (a, b, c, d) { + return {top: a, right: b, bottom: c, left: d}; + }); +var _terezka$line_charts$Internal_Container$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Container$custom = _terezka$line_charts$Internal_Container$Config; +var _terezka$line_charts$Internal_Container$Relative = {ctor: 'Relative'}; +var _terezka$line_charts$Internal_Container$relative = _terezka$line_charts$Internal_Container$Relative; +var _terezka$line_charts$Internal_Container$responsive = function (id) { + return _terezka$line_charts$Internal_Container$custom( + { + attributesHtml: {ctor: '[]'}, + attributesSvg: {ctor: '[]'}, + size: _terezka$line_charts$Internal_Container$relative, + margin: A4(_terezka$line_charts$Internal_Container$Margin, 60, 140, 60, 80), + id: id + }); +}; +var _terezka$line_charts$Internal_Container$Static = {ctor: 'Static'}; +var _terezka$line_charts$Internal_Container$static = _terezka$line_charts$Internal_Container$Static; +var _terezka$line_charts$Internal_Container$default = function (id) { + return _terezka$line_charts$Internal_Container$custom( + { + attributesHtml: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'font-family', _1: 'monospace'}, + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + attributesSvg: {ctor: '[]'}, + size: _terezka$line_charts$Internal_Container$static, + margin: A4(_terezka$line_charts$Internal_Container$Margin, 60, 140, 60, 80), + id: id + }); +}; +var _terezka$line_charts$Internal_Container$spaced = F5( + function (id, top, right, bottom, left) { + return _terezka$line_charts$Internal_Container$custom( + { + attributesHtml: {ctor: '[]'}, + attributesSvg: {ctor: '[]'}, + size: _terezka$line_charts$Internal_Container$static, + margin: A4(_terezka$line_charts$Internal_Container$Margin, top, right, bottom, left), + id: id + }); + }); + +var _terezka$line_charts$LineChart_Container$static = _terezka$line_charts$Internal_Container$static; +var _terezka$line_charts$LineChart_Container$relative = _terezka$line_charts$Internal_Container$relative; +var _terezka$line_charts$LineChart_Container$custom = _terezka$line_charts$Internal_Container$custom; +var _terezka$line_charts$LineChart_Container$responsive = _terezka$line_charts$Internal_Container$responsive; +var _terezka$line_charts$LineChart_Container$spaced = _terezka$line_charts$Internal_Container$spaced; +var _terezka$line_charts$LineChart_Container$default = _terezka$line_charts$Internal_Container$default; +var _terezka$line_charts$LineChart_Container$Properties = F5( + function (a, b, c, d, e) { + return {attributesHtml: a, attributesSvg: b, size: c, margin: d, id: e}; + }); +var _terezka$line_charts$LineChart_Container$Margin = F4( + function (a, b, c, d) { + return {top: a, right: b, bottom: c, left: d}; + }); + +var _terezka$line_charts$LineChart_Coordinate$scaleDataY = F2( + function (system, value) { + return (value * _terezka$line_charts$Internal_Coordinate$reachY(system)) / _terezka$line_charts$Internal_Coordinate$lengthY(system); + }); +var _terezka$line_charts$LineChart_Coordinate$scaleDataX = F2( + function (system, value) { + return (value * _terezka$line_charts$Internal_Coordinate$reachX(system)) / _terezka$line_charts$Internal_Coordinate$lengthX(system); + }); +var _terezka$line_charts$LineChart_Coordinate$scaleSvgY = F2( + function (system, value) { + return (value * _terezka$line_charts$Internal_Coordinate$lengthY(system)) / _terezka$line_charts$Internal_Coordinate$reachY(system); + }); +var _terezka$line_charts$LineChart_Coordinate$scaleSvgX = F2( + function (system, value) { + return (value * _terezka$line_charts$Internal_Coordinate$lengthX(system)) / _terezka$line_charts$Internal_Coordinate$reachX(system); + }); +var _terezka$line_charts$LineChart_Coordinate$toDataY = F2( + function (system, value) { + return system.y.max - A2(_terezka$line_charts$LineChart_Coordinate$scaleDataY, system, value - system.frame.margin.top); + }); +var _terezka$line_charts$LineChart_Coordinate$toDataX = F2( + function (system, value) { + return system.x.min + A2(_terezka$line_charts$LineChart_Coordinate$scaleDataX, system, value - system.frame.margin.left); + }); +var _terezka$line_charts$LineChart_Coordinate$toData = F2( + function (system, point) { + return { + x: A2(_terezka$line_charts$LineChart_Coordinate$toDataX, system, point.x), + y: A2(_terezka$line_charts$LineChart_Coordinate$toDataY, system, point.y) + }; + }); +var _terezka$line_charts$LineChart_Coordinate$toSvgY = F2( + function (system, value) { + return A2(_terezka$line_charts$LineChart_Coordinate$scaleSvgY, system, system.y.max - value) + system.frame.margin.top; + }); +var _terezka$line_charts$LineChart_Coordinate$toSvgX = F2( + function (system, value) { + return A2(_terezka$line_charts$LineChart_Coordinate$scaleSvgX, system, value - system.x.min) + system.frame.margin.left; + }); +var _terezka$line_charts$LineChart_Coordinate$toSvg = F2( + function (system, point) { + return { + x: A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, point.x), + y: A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, point.y) + }; + }); +var _terezka$line_charts$LineChart_Coordinate$Frame = F2( + function (a, b) { + return {margin: a, size: b}; + }); +var _terezka$line_charts$LineChart_Coordinate$Size = F2( + function (a, b) { + return {width: a, height: b}; + }); +var _terezka$line_charts$LineChart_Coordinate$System = F6( + function (a, b, c, d, e, f) { + return {frame: a, x: b, y: c, xData: d, yData: e, id: f}; + }); +var _terezka$line_charts$LineChart_Coordinate$Range = F2( + function (a, b) { + return {min: a, max: b}; + }); +var _terezka$line_charts$LineChart_Coordinate$Point = F2( + function (a, b) { + return {x: a, y: b}; + }); + +var _terezka$line_charts$LineChart_Colors$transparent = A4(_elm_lang$core$Color$rgba, 0, 0, 0, 0); +var _terezka$line_charts$LineChart_Colors$grayLightest = A3(_elm_lang$core$Color$rgb, 243, 243, 243); +var _terezka$line_charts$LineChart_Colors$grayLight = A3(_elm_lang$core$Color$rgb, 211, 211, 211); +var _terezka$line_charts$LineChart_Colors$gray = A3(_elm_lang$core$Color$rgb, 163, 163, 163); +var _terezka$line_charts$LineChart_Colors$black = A3(_elm_lang$core$Color$rgb, 0, 0, 0); +var _terezka$line_charts$LineChart_Colors$tealLight = A4(_elm_lang$core$Color$rgba, 128, 203, 196, 1); +var _terezka$line_charts$LineChart_Colors$teal = A4(_elm_lang$core$Color$rgba, 29, 233, 182, 1); +var _terezka$line_charts$LineChart_Colors$cyanLight = A4(_elm_lang$core$Color$rgba, 128, 222, 234, 1); +var _terezka$line_charts$LineChart_Colors$cyan = A4(_elm_lang$core$Color$rgba, 0, 229, 255, 1); +var _terezka$line_charts$LineChart_Colors$purpleLight = A4(_elm_lang$core$Color$rgba, 206, 147, 216, 1); +var _terezka$line_charts$LineChart_Colors$purple = A4(_elm_lang$core$Color$rgba, 156, 39, 176, 1); +var _terezka$line_charts$LineChart_Colors$redLight = A4(_elm_lang$core$Color$rgba, 239, 154, 154, 1); +var _terezka$line_charts$LineChart_Colors$red = A4(_elm_lang$core$Color$rgba, 216, 27, 96, 1); +var _terezka$line_charts$LineChart_Colors$greenLight = A4(_elm_lang$core$Color$rgba, 197, 225, 165, 1); +var _terezka$line_charts$LineChart_Colors$green = A4(_elm_lang$core$Color$rgba, 67, 160, 71, 1); +var _terezka$line_charts$LineChart_Colors$blueLight = A4(_elm_lang$core$Color$rgba, 128, 222, 234, 1); +var _terezka$line_charts$LineChart_Colors$blue = A4(_elm_lang$core$Color$rgba, 3, 169, 244, 1); +var _terezka$line_charts$LineChart_Colors$goldLight = A4(_elm_lang$core$Color$rgba, 255, 204, 128, 1); +var _terezka$line_charts$LineChart_Colors$gold = A4(_elm_lang$core$Color$rgba, 205, 145, 60, 1); +var _terezka$line_charts$LineChart_Colors$pinkLight = A4(_elm_lang$core$Color$rgba, 244, 143, 177, 1); +var _terezka$line_charts$LineChart_Colors$pink = A4(_elm_lang$core$Color$rgba, 245, 105, 215, 1); + +var _terezka$line_charts$Internal_Path$bool = function (bool) { + return bool ? '1' : '0'; +}; +var _terezka$line_charts$Internal_Path$point = function (_p0) { + var _p1 = _p0; + return A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(_p1.x), + A2( + _elm_lang$core$Basics_ops['++'], + ' ', + _elm_lang$core$Basics$toString(_p1.y))); +}; +var _terezka$line_charts$Internal_Path$points = function (points) { + return A2( + _elm_lang$core$String$join, + ',', + A2(_elm_lang$core$List$map, _terezka$line_charts$Internal_Path$point, points)); +}; +var _terezka$line_charts$Internal_Path$join = function (commands) { + return A2(_elm_lang$core$String$join, ' ', commands); +}; +var _terezka$line_charts$Internal_Path$toString = function (command) { + var _p2 = command; + switch (_p2.ctor) { + case 'Close': + return 'Z'; + case 'Move': + return A2( + _elm_lang$core$Basics_ops['++'], + 'M', + _terezka$line_charts$Internal_Path$point(_p2._0)); + case 'Line': + return A2( + _elm_lang$core$Basics_ops['++'], + 'L', + _terezka$line_charts$Internal_Path$point(_p2._0)); + case 'Horizontal': + return A2( + _elm_lang$core$Basics_ops['++'], + 'H', + _elm_lang$core$Basics$toString(_p2._0)); + case 'Vertical': + return A2( + _elm_lang$core$Basics_ops['++'], + 'V', + _elm_lang$core$Basics$toString(_p2._0)); + case 'CubicBeziers': + return A2( + _elm_lang$core$Basics_ops['++'], + 'C', + _terezka$line_charts$Internal_Path$points( + { + ctor: '::', + _0: _p2._0, + _1: { + ctor: '::', + _0: _p2._1, + _1: { + ctor: '::', + _0: _p2._2, + _1: {ctor: '[]'} + } + } + })); + case 'CubicBeziersShort': + return A2( + _elm_lang$core$Basics_ops['++'], + 'Q', + _terezka$line_charts$Internal_Path$points( + { + ctor: '::', + _0: _p2._0, + _1: { + ctor: '::', + _0: _p2._1, + _1: {ctor: '[]'} + } + })); + case 'QuadraticBeziers': + return A2( + _elm_lang$core$Basics_ops['++'], + 'Q', + _terezka$line_charts$Internal_Path$points( + { + ctor: '::', + _0: _p2._0, + _1: { + ctor: '::', + _0: _p2._1, + _1: {ctor: '[]'} + } + })); + case 'QuadraticBeziersShort': + return A2( + _elm_lang$core$Basics_ops['++'], + 'T', + _terezka$line_charts$Internal_Path$point(_p2._0)); + default: + return A2( + _elm_lang$core$Basics_ops['++'], + 'A', + _terezka$line_charts$Internal_Path$join( + { + ctor: '::', + _0: _elm_lang$core$Basics$toString(_p2._0), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(_p2._1), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(_p2._2), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$bool(_p2._3), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$bool(_p2._4), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$point(_p2._5), + _1: {ctor: '[]'} + } + } + } + } + } + })); + } +}; +var _terezka$line_charts$Internal_Path$toPoint = function (command) { + var _p3 = command; + switch (_p3.ctor) { + case 'Close': + return A2(_terezka$line_charts$LineChart_Coordinate$Point, 0, 0); + case 'Move': + return _p3._0; + case 'Line': + return _p3._0; + case 'Horizontal': + return A2(_terezka$line_charts$LineChart_Coordinate$Point, _p3._0, 0); + case 'Vertical': + return A2(_terezka$line_charts$LineChart_Coordinate$Point, 0, _p3._0); + case 'CubicBeziers': + return _p3._2; + case 'CubicBeziersShort': + return _p3._1; + case 'QuadraticBeziers': + return _p3._1; + case 'QuadraticBeziersShort': + return _p3._0; + default: + return _p3._5; + } +}; +var _terezka$line_charts$Internal_Path$viewPath = function (attributes) { + return A2( + _elm_lang$svg$Svg$path, + attributes, + {ctor: '[]'}); +}; +var _terezka$line_charts$Internal_Path$Close = {ctor: 'Close'}; +var _terezka$line_charts$Internal_Path$Arc = F6( + function (a, b, c, d, e, f) { + return {ctor: 'Arc', _0: a, _1: b, _2: c, _3: d, _4: e, _5: f}; + }); +var _terezka$line_charts$Internal_Path$QuadraticBeziersShort = function (a) { + return {ctor: 'QuadraticBeziersShort', _0: a}; +}; +var _terezka$line_charts$Internal_Path$QuadraticBeziers = F2( + function (a, b) { + return {ctor: 'QuadraticBeziers', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Path$CubicBeziersShort = F2( + function (a, b) { + return {ctor: 'CubicBeziersShort', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Path$CubicBeziers = F3( + function (a, b, c) { + return {ctor: 'CubicBeziers', _0: a, _1: b, _2: c}; + }); +var _terezka$line_charts$Internal_Path$Vertical = function (a) { + return {ctor: 'Vertical', _0: a}; +}; +var _terezka$line_charts$Internal_Path$Horizontal = function (a) { + return {ctor: 'Horizontal', _0: a}; +}; +var _terezka$line_charts$Internal_Path$Line = function (a) { + return {ctor: 'Line', _0: a}; +}; +var _terezka$line_charts$Internal_Path$Move = function (a) { + return {ctor: 'Move', _0: a}; +}; +var _terezka$line_charts$Internal_Path$translate = F2( + function (system, command) { + var _p4 = command; + switch (_p4.ctor) { + case 'Move': + return _terezka$line_charts$Internal_Path$Move( + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._0)); + case 'Line': + return _terezka$line_charts$Internal_Path$Line( + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._0)); + case 'Horizontal': + return _terezka$line_charts$Internal_Path$Horizontal( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, _p4._0)); + case 'Vertical': + return _terezka$line_charts$Internal_Path$Vertical( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, _p4._0)); + case 'CubicBeziers': + return A3( + _terezka$line_charts$Internal_Path$CubicBeziers, + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._0), + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._1), + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._2)); + case 'CubicBeziersShort': + return A2( + _terezka$line_charts$Internal_Path$CubicBeziersShort, + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._0), + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._1)); + case 'QuadraticBeziers': + return A2( + _terezka$line_charts$Internal_Path$QuadraticBeziers, + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._0), + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._1)); + case 'QuadraticBeziersShort': + return _terezka$line_charts$Internal_Path$QuadraticBeziersShort( + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._0)); + case 'Arc': + return A6( + _terezka$line_charts$Internal_Path$Arc, + _p4._0, + _p4._1, + _p4._2, + _p4._3, + _p4._4, + A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, _p4._5)); + default: + return _terezka$line_charts$Internal_Path$Close; + } + }); +var _terezka$line_charts$Internal_Path$description = F2( + function (system, commands) { + return _terezka$line_charts$Internal_Path$join( + A2( + _elm_lang$core$List$map, + function (_p5) { + return _terezka$line_charts$Internal_Path$toString( + A2(_terezka$line_charts$Internal_Path$translate, system, _p5)); + }, + commands)); + }); +var _terezka$line_charts$Internal_Path$view = F3( + function (system, attributes, commands) { + return _terezka$line_charts$Internal_Path$viewPath( + A2( + _elm_lang$core$Basics_ops['++'], + attributes, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$d( + A2(_terezka$line_charts$Internal_Path$description, system, commands)), + _1: {ctor: '[]'} + })); + }); + +var _terezka$line_charts$Internal_Utils$part = F4( + function (isReal, points, current, parts) { + part: + while (true) { + var _p0 = points; + if (_p0.ctor === '::') { + var _p2 = _p0._1; + var _p1 = _p0._0; + if (isReal(_p1)) { + var _v1 = isReal, + _v2 = _p2, + _v3 = A2( + _elm_lang$core$Basics_ops['++'], + current, + { + ctor: '::', + _0: _p1, + _1: {ctor: '[]'} + }), + _v4 = parts; + isReal = _v1; + points = _v2; + current = _v3; + parts = _v4; + continue part; + } else { + var _v5 = isReal, + _v6 = _p2, + _v7 = {ctor: '[]'}, + _v8 = { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: current, + _1: _elm_lang$core$Maybe$Just(_p1) + }, + _1: parts + }; + isReal = _v5; + points = _v6; + current = _v7; + parts = _v8; + continue part; + } + } else { + return { + ctor: '::', + _0: {ctor: '_Tuple2', _0: current, _1: _elm_lang$core$Maybe$Nothing}, + _1: parts + }; + } + } + }); +var _terezka$line_charts$Internal_Utils$magnitude = function (num) { + return _elm_lang$core$Basics$toFloat( + Math.pow( + 10, + _elm_lang$core$Basics$floor( + A2(_elm_lang$core$Basics$logBase, _elm_lang$core$Basics$e, num) / A2(_elm_lang$core$Basics$logBase, _elm_lang$core$Basics$e, 10)))); +}; +var _terezka$line_charts$Internal_Utils$toChartAreaId = function (id) { + return A2(_elm_lang$core$Basics_ops['++'], 'chart__chart-area--', id); +}; +var _terezka$line_charts$Internal_Utils$last = function (list) { + return _elm_lang$core$List$head( + A2( + _elm_lang$core$List$drop, + _elm_lang$core$List$length(list) - 1, + list)); +}; +var _terezka$line_charts$Internal_Utils$lastSafe = F2( + function (first, rest) { + return A2( + _elm_lang$core$Maybe$withDefault, + first, + _terezka$line_charts$Internal_Utils$last(rest)); + }); +var _terezka$line_charts$Internal_Utils$towardsZero = function (_p3) { + var _p4 = _p3; + return A3(_elm_lang$core$Basics$clamp, _p4.min, _p4.max, 0); +}; +var _terezka$line_charts$Internal_Utils$viewWithEdges = F2( + function (stuff, view) { + var _p5 = stuff; + if (_p5.ctor === '::') { + var _p7 = _p5._1; + var _p6 = _p5._0; + return A3( + view, + _p6, + _p7, + A2(_terezka$line_charts$Internal_Utils$lastSafe, _p6, _p7)); + } else { + return _elm_lang$svg$Svg$text(''); + } + }); +var _terezka$line_charts$Internal_Utils$viewWithFirst = F2( + function (stuff, view) { + var _p8 = stuff; + if (_p8.ctor === '::') { + return A2(view, _p8._0, _p8._1); + } else { + return _elm_lang$svg$Svg$text(''); + } + }); +var _terezka$line_charts$Internal_Utils$withFirst = F2( + function (stuff, process) { + var _p9 = stuff; + if (_p9.ctor === '::') { + return _elm_lang$core$Maybe$Just( + A2(process, _p9._0, _p9._1)); + } else { + return _elm_lang$core$Maybe$Nothing; + } + }); +var _terezka$line_charts$Internal_Utils$nonEmptyList = function (list) { + return _elm_lang$core$List$isEmpty(list) ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$Maybe$Just(list); +}; +var _terezka$line_charts$Internal_Utils$viewMaybeHtml = F2( + function (a, view) { + return A2( + _elm_lang$core$Maybe$withDefault, + _elm_lang$html$Html$text(''), + A2(_elm_lang$core$Maybe$map, view, a)); + }); +var _terezka$line_charts$Internal_Utils$viewMaybe = F2( + function (a, view) { + return A2( + _elm_lang$core$Maybe$withDefault, + _elm_lang$svg$Svg$text(''), + A2(_elm_lang$core$Maybe$map, view, a)); + }); +var _terezka$line_charts$Internal_Utils$viewIf = F2( + function (condition, view) { + return condition ? view( + {ctor: '_Tuple0'}) : _elm_lang$svg$Svg$text(''); + }); +var _terezka$line_charts$Internal_Utils$indexedMap2 = F3( + function (f, a, b) { + var collect = F4( + function (a, b, i, c) { + collect: + while (true) { + var _p10 = {ctor: '_Tuple2', _0: a, _1: b}; + if (_p10._0.ctor === '::') { + if (_p10._1.ctor === '::') { + var _v14 = _p10._0._1, + _v15 = _p10._1._1, + _v16 = i + 1, + _v17 = A2( + _elm_lang$core$Basics_ops['++'], + c, + { + ctor: '::', + _0: A3(f, i, _p10._0._0, _p10._1._0), + _1: {ctor: '[]'} + }); + a = _v14; + b = _v15; + i = _v16; + c = _v17; + continue collect; + } else { + return c; + } + } else { + return c; + } + } + }); + return A4( + collect, + a, + b, + 0, + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Utils$unzip3 = function (pairs) { + var step = F2( + function (_p12, _p11) { + var _p13 = _p12; + var _p14 = _p11; + return { + ctor: '_Tuple3', + _0: {ctor: '::', _0: _p13._0, _1: _p14._0}, + _1: {ctor: '::', _0: _p13._1, _1: _p14._1}, + _2: {ctor: '::', _0: _p13._2, _1: _p14._2} + }; + }); + return A3( + _elm_lang$core$List$foldr, + step, + { + ctor: '_Tuple3', + _0: {ctor: '[]'}, + _1: {ctor: '[]'}, + _2: {ctor: '[]'} + }, + pairs); +}; +var _terezka$line_charts$Internal_Utils$concat = F3( + function (first, second, third) { + return A2( + _elm_lang$core$Basics_ops['++'], + first, + A2(_elm_lang$core$Basics_ops['++'], second, third)); + }); +var _terezka$line_charts$Internal_Utils$apply2 = F3( + function (stuff1, stuff2, toNewStuff) { + return A2(toNewStuff, stuff1, stuff2); + }); +var _terezka$line_charts$Internal_Utils$apply = F2( + function (stuff, toNewStuff) { + return toNewStuff(stuff); + }); + +var _terezka$line_charts$Internal_Svg$anchorStyle = function (anchor) { + var anchorString = function () { + var _p0 = anchor; + switch (_p0.ctor) { + case 'Start': + return 'start'; + case 'Middle': + return 'middle'; + default: + return 'end'; + } + }(); + return _elm_lang$svg$Svg_Attributes$style( + A2( + _elm_lang$core$Basics_ops['++'], + 'text-anchor: ', + A2(_elm_lang$core$Basics_ops['++'], anchorString, ';'))); +}; +var _terezka$line_charts$Internal_Svg$label = F2( + function (color, string) { + return A2( + _elm_lang$svg$Svg$text_, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill(color), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$style('pointer-events: none;'), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$tspan, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$svg$Svg$text(string), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }); + }); +var _terezka$line_charts$Internal_Svg$yTick = F5( + function (system, width, userAttributes, x, y) { + var attributes = A3( + _terezka$line_charts$Internal_Utils$concat, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__tick'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_terezka$line_charts$LineChart_Colors$gray)), + _1: {ctor: '[]'} + } + }, + userAttributes, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x1( + _elm_lang$core$Basics$toString( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, x))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x2( + _elm_lang$core$Basics$toString( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, x) - width)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y1( + _elm_lang$core$Basics$toString( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, y))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y2( + _elm_lang$core$Basics$toString( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, y))), + _1: {ctor: '[]'} + } + } + } + }); + return A2( + _elm_lang$svg$Svg$line, + attributes, + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Svg$xTick = F5( + function (system, height, userAttributes, y, x) { + var attributes = A3( + _terezka$line_charts$Internal_Utils$concat, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_terezka$line_charts$LineChart_Colors$gray)), + _1: {ctor: '[]'} + }, + userAttributes, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x1( + _elm_lang$core$Basics$toString( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, x))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x2( + _elm_lang$core$Basics$toString( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, x))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y1( + _elm_lang$core$Basics$toString( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, y))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y2( + _elm_lang$core$Basics$toString( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, y) + height)), + _1: {ctor: '[]'} + } + } + } + }); + return A2( + _elm_lang$svg$Svg$line, + attributes, + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Svg$rectangle = F6( + function (system, userAttributes, x1, x2, y1, y2) { + var attributes = A3( + _terezka$line_charts$Internal_Utils$concat, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_terezka$line_charts$LineChart_Colors$gray)), + _1: {ctor: '[]'} + }, + userAttributes, + {ctor: '[]'}); + return A3( + _terezka$line_charts$Internal_Path$view, + system, + attributes, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Move( + {x: x1, y: y1}), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + {x: x1, y: y2}), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + {x: x2, y: y2}), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + {x: x2, y: y1}), + _1: {ctor: '[]'} + } + } + } + }); + }); +var _terezka$line_charts$Internal_Svg$vertical = F5( + function (system, userAttributes, x, y1, y2) { + var attributes = A3( + _terezka$line_charts$Internal_Utils$concat, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_terezka$line_charts$LineChart_Colors$gray)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$style('pointer-events: none;'), + _1: {ctor: '[]'} + } + }, + userAttributes, + {ctor: '[]'}); + return A3( + _terezka$line_charts$Internal_Path$view, + system, + attributes, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Move( + {x: x, y: y1}), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + {x: x, y: y1}), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + {x: x, y: y2}), + _1: {ctor: '[]'} + } + } + }); + }); +var _terezka$line_charts$Internal_Svg$verticalGrid = F3( + function (system, userAttributes, x) { + var attributes = A3( + _terezka$line_charts$Internal_Utils$concat, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_terezka$line_charts$LineChart_Colors$gray)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$style('pointer-events: none;'), + _1: {ctor: '[]'} + } + }, + userAttributes, + {ctor: '[]'}); + return A5(_terezka$line_charts$Internal_Svg$vertical, system, attributes, x, system.y.min, system.y.max); + }); +var _terezka$line_charts$Internal_Svg$horizontal = F5( + function (system, userAttributes, y, x1, x2) { + var attributes = A3( + _terezka$line_charts$Internal_Utils$concat, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_terezka$line_charts$LineChart_Colors$gray)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$style('pointer-events: none;'), + _1: {ctor: '[]'} + } + }, + userAttributes, + {ctor: '[]'}); + return A3( + _terezka$line_charts$Internal_Path$view, + system, + attributes, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Move( + {x: x1, y: y}), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + {x: x1, y: y}), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + {x: x2, y: y}), + _1: {ctor: '[]'} + } + } + }); + }); +var _terezka$line_charts$Internal_Svg$horizontalGrid = F3( + function (system, userAttributes, y) { + var attributes = A3( + _terezka$line_charts$Internal_Utils$concat, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_terezka$line_charts$LineChart_Colors$gray)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$style('pointer-events: none;'), + _1: {ctor: '[]'} + } + }, + userAttributes, + {ctor: '[]'}); + return A5(_terezka$line_charts$Internal_Svg$horizontal, system, attributes, y, system.x.min, system.x.max); + }); +var _terezka$line_charts$Internal_Svg$gridDot = F3( + function (radius, color, point) { + return A2( + _elm_lang$svg$Svg$circle, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$cx( + _elm_lang$core$Basics$toString(point.x)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$cy( + _elm_lang$core$Basics$toString(point.y)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$r( + _elm_lang$core$Basics$toString(radius)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color)), + _1: {ctor: '[]'} + } + } + } + }, + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Svg$withinChartArea = function (_p1) { + var _p2 = _p1; + return _elm_lang$svg$Svg_Attributes$clipPath( + A2( + _elm_lang$core$Basics_ops['++'], + 'url(#', + A2( + _elm_lang$core$Basics_ops['++'], + _terezka$line_charts$Internal_Utils$toChartAreaId(_p2.id), + ')'))); +}; +var _terezka$line_charts$Internal_Svg$End = {ctor: 'End'}; +var _terezka$line_charts$Internal_Svg$Middle = {ctor: 'Middle'}; +var _terezka$line_charts$Internal_Svg$Start = {ctor: 'Start'}; +var _terezka$line_charts$Internal_Svg$Transfrom = F2( + function (a, b) { + return {ctor: 'Transfrom', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Svg$move = F3( + function (system, x, y) { + return A2( + _terezka$line_charts$Internal_Svg$Transfrom, + A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, x), + A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, y)); + }); +var _terezka$line_charts$Internal_Svg$offset = F2( + function (x, y) { + return A2(_terezka$line_charts$Internal_Svg$Transfrom, x, y); + }); +var _terezka$line_charts$Internal_Svg$addPosition = F2( + function (_p4, _p3) { + var _p5 = _p4; + var _p6 = _p3; + return A2(_terezka$line_charts$Internal_Svg$Transfrom, _p6._0 + _p5._0, _p6._1 + _p5._1); + }); +var _terezka$line_charts$Internal_Svg$toPosition = A2( + _elm_lang$core$List$foldr, + _terezka$line_charts$Internal_Svg$addPosition, + A2(_terezka$line_charts$Internal_Svg$Transfrom, 0, 0)); +var _terezka$line_charts$Internal_Svg$transform = function (translations) { + var _p7 = _terezka$line_charts$Internal_Svg$toPosition(translations); + var x = _p7._0; + var y = _p7._1; + return _elm_lang$svg$Svg_Attributes$transform( + A2( + _elm_lang$core$Basics_ops['++'], + 'translate(', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(x), + A2( + _elm_lang$core$Basics_ops['++'], + ', ', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(y), + ')'))))); +}; + +var _terezka$line_charts$Internal_Junk$find = F2( + function (hovered, data) { + find: + while (true) { + var _p0 = hovered; + if (_p0.ctor === '[]') { + return _elm_lang$core$Maybe$Nothing; + } else { + var _p1 = _p0._0; + if (A2( + _elm_lang$core$List$any, + F2( + function (x, y) { + return _elm_lang$core$Native_Utils.eq(x, y); + })(_p1), + data)) { + return _elm_lang$core$Maybe$Just(_p1); + } else { + var _v1 = _p0._1, + _v2 = data; + hovered = _v1; + data = _v2; + continue find; + } + } + } + }); +var _terezka$line_charts$Internal_Junk$findSeries = F2( + function (hovered, datas) { + findSeries: + while (true) { + var _p2 = datas; + if (_p2.ctor === '[]') { + return _elm_lang$core$Maybe$Nothing; + } else { + var _p4 = _p2._0._2; + var _p3 = A2( + _terezka$line_charts$Internal_Junk$find, + { + ctor: '::', + _0: hovered, + _1: {ctor: '[]'} + }, + _p4); + if (_p3.ctor === 'Just') { + return _elm_lang$core$Maybe$Just( + {ctor: '_Tuple3', _0: _p2._0._0, _1: _p2._0._1, _2: _p4}); + } else { + var _v5 = hovered, + _v6 = _p2._1; + hovered = _v5; + datas = _v6; + continue findSeries; + } + } + } + }); +var _terezka$line_charts$Internal_Junk$shouldFlip = F2( + function (system, x) { + return _elm_lang$core$Native_Utils.cmp(x - system.x.min, system.x.max - x) > 0; + }); +var _terezka$line_charts$Internal_Junk$middle = F2( + function (r, system) { + var range = r(system); + return range.min + ((range.max - range.min) / 2); + }); +var _terezka$line_charts$Internal_Junk$viewRow = F3( + function (color, label, value) { + return A2( + _elm_lang$html$Html$p, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'margin', _1: '3px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'color', _1: color}, + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text( + A2( + _elm_lang$core$Basics_ops['++'], + label, + A2(_elm_lang$core$Basics_ops['++'], ': ', value))), + _1: {ctor: '[]'} + }); + }); +var _terezka$line_charts$Internal_Junk$viewHeader = _elm_lang$html$Html$p( + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'margin-top', _1: '3px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'margin-bottom', _1: '5px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'padding', _1: '3px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'border-bottom', _1: '1px solid rgb(163, 163, 163)'}, + _1: {ctor: '[]'} + } + } + } + }), + _1: {ctor: '[]'} + }); +var _terezka$line_charts$Internal_Junk$standardStyles = { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'padding', _1: '5px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'min-width', _1: '100px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'background', _1: 'rgba(255,255,255,0.8)'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'border', _1: '1px solid #d3d3d3'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'border-radius', _1: '5px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'pointer-events', _1: 'none'}, + _1: {ctor: '[]'} + } + } + } + } + } +}; +var _terezka$line_charts$Internal_Junk$hoverAt = F5( + function (system, x, y, styles, view) { + var yPercentage = (A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, y) * 100) / system.frame.size.height; + var space = A2(_terezka$line_charts$Internal_Junk$shouldFlip, system, x) ? -15 : 15; + var xPercentage = ((A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, x) + space) * 100) / system.frame.size.width; + var posititonStyles = { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'left', + _1: A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(xPercentage), + '%') + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'top', + _1: A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(yPercentage), + '%') + }, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'margin-right', _1: '-400px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'position', _1: 'absolute'}, + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Junk$shouldFlip, system, x) ? {ctor: '_Tuple2', _0: 'transform', _1: 'translateX(-100%)'} : {ctor: '_Tuple2', _0: 'transform', _1: 'translateX(0)'}, + _1: {ctor: '[]'} + } + } + } + } + }; + var containerStyles = A2( + _elm_lang$core$Basics_ops['++'], + _terezka$line_charts$Internal_Junk$standardStyles, + A2(_elm_lang$core$Basics_ops['++'], posititonStyles, styles)); + return A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style(containerStyles), + _1: {ctor: '[]'} + }, + view); + }); +var _terezka$line_charts$Internal_Junk$hover = F3( + function (system, x, styles) { + var containerStyles = A2( + _elm_lang$core$Basics_ops['++'], + { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Junk$shouldFlip, system, x) ? {ctor: '_Tuple2', _0: 'transform', _1: 'translate(-100%, -50%)'} : {ctor: '_Tuple2', _0: 'transform', _1: 'translate(0, -50%)'}, + _1: {ctor: '[]'} + }, + styles); + var y = A2( + _terezka$line_charts$Internal_Junk$middle, + function (_) { + return _.y; + }, + system); + return A4(_terezka$line_charts$Internal_Junk$hoverAt, system, x, y, containerStyles); + }); +var _terezka$line_charts$Internal_Junk$hoverManyHtml = F8( + function (system, toX, toY, formatX, formatY, first, hovered, series) { + var viewValue = function (_p5) { + var _p6 = _p5; + return A2( + _terezka$line_charts$Internal_Utils$viewMaybe, + A2(_terezka$line_charts$Internal_Junk$find, hovered, _p6._2), + function (hovered) { + return A3( + _terezka$line_charts$Internal_Junk$viewRow, + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_p6._0), + _p6._1, + formatY(hovered)); + }); + }; + var x = A2( + _elm_lang$core$Maybe$withDefault, + A2( + _terezka$line_charts$Internal_Junk$middle, + function (_) { + return _.x; + }, + system), + toX(first)); + return A4( + _terezka$line_charts$Internal_Junk$hover, + system, + x, + {ctor: '[]'}, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Junk$viewHeader( + { + ctor: '::', + _0: _elm_lang$html$Html$text( + formatX(first)), + _1: {ctor: '[]'} + }), + _1: A2(_elm_lang$core$List$map, viewValue, series) + }); + }); +var _terezka$line_charts$Internal_Junk$hoverOneHtml = F6( + function (series, system, toX, toY, properties, hovered) { + var viewValue = function (_p7) { + var _p8 = _p7; + return A3( + _terezka$line_charts$Internal_Junk$viewRow, + 'inherit', + _p8._0, + _p8._1(hovered)); + }; + var viewColorLabel = F2( + function (color, label) { + return A2( + _elm_lang$html$Html$p, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'margin', _1: '0'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'color', _1: color}, + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(label), + _1: {ctor: '[]'} + }); + }); + var viewHeaderOne = A2( + _terezka$line_charts$Internal_Utils$viewMaybe, + A2(_terezka$line_charts$Internal_Junk$findSeries, hovered, series), + function (_p9) { + var _p10 = _p9; + return _terezka$line_charts$Internal_Junk$viewHeader( + { + ctor: '::', + _0: A2( + viewColorLabel, + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_p10._0), + _p10._1), + _1: {ctor: '[]'} + }); + }); + var y = A2( + _elm_lang$core$Maybe$withDefault, + A2( + _terezka$line_charts$Internal_Junk$middle, + function (_) { + return _.y; + }, + system), + toY(hovered)); + var x = A2( + _elm_lang$core$Maybe$withDefault, + A2( + _terezka$line_charts$Internal_Junk$middle, + function (_) { + return _.x; + }, + system), + toX(hovered)); + return A5( + _terezka$line_charts$Internal_Junk$hoverAt, + system, + x, + y, + {ctor: '[]'}, + { + ctor: '::', + _0: viewHeaderOne, + _1: A2(_elm_lang$core$List$map, viewValue, properties) + }); + }); +var _terezka$line_charts$Internal_Junk$addBelow = F2( + function (below, layers) { + return _elm_lang$core$Native_Utils.update( + layers, + { + below: A2(_elm_lang$core$Basics_ops['++'], below, layers.below) + }); + }); +var _terezka$line_charts$Internal_Junk$getLayers = F5( + function (series, toX, toY, system, _p11) { + var _p12 = _p11; + return A4(_p12._0, series, toX, toY, system); + }); +var _terezka$line_charts$Internal_Junk$Layers = F3( + function (a, b, c) { + return {below: a, above: b, html: c}; + }); +var _terezka$line_charts$Internal_Junk$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Junk$none = _terezka$line_charts$Internal_Junk$Config( + F4( + function (_p16, _p15, _p14, _p13) { + return A3( + _terezka$line_charts$Internal_Junk$Layers, + {ctor: '[]'}, + {ctor: '[]'}, + {ctor: '[]'}); + })); +var _terezka$line_charts$Internal_Junk$custom = function (func) { + return _terezka$line_charts$Internal_Junk$Config( + F3( + function (_p19, _p18, _p17) { + return func; + })); +}; +var _terezka$line_charts$Internal_Junk$hoverOne = F2( + function (hovered, properties) { + return _terezka$line_charts$Internal_Junk$Config( + F4( + function (series, toX, toY, system) { + return { + below: {ctor: '[]'}, + above: {ctor: '[]'}, + html: { + ctor: '::', + _0: A2( + _terezka$line_charts$Internal_Utils$viewMaybe, + hovered, + A5(_terezka$line_charts$Internal_Junk$hoverOneHtml, series, system, toX, toY, properties)), + _1: {ctor: '[]'} + } + }; + })); + }); +var _terezka$line_charts$Internal_Junk$hoverMany = F3( + function (hovered, formatX, formatY) { + var _p20 = hovered; + if (_p20.ctor === '[]') { + return _terezka$line_charts$Internal_Junk$none; + } else { + var _p21 = _p20._0; + return _terezka$line_charts$Internal_Junk$Config( + F4( + function (series, toX, toY, system) { + var xValue = A2( + _elm_lang$core$Maybe$withDefault, + 0, + toX(_p21)); + return { + below: { + ctor: '::', + _0: A3( + _terezka$line_charts$Internal_Svg$verticalGrid, + system, + {ctor: '[]'}, + xValue), + _1: {ctor: '[]'} + }, + above: {ctor: '[]'}, + html: { + ctor: '::', + _0: A8(_terezka$line_charts$Internal_Junk$hoverManyHtml, system, toX, toY, formatX, formatY, _p21, hovered, series), + _1: {ctor: '[]'} + } + }; + })); + } + }); + +var _terezka$line_charts$LineChart_Junk$hoverAt = _terezka$line_charts$Internal_Junk$hoverAt; +var _terezka$line_charts$LineChart_Junk$hover = _terezka$line_charts$Internal_Junk$hover; +var _terezka$line_charts$LineChart_Junk$withinChartArea = _terezka$line_charts$Internal_Svg$withinChartArea; +var _terezka$line_charts$LineChart_Junk$label = function (color) { + return _terezka$line_charts$Internal_Svg$label( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color)); +}; +var _terezka$line_charts$LineChart_Junk$circle = F5( + function (system, radius, color, x, y) { + return A3( + _terezka$line_charts$Internal_Svg$gridDot, + radius, + color, + A2( + _terezka$line_charts$LineChart_Coordinate$toSvg, + system, + A2(_terezka$line_charts$LineChart_Coordinate$Point, x, y))); + }); +var _terezka$line_charts$LineChart_Junk$rectangle = F2( + function (system, attributes) { + return A2( + _terezka$line_charts$Internal_Svg$rectangle, + system, + { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$withinChartArea(system), + _1: attributes + }); + }); +var _terezka$line_charts$LineChart_Junk$horizontalCustom = F2( + function (system, attributes) { + return A2( + _terezka$line_charts$Internal_Svg$horizontal, + system, + { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$withinChartArea(system), + _1: attributes + }); + }); +var _terezka$line_charts$LineChart_Junk$verticalCustom = F2( + function (system, attributes) { + return A2( + _terezka$line_charts$Internal_Svg$vertical, + system, + { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$withinChartArea(system), + _1: attributes + }); + }); +var _terezka$line_charts$LineChart_Junk$horizontal = F3( + function (system, attributes, at) { + return A5( + _terezka$line_charts$Internal_Svg$horizontal, + system, + { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$withinChartArea(system), + _1: attributes + }, + at, + system.x.min, + system.x.max); + }); +var _terezka$line_charts$LineChart_Junk$vertical = F3( + function (system, attributes, at) { + return A5( + _terezka$line_charts$Internal_Svg$vertical, + system, + { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$withinChartArea(system), + _1: attributes + }, + at, + system.y.min, + system.y.max); + }); +var _terezka$line_charts$LineChart_Junk$offset = _terezka$line_charts$Internal_Svg$offset; +var _terezka$line_charts$LineChart_Junk$move = _terezka$line_charts$Internal_Svg$move; +var _terezka$line_charts$LineChart_Junk$transform = _terezka$line_charts$Internal_Svg$transform; +var _terezka$line_charts$LineChart_Junk$placed = F5( + function (system, x, y, xo, yo) { + return _elm_lang$svg$Svg$g( + { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$transform( + { + ctor: '::', + _0: A3(_terezka$line_charts$LineChart_Junk$move, system, x, y), + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$LineChart_Junk$offset, xo, yo), + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + }); + }); +var _terezka$line_charts$LineChart_Junk$labelAt = F8( + function (system, x, y, xo, yo, anchor, color, text) { + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$transform( + { + ctor: '::', + _0: A3(_terezka$line_charts$LineChart_Junk$move, system, x, y), + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$LineChart_Junk$offset, xo, yo), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$style( + A2( + _elm_lang$core$Basics_ops['++'], + 'text-anchor: ', + A2(_elm_lang$core$Basics_ops['++'], anchor, ';'))), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: A2(_terezka$line_charts$LineChart_Junk$label, color, text), + _1: {ctor: '[]'} + }); + }); +var _terezka$line_charts$LineChart_Junk$custom = _terezka$line_charts$Internal_Junk$custom; +var _terezka$line_charts$LineChart_Junk$hoverMany = _terezka$line_charts$Internal_Junk$hoverMany; +var _terezka$line_charts$LineChart_Junk$hoverOne = _terezka$line_charts$Internal_Junk$hoverOne; +var _terezka$line_charts$LineChart_Junk$default = _terezka$line_charts$Internal_Junk$none; +var _terezka$line_charts$LineChart_Junk$Layers = F3( + function (a, b, c) { + return {below: a, above: b, html: c}; + }); + +var _terezka$line_charts$Internal_Area$opacityContainer = function (config) { + var _p0 = config; + switch (_p0.ctor) { + case 'None': + return 1; + case 'Normal': + return 1; + case 'Stacked': + return _p0._0; + default: + return _p0._0; + } +}; +var _terezka$line_charts$Internal_Area$opacitySingle = function (config) { + var _p1 = config; + switch (_p1.ctor) { + case 'None': + return 0; + case 'Normal': + return _p1._0; + case 'Stacked': + return 1; + default: + return 1; + } +}; +var _terezka$line_charts$Internal_Area$opacity = function (config) { + var _p2 = config; + switch (_p2.ctor) { + case 'None': + return 0; + case 'Normal': + return _p2._0; + case 'Stacked': + return _p2._0; + default: + return _p2._0; + } +}; +var _terezka$line_charts$Internal_Area$hasArea = function (config) { + var _p3 = config; + switch (_p3.ctor) { + case 'None': + return false; + case 'Normal': + return true; + case 'Stacked': + return true; + default: + return true; + } +}; +var _terezka$line_charts$Internal_Area$Percentage = function (a) { + return {ctor: 'Percentage', _0: a}; +}; +var _terezka$line_charts$Internal_Area$percentage = _terezka$line_charts$Internal_Area$Percentage; +var _terezka$line_charts$Internal_Area$Stacked = function (a) { + return {ctor: 'Stacked', _0: a}; +}; +var _terezka$line_charts$Internal_Area$stacked = _terezka$line_charts$Internal_Area$Stacked; +var _terezka$line_charts$Internal_Area$Normal = function (a) { + return {ctor: 'Normal', _0: a}; +}; +var _terezka$line_charts$Internal_Area$normal = _terezka$line_charts$Internal_Area$Normal; +var _terezka$line_charts$Internal_Area$None = {ctor: 'None'}; +var _terezka$line_charts$Internal_Area$none = _terezka$line_charts$Internal_Area$None; +var _terezka$line_charts$Internal_Area$default = _terezka$line_charts$Internal_Area$none; + +var _terezka$line_charts$LineChart_Area$percentage = _terezka$line_charts$Internal_Area$percentage; +var _terezka$line_charts$LineChart_Area$stacked = _terezka$line_charts$Internal_Area$stacked; +var _terezka$line_charts$LineChart_Area$normal = _terezka$line_charts$Internal_Area$normal; +var _terezka$line_charts$LineChart_Area$default = _terezka$line_charts$Internal_Area$none; + +var _terezka$line_charts$Internal_Axis_Tick$properties = function (_p0) { + var _p1 = _p0; + return _p1._0; +}; +var _terezka$line_charts$Internal_Axis_Tick$isPositive = function (direction) { + var _p2 = direction; + if (_p2.ctor === 'Positive') { + return true; + } else { + return false; + } +}; +var _terezka$line_charts$Internal_Axis_Tick$Properties = F7( + function (a, b, c, d, e, f, g) { + return {position: a, color: b, width: c, length: d, grid: e, direction: f, label: g}; + }); +var _terezka$line_charts$Internal_Axis_Tick$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Axis_Tick$custom = _terezka$line_charts$Internal_Axis_Tick$Config; +var _terezka$line_charts$Internal_Axis_Tick$Positive = {ctor: 'Positive'}; +var _terezka$line_charts$Internal_Axis_Tick$opposite = function (n) { + return _terezka$line_charts$Internal_Axis_Tick$custom( + { + position: n, + color: _terezka$line_charts$LineChart_Colors$gray, + width: 1, + length: 5, + grid: true, + direction: _terezka$line_charts$Internal_Axis_Tick$Positive, + label: _elm_lang$core$Maybe$Just( + A2( + _terezka$line_charts$Internal_Svg$label, + 'inherit', + _elm_lang$core$Basics$toString(n))) + }); +}; +var _terezka$line_charts$Internal_Axis_Tick$Negative = {ctor: 'Negative'}; +var _terezka$line_charts$Internal_Axis_Tick$int = function (n) { + return _terezka$line_charts$Internal_Axis_Tick$custom( + { + position: _elm_lang$core$Basics$toFloat(n), + color: _terezka$line_charts$LineChart_Colors$gray, + width: 1, + length: 5, + grid: true, + direction: _terezka$line_charts$Internal_Axis_Tick$Negative, + label: _elm_lang$core$Maybe$Just( + A2( + _terezka$line_charts$Internal_Svg$label, + 'inherit', + _elm_lang$core$Basics$toString(n))) + }); +}; +var _terezka$line_charts$Internal_Axis_Tick$float = function (n) { + return _terezka$line_charts$Internal_Axis_Tick$custom( + { + position: n, + color: _terezka$line_charts$LineChart_Colors$gray, + width: 1, + length: 5, + grid: true, + direction: _terezka$line_charts$Internal_Axis_Tick$Negative, + label: _elm_lang$core$Maybe$Just( + A2( + _terezka$line_charts$Internal_Svg$label, + 'inherit', + _elm_lang$core$Basics$toString(n))) + }); +}; +var _terezka$line_charts$Internal_Axis_Tick$gridless = function (n) { + return _terezka$line_charts$Internal_Axis_Tick$custom( + { + position: n, + color: _terezka$line_charts$LineChart_Colors$gray, + width: 1, + length: 5, + grid: false, + direction: _terezka$line_charts$Internal_Axis_Tick$Negative, + label: _elm_lang$core$Maybe$Just( + A2( + _terezka$line_charts$Internal_Svg$label, + 'inherit', + _elm_lang$core$Basics$toString(n))) + }); +}; +var _terezka$line_charts$Internal_Axis_Tick$labelless = function (n) { + return _terezka$line_charts$Internal_Axis_Tick$custom( + {position: n, color: _terezka$line_charts$LineChart_Colors$gray, width: 1, length: 5, grid: true, direction: _terezka$line_charts$Internal_Axis_Tick$Negative, label: _elm_lang$core$Maybe$Nothing}); +}; +var _terezka$line_charts$Internal_Axis_Tick$long = function (n) { + return _terezka$line_charts$Internal_Axis_Tick$custom( + { + position: n, + color: _terezka$line_charts$LineChart_Colors$gray, + width: 1, + length: 20, + grid: true, + direction: _terezka$line_charts$Internal_Axis_Tick$Negative, + label: _elm_lang$core$Maybe$Just( + A2( + _terezka$line_charts$Internal_Svg$label, + 'inherit', + _elm_lang$core$Basics$toString(n))) + }); +}; + +var _terezka$line_charts$LineChart_Axis_Tick$formatBold = function (unit) { + return function (_p0) { + return function () { + var _p1 = unit; + switch (_p1.ctor) { + case 'Millisecond': + return function (_p2) { + return _elm_lang$core$Basics$toString( + _elm_lang$core$Date$toTime(_p2)); + }; + case 'Second': + return _mgold$elm_date_format$Date_Format$format('%S'); + case 'Minute': + return _mgold$elm_date_format$Date_Format$format('%M'); + case 'Hour': + return _mgold$elm_date_format$Date_Format$format('%l%P'); + case 'Day': + return _mgold$elm_date_format$Date_Format$format('%a'); + case 'Week': + return _justinmimbs$elm_date_extra$Date_Extra$toFormattedString('\'Week\' w'); + case 'Month': + return _mgold$elm_date_format$Date_Format$format('%b'); + default: + return _mgold$elm_date_format$Date_Format$format('%Y'); + } + }()( + _elm_lang$core$Date$fromTime(_p0)); + }; +}; +var _terezka$line_charts$LineChart_Axis_Tick$formatNorm = F2( + function (unit, time) { + var format2 = _justinmimbs$elm_date_extra$Date_Extra$toFormattedString; + var format1 = _mgold$elm_date_format$Date_Format$format; + var date = _elm_lang$core$Date$fromTime(time); + var _p3 = unit; + switch (_p3.ctor) { + case 'Millisecond': + return _elm_lang$core$Basics$toString(time); + case 'Second': + return A2(format1, '%S', date); + case 'Minute': + return A2(format1, '%M', date); + case 'Hour': + return A2(format1, '%l%P', date); + case 'Day': + return A2(format1, '%e', date); + case 'Week': + return A2(format2, '\'Week\' w', date); + case 'Month': + return A2(format1, '%b', date); + default: + return A2(format1, '%Y', date); + } + }); +var _terezka$line_charts$LineChart_Axis_Tick$custom = _terezka$line_charts$Internal_Axis_Tick$custom; +var _terezka$line_charts$LineChart_Axis_Tick$positive = _terezka$line_charts$Internal_Axis_Tick$Positive; +var _terezka$line_charts$LineChart_Axis_Tick$negative = _terezka$line_charts$Internal_Axis_Tick$Negative; +var _terezka$line_charts$LineChart_Axis_Tick$long = _terezka$line_charts$Internal_Axis_Tick$long; +var _terezka$line_charts$LineChart_Axis_Tick$opposite = _terezka$line_charts$Internal_Axis_Tick$opposite; +var _terezka$line_charts$LineChart_Axis_Tick$labelless = _terezka$line_charts$Internal_Axis_Tick$labelless; +var _terezka$line_charts$LineChart_Axis_Tick$gridless = _terezka$line_charts$Internal_Axis_Tick$gridless; +var _terezka$line_charts$LineChart_Axis_Tick$float = _terezka$line_charts$Internal_Axis_Tick$float; +var _terezka$line_charts$LineChart_Axis_Tick$int = _terezka$line_charts$Internal_Axis_Tick$int; +var _terezka$line_charts$LineChart_Axis_Tick$Time = F4( + function (a, b, c, d) { + return {timestamp: a, isFirst: b, interval: c, change: d}; + }); +var _terezka$line_charts$LineChart_Axis_Tick$Interval = F2( + function (a, b) { + return {unit: a, multiple: b}; + }); +var _terezka$line_charts$LineChart_Axis_Tick$Properties = F7( + function (a, b, c, d, e, f, g) { + return {position: a, color: b, width: c, length: d, grid: e, direction: f, label: g}; + }); +var _terezka$line_charts$LineChart_Axis_Tick$Year = {ctor: 'Year'}; +var _terezka$line_charts$LineChart_Axis_Tick$Month = {ctor: 'Month'}; +var _terezka$line_charts$LineChart_Axis_Tick$Week = {ctor: 'Week'}; +var _terezka$line_charts$LineChart_Axis_Tick$Day = {ctor: 'Day'}; +var _terezka$line_charts$LineChart_Axis_Tick$Hour = {ctor: 'Hour'}; +var _terezka$line_charts$LineChart_Axis_Tick$Minute = {ctor: 'Minute'}; +var _terezka$line_charts$LineChart_Axis_Tick$Second = {ctor: 'Second'}; +var _terezka$line_charts$LineChart_Axis_Tick$nextUnit = function (unit) { + var _p4 = unit; + switch (_p4.ctor) { + case 'Millisecond': + return _terezka$line_charts$LineChart_Axis_Tick$Second; + case 'Second': + return _terezka$line_charts$LineChart_Axis_Tick$Minute; + case 'Minute': + return _terezka$line_charts$LineChart_Axis_Tick$Hour; + case 'Hour': + return _terezka$line_charts$LineChart_Axis_Tick$Day; + case 'Day': + return _terezka$line_charts$LineChart_Axis_Tick$Week; + case 'Week': + return _terezka$line_charts$LineChart_Axis_Tick$Month; + case 'Month': + return _terezka$line_charts$LineChart_Axis_Tick$Year; + default: + return _terezka$line_charts$LineChart_Axis_Tick$Year; + } +}; +var _terezka$line_charts$LineChart_Axis_Tick$format = function (_p5) { + var _p6 = _p5; + var _p9 = _p6.timestamp; + var _p8 = _p6.interval; + if (_p6.isFirst) { + return A2( + _terezka$line_charts$LineChart_Axis_Tick$formatBold, + _terezka$line_charts$LineChart_Axis_Tick$nextUnit(_p8.unit), + _p9); + } else { + var _p7 = _p6.change; + if (_p7.ctor === 'Just') { + return A2(_terezka$line_charts$LineChart_Axis_Tick$formatBold, _p7._0, _p9); + } else { + return A2(_terezka$line_charts$LineChart_Axis_Tick$formatNorm, _p8.unit, _p9); + } + } +}; +var _terezka$line_charts$LineChart_Axis_Tick$time = function (time) { + return _terezka$line_charts$LineChart_Axis_Tick$custom( + { + position: time.timestamp, + color: _elm_lang$core$Color$gray, + width: 1, + length: 5, + grid: true, + direction: _terezka$line_charts$LineChart_Axis_Tick$negative, + label: _elm_lang$core$Maybe$Just( + A2( + _terezka$line_charts$Internal_Svg$label, + 'inherit', + _terezka$line_charts$LineChart_Axis_Tick$format(time))) + }); +}; +var _terezka$line_charts$LineChart_Axis_Tick$Millisecond = {ctor: 'Millisecond'}; + +var _terezka$line_charts$Internal_Data$isWithinRange = F2( + function (system, point) { + return _elm_lang$core$Native_Utils.eq( + A3(_elm_lang$core$Basics$clamp, system.x.min, system.x.max, point.x), + point.x) && _elm_lang$core$Native_Utils.eq( + A3(_elm_lang$core$Basics$clamp, system.y.min, system.y.max, point.y), + point.y); + }); +var _terezka$line_charts$Internal_Data$Data = F3( + function (a, b, c) { + return {user: a, point: b, isReal: c}; + }); +var _terezka$line_charts$Internal_Data$Point = F2( + function (a, b) { + return {x: a, y: b}; + }); + +var _terezka$line_charts$Internal_Axis_Range$applyY = F2( + function (range, system) { + var _p0 = range; + switch (_p0.ctor) { + case 'Padded': + var _p4 = _p0._0; + var _p3 = _p0._1; + var _p1 = system; + var frame = _p1.frame; + var _p2 = frame; + var size = _p2.size; + var system_ = _elm_lang$core$Native_Utils.update( + system, + { + frame: _elm_lang$core$Native_Utils.update( + frame, + { + size: _elm_lang$core$Native_Utils.update( + size, + { + height: A2(_elm_lang$core$Basics$max, 1, (size.height - _p4) - _p3) + }) + }) + }); + var scale = _terezka$line_charts$LineChart_Coordinate$scaleDataY(system_); + return A2( + _terezka$line_charts$LineChart_Coordinate$Range, + system.y.min - scale(_p4), + system.y.max + scale(_p3)); + case 'Window': + return A2(_terezka$line_charts$LineChart_Coordinate$Range, _p0._0, _p0._1); + default: + return _p0._0(system.y); + } + }); +var _terezka$line_charts$Internal_Axis_Range$applyX = F2( + function (range, system) { + var _p5 = range; + switch (_p5.ctor) { + case 'Padded': + var _p9 = _p5._0; + var _p8 = _p5._1; + var _p6 = system; + var frame = _p6.frame; + var _p7 = frame; + var size = _p7.size; + var system_ = _elm_lang$core$Native_Utils.update( + system, + { + frame: _elm_lang$core$Native_Utils.update( + frame, + { + size: _elm_lang$core$Native_Utils.update( + size, + { + width: A2(_elm_lang$core$Basics$max, 1, (size.width - _p9) - _p8) + }) + }) + }); + var scale = _terezka$line_charts$LineChart_Coordinate$scaleDataX(system_); + return A2( + _terezka$line_charts$LineChart_Coordinate$Range, + system.x.min - scale(_p9), + system.x.max + scale(_p8)); + case 'Window': + return A2(_terezka$line_charts$LineChart_Coordinate$Range, _p5._0, _p5._1); + default: + return _p5._0(system.x); + } + }); +var _terezka$line_charts$Internal_Axis_Range$Custom = function (a) { + return {ctor: 'Custom', _0: a}; +}; +var _terezka$line_charts$Internal_Axis_Range$custom = _terezka$line_charts$Internal_Axis_Range$Custom; +var _terezka$line_charts$Internal_Axis_Range$Window = F2( + function (a, b) { + return {ctor: 'Window', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Axis_Range$window = _terezka$line_charts$Internal_Axis_Range$Window; +var _terezka$line_charts$Internal_Axis_Range$Padded = F2( + function (a, b) { + return {ctor: 'Padded', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Axis_Range$padded = _terezka$line_charts$Internal_Axis_Range$Padded; +var _terezka$line_charts$Internal_Axis_Range$default = A2(_terezka$line_charts$Internal_Axis_Range$padded, 0, 0); + +var _terezka$line_charts$Internal_Axis_Values_Time$magnitude = F2( + function (interval, unit) { + var _p0 = unit; + if (_p0.ctor === 'Year') { + return A2( + _elm_lang$core$Basics$max, + 1, + _terezka$line_charts$Internal_Utils$magnitude(interval)); + } else { + return 1; + } + }); +var _terezka$line_charts$Internal_Axis_Values_Time$highestMultiple = function (_p1) { + return _elm_lang$core$Basics$toFloat( + A2( + _elm_lang$core$Maybe$withDefault, + 0, + _elm_lang$core$List$head( + _elm_lang$core$List$reverse(_p1)))); +}; +var _terezka$line_charts$Internal_Axis_Values_Time$toParts = function (date) { + return { + ctor: '_Tuple7', + _0: _elm_lang$core$Date$year(date), + _1: _elm_lang$core$Date$month(date), + _2: _elm_lang$core$Date$day(date), + _3: _elm_lang$core$Date$hour(date), + _4: _elm_lang$core$Date$minute(date), + _5: _elm_lang$core$Date$second(date), + _6: _elm_lang$core$Date$millisecond(date) + }; +}; +var _terezka$line_charts$Internal_Axis_Values_Time$toExtraUnit = function (unit) { + var _p2 = unit; + switch (_p2.ctor) { + case 'Millisecond': + return _justinmimbs$elm_date_extra$Date_Extra$Millisecond; + case 'Second': + return _justinmimbs$elm_date_extra$Date_Extra$Second; + case 'Minute': + return _justinmimbs$elm_date_extra$Date_Extra$Minute; + case 'Hour': + return _justinmimbs$elm_date_extra$Date_Extra$Hour; + case 'Day': + return _justinmimbs$elm_date_extra$Date_Extra$Day; + case 'Week': + return _justinmimbs$elm_date_extra$Date_Extra$Week; + case 'Month': + return _justinmimbs$elm_date_extra$Date_Extra$Month; + default: + return _justinmimbs$elm_date_extra$Date_Extra$Year; + } +}; +var _terezka$line_charts$Internal_Axis_Values_Time$multiples = function (unit) { + var _p3 = unit; + switch (_p3.ctor) { + case 'Millisecond': + return { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: { + ctor: '::', + _0: 5, + _1: { + ctor: '::', + _0: 10, + _1: { + ctor: '::', + _0: 20, + _1: { + ctor: '::', + _0: 25, + _1: { + ctor: '::', + _0: 50, + _1: { + ctor: '::', + _0: 100, + _1: { + ctor: '::', + _0: 200, + _1: { + ctor: '::', + _0: 500, + _1: {ctor: '[]'} + } + } + } + } + } + } + } + } + } + }; + case 'Second': + return { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: { + ctor: '::', + _0: 5, + _1: { + ctor: '::', + _0: 10, + _1: { + ctor: '::', + _0: 15, + _1: { + ctor: '::', + _0: 30, + _1: {ctor: '[]'} + } + } + } + } + } + }; + case 'Minute': + return { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: { + ctor: '::', + _0: 5, + _1: { + ctor: '::', + _0: 10, + _1: { + ctor: '::', + _0: 15, + _1: { + ctor: '::', + _0: 30, + _1: {ctor: '[]'} + } + } + } + } + } + }; + case 'Hour': + return { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: { + ctor: '::', + _0: 3, + _1: { + ctor: '::', + _0: 4, + _1: { + ctor: '::', + _0: 6, + _1: { + ctor: '::', + _0: 8, + _1: { + ctor: '::', + _0: 12, + _1: {ctor: '[]'} + } + } + } + } + } + } + }; + case 'Day': + return { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: {ctor: '[]'} + } + }; + case 'Week': + return { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: {ctor: '[]'} + } + }; + case 'Month': + return { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: { + ctor: '::', + _0: 3, + _1: { + ctor: '::', + _0: 4, + _1: { + ctor: '::', + _0: 6, + _1: {ctor: '[]'} + } + } + } + } + }; + default: + return { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: { + ctor: '::', + _0: 5, + _1: { + ctor: '::', + _0: 10, + _1: { + ctor: '::', + _0: 20, + _1: { + ctor: '::', + _0: 25, + _1: { + ctor: '::', + _0: 50, + _1: { + ctor: '::', + _0: 100, + _1: { + ctor: '::', + _0: 200, + _1: { + ctor: '::', + _0: 500, + _1: { + ctor: '::', + _0: 1000, + _1: { + ctor: '::', + _0: 10000, + _1: {ctor: '[]'} + } + } + } + } + } + } + } + } + } + } + } + }; + } +}; +var _terezka$line_charts$Internal_Axis_Values_Time$toMs = function (unit) { + var _p4 = unit; + switch (_p4.ctor) { + case 'Millisecond': + return 1; + case 'Second': + return 1000; + case 'Minute': + return 60000; + case 'Hour': + return 3600000; + case 'Day': + return 24 * 3600000; + case 'Week': + return (7 * 24) * 3600000; + case 'Month': + return (28 * 24) * 3600000; + default: + return (364 * 24) * 3600000; + } +}; +var _terezka$line_charts$Internal_Axis_Values_Time$all = { + ctor: '::', + _0: _terezka$line_charts$LineChart_Axis_Tick$Millisecond, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Axis_Tick$Second, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Axis_Tick$Minute, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Axis_Tick$Hour, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Axis_Tick$Day, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Axis_Tick$Week, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Axis_Tick$Month, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Axis_Tick$Year, + _1: {ctor: '[]'} + } + } + } + } + } + } + } +}; +var _terezka$line_charts$Internal_Axis_Values_Time$allReversed = _elm_lang$core$List$reverse(_terezka$line_charts$Internal_Axis_Values_Time$all); +var _terezka$line_charts$Internal_Axis_Values_Time$getUnitChange = F3( + function (interval, value, next) { + var equalBy = function (unit) { + return A3( + _justinmimbs$elm_date_extra$Date_Extra$equalBy, + _terezka$line_charts$Internal_Axis_Values_Time$toExtraUnit(unit), + _elm_lang$core$Date$fromTime(value), + _elm_lang$core$Date$fromTime(next)); + }; + var unitChange_ = function (units) { + unitChange_: + while (true) { + var _p5 = units; + if (_p5.ctor === '::') { + if (_p5._0.ctor === 'Week') { + var _v5 = _p5._1; + units = _v5; + continue unitChange_; + } else { + var _p6 = _p5._0; + if (_elm_lang$core$Native_Utils.cmp( + _terezka$line_charts$Internal_Axis_Values_Time$toMs(_p6), + _terezka$line_charts$Internal_Axis_Values_Time$toMs(interval)) < 1) { + return _elm_lang$core$Maybe$Nothing; + } else { + if (!equalBy(_p6)) { + return _elm_lang$core$Maybe$Just(_p6); + } else { + var _v6 = _p5._1; + units = _v6; + continue unitChange_; + } + } + } + } else { + return _elm_lang$core$Maybe$Nothing; + } + } + }; + return unitChange_(_terezka$line_charts$Internal_Axis_Values_Time$allReversed); + }); +var _terezka$line_charts$Internal_Axis_Values_Time$next = F3( + function (timestamp, unit, multiple) { + return _elm_lang$core$Date$toTime( + A3( + _justinmimbs$elm_date_extra$Date_Extra$add, + _terezka$line_charts$Internal_Axis_Values_Time$toExtraUnit(unit), + multiple, + _elm_lang$core$Date$fromTime(timestamp))); + }); +var _terezka$line_charts$Internal_Axis_Values_Time$ceilingTo = F2( + function (number, prec) { + return prec * _elm_lang$core$Basics$toFloat( + _elm_lang$core$Basics$ceiling(number / prec)); + }); +var _terezka$line_charts$Internal_Axis_Values_Time$ceilingToInt = F2( + function (number, prec) { + return _elm_lang$core$Basics$ceiling( + A2( + _terezka$line_charts$Internal_Axis_Values_Time$ceilingTo, + _elm_lang$core$Basics$toFloat(number), + _elm_lang$core$Basics$toFloat(prec))); + }); +var _terezka$line_charts$Internal_Axis_Values_Time$ceilingToWeek = F2( + function (date, multiple) { + var weekNumber = A2( + _terezka$line_charts$Internal_Axis_Values_Time$ceilingToInt, + _justinmimbs$elm_date_extra$Date_Extra$weekNumber(date), + multiple); + return A3( + _justinmimbs$elm_date_extra$Date_Extra$fromSpec, + _justinmimbs$elm_date_extra$Date_Extra$utc, + _justinmimbs$elm_date_extra$Date_Extra$noTime, + A3( + _justinmimbs$elm_date_extra$Date_Extra$weekDate, + _elm_lang$core$Date$year(date), + weekNumber, + 1)); + }); +var _terezka$line_charts$Internal_Axis_Values_Time$ceilingToMonth = F2( + function (date, multiple) { + return _justinmimbs$elm_date_extra$Date_Extra_Facts$monthFromMonthNumber( + A2( + _terezka$line_charts$Internal_Axis_Values_Time$ceilingToInt, + _justinmimbs$elm_date_extra$Date_Extra$monthNumber(date), + multiple)); + }); +var _terezka$line_charts$Internal_Axis_Values_Time$beginAt = F3( + function (min, unit, multiple) { + var interval = _terezka$line_charts$Internal_Axis_Values_Time$toMs(unit) * _elm_lang$core$Basics$toFloat(multiple); + var date = A2( + _justinmimbs$elm_date_extra$Date_Extra$ceiling, + _terezka$line_charts$Internal_Axis_Values_Time$toExtraUnit(unit), + _elm_lang$core$Date$fromTime(min)); + var _p7 = _terezka$line_charts$Internal_Axis_Values_Time$toParts(date); + var y = _p7._0; + var m = _p7._1; + var d = _p7._2; + var hh = _p7._3; + var mm = _p7._4; + var ss = _p7._5; + var _p8 = unit; + switch (_p8.ctor) { + case 'Millisecond': + return A2(_terezka$line_charts$Internal_Axis_Values_Time$ceilingTo, min, interval); + case 'Second': + return A2(_terezka$line_charts$Internal_Axis_Values_Time$ceilingTo, min, interval); + case 'Minute': + return A2(_terezka$line_charts$Internal_Axis_Values_Time$ceilingTo, min, interval); + case 'Hour': + return _elm_lang$core$Date$toTime( + A7( + _justinmimbs$elm_date_extra$Date_Extra$fromParts, + y, + m, + d, + A2(_terezka$line_charts$Internal_Axis_Values_Time$ceilingToInt, hh, multiple), + 0, + 0, + 0)); + case 'Day': + return _elm_lang$core$Date$toTime( + A7( + _justinmimbs$elm_date_extra$Date_Extra$fromParts, + y, + m, + A2(_terezka$line_charts$Internal_Axis_Values_Time$ceilingToInt, d, multiple), + 0, + 0, + 0, + 0)); + case 'Week': + return _elm_lang$core$Date$toTime( + A2(_terezka$line_charts$Internal_Axis_Values_Time$ceilingToWeek, date, multiple)); + case 'Month': + return _elm_lang$core$Date$toTime( + A7( + _justinmimbs$elm_date_extra$Date_Extra$fromParts, + y, + A2(_terezka$line_charts$Internal_Axis_Values_Time$ceilingToMonth, date, multiple), + 1, + 0, + 0, + 0, + 0)); + default: + return _elm_lang$core$Date$toTime( + A7( + _justinmimbs$elm_date_extra$Date_Extra$fromParts, + A2(_terezka$line_charts$Internal_Axis_Values_Time$ceilingToInt, y, multiple), + _elm_lang$core$Date$Jan, + 1, + 0, + 0, + 0, + 0)); + } + }); +var _terezka$line_charts$Internal_Axis_Values_Time$findBestMultiple = F2( + function (interval, unit) { + var middleOfNext = F2( + function (m1, m2) { + return ((_elm_lang$core$Basics$toFloat(m1) * _terezka$line_charts$Internal_Axis_Values_Time$toMs(unit)) + (_elm_lang$core$Basics$toFloat(m2) * _terezka$line_charts$Internal_Axis_Values_Time$toMs(unit))) / 2; + }); + var findBest_ = function (multiples) { + findBest_: + while (true) { + var _p9 = multiples; + if (_p9.ctor === '::') { + if (_p9._1.ctor === '::') { + var _p11 = _p9._1._0; + var _p10 = _p9._0; + if (_elm_lang$core$Native_Utils.cmp( + interval, + A2(middleOfNext, _p10, _p11)) < 1) { + return _p10; + } else { + var _v9 = {ctor: '::', _0: _p11, _1: _p9._1._1}; + multiples = _v9; + continue findBest_; + } + } else { + return _p9._0; + } + } else { + return 1; + } + } + }; + return findBest_( + _terezka$line_charts$Internal_Axis_Values_Time$multiples(unit)); + }); +var _terezka$line_charts$Internal_Axis_Values_Time$findBestUnit = F2( + function (interval, units) { + var middleOfNext = F2( + function (u1, u2) { + return ((_terezka$line_charts$Internal_Axis_Values_Time$toMs(u1) * _terezka$line_charts$Internal_Axis_Values_Time$highestMultiple( + _terezka$line_charts$Internal_Axis_Values_Time$multiples(u1))) + _terezka$line_charts$Internal_Axis_Values_Time$toMs(u2)) / 2; + }); + var findBest_ = F2( + function (units, u0) { + findBest_: + while (true) { + var _p12 = units; + if (_p12.ctor === '::') { + if (_p12._1.ctor === '::') { + var _p14 = _p12._1._0; + var _p13 = _p12._0; + if (_elm_lang$core$Native_Utils.cmp( + interval, + A2(middleOfNext, _p13, _p14)) < 1) { + return _p13; + } else { + var _v11 = {ctor: '::', _0: _p14, _1: _p12._1._1}, + _v12 = _p13; + units = _v11; + u0 = _v12; + continue findBest_; + } + } else { + return _p12._0; + } + } else { + return _terezka$line_charts$LineChart_Axis_Tick$Year; + } + } + }); + return A2(findBest_, units, _terezka$line_charts$LineChart_Axis_Tick$Year); + }); +var _terezka$line_charts$Internal_Axis_Values_Time$values = F2( + function (amountRough, range) { + var intervalRough = (range.max - range.min) / _elm_lang$core$Basics$toFloat(amountRough); + var unit = A2(_terezka$line_charts$Internal_Axis_Values_Time$findBestUnit, intervalRough, _terezka$line_charts$Internal_Axis_Values_Time$all); + var multiple = A2(_terezka$line_charts$Internal_Axis_Values_Time$findBestMultiple, intervalRough, unit); + var interval = _terezka$line_charts$Internal_Axis_Values_Time$toMs(unit) * _elm_lang$core$Basics$toFloat(multiple); + var beginning = A3(_terezka$line_charts$Internal_Axis_Values_Time$beginAt, range.min, unit, multiple); + var toPositions = F2( + function (acc, i) { + toPositions: + while (true) { + var next_ = A3(_terezka$line_charts$Internal_Axis_Values_Time$next, beginning, unit, i * multiple); + if (_elm_lang$core$Native_Utils.cmp(next_, range.max) > 0) { + return acc; + } else { + var _v13 = A2( + _elm_lang$core$Basics_ops['++'], + acc, + { + ctor: '::', + _0: next_, + _1: {ctor: '[]'} + }), + _v14 = i + 1; + acc = _v13; + i = _v14; + continue toPositions; + } + } + }); + var toTime = F3( + function (unitChange, value, isFirst) { + return { + change: unitChange, + interval: A2(_terezka$line_charts$LineChart_Axis_Tick$Interval, unit, multiple), + timestamp: value, + isFirst: isFirst + }; + }); + var toTimes = F3( + function (values, unitChange, acc) { + toTimes: + while (true) { + var _p15 = values; + if (_p15.ctor === '::') { + if (_p15._1.ctor === '::') { + var _p17 = _p15._0; + var _p16 = _p15._1._0; + var newUnitChange = A3(_terezka$line_charts$Internal_Axis_Values_Time$getUnitChange, unit, _p17, _p16); + var isFirst = _elm_lang$core$List$isEmpty(acc); + var newAcc = { + ctor: '::', + _0: A3(toTime, unitChange, _p17, isFirst), + _1: acc + }; + var _v16 = {ctor: '::', _0: _p16, _1: _p15._1._1}, + _v17 = newUnitChange, + _v18 = newAcc; + values = _v16; + unitChange = _v17; + acc = _v18; + continue toTimes; + } else { + return { + ctor: '::', + _0: A3( + toTime, + unitChange, + _p15._0, + _elm_lang$core$List$isEmpty(acc)), + _1: acc + }; + } + } else { + return acc; + } + } + }); + return A3( + toTimes, + A2( + toPositions, + {ctor: '[]'}, + 0), + _elm_lang$core$Maybe$Nothing, + {ctor: '[]'}); + }); + +var _terezka$line_charts$Internal_Axis_Values$ceilingTo = F2( + function (prec, number) { + return prec * _elm_lang$core$Basics$toFloat( + _elm_lang$core$Basics$ceiling(number / prec)); + }); +var _terezka$line_charts$Internal_Axis_Values$getPrecision = function (number) { + var _p0 = A2( + _elm_lang$core$String$split, + 'e', + _elm_lang$core$Basics$toString(number)); + if (((_p0.ctor === '::') && (_p0._1.ctor === '::')) && (_p0._1._1.ctor === '[]')) { + return _elm_lang$core$Basics$abs( + A2( + _elm_lang$core$Result$withDefault, + 0, + _elm_lang$core$String$toInt(_p0._1._0))); + } else { + var _p1 = A2( + _elm_lang$core$String$split, + '.', + _elm_lang$core$Basics$toString(number)); + if (((_p1.ctor === '::') && (_p1._1.ctor === '::')) && (_p1._1._1.ctor === '[]')) { + return _elm_lang$core$String$length(_p1._1._0); + } else { + return 0; + } + } +}; +var _terezka$line_charts$Internal_Axis_Values$correctFloat = function (prec) { + return function (_p2) { + return A2( + _elm_lang$core$Result$withDefault, + 0, + _elm_lang$core$String$toFloat( + A2(_myrho$elm_round$Round$round, prec, _p2))); + }; +}; +var _terezka$line_charts$Internal_Axis_Values$getMultiples = F3( + function (magnitude, allowDecimals, hasTickAmount) { + var defaults = hasTickAmount ? { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 1.2, + _1: { + ctor: '::', + _0: 1.5, + _1: { + ctor: '::', + _0: 2, + _1: { + ctor: '::', + _0: 2.5, + _1: { + ctor: '::', + _0: 3, + _1: { + ctor: '::', + _0: 4, + _1: { + ctor: '::', + _0: 5, + _1: { + ctor: '::', + _0: 6, + _1: { + ctor: '::', + _0: 8, + _1: { + ctor: '::', + _0: 10, + _1: {ctor: '[]'} + } + } + } + } + } + } + } + } + } + } + } : { + ctor: '::', + _0: 1, + _1: { + ctor: '::', + _0: 2, + _1: { + ctor: '::', + _0: 2.5, + _1: { + ctor: '::', + _0: 5, + _1: { + ctor: '::', + _0: 10, + _1: {ctor: '[]'} + } + } + } + } + }; + return allowDecimals ? defaults : (_elm_lang$core$Native_Utils.eq(magnitude, 1) ? A2( + _elm_lang$core$List$filter, + function (n) { + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Basics$toFloat( + _elm_lang$core$Basics$round(n)), + n); + }, + defaults) : ((_elm_lang$core$Native_Utils.cmp(magnitude, 0.1) < 1) ? { + ctor: '::', + _0: 1 / magnitude, + _1: {ctor: '[]'} + } : defaults)); + }); +var _terezka$line_charts$Internal_Axis_Values$getInterval = F3( + function (intervalRaw, allowDecimals, hasTickAmount) { + var magnitude = _terezka$line_charts$Internal_Utils$magnitude(intervalRaw); + var normalized = intervalRaw / magnitude; + var findMultiple = function (multiples) { + findMultiple: + while (true) { + var _p3 = multiples; + if (_p3.ctor === '::') { + if (_p3._1.ctor === '::') { + var _p5 = _p3._1._0; + var _p4 = _p3._0; + if (_elm_lang$core$Native_Utils.cmp(normalized, (_p4 + _p5) / 2) < 1) { + return _p4; + } else { + var _v3 = {ctor: '::', _0: _p5, _1: _p3._1._1}; + multiples = _v3; + continue findMultiple; + } + } else { + var _p6 = _p3._0; + if (_elm_lang$core$Native_Utils.cmp(normalized, _p6) < 1) { + return _p6; + } else { + var _v4 = _p3._1; + multiples = _v4; + continue findMultiple; + } + } + } else { + return 1; + } + } + }; + var multiples = A3(_terezka$line_charts$Internal_Axis_Values$getMultiples, magnitude, allowDecimals, hasTickAmount); + var findMultipleExact = function (multiples) { + findMultipleExact: + while (true) { + var _p7 = multiples; + if (_p7.ctor === '::') { + var _p8 = _p7._0; + if (_elm_lang$core$Native_Utils.cmp(_p8 * magnitude, intervalRaw) > -1) { + return _p8; + } else { + var _v6 = _p7._1; + multiples = _v6; + continue findMultipleExact; + } + } else { + return 1; + } + } + }; + var multiple = hasTickAmount ? findMultipleExact(multiples) : findMultiple(multiples); + var precision = _terezka$line_charts$Internal_Axis_Values$getPrecision(magnitude) + _terezka$line_charts$Internal_Axis_Values$getPrecision(multiple); + return A2(_terezka$line_charts$Internal_Axis_Values$correctFloat, precision, multiple * magnitude); + }); +var _terezka$line_charts$Internal_Axis_Values$positions = F5( + function (range, beginning, interval, m, acc) { + positions: + while (true) { + var next = A2( + _terezka$line_charts$Internal_Axis_Values$correctFloat, + _terezka$line_charts$Internal_Axis_Values$getPrecision(interval), + beginning + (m * interval)); + if (_elm_lang$core$Native_Utils.cmp(next, range.max) > 0) { + return acc; + } else { + var _v7 = range, + _v8 = beginning, + _v9 = interval, + _v10 = m + 1, + _v11 = A2( + _elm_lang$core$Basics_ops['++'], + acc, + { + ctor: '::', + _0: next, + _1: {ctor: '[]'} + }); + range = _v7; + beginning = _v8; + interval = _v9; + m = _v10; + acc = _v11; + continue positions; + } + } + }); +var _terezka$line_charts$Internal_Axis_Values$getBeginning = F2( + function (min, interval) { + var multiple = min / interval; + return _elm_lang$core$Native_Utils.eq( + multiple, + _elm_lang$core$Basics$toFloat( + _elm_lang$core$Basics$round(multiple))) ? min : A2(_terezka$line_charts$Internal_Axis_Values$ceilingTo, interval, min); + }); +var _terezka$line_charts$Internal_Axis_Values$values = F4( + function (allowDecimals, exact, amountRough, range) { + var intervalRough = (range.max - range.min) / _elm_lang$core$Basics$toFloat(amountRough); + var interval = A3(_terezka$line_charts$Internal_Axis_Values$getInterval, intervalRough, allowDecimals, exact); + var intervalSafe = _elm_lang$core$Native_Utils.eq(interval, 0) ? 1 : interval; + var beginning = A2(_terezka$line_charts$Internal_Axis_Values$getBeginning, range.min, intervalSafe); + var amountRoughSafe = _elm_lang$core$Native_Utils.eq(amountRough, 0) ? 1 : amountRough; + return A5( + _terezka$line_charts$Internal_Axis_Values$positions, + range, + beginning, + intervalSafe, + 0, + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Axis_Values$time = _terezka$line_charts$Internal_Axis_Values_Time$values; +var _terezka$line_charts$Internal_Axis_Values$custom = F3( + function (intersection, interval, range) { + var offset = function (value) { + return interval * _elm_lang$core$Basics$toFloat( + _elm_lang$core$Basics$floor(value / interval)); + }; + var beginning = intersection - offset(intersection - range.min); + return A5( + _terezka$line_charts$Internal_Axis_Values$positions, + range, + beginning, + interval, + 0, + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Axis_Values$float = function (amount) { + var _p9 = amount; + if (_p9.ctor === 'Exactly') { + return A3(_terezka$line_charts$Internal_Axis_Values$values, true, true, _p9._0); + } else { + return A3(_terezka$line_charts$Internal_Axis_Values$values, true, false, _p9._0); + } +}; +var _terezka$line_charts$Internal_Axis_Values$int = function (amount) { + var _p10 = amount; + if (_p10.ctor === 'Exactly') { + return function (_p11) { + return A2( + _elm_lang$core$List$map, + _elm_lang$core$Basics$round, + A4(_terezka$line_charts$Internal_Axis_Values$values, false, true, _p10._0, _p11)); + }; + } else { + return function (_p12) { + return A2( + _elm_lang$core$List$map, + _elm_lang$core$Basics$round, + A4(_terezka$line_charts$Internal_Axis_Values$values, false, false, _p10._0, _p12)); + }; + } +}; +var _terezka$line_charts$Internal_Axis_Values$Around = function (a) { + return {ctor: 'Around', _0: a}; +}; +var _terezka$line_charts$Internal_Axis_Values$around = _terezka$line_charts$Internal_Axis_Values$Around; +var _terezka$line_charts$Internal_Axis_Values$Exactly = function (a) { + return {ctor: 'Exactly', _0: a}; +}; +var _terezka$line_charts$Internal_Axis_Values$exactly = _terezka$line_charts$Internal_Axis_Values$Exactly; + +var _terezka$line_charts$Internal_Axis_Ticks$ticks = F3( + function (dataRange, range, _p0) { + var _p1 = _p0; + return A2( + _elm_lang$core$List$map, + _terezka$line_charts$Internal_Axis_Tick$properties, + A2(_p1._0, dataRange, range)); + }); +var _terezka$line_charts$Internal_Axis_Ticks$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Axis_Ticks$custom = _terezka$line_charts$Internal_Axis_Ticks$Config; +var _terezka$line_charts$Internal_Axis_Ticks$intCustom = F2( + function (amount, tick) { + return _terezka$line_charts$Internal_Axis_Ticks$custom( + F2( + function (data, range) { + return A2( + _elm_lang$core$List$map, + tick, + A2( + _terezka$line_charts$Internal_Axis_Values$int, + _terezka$line_charts$Internal_Axis_Values$around(amount), + A2(_terezka$line_charts$Internal_Coordinate$smallestRange, data, range))); + })); + }); +var _terezka$line_charts$Internal_Axis_Ticks$int = function (amount) { + return A2(_terezka$line_charts$Internal_Axis_Ticks$intCustom, amount, _terezka$line_charts$LineChart_Axis_Tick$int); +}; +var _terezka$line_charts$Internal_Axis_Ticks$floatCustom = F2( + function (amount, tick) { + return _terezka$line_charts$Internal_Axis_Ticks$custom( + F2( + function (data, range) { + return A2( + _elm_lang$core$List$map, + tick, + A2( + _terezka$line_charts$Internal_Axis_Values$float, + _terezka$line_charts$Internal_Axis_Values$around(amount), + A2(_terezka$line_charts$Internal_Coordinate$smallestRange, data, range))); + })); + }); +var _terezka$line_charts$Internal_Axis_Ticks$float = function (amount) { + return A2(_terezka$line_charts$Internal_Axis_Ticks$floatCustom, amount, _terezka$line_charts$LineChart_Axis_Tick$float); +}; +var _terezka$line_charts$Internal_Axis_Ticks$timeCustom = F2( + function (amount, tick) { + return _terezka$line_charts$Internal_Axis_Ticks$custom( + F2( + function (data, range) { + return A2( + _elm_lang$core$List$map, + tick, + A2( + _terezka$line_charts$Internal_Axis_Values$time, + amount, + A2(_terezka$line_charts$Internal_Coordinate$smallestRange, data, range))); + })); + }); +var _terezka$line_charts$Internal_Axis_Ticks$time = function (amount) { + return A2(_terezka$line_charts$Internal_Axis_Ticks$timeCustom, amount, _terezka$line_charts$LineChart_Axis_Tick$time); +}; + +var _terezka$line_charts$Internal_Axis_Line$config = function (_p0) { + var _p1 = _p0; + return _p1._0; +}; +var _terezka$line_charts$Internal_Axis_Line$Properties = F5( + function (a, b, c, d, e) { + return {color: a, width: b, events: c, start: d, end: e}; + }); +var _terezka$line_charts$Internal_Axis_Line$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Axis_Line$custom = _terezka$line_charts$Internal_Axis_Line$Config; +var _terezka$line_charts$Internal_Axis_Line$none = _terezka$line_charts$Internal_Axis_Line$custom( + F2( + function (_p3, _p2) { + var _p4 = _p2; + return { + color: _terezka$line_charts$LineChart_Colors$transparent, + width: 0, + events: {ctor: '[]'}, + start: _p4.min, + end: _p4.max + }; + })); +var _terezka$line_charts$Internal_Axis_Line$full = function (color) { + return _terezka$line_charts$Internal_Axis_Line$custom( + F2( + function (data, range) { + return { + color: color, + width: 1, + events: {ctor: '[]'}, + start: range.min, + end: range.max + }; + })); +}; +var _terezka$line_charts$Internal_Axis_Line$default = _terezka$line_charts$Internal_Axis_Line$full(_terezka$line_charts$LineChart_Colors$gray); +var _terezka$line_charts$Internal_Axis_Line$rangeFrame = function (color) { + return _terezka$line_charts$Internal_Axis_Line$custom( + F2( + function (data, range) { + var smallest = A2(_terezka$line_charts$Internal_Coordinate$smallestRange, data, range); + return { + color: color, + width: 1, + events: {ctor: '[]'}, + start: smallest.min, + end: smallest.max + }; + })); +}; + +var _terezka$line_charts$Internal_Axis_Intersection$getY = function (_p0) { + var _p1 = _p0; + return function (_p2) { + return function (_) { + return _.y; + }( + _p1._0(_p2)); + }; +}; +var _terezka$line_charts$Internal_Axis_Intersection$getX = function (_p3) { + var _p4 = _p3; + return function (_p5) { + return function (_) { + return _.x; + }( + _p4._0(_p5)); + }; +}; +var _terezka$line_charts$Internal_Axis_Intersection$towardsZero = function (_p6) { + var _p7 = _p6; + return A3(_elm_lang$core$Basics$clamp, _p7.min, _p7.max, 0); +}; +var _terezka$line_charts$Internal_Axis_Intersection$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Axis_Intersection$custom = F2( + function (toX, toY) { + return _terezka$line_charts$Internal_Axis_Intersection$Config( + function (_p8) { + var _p9 = _p8; + return A2( + _terezka$line_charts$Internal_Data$Point, + toX(_p9.x), + toY(_p9.y)); + }); + }); +var _terezka$line_charts$Internal_Axis_Intersection$default = A2( + _terezka$line_charts$Internal_Axis_Intersection$custom, + function (_) { + return _.min; + }, + function (_) { + return _.min; + }); +var _terezka$line_charts$Internal_Axis_Intersection$atOrigin = A2(_terezka$line_charts$Internal_Axis_Intersection$custom, _terezka$line_charts$Internal_Axis_Intersection$towardsZero, _terezka$line_charts$Internal_Axis_Intersection$towardsZero); +var _terezka$line_charts$Internal_Axis_Intersection$at = F2( + function (x, y) { + return A2( + _terezka$line_charts$Internal_Axis_Intersection$custom, + _elm_lang$core$Basics$always(x), + _elm_lang$core$Basics$always(y)); + }); + +var _terezka$line_charts$Internal_Axis_Title$config = function (_p0) { + var _p1 = _p0; + return _p1._0; +}; +var _terezka$line_charts$Internal_Axis_Title$Properties = F3( + function (a, b, c) { + return {view: a, position: b, offset: c}; + }); +var _terezka$line_charts$Internal_Axis_Title$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Axis_Title$custom = F4( + function (position, x, y, title) { + return _terezka$line_charts$Internal_Axis_Title$Config( + { + view: title, + position: position, + offset: {ctor: '_Tuple2', _0: x, _1: y} + }); + }); +var _terezka$line_charts$Internal_Axis_Title$atPosition = F3( + function (position, x, y) { + return function (_p2) { + return A4( + _terezka$line_charts$Internal_Axis_Title$custom, + position, + x, + y, + A2(_terezka$line_charts$Internal_Svg$label, 'inherit', _p2)); + }; + }); +var _terezka$line_charts$Internal_Axis_Title$atAxisMax = function () { + var position = F2( + function (data, range) { + return range.max; + }); + return _terezka$line_charts$Internal_Axis_Title$atPosition(position); +}(); +var _terezka$line_charts$Internal_Axis_Title$default = A2(_terezka$line_charts$Internal_Axis_Title$atAxisMax, 0, 0); +var _terezka$line_charts$Internal_Axis_Title$atDataMax = function () { + var position = F2( + function (data, range) { + return A2(_elm_lang$core$Basics$min, data.max, range.max); + }); + return _terezka$line_charts$Internal_Axis_Title$atPosition(position); +}(); + +var _terezka$line_charts$Internal_Axis$viewVerticalLabel = F4( + function (system, _p0, position, view) { + var _p1 = _p0; + var _p3 = _p1.length; + var _p2 = _p1.direction; + var xOffset = _terezka$line_charts$Internal_Axis_Tick$isPositive(_p2) ? (5 + _p3) : (-5 - _p3); + var anchor = _terezka$line_charts$Internal_Axis_Tick$isPositive(_p2) ? _terezka$line_charts$Internal_Svg$Start : _terezka$line_charts$Internal_Svg$End; + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$transform( + { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Svg$move, system, position.x, position.y), + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Svg$offset, xOffset, 5), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$anchorStyle(anchor), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: view, + _1: {ctor: '[]'} + }); + }); +var _terezka$line_charts$Internal_Axis$viewHorizontalLabel = F4( + function (system, _p4, position, view) { + var _p5 = _p4; + var _p6 = _p5.length; + var yOffset = _terezka$line_charts$Internal_Axis_Tick$isPositive(_p5.direction) ? (-5 - _p6) : (15 + _p6); + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$transform( + { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Svg$move, system, position.x, position.y), + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Svg$offset, 0, yOffset), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$anchorStyle(_terezka$line_charts$Internal_Svg$Middle), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: view, + _1: {ctor: '[]'} + }); + }); +var _terezka$line_charts$Internal_Axis$attributesTick = function (_p7) { + var _p8 = _p7; + return { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeWidth( + _elm_lang$core$Basics$toString(_p8.width)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_p8.color)), + _1: {ctor: '[]'} + } + }; +}; +var _terezka$line_charts$Internal_Axis$lengthOfTick = function (_p9) { + var _p10 = _p9; + var _p11 = _p10.length; + return _terezka$line_charts$Internal_Axis_Tick$isPositive(_p10.direction) ? (0 - _p11) : _p11; +}; +var _terezka$line_charts$Internal_Axis$viewVerticalTick = F3( + function (system, _p12, tick) { + var _p13 = _p12; + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__tick'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A5( + _terezka$line_charts$Internal_Svg$yTick, + system, + _terezka$line_charts$Internal_Axis$lengthOfTick(tick), + _terezka$line_charts$Internal_Axis$attributesTick(tick), + _p13.x, + _p13.y), + _1: { + ctor: '::', + _0: A2( + _terezka$line_charts$Internal_Utils$viewMaybe, + tick.label, + A3(_terezka$line_charts$Internal_Axis$viewVerticalLabel, system, tick, _p13)), + _1: {ctor: '[]'} + } + }); + }); +var _terezka$line_charts$Internal_Axis$viewHorizontalTick = F3( + function (system, _p14, tick) { + var _p15 = _p14; + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__tick'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A5( + _terezka$line_charts$Internal_Svg$xTick, + system, + _terezka$line_charts$Internal_Axis$lengthOfTick(tick), + _terezka$line_charts$Internal_Axis$attributesTick(tick), + _p15.y, + _p15.x), + _1: { + ctor: '::', + _0: A2( + _terezka$line_charts$Internal_Utils$viewMaybe, + tick.label, + A3(_terezka$line_charts$Internal_Axis$viewHorizontalLabel, system, tick, _p15)), + _1: {ctor: '[]'} + } + }); + }); +var _terezka$line_charts$Internal_Axis$attributesLine = F2( + function (system, _p16) { + var _p17 = _p16; + return A2( + _elm_lang$core$Basics_ops['++'], + _p17.events, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeWidth( + _elm_lang$core$Basics$toString(_p17.width)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(_p17.color)), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$withinChartArea(system), + _1: {ctor: '[]'} + } + } + }); + }); +var _terezka$line_charts$Internal_Axis$viewVerticalAxisLine = F3( + function (system, axisPosition, config) { + return A5( + _terezka$line_charts$Internal_Svg$vertical, + system, + A2(_terezka$line_charts$Internal_Axis$attributesLine, system, config), + axisPosition, + config.start, + config.end); + }); +var _terezka$line_charts$Internal_Axis$viewHorizontalAxisLine = F3( + function (system, axisPosition, config) { + return A5( + _terezka$line_charts$Internal_Svg$horizontal, + system, + A2(_terezka$line_charts$Internal_Axis$attributesLine, system, config), + axisPosition, + config.start, + config.end); + }); +var _terezka$line_charts$Internal_Axis$viewVerticalTitle = F3( + function (system, at, _p18) { + var _p19 = _p18; + var _p21 = _p19.title; + var _p20 = _p21.offset; + var xOffset = _p20._0; + var yOffset = _p20._1; + var position = at( + A2(_p21.position, system.yData, system.y)); + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__title'), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$transform( + { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Svg$move, system, position.x, position.y), + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Svg$offset, xOffset + 2, yOffset - 10), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$anchorStyle(_terezka$line_charts$Internal_Svg$End), + _1: {ctor: '[]'} + } + } + }, + { + ctor: '::', + _0: _p21.view, + _1: {ctor: '[]'} + }); + }); +var _terezka$line_charts$Internal_Axis$viewHorizontalTitle = F3( + function (system, at, _p22) { + var _p23 = _p22; + var _p25 = _p23.title; + var _p24 = _p25.offset; + var xOffset = _p24._0; + var yOffset = _p24._1; + var position = at( + A2(_p25.position, system.xData, system.x)); + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__title'), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$transform( + { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Svg$move, system, position.x, position.y), + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Svg$offset, xOffset + 15, yOffset + 5), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$anchorStyle(_terezka$line_charts$Internal_Svg$Start), + _1: {ctor: '[]'} + } + } + }, + { + ctor: '::', + _0: _p25.view, + _1: {ctor: '[]'} + }); + }); +var _terezka$line_charts$Internal_Axis$viewVertical = F3( + function (system, intersection, _p26) { + var _p27 = _p26; + var _p28 = _p27._0; + var viewConfig = { + line: A3(_terezka$line_charts$Internal_Axis_Line$config, _p28.axisLine, system.yData, system.y), + ticks: A3(_terezka$line_charts$Internal_Axis_Ticks$ticks, system.yData, system.y, _p28.ticks), + intersection: A2(_terezka$line_charts$Internal_Axis_Intersection$getX, intersection, system), + title: _terezka$line_charts$Internal_Axis_Title$config(_p28.title) + }; + var at = function (y) { + return {x: viewConfig.intersection, y: y}; + }; + var viewTick = function (tick) { + return A3( + _terezka$line_charts$Internal_Axis$viewVerticalTick, + system, + at(tick.position), + tick); + }; + var viewAxisLine = A2(_terezka$line_charts$Internal_Axis$viewVerticalAxisLine, system, viewConfig.intersection); + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__axis--vertical'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Axis$viewVerticalTitle, system, at, viewConfig), + _1: { + ctor: '::', + _0: viewAxisLine(viewConfig.line), + _1: { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__ticks'), + _1: {ctor: '[]'} + }, + A2(_elm_lang$core$List$map, viewTick, viewConfig.ticks)), + _1: {ctor: '[]'} + } + } + }); + }); +var _terezka$line_charts$Internal_Axis$viewHorizontal = F3( + function (system, intersection, _p29) { + var _p30 = _p29; + var _p31 = _p30._0; + var viewConfig = { + line: A3(_terezka$line_charts$Internal_Axis_Line$config, _p31.axisLine, system.xData, system.x), + ticks: A3(_terezka$line_charts$Internal_Axis_Ticks$ticks, system.xData, system.x, _p31.ticks), + intersection: A2(_terezka$line_charts$Internal_Axis_Intersection$getY, intersection, system), + title: _terezka$line_charts$Internal_Axis_Title$config(_p31.title) + }; + var at = function (x) { + return {x: x, y: viewConfig.intersection}; + }; + var viewTick = function (tick) { + return A3( + _terezka$line_charts$Internal_Axis$viewHorizontalTick, + system, + at(tick.position), + tick); + }; + var viewAxisLine = A2(_terezka$line_charts$Internal_Axis$viewHorizontalAxisLine, system, viewConfig.intersection); + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__axis--horizontal'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Axis$viewHorizontalTitle, system, at, viewConfig), + _1: { + ctor: '::', + _0: viewAxisLine(viewConfig.line), + _1: { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__ticks'), + _1: {ctor: '[]'} + }, + A2(_elm_lang$core$List$map, viewTick, viewConfig.ticks)), + _1: {ctor: '[]'} + } + } + }); + }); +var _terezka$line_charts$Internal_Axis$ticks = function (_p32) { + var _p33 = _p32; + return _p33._0.ticks; +}; +var _terezka$line_charts$Internal_Axis$range = function (_p34) { + var _p35 = _p34; + return _p35._0.range; +}; +var _terezka$line_charts$Internal_Axis$pixels = function (_p36) { + var _p37 = _p36; + return _elm_lang$core$Basics$toFloat(_p37._0.pixels); +}; +var _terezka$line_charts$Internal_Axis$variable = function (_p38) { + var _p39 = _p38; + return _p39._0.variable; +}; +var _terezka$line_charts$Internal_Axis$Properties = F6( + function (a, b, c, d, e, f) { + return {title: a, variable: b, pixels: c, range: d, axisLine: e, ticks: f}; + }); +var _terezka$line_charts$Internal_Axis$ViewConfig = F4( + function (a, b, c, d) { + return {line: a, ticks: b, intersection: c, title: d}; + }); +var _terezka$line_charts$Internal_Axis$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Axis$custom = _terezka$line_charts$Internal_Axis$Config; +var _terezka$line_charts$Internal_Axis$default = F3( + function (pixels, title, variable) { + return _terezka$line_charts$Internal_Axis$custom( + { + title: A3(_terezka$line_charts$Internal_Axis_Title$atDataMax, 0, 0, title), + variable: function (_p40) { + return _elm_lang$core$Maybe$Just( + variable(_p40)); + }, + pixels: pixels, + range: A2(_terezka$line_charts$Internal_Axis_Range$padded, 20, 20), + axisLine: _terezka$line_charts$Internal_Axis_Line$rangeFrame(_terezka$line_charts$LineChart_Colors$gray), + ticks: _terezka$line_charts$Internal_Axis_Ticks$custom( + F2( + function (data, range) { + var rangeLong = range.max - range.min; + var smallest = A2(_terezka$line_charts$Internal_Coordinate$smallestRange, data, range); + var rangeSmall = smallest.max - smallest.min; + var diff = 1 - ((rangeLong - rangeSmall) / rangeLong); + var amount = _elm_lang$core$Basics$round( + (diff * _elm_lang$core$Basics$toFloat(pixels)) / 90); + return A2( + _elm_lang$core$List$map, + _terezka$line_charts$LineChart_Axis_Tick$float, + A2( + _terezka$line_charts$Internal_Axis_Values$float, + _terezka$line_charts$Internal_Axis_Values$around(amount), + smallest)); + })) + }); + }); +var _terezka$line_charts$Internal_Axis$full = F3( + function (pixels, title, variable) { + return _terezka$line_charts$Internal_Axis$custom( + { + title: A3(_terezka$line_charts$Internal_Axis_Title$atAxisMax, 0, 0, title), + variable: function (_p41) { + return _elm_lang$core$Maybe$Just( + variable(_p41)); + }, + pixels: pixels, + range: A2(_terezka$line_charts$Internal_Axis_Range$padded, 20, 20), + axisLine: _terezka$line_charts$Internal_Axis_Line$default, + ticks: _terezka$line_charts$Internal_Axis_Ticks$custom( + F2( + function (data, range) { + var amount = (pixels / 90) | 0; + var largest = A2(_terezka$line_charts$Internal_Coordinate$largestRange, data, range); + return A2( + _elm_lang$core$List$map, + _terezka$line_charts$LineChart_Axis_Tick$float, + A2( + _terezka$line_charts$Internal_Axis_Values$float, + _terezka$line_charts$Internal_Axis_Values$around(amount), + largest)); + })) + }); + }); +var _terezka$line_charts$Internal_Axis$time = F3( + function (pixels, title, variable) { + return _terezka$line_charts$Internal_Axis$custom( + { + title: A3(_terezka$line_charts$Internal_Axis_Title$atDataMax, 0, 0, title), + variable: function (_p42) { + return _elm_lang$core$Maybe$Just( + variable(_p42)); + }, + pixels: pixels, + range: A2(_terezka$line_charts$Internal_Axis_Range$padded, 20, 20), + axisLine: _terezka$line_charts$Internal_Axis_Line$rangeFrame(_terezka$line_charts$LineChart_Colors$gray), + ticks: _terezka$line_charts$Internal_Axis_Ticks$custom( + F2( + function (data, range) { + var rangeLong = range.max - range.min; + var smallest = A2(_terezka$line_charts$Internal_Coordinate$smallestRange, data, range); + var rangeSmall = smallest.max - smallest.min; + var diff = 1 - ((rangeLong - rangeSmall) / rangeLong); + var amount = _elm_lang$core$Basics$round( + (diff * _elm_lang$core$Basics$toFloat(pixels)) / 90); + return A2( + _elm_lang$core$List$map, + _terezka$line_charts$LineChart_Axis_Tick$time, + A2(_terezka$line_charts$Internal_Axis_Values$time, amount, smallest)); + })) + }); + }); +var _terezka$line_charts$Internal_Axis$none = F2( + function (pixels, variable) { + return _terezka$line_charts$Internal_Axis$custom( + { + title: _terezka$line_charts$Internal_Axis_Title$default(''), + variable: function (_p43) { + return _elm_lang$core$Maybe$Just( + variable(_p43)); + }, + pixels: pixels, + range: A2(_terezka$line_charts$Internal_Axis_Range$padded, 20, 20), + axisLine: _terezka$line_charts$Internal_Axis_Line$none, + ticks: _terezka$line_charts$Internal_Axis_Ticks$custom( + F2( + function (_p45, _p44) { + return {ctor: '[]'}; + })) + }); + }); +var _terezka$line_charts$Internal_Axis$picky = F4( + function (pixels, title, variable, ticks) { + return _terezka$line_charts$Internal_Axis$custom( + { + title: A3(_terezka$line_charts$Internal_Axis_Title$atAxisMax, 0, 0, title), + variable: function (_p46) { + return _elm_lang$core$Maybe$Just( + variable(_p46)); + }, + pixels: pixels, + range: A2(_terezka$line_charts$Internal_Axis_Range$padded, 20, 20), + axisLine: _terezka$line_charts$Internal_Axis_Line$default, + ticks: _terezka$line_charts$Internal_Axis_Ticks$custom( + F2( + function (_p48, _p47) { + return A2(_elm_lang$core$List$map, _terezka$line_charts$LineChart_Axis_Tick$float, ticks); + })) + }); + }); + +var _terezka$line_charts$LineChart_Axis_Range$custom = _terezka$line_charts$Internal_Axis_Range$custom; +var _terezka$line_charts$LineChart_Axis_Range$window = _terezka$line_charts$Internal_Axis_Range$window; +var _terezka$line_charts$LineChart_Axis_Range$padded = _terezka$line_charts$Internal_Axis_Range$padded; +var _terezka$line_charts$LineChart_Axis_Range$default = _terezka$line_charts$Internal_Axis_Range$default; + +var _terezka$line_charts$LineChart_Axis_Line$custom = _terezka$line_charts$Internal_Axis_Line$custom; +var _terezka$line_charts$LineChart_Axis_Line$none = _terezka$line_charts$Internal_Axis_Line$none; +var _terezka$line_charts$LineChart_Axis_Line$rangeFrame = _terezka$line_charts$Internal_Axis_Line$rangeFrame; +var _terezka$line_charts$LineChart_Axis_Line$full = _terezka$line_charts$Internal_Axis_Line$full; +var _terezka$line_charts$LineChart_Axis_Line$default = _terezka$line_charts$Internal_Axis_Line$default; +var _terezka$line_charts$LineChart_Axis_Line$Properties = F5( + function (a, b, c, d, e) { + return {color: a, width: b, events: c, start: d, end: e}; + }); + +var _terezka$line_charts$LineChart_Axis_Ticks$custom = _terezka$line_charts$Internal_Axis_Ticks$custom; +var _terezka$line_charts$LineChart_Axis_Ticks$timeCustom = _terezka$line_charts$Internal_Axis_Ticks$timeCustom; +var _terezka$line_charts$LineChart_Axis_Ticks$floatCustom = _terezka$line_charts$Internal_Axis_Ticks$floatCustom; +var _terezka$line_charts$LineChart_Axis_Ticks$intCustom = _terezka$line_charts$Internal_Axis_Ticks$intCustom; +var _terezka$line_charts$LineChart_Axis_Ticks$float = _terezka$line_charts$Internal_Axis_Ticks$float; +var _terezka$line_charts$LineChart_Axis_Ticks$time = _terezka$line_charts$Internal_Axis_Ticks$time; +var _terezka$line_charts$LineChart_Axis_Ticks$int = _terezka$line_charts$Internal_Axis_Ticks$int; +var _terezka$line_charts$LineChart_Axis_Ticks$default = _terezka$line_charts$Internal_Axis_Ticks$float(5); + +var _terezka$line_charts$LineChart_Axis$custom = _terezka$line_charts$Internal_Axis$custom; +var _terezka$line_charts$LineChart_Axis$none = _terezka$line_charts$Internal_Axis$none; +var _terezka$line_charts$LineChart_Axis$picky = _terezka$line_charts$Internal_Axis$picky; +var _terezka$line_charts$LineChart_Axis$time = _terezka$line_charts$Internal_Axis$time; +var _terezka$line_charts$LineChart_Axis$full = _terezka$line_charts$Internal_Axis$full; +var _terezka$line_charts$LineChart_Axis$default = _terezka$line_charts$Internal_Axis$default; +var _terezka$line_charts$LineChart_Axis$Properties = F6( + function (a, b, c, d, e, f) { + return {title: a, variable: b, pixels: c, range: d, axisLine: e, ticks: f}; + }); + +var _terezka$line_charts$Internal_Dots$varietyAttributes = F2( + function (color, variety) { + var _p0 = variety; + switch (_p0.ctor) { + case 'Empty': + return { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeWidth( + _elm_lang$core$Basics$toString(_p0._0)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill('white'), + _1: {ctor: '[]'} + } + } + }; + case 'Aura': + return { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeWidth( + _elm_lang$core$Basics$toString(_p0._0)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeOpacity( + _elm_lang$core$Basics$toString(_p0._1)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color)), + _1: {ctor: '[]'} + } + } + } + }; + case 'Disconnected': + return { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke('white'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeWidth( + _elm_lang$core$Basics$toString(_p0._0)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color)), + _1: {ctor: '[]'} + } + } + }; + default: + return { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color)), + _1: {ctor: '[]'} + }; + } + }); +var _terezka$line_charts$Internal_Dots$pathPlus = F2( + function (area, point) { + var side = _elm_lang$core$Basics$sqrt(area / 5); + var r3 = side; + var r6 = side / 2; + var commands = { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'M', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(point.x - r6), + A2( + _elm_lang$core$Basics_ops['++'], + ' ', + _elm_lang$core$Basics$toString((point.y - r3) - r6)))), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'v', + _elm_lang$core$Basics$toString(r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'h', + _elm_lang$core$Basics$toString(0 - r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'v', + _elm_lang$core$Basics$toString(r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'h', + _elm_lang$core$Basics$toString(r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'v', + _elm_lang$core$Basics$toString(r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'h', + _elm_lang$core$Basics$toString(r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'v', + _elm_lang$core$Basics$toString(0 - r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'h', + _elm_lang$core$Basics$toString(r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'v', + _elm_lang$core$Basics$toString(0 - r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'h', + _elm_lang$core$Basics$toString(0 - r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'v', + _elm_lang$core$Basics$toString(0 - r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'h', + _elm_lang$core$Basics$toString(0 - r3)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'v', + _elm_lang$core$Basics$toString(r3)), + _1: {ctor: '[]'} + } + } + } + } + } + } + } + } + } + } + } + } + } + }; + return A2(_elm_lang$core$String$join, ' ', commands); + }); +var _terezka$line_charts$Internal_Dots$pathTriangle = F2( + function (area, point) { + var side = _elm_lang$core$Basics$sqrt( + (area * 4) / _elm_lang$core$Basics$sqrt(3)); + var height = (_elm_lang$core$Basics$sqrt(3) * side) / 2; + var fromMiddle = height - ((_elm_lang$core$Basics$tan( + _elm_lang$core$Basics$degrees(30)) * side) / 2); + var commands = { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'M', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(point.x), + A2( + _elm_lang$core$Basics_ops['++'], + ' ', + _elm_lang$core$Basics$toString(point.y - fromMiddle)))), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'l', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString((0 - side) / 2), + A2( + _elm_lang$core$Basics_ops['++'], + ' ', + _elm_lang$core$Basics$toString(height)))), + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Basics_ops['++'], + 'h', + _elm_lang$core$Basics$toString(side)), + _1: { + ctor: '::', + _0: 'z', + _1: {ctor: '[]'} + } + } + } + }; + return A2(_elm_lang$core$String$join, ' ', commands); + }); +var _terezka$line_charts$Internal_Dots$viewCross = F5( + function (events, variety, color, area, point) { + var rotation = A2( + _elm_lang$core$Basics_ops['++'], + 'rotate(45 ', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(point.x), + A2( + _elm_lang$core$Basics_ops['++'], + ' ', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(point.y), + ')')))); + var attributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$d( + A2(_terezka$line_charts$Internal_Dots$pathPlus, area, point)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$transform(rotation), + _1: {ctor: '[]'} + } + }; + return A2( + _elm_lang$svg$Svg$path, + A2( + _elm_lang$core$Basics_ops['++'], + events, + A2( + _elm_lang$core$Basics_ops['++'], + attributes, + A2(_terezka$line_charts$Internal_Dots$varietyAttributes, color, variety))), + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Dots$viewPlus = F5( + function (events, variety, color, area, point) { + var attributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$d( + A2(_terezka$line_charts$Internal_Dots$pathPlus, area, point)), + _1: {ctor: '[]'} + }; + return A2( + _elm_lang$svg$Svg$path, + A2( + _elm_lang$core$Basics_ops['++'], + events, + A2( + _elm_lang$core$Basics_ops['++'], + attributes, + A2(_terezka$line_charts$Internal_Dots$varietyAttributes, color, variety))), + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Dots$viewDiamond = F5( + function (events, variety, color, area, point) { + var rotation = A2( + _elm_lang$core$Basics_ops['++'], + 'rotate(45 ', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(point.x), + A2( + _elm_lang$core$Basics_ops['++'], + ' ', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(point.y), + ')')))); + var side = _elm_lang$core$Basics$sqrt(area); + var attributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x( + _elm_lang$core$Basics$toString(point.x - (side / 2))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y( + _elm_lang$core$Basics$toString(point.y - (side / 2))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$width( + _elm_lang$core$Basics$toString(side)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$height( + _elm_lang$core$Basics$toString(side)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$transform(rotation), + _1: {ctor: '[]'} + } + } + } + } + }; + return A2( + _elm_lang$svg$Svg$rect, + A2( + _elm_lang$core$Basics_ops['++'], + events, + A2( + _elm_lang$core$Basics_ops['++'], + attributes, + A2(_terezka$line_charts$Internal_Dots$varietyAttributes, color, variety))), + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Dots$viewSquare = F5( + function (events, variety, color, area, point) { + var side = _elm_lang$core$Basics$sqrt(area); + var attributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x( + _elm_lang$core$Basics$toString(point.x - (side / 2))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y( + _elm_lang$core$Basics$toString(point.y - (side / 2))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$width( + _elm_lang$core$Basics$toString(side)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$height( + _elm_lang$core$Basics$toString(side)), + _1: {ctor: '[]'} + } + } + } + }; + return A2( + _elm_lang$svg$Svg$rect, + A2( + _elm_lang$core$Basics_ops['++'], + events, + A2( + _elm_lang$core$Basics_ops['++'], + attributes, + A2(_terezka$line_charts$Internal_Dots$varietyAttributes, color, variety))), + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Dots$viewTriangle = F5( + function (events, variety, color, area, point) { + var attributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$d( + A2(_terezka$line_charts$Internal_Dots$pathTriangle, area, point)), + _1: {ctor: '[]'} + }; + return A2( + _elm_lang$svg$Svg$path, + A2( + _elm_lang$core$Basics_ops['++'], + events, + A2( + _elm_lang$core$Basics_ops['++'], + attributes, + A2(_terezka$line_charts$Internal_Dots$varietyAttributes, color, variety))), + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Dots$viewCircle = F5( + function (events, variety, color, area, point) { + var radius = _elm_lang$core$Basics$sqrt(area / _elm_lang$core$Basics$pi); + var attributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$cx( + _elm_lang$core$Basics$toString(point.x)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$cy( + _elm_lang$core$Basics$toString(point.y)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$r( + _elm_lang$core$Basics$toString(radius)), + _1: {ctor: '[]'} + } + } + }; + return A2( + _elm_lang$svg$Svg$circle, + A2( + _elm_lang$core$Basics_ops['++'], + events, + A2( + _elm_lang$core$Basics_ops['++'], + attributes, + A2(_terezka$line_charts$Internal_Dots$varietyAttributes, color, variety))), + {ctor: '[]'}); + }); +var _terezka$line_charts$Internal_Dots$viewShape = F5( + function (system, _p1, shape, color, point) { + var _p2 = _p1; + var view = function () { + var _p3 = shape; + switch (_p3.ctor) { + case 'Circle': + return _terezka$line_charts$Internal_Dots$viewCircle; + case 'Triangle': + return _terezka$line_charts$Internal_Dots$viewTriangle; + case 'Square': + return _terezka$line_charts$Internal_Dots$viewSquare; + case 'Diamond': + return _terezka$line_charts$Internal_Dots$viewDiamond; + case 'Cross': + return _terezka$line_charts$Internal_Dots$viewCross; + case 'Plus': + return _terezka$line_charts$Internal_Dots$viewPlus; + default: + return F5( + function (_p8, _p7, _p6, _p5, _p4) { + return _elm_lang$svg$Svg$text(''); + }); + } + }(); + var pointSvg = A2(_terezka$line_charts$LineChart_Coordinate$toSvg, system, point); + var size = (2 * _elm_lang$core$Basics$pi) * _p2.radius; + return A5( + view, + {ctor: '[]'}, + _p2.variety, + color, + size, + pointSvg); + }); +var _terezka$line_charts$Internal_Dots$viewSample = F5( + function (_p9, shape, color, system, data) { + var _p10 = _p9; + var _p11 = _p10._0.legend( + A2( + _elm_lang$core$List$map, + function (_) { + return _.user; + }, + data)); + var style = _p11._0; + return A4(_terezka$line_charts$Internal_Dots$viewShape, system, style, shape, color); + }); +var _terezka$line_charts$Internal_Dots$view = F2( + function (_p12, data) { + var _p13 = _p12; + var _p14 = _p13.dotsConfig; + var config = _p14._0; + var _p15 = config.individual(data.user); + var style = _p15._0; + return A5(_terezka$line_charts$Internal_Dots$viewShape, _p13.system, style, _p13.shape, _p13.color, data.point); + }); +var _terezka$line_charts$Internal_Dots$StyleConfig = F2( + function (a, b) { + return {radius: a, variety: b}; + }); +var _terezka$line_charts$Internal_Dots$Arguments = F4( + function (a, b, c, d) { + return {system: a, dotsConfig: b, shape: c, color: d}; + }); +var _terezka$line_charts$Internal_Dots$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Dots$custom = function (style) { + return _terezka$line_charts$Internal_Dots$Config( + { + legend: function (_p16) { + return style; + }, + individual: function (_p17) { + return style; + } + }); +}; +var _terezka$line_charts$Internal_Dots$customAny = _terezka$line_charts$Internal_Dots$Config; +var _terezka$line_charts$Internal_Dots$Style = function (a) { + return {ctor: 'Style', _0: a}; +}; +var _terezka$line_charts$Internal_Dots$style = F2( + function (radius, variety) { + return _terezka$line_charts$Internal_Dots$Style( + {radius: radius, variety: variety}); + }); +var _terezka$line_charts$Internal_Dots$Full = {ctor: 'Full'}; +var _terezka$line_charts$Internal_Dots$full = function (radius) { + return A2(_terezka$line_charts$Internal_Dots$style, radius, _terezka$line_charts$Internal_Dots$Full); +}; +var _terezka$line_charts$Internal_Dots$Aura = F2( + function (a, b) { + return {ctor: 'Aura', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Dots$aura = F3( + function (radius, aura, opacity) { + return A2( + _terezka$line_charts$Internal_Dots$style, + radius, + A2(_terezka$line_charts$Internal_Dots$Aura, aura, opacity)); + }); +var _terezka$line_charts$Internal_Dots$Disconnected = function (a) { + return {ctor: 'Disconnected', _0: a}; +}; +var _terezka$line_charts$Internal_Dots$disconnected = F2( + function (radius, border) { + return A2( + _terezka$line_charts$Internal_Dots$style, + radius, + _terezka$line_charts$Internal_Dots$Disconnected(border)); + }); +var _terezka$line_charts$Internal_Dots$default = _terezka$line_charts$Internal_Dots$Config( + { + legend: function (_p18) { + return A2(_terezka$line_charts$Internal_Dots$disconnected, 10, 2); + }, + individual: function (_p19) { + return A2(_terezka$line_charts$Internal_Dots$disconnected, 10, 2); + } + }); +var _terezka$line_charts$Internal_Dots$Empty = function (a) { + return {ctor: 'Empty', _0: a}; +}; +var _terezka$line_charts$Internal_Dots$empty = F2( + function (radius, border) { + return A2( + _terezka$line_charts$Internal_Dots$style, + radius, + _terezka$line_charts$Internal_Dots$Empty(border)); + }); +var _terezka$line_charts$Internal_Dots$Plus = {ctor: 'Plus'}; +var _terezka$line_charts$Internal_Dots$Cross = {ctor: 'Cross'}; +var _terezka$line_charts$Internal_Dots$Diamond = {ctor: 'Diamond'}; +var _terezka$line_charts$Internal_Dots$Square = {ctor: 'Square'}; +var _terezka$line_charts$Internal_Dots$Triangle = {ctor: 'Triangle'}; +var _terezka$line_charts$Internal_Dots$Circle = {ctor: 'Circle'}; +var _terezka$line_charts$Internal_Dots$None = {ctor: 'None'}; + +var _terezka$line_charts$LineChart_Dots$aura = _terezka$line_charts$Internal_Dots$aura; +var _terezka$line_charts$LineChart_Dots$disconnected = _terezka$line_charts$Internal_Dots$disconnected; +var _terezka$line_charts$LineChart_Dots$empty = _terezka$line_charts$Internal_Dots$empty; +var _terezka$line_charts$LineChart_Dots$full = _terezka$line_charts$Internal_Dots$full; +var _terezka$line_charts$LineChart_Dots$hoverMany = function (hovered) { + var styleIndividual = function (datum) { + return A2( + _elm_lang$core$List$any, + F2( + function (x, y) { + return _elm_lang$core$Native_Utils.eq(x, y); + })(datum), + hovered) ? A3(_terezka$line_charts$LineChart_Dots$aura, 7, 6, 0.3) : A2(_terezka$line_charts$LineChart_Dots$disconnected, 10, 2); + }; + var styleLegend = function (_p0) { + return A2(_terezka$line_charts$LineChart_Dots$disconnected, 10, 2); + }; + return _terezka$line_charts$Internal_Dots$customAny( + {legend: styleLegend, individual: styleIndividual}); +}; +var _terezka$line_charts$LineChart_Dots$hoverOne = function (maybeHovered) { + var styleIndividual = function (datum) { + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Maybe$Just(datum), + maybeHovered) ? A3(_terezka$line_charts$LineChart_Dots$aura, 7, 6, 0.3) : A2(_terezka$line_charts$LineChart_Dots$disconnected, 10, 2); + }; + var styleLegend = function (_p1) { + return A2(_terezka$line_charts$LineChart_Dots$disconnected, 10, 2); + }; + return _terezka$line_charts$Internal_Dots$customAny( + {legend: styleLegend, individual: styleIndividual}); +}; +var _terezka$line_charts$LineChart_Dots$customAny = _terezka$line_charts$Internal_Dots$customAny; +var _terezka$line_charts$LineChart_Dots$custom = _terezka$line_charts$Internal_Dots$custom; +var _terezka$line_charts$LineChart_Dots$default = _terezka$line_charts$Internal_Dots$default; +var _terezka$line_charts$LineChart_Dots$cross = _terezka$line_charts$Internal_Dots$Cross; +var _terezka$line_charts$LineChart_Dots$plus = _terezka$line_charts$Internal_Dots$Plus; +var _terezka$line_charts$LineChart_Dots$diamond = _terezka$line_charts$Internal_Dots$Diamond; +var _terezka$line_charts$LineChart_Dots$square = _terezka$line_charts$Internal_Dots$Square; +var _terezka$line_charts$LineChart_Dots$triangle = _terezka$line_charts$Internal_Dots$Triangle; +var _terezka$line_charts$LineChart_Dots$circle = _terezka$line_charts$Internal_Dots$Circle; +var _terezka$line_charts$LineChart_Dots$none = _terezka$line_charts$Internal_Dots$None; + +var _terezka$line_charts$Internal_Grid$viewLines = F5( + function (system, verticals, horizontals, width, color) { + var attributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeWidth( + _elm_lang$core$Basics$toString(width)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color)), + _1: {ctor: '[]'} + } + }; + return A2( + _elm_lang$core$Basics_ops['++'], + A2( + _elm_lang$core$List$map, + A2(_terezka$line_charts$Internal_Svg$horizontalGrid, system, attributes), + horizontals), + A2( + _elm_lang$core$List$map, + A2(_terezka$line_charts$Internal_Svg$verticalGrid, system, attributes), + verticals)); + }); +var _terezka$line_charts$Internal_Grid$viewDots = F5( + function (system, verticals, horizontals, radius, color) { + var dot = F2( + function (x, y) { + return A2( + _terezka$line_charts$LineChart_Coordinate$toSvg, + system, + A2(_terezka$line_charts$LineChart_Coordinate$Point, x, y)); + }); + var dots_ = function (g) { + return A2( + _elm_lang$core$List$map, + dot(g), + horizontals); + }; + var dots = A2(_elm_lang$core$List$concatMap, dots_, verticals); + return A2( + _elm_lang$core$List$map, + A2(_terezka$line_charts$Internal_Svg$gridDot, radius, color), + dots); + }); +var _terezka$line_charts$Internal_Grid$view = F4( + function (system, xAxis, yAxis, grid) { + var hasGrid = function (tick) { + return tick.grid ? _elm_lang$core$Maybe$Just(tick.position) : _elm_lang$core$Maybe$Nothing; + }; + var horizontals = A2( + _elm_lang$core$List$filterMap, + hasGrid, + A3( + _terezka$line_charts$Internal_Axis_Ticks$ticks, + system.yData, + system.y, + _terezka$line_charts$Internal_Axis$ticks(yAxis))); + var verticals = A2( + _elm_lang$core$List$filterMap, + hasGrid, + A3( + _terezka$line_charts$Internal_Axis_Ticks$ticks, + system.xData, + system.x, + _terezka$line_charts$Internal_Axis$ticks(xAxis))); + var _p0 = grid; + if (_p0.ctor === 'Dots') { + return A5(_terezka$line_charts$Internal_Grid$viewDots, system, verticals, horizontals, _p0._0, _p0._1); + } else { + return A5(_terezka$line_charts$Internal_Grid$viewLines, system, verticals, horizontals, _p0._0, _p0._1); + } + }); +var _terezka$line_charts$Internal_Grid$Lines = F2( + function (a, b) { + return {ctor: 'Lines', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Grid$lines = _terezka$line_charts$Internal_Grid$Lines; +var _terezka$line_charts$Internal_Grid$default = A2(_terezka$line_charts$Internal_Grid$lines, 1, _terezka$line_charts$LineChart_Colors$grayLightest); +var _terezka$line_charts$Internal_Grid$Dots = F2( + function (a, b) { + return {ctor: 'Dots', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Grid$dots = _terezka$line_charts$Internal_Grid$Dots; + +var _terezka$line_charts$LineChart_Grid$lines = _terezka$line_charts$Internal_Grid$lines; +var _terezka$line_charts$LineChart_Grid$dots = _terezka$line_charts$Internal_Grid$dots; +var _terezka$line_charts$LineChart_Grid$default = _terezka$line_charts$Internal_Grid$default; + +var _terezka$line_charts$Internal_Interpolation$after = F2( + function (a, b) { + return { + ctor: '::', + _0: a, + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Data$Point, b.x, a.y), + _1: { + ctor: '::', + _0: b, + _1: {ctor: '[]'} + } + } + }; + }); +var _terezka$line_charts$Internal_Interpolation$fakeLast = F2( + function (last0, last1) { + return A2(_terezka$line_charts$Internal_Data$Point, (last1.x + last1.x) - last0.x, last1.y); + }); +var _terezka$line_charts$Internal_Interpolation$stepped = function (sections) { + var expand = F2( + function (result, section) { + expand: + while (true) { + var _p0 = section; + if (_p0._0.ctor === '::') { + if (_p0._0._1.ctor === '::') { + var _p1 = _p0._0._1._0; + var _v1 = A2( + _elm_lang$core$Basics_ops['++'], + result, + A2(_terezka$line_charts$Internal_Interpolation$after, _p0._0._0, _p1)), + _v2 = { + ctor: '_Tuple2', + _0: {ctor: '::', _0: _p1, _1: _p0._0._1._1}, + _1: _p0._1 + }; + result = _v1; + section = _v2; + continue expand; + } else { + if (_p0._1.ctor === 'Just') { + return A2( + _elm_lang$core$Basics_ops['++'], + result, + { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Data$Point, _p0._1._0.x, _p0._0._0.y), + _1: {ctor: '[]'} + }); + } else { + return result; + } + } + } else { + return result; + } + } + }); + return A2( + _elm_lang$core$List$map, + function (_p2) { + return A2( + _elm_lang$core$List$map, + _terezka$line_charts$Internal_Path$Line, + A2( + expand, + {ctor: '[]'}, + _p2)); + }, + sections); +}; +var _terezka$line_charts$Internal_Interpolation$sign = function (x) { + return (_elm_lang$core$Native_Utils.cmp(x, 0) < 0) ? -1 : 1; +}; +var _terezka$line_charts$Internal_Interpolation$slope2 = F3( + function (point0, point1, t) { + var h = point1.x - point0.x; + return (!_elm_lang$core$Native_Utils.eq(h, 0)) ? ((((3 * (point1.y - point0.y)) / h) - t) / 2) : t; + }); +var _terezka$line_charts$Internal_Interpolation$toH = F2( + function (h0, h1) { + return _elm_lang$core$Native_Utils.eq(h0, 0) ? ((_elm_lang$core$Native_Utils.cmp(h1, 0) < 0) ? (0 * -1) : h1) : h0; + }); +var _terezka$line_charts$Internal_Interpolation$slope3 = F3( + function (point0, point1, point2) { + var h1 = point2.x - point1.x; + var h0 = point1.x - point0.x; + var s0h = A2(_terezka$line_charts$Internal_Interpolation$toH, h0, h1); + var s0 = (point1.y - point0.y) / s0h; + var s1h = A2(_terezka$line_charts$Internal_Interpolation$toH, h1, h0); + var s1 = (point2.y - point1.y) / s1h; + var p = ((s0 * h1) + (s1 * h0)) / (h0 + h1); + var slope = (_terezka$line_charts$Internal_Interpolation$sign(s0) + _terezka$line_charts$Internal_Interpolation$sign(s1)) * A2( + _elm_lang$core$Basics$min, + A2( + _elm_lang$core$Basics$min, + _elm_lang$core$Basics$abs(s0), + _elm_lang$core$Basics$abs(s1)), + 0.5 * _elm_lang$core$Basics$abs(p)); + return _elm_lang$core$Basics$isNaN(slope) ? 0 : slope; + }); +var _terezka$line_charts$Internal_Interpolation$monotoneCurve = F4( + function (point0, point1, tangent0, tangent1) { + var dx = (point1.x - point0.x) / 3; + return A3( + _terezka$line_charts$Internal_Path$CubicBeziers, + {x: point0.x + dx, y: point0.y + (dx * tangent0)}, + {x: point1.x - dx, y: point1.y - (dx * tangent1)}, + point1); + }); +var _terezka$line_charts$Internal_Interpolation$linear = _elm_lang$core$List$map( + _elm_lang$core$List$map(_terezka$line_charts$Internal_Path$Line)); +var _terezka$line_charts$Internal_Interpolation$Stepped = {ctor: 'Stepped'}; +var _terezka$line_charts$Internal_Interpolation$Monotone = {ctor: 'Monotone'}; +var _terezka$line_charts$Internal_Interpolation$Linear = {ctor: 'Linear'}; +var _terezka$line_charts$Internal_Interpolation$Previous = function (a) { + return {ctor: 'Previous', _0: a}; +}; +var _terezka$line_charts$Internal_Interpolation$monotonePart = F2( + function (points, _p3) { + monotonePart: + while (true) { + var _p4 = _p3; + var _p17 = _p4._0; + var _p16 = _p4._1; + var _p5 = {ctor: '_Tuple2', _0: _p17, _1: points}; + _v4_4: + do { + if (_p5._0.ctor === 'First') { + if ((_p5._1.ctor === '::') && (_p5._1._1.ctor === '::')) { + if (_p5._1._1._1.ctor === '::') { + var _p8 = _p5._1._1._1._0; + var _p7 = _p5._1._1._0; + var _p6 = _p5._1._0; + var t1 = A3(_terezka$line_charts$Internal_Interpolation$slope3, _p6, _p7, _p8); + var t0 = A3(_terezka$line_charts$Internal_Interpolation$slope2, _p6, _p7, t1); + var _v5 = { + ctor: '::', + _0: _p7, + _1: {ctor: '::', _0: _p8, _1: _p5._1._1._1._1} + }, + _v6 = { + ctor: '_Tuple2', + _0: _terezka$line_charts$Internal_Interpolation$Previous(t1), + _1: A2( + _elm_lang$core$Basics_ops['++'], + _p16, + { + ctor: '::', + _0: A4(_terezka$line_charts$Internal_Interpolation$monotoneCurve, _p6, _p7, t0, t1), + _1: {ctor: '[]'} + }) + }; + points = _v5; + _p3 = _v6; + continue monotonePart; + } else { + var _p13 = _p5._1._1._0; + var _p12 = _p5._1._0; + var t1 = A3(_terezka$line_charts$Internal_Interpolation$slope3, _p12, _p13, _p13); + return { + ctor: '_Tuple2', + _0: _terezka$line_charts$Internal_Interpolation$Previous(t1), + _1: A2( + _elm_lang$core$Basics_ops['++'], + _p16, + { + ctor: '::', + _0: A4(_terezka$line_charts$Internal_Interpolation$monotoneCurve, _p12, _p13, t1, t1), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line(_p13), + _1: {ctor: '[]'} + } + }) + }; + } + } else { + break _v4_4; + } + } else { + if ((_p5._1.ctor === '::') && (_p5._1._1.ctor === '::')) { + if (_p5._1._1._1.ctor === '::') { + var _p11 = _p5._1._1._1._0; + var _p10 = _p5._1._1._0; + var _p9 = _p5._1._0; + var t1 = A3(_terezka$line_charts$Internal_Interpolation$slope3, _p9, _p10, _p11); + var _v7 = { + ctor: '::', + _0: _p10, + _1: {ctor: '::', _0: _p11, _1: _p5._1._1._1._1} + }, + _v8 = { + ctor: '_Tuple2', + _0: _terezka$line_charts$Internal_Interpolation$Previous(t1), + _1: A2( + _elm_lang$core$Basics_ops['++'], + _p16, + { + ctor: '::', + _0: A4(_terezka$line_charts$Internal_Interpolation$monotoneCurve, _p9, _p10, _p5._0._0, t1), + _1: {ctor: '[]'} + }) + }; + points = _v7; + _p3 = _v8; + continue monotonePart; + } else { + var _p15 = _p5._1._1._0; + var _p14 = _p5._1._0; + var t1 = A3(_terezka$line_charts$Internal_Interpolation$slope3, _p14, _p15, _p15); + return { + ctor: '_Tuple2', + _0: _terezka$line_charts$Internal_Interpolation$Previous(t1), + _1: A2( + _elm_lang$core$Basics_ops['++'], + _p16, + { + ctor: '::', + _0: A4(_terezka$line_charts$Internal_Interpolation$monotoneCurve, _p14, _p15, _p5._0._0, t1), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line(_p15), + _1: {ctor: '[]'} + } + }) + }; + } + } else { + break _v4_4; + } + } + } while(false); + return {ctor: '_Tuple2', _0: _p17, _1: _p16}; + } + }); +var _terezka$line_charts$Internal_Interpolation$monotoneSection = F2( + function (points, _p18) { + var _p19 = _p18; + var _p23 = _p19._0; + var _p20 = function () { + var _p21 = points; + if (_p21.ctor === '::') { + var _p22 = _p21._0; + return A2( + _terezka$line_charts$Internal_Interpolation$monotonePart, + {ctor: '::', _0: _p22, _1: _p21._1}, + { + ctor: '_Tuple2', + _0: _p23, + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line(_p22), + _1: {ctor: '[]'} + } + }); + } else { + return { + ctor: '_Tuple2', + _0: _p23, + _1: {ctor: '[]'} + }; + } + }(); + var t0 = _p20._0; + var commands = _p20._1; + return { + ctor: '_Tuple2', + _0: t0, + _1: {ctor: '::', _0: commands, _1: _p19._1} + }; + }); +var _terezka$line_charts$Internal_Interpolation$First = {ctor: 'First'}; +var _terezka$line_charts$Internal_Interpolation$monotone = function (sections) { + return _elm_lang$core$Tuple$second( + A3( + _elm_lang$core$List$foldr, + _terezka$line_charts$Internal_Interpolation$monotoneSection, + { + ctor: '_Tuple2', + _0: _terezka$line_charts$Internal_Interpolation$First, + _1: {ctor: '[]'} + }, + sections)); +}; +var _terezka$line_charts$Internal_Interpolation$toCommands = F2( + function (interpolation, data) { + var pointsSections = _elm_lang$core$List$map( + function (_p24) { + return A2( + _elm_lang$core$Tuple$mapSecond, + _elm_lang$core$Maybe$map( + function (_) { + return _.point; + }), + A2( + _elm_lang$core$Tuple$mapFirst, + _elm_lang$core$List$map( + function (_) { + return _.point; + }), + _p24)); + }); + var points = _elm_lang$core$List$map( + function (_p25) { + return A2( + _elm_lang$core$List$map, + function (_) { + return _.point; + }, + _elm_lang$core$Tuple$first(_p25)); + }); + var _p26 = interpolation; + switch (_p26.ctor) { + case 'Linear': + return _terezka$line_charts$Internal_Interpolation$linear( + points(data)); + case 'Monotone': + return _terezka$line_charts$Internal_Interpolation$monotone( + points(data)); + default: + return _terezka$line_charts$Internal_Interpolation$stepped( + pointsSections(data)); + } + }); + +var _terezka$line_charts$Internal_Line$toAreaAttributes = F3( + function (_p1, _p0, area) { + var _p2 = _p1; + var _p3 = _p0; + return { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__interpolation__area__fragment'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex( + _p3._0.color(_p2._0.color))), + _1: {ctor: '[]'} + } + }; + }); +var _terezka$line_charts$Internal_Line$viewArea = F5( + function (_p4, line, style, interpolation, data) { + var _p5 = _p4; + var _p7 = _p5.system; + var _p6 = _p5.area; + var attributes = { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$withinChartArea(_p7), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fillOpacity( + _elm_lang$core$Basics$toString( + _terezka$line_charts$Internal_Area$opacitySingle(_p6))), + _1: A3(_terezka$line_charts$Internal_Line$toAreaAttributes, line, style, _p6) + } + }; + var ground = function (point) { + return A2( + _terezka$line_charts$Internal_Data$Point, + point.x, + _terezka$line_charts$Internal_Utils$towardsZero(_p7.y)); + }; + var commands = F3( + function (first, middle, last) { + return A3( + _terezka$line_charts$Internal_Utils$concat, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Move( + ground( + _terezka$line_charts$Internal_Path$toPoint(first))), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + _terezka$line_charts$Internal_Path$toPoint(first)), + _1: {ctor: '[]'} + } + }, + interpolation, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Line( + ground( + _terezka$line_charts$Internal_Path$toPoint(last))), + _1: {ctor: '[]'} + }); + }); + return A2( + _terezka$line_charts$Internal_Utils$viewWithEdges, + interpolation, + F3( + function (first, middle, last) { + return A3( + _terezka$line_charts$Internal_Path$view, + _p7, + attributes, + A3(commands, first, middle, last)); + })); + }); +var _terezka$line_charts$Internal_Line$toSeriesAttributes = F2( + function (_p9, _p8) { + var _p10 = _p9; + var _p11 = _p8; + var _p12 = _p11._0; + return { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$style('pointer-events: none;'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__interpolation__line__fragment'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$stroke( + _eskimoblood$elm_color_extra$Color_Convert$colorToHex( + _p12.color(_p10._0.color))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeWidth( + _elm_lang$core$Basics$toString(_p12.width)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$strokeDasharray( + A2( + _elm_lang$core$String$join, + ' ', + A2(_elm_lang$core$List$map, _elm_lang$core$Basics$toString, _p10._0.dashing))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill('transparent'), + _1: {ctor: '[]'} + } + } + } + } + } + }; + }); +var _terezka$line_charts$Internal_Line$viewSample = F5( + function (_p13, line, area, data, sampleWidth) { + var _p14 = _p13; + var rectangleAttributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x('0'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y('0'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$height('9'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$width( + _elm_lang$core$Basics$toString(sampleWidth)), + _1: {ctor: '[]'} + } + } + } + }; + var sizeAttributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x1('0'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y1('0'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x2( + _elm_lang$core$Basics$toString(sampleWidth)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y2('0'), + _1: {ctor: '[]'} + } + } + } + }; + var style = _p14._0( + A2( + _elm_lang$core$List$map, + function (_) { + return _.user; + }, + data)); + var lineAttributes = A2(_terezka$line_charts$Internal_Line$toSeriesAttributes, line, style); + var areaAttributes = { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fillOpacity( + _elm_lang$core$Basics$toString( + _terezka$line_charts$Internal_Area$opacity(area))), + _1: A3(_terezka$line_charts$Internal_Line$toAreaAttributes, line, style, area) + }; + var viewRectangle = function (_p15) { + var _p16 = _p15; + return A2( + _elm_lang$svg$Svg$rect, + A2(_elm_lang$core$Basics_ops['++'], areaAttributes, rectangleAttributes), + {ctor: '[]'}); + }; + return A2( + _elm_lang$svg$Svg$g, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$line, + A2(_elm_lang$core$Basics_ops['++'], lineAttributes, sizeAttributes), + {ctor: '[]'}), + _1: { + ctor: '::', + _0: A2( + _terezka$line_charts$Internal_Utils$viewIf, + _terezka$line_charts$Internal_Area$hasArea(area), + viewRectangle), + _1: {ctor: '[]'} + } + }); + }); +var _terezka$line_charts$Internal_Line$viewSeries = F5( + function (_p17, line, style, interpolation, data) { + var _p18 = _p17; + var _p20 = _p18.system; + var attributes = { + ctor: '::', + _0: _terezka$line_charts$LineChart_Junk$withinChartArea(_p20), + _1: A2(_terezka$line_charts$Internal_Line$toSeriesAttributes, line, style) + }; + return A2( + _terezka$line_charts$Internal_Utils$viewWithFirst, + data, + F2( + function (first, _p19) { + return A3( + _terezka$line_charts$Internal_Path$view, + _p20, + attributes, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Path$Move(first.point), + _1: interpolation + }); + })); + }); +var _terezka$line_charts$Internal_Line$viewDot = F3( + function ($arguments, _p22, _p21) { + var _p23 = _p22; + var _p25 = _p23._0; + var _p24 = _p21; + return _terezka$line_charts$Internal_Dots$view( + { + system: $arguments.system, + dotsConfig: $arguments.dotsConfig, + shape: _p25.shape, + color: _p24._0.color(_p25.color) + }); + }); +var _terezka$line_charts$Internal_Line$viewSingle = F3( + function ($arguments, line, data) { + var style = function (_p26) { + var _p27 = _p26; + return _p27._0( + A2( + _elm_lang$core$List$map, + function (_) { + return _.user; + }, + data)); + }($arguments.lineConfig); + var sections = A4( + _terezka$line_charts$Internal_Utils$part, + function (_) { + return _.isReal; + }, + data, + {ctor: '[]'}, + {ctor: '[]'}); + var parts = A2(_elm_lang$core$List$map, _elm_lang$core$Tuple$first, sections); + var viewDots = A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__dots'), + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$List$map, + A3(_terezka$line_charts$Internal_Line$viewDot, $arguments, line, style), + A2( + _elm_lang$core$List$filter, + function (_p28) { + return A2( + _terezka$line_charts$Internal_Data$isWithinRange, + $arguments.system, + function (_) { + return _.point; + }(_p28)); + }, + _elm_lang$core$List$concat(parts)))); + var commands = A2(_terezka$line_charts$Internal_Interpolation$toCommands, $arguments.interpolation, sections); + var viewAreas = function (_p29) { + var _p30 = _p29; + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__interpolation__area'), + _1: {ctor: '[]'} + }, + A3( + _elm_lang$core$List$map2, + A3(_terezka$line_charts$Internal_Line$viewArea, $arguments, line, style), + commands, + parts)); + }; + var viewSeriess = A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__interpolation__line'), + _1: {ctor: '[]'} + }, + A3( + _elm_lang$core$List$map2, + A3(_terezka$line_charts$Internal_Line$viewSeries, $arguments, line, style), + commands, + parts)); + return { + ctor: '_Tuple3', + _0: A2( + _terezka$line_charts$Internal_Utils$viewIf, + _terezka$line_charts$Internal_Area$hasArea($arguments.area), + viewAreas), + _1: viewSeriess, + _2: viewDots + }; + }); +var _terezka$line_charts$Internal_Line$viewStacked = F2( + function (area, _p31) { + var _p32 = _p31; + var toList = F2( + function (l, d) { + return { + ctor: '::', + _0: l, + _1: { + ctor: '::', + _0: d, + _1: {ctor: '[]'} + } + }; + }); + var bottoms = _elm_lang$core$List$concat( + A3(_elm_lang$core$List$map2, toList, _p32._1, _p32._2)); + var opacity = A2( + _elm_lang$core$Basics_ops['++'], + 'opacity: ', + _elm_lang$core$Basics$toString( + _terezka$line_charts$Internal_Area$opacityContainer(area))); + return { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__bottoms'), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$style(opacity), + _1: {ctor: '[]'} + } + }, + _p32._0), + _1: { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__tops'), + _1: {ctor: '[]'} + }, + bottoms), + _1: {ctor: '[]'} + } + }; + }); +var _terezka$line_charts$Internal_Line$viewNormal = function (_p33) { + var _p34 = _p33; + var view = F3( + function (area, line, dots) { + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__line'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: area, + _1: { + ctor: '::', + _0: line, + _1: { + ctor: '::', + _0: dots, + _1: {ctor: '[]'} + } + } + }); + }); + return A4(_elm_lang$core$List$map3, view, _p34._0, _p34._1, _p34._2); +}; +var _terezka$line_charts$Internal_Line$view = F3( + function ($arguments, lines, datas) { + var buildSeriesViews = (_elm_lang$core$Native_Utils.cmp( + _terezka$line_charts$Internal_Area$opacityContainer($arguments.area), + 1) < 0) ? _terezka$line_charts$Internal_Line$viewStacked($arguments.area) : _terezka$line_charts$Internal_Line$viewNormal; + var container = _elm_lang$svg$Svg$g( + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__lines'), + _1: {ctor: '[]'} + }); + return container( + buildSeriesViews( + _terezka$line_charts$Internal_Utils$unzip3( + A3( + _elm_lang$core$List$map2, + _terezka$line_charts$Internal_Line$viewSingle($arguments), + lines, + datas)))); + }); +var _terezka$line_charts$Internal_Line$color = F3( + function (_p36, _p35, data) { + var _p37 = _p36; + var _p38 = _p35; + var _p39 = _p37._0( + A2( + _elm_lang$core$List$map, + function (_) { + return _.user; + }, + data)); + var style = _p39._0; + return style.color(_p38._0.color); + }); +var _terezka$line_charts$Internal_Line$data = function (_p40) { + var _p41 = _p40; + return _p41._0.data; +}; +var _terezka$line_charts$Internal_Line$shape = function (_p42) { + var _p43 = _p42; + return _p43._0.shape; +}; +var _terezka$line_charts$Internal_Line$label = function (_p44) { + var _p45 = _p44; + return _p45._0.label; +}; +var _terezka$line_charts$Internal_Line$SeriesConfig = F5( + function (a, b, c, d, e) { + return {color: a, shape: b, dashing: c, label: d, data: e}; + }); +var _terezka$line_charts$Internal_Line$Arguments = F5( + function (a, b, c, d, e) { + return {system: a, dotsConfig: b, interpolation: c, lineConfig: d, area: e}; + }); +var _terezka$line_charts$Internal_Line$Series = function (a) { + return {ctor: 'Series', _0: a}; +}; +var _terezka$line_charts$Internal_Line$line = F4( + function (color, shape, label, data) { + return _terezka$line_charts$Internal_Line$Series( + A5( + _terezka$line_charts$Internal_Line$SeriesConfig, + color, + shape, + {ctor: '[]'}, + label, + data)); + }); +var _terezka$line_charts$Internal_Line$dash = F5( + function (color, shape, label, dashing, data) { + return _terezka$line_charts$Internal_Line$Series( + A5(_terezka$line_charts$Internal_Line$SeriesConfig, color, shape, dashing, label, data)); + }); +var _terezka$line_charts$Internal_Line$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Line$custom = _terezka$line_charts$Internal_Line$Config; +var _terezka$line_charts$Internal_Line$Style = function (a) { + return {ctor: 'Style', _0: a}; +}; +var _terezka$line_charts$Internal_Line$style = F2( + function (width, color) { + return _terezka$line_charts$Internal_Line$Style( + {width: width, color: color}); + }); +var _terezka$line_charts$Internal_Line$default = _terezka$line_charts$Internal_Line$Config( + function (_p46) { + return A2(_terezka$line_charts$Internal_Line$style, 1, _elm_lang$core$Basics$identity); + }); +var _terezka$line_charts$Internal_Line$wider = function (width) { + return _terezka$line_charts$Internal_Line$Config( + function (_p47) { + return A2(_terezka$line_charts$Internal_Line$style, width, _elm_lang$core$Basics$identity); + }); +}; + +var _terezka$line_charts$LineChart_Line$style = _terezka$line_charts$Internal_Line$style; +var _terezka$line_charts$LineChart_Line$custom = _terezka$line_charts$Internal_Line$custom; +var _terezka$line_charts$LineChart_Line$hoverOne = function (hovered) { + return _terezka$line_charts$LineChart_Line$custom( + function (data) { + return A2( + _elm_lang$core$List$any, + function (_p0) { + return A2( + F2( + function (x, y) { + return _elm_lang$core$Native_Utils.eq(x, y); + }), + hovered, + _elm_lang$core$Maybe$Just(_p0)); + }, + data) ? A2(_terezka$line_charts$LineChart_Line$style, 3, _elm_lang$core$Basics$identity) : A2(_terezka$line_charts$LineChart_Line$style, 1, _elm_lang$core$Basics$identity); + }); +}; +var _terezka$line_charts$LineChart_Line$wider = _terezka$line_charts$Internal_Line$wider; +var _terezka$line_charts$LineChart_Line$default = _terezka$line_charts$Internal_Line$default; + +var _terezka$line_charts$Internal_Events$position = _elm_lang$core$Json_Decode$oneOf( + { + ctor: '::', + _0: _debois$elm_dom$DOM$boundingClientRect, + _1: { + ctor: '::', + _0: _elm_lang$core$Json_Decode$lazy( + function (_p0) { + return _debois$elm_dom$DOM$parentElement(_terezka$line_charts$Internal_Events$position); + }), + _1: {ctor: '[]'} + } + }); +var _terezka$line_charts$Internal_Events$toJsonDecoder = F3( + function (data, system, _p1) { + var _p2 = _p1; + var handle = F3( + function (mouseX, mouseY, _p3) { + var _p4 = _p3; + var _p6 = _p4.width; + var _p5 = _p4.height; + var y = mouseY - _p4.top; + var x = mouseX - _p4.left; + var newSize = {width: _p6, height: _p5}; + var heightPercent = _p5 / system.frame.size.height; + var widthPercent = _p6 / system.frame.size.width; + var newMargin = {top: system.frame.margin.top * heightPercent, right: system.frame.margin.right * widthPercent, bottom: system.frame.margin.bottom * heightPercent, left: system.frame.margin.left * widthPercent}; + var newSystem = _elm_lang$core$Native_Utils.update( + system, + { + frame: {size: newSize, margin: newMargin} + }); + return A3( + _p2._0, + data, + newSystem, + A2(_terezka$line_charts$LineChart_Coordinate$Point, x, y)); + }); + return A4( + _elm_lang$core$Json_Decode$map3, + handle, + A2(_elm_lang$core$Json_Decode$field, 'pageX', _elm_lang$core$Json_Decode$float), + A2(_elm_lang$core$Json_Decode$field, 'pageY', _elm_lang$core$Json_Decode$float), + _debois$elm_dom$DOM$target(_terezka$line_charts$Internal_Events$position)); + }); +var _terezka$line_charts$Internal_Events$distanceY = F3( + function (system, searched, dot) { + return _elm_lang$core$Basics$abs( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, dot.y) - A2(_terezka$line_charts$LineChart_Coordinate$toSvgY, system, searched.y)); + }); +var _terezka$line_charts$Internal_Events$distanceX = F3( + function (system, searched, dot) { + return _elm_lang$core$Basics$abs( + A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, dot.x) - A2(_terezka$line_charts$LineChart_Coordinate$toSvgX, system, searched.x)); + }); +var _terezka$line_charts$Internal_Events$distance = F3( + function (system, searched, dot) { + return _elm_lang$core$Basics$sqrt( + Math.pow( + A3(_terezka$line_charts$Internal_Events$distanceX, system, searched, dot), + 2) + Math.pow( + A3(_terezka$line_charts$Internal_Events$distanceY, system, searched, dot), + 2)); + }); +var _terezka$line_charts$Internal_Events$withinRadius = F4( + function (system, radius, searched, dot) { + return _elm_lang$core$Native_Utils.cmp( + A3(_terezka$line_charts$Internal_Events$distance, system, searched, dot), + radius) < 1; + }); +var _terezka$line_charts$Internal_Events$withinRadiusX = F4( + function (system, radius, searched, dot) { + return _elm_lang$core$Native_Utils.cmp( + A3(_terezka$line_charts$Internal_Events$distanceX, system, searched, dot), + radius) < 1; + }); +var _terezka$line_charts$Internal_Events$getNearestXHelp = F3( + function (points, system, searched) { + var distanceX_ = A2(_terezka$line_charts$Internal_Events$distanceX, system, searched); + var getClosest = F2( + function (point, allClosest) { + var _p7 = _elm_lang$core$List$head(allClosest); + if (_p7.ctor === 'Just') { + var _p8 = _p7._0; + return _elm_lang$core$Native_Utils.eq(_p8.point.x, point.point.x) ? {ctor: '::', _0: point, _1: allClosest} : ((_elm_lang$core$Native_Utils.cmp( + distanceX_(_p8.point), + distanceX_(point.point)) > 0) ? { + ctor: '::', + _0: point, + _1: {ctor: '[]'} + } : allClosest); + } else { + return { + ctor: '::', + _0: point, + _1: {ctor: '[]'} + }; + } + }); + return A3( + _elm_lang$core$List$foldl, + getClosest, + {ctor: '[]'}, + points); + }); +var _terezka$line_charts$Internal_Events$getNearestHelp = F3( + function (points, system, searched) { + var distance_ = A2(_terezka$line_charts$Internal_Events$distance, system, searched); + var getClosest = F2( + function (point, closest) { + return (_elm_lang$core$Native_Utils.cmp( + distance_(closest.point), + distance_(point.point)) < 0) ? closest : point; + }); + return A2( + _terezka$line_charts$Internal_Utils$withFirst, + A2( + _elm_lang$core$List$filter, + function (_) { + return _.isReal; + }, + points), + _elm_lang$core$List$foldl(getClosest)); + }); +var _terezka$line_charts$Internal_Events$toContainerAttributes = F3( + function (data, system, _p9) { + var _p10 = _p9; + var order = function (_p11) { + var _p12 = _p11; + return _p12._0 ? _elm_lang$core$Maybe$Just( + A2(_p12._1, data, system)) : _elm_lang$core$Maybe$Nothing; + }; + return A2(_elm_lang$core$List$filterMap, order, _p10._0); + }); +var _terezka$line_charts$Internal_Events$toChartAttributes = F3( + function (data, system, _p13) { + var _p14 = _p13; + var order = function (_p15) { + var _p16 = _p15; + return _p16._0 ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$Maybe$Just( + A2(_p16._1, data, system)); + }; + return A2(_elm_lang$core$List$filterMap, order, _p14._0); + }); +var _terezka$line_charts$Internal_Events$Options = F3( + function (a, b, c) { + return {stopPropagation: a, preventDefault: b, catchOutsideChart: c}; + }); +var _terezka$line_charts$Internal_Events$Config = function (a) { + return {ctor: 'Config', _0: a}; +}; +var _terezka$line_charts$Internal_Events$custom = _terezka$line_charts$Internal_Events$Config; +var _terezka$line_charts$Internal_Events$default = _terezka$line_charts$Internal_Events$custom( + {ctor: '[]'}); +var _terezka$line_charts$Internal_Events$Event = F2( + function (a, b) { + return {ctor: 'Event', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Events$onMouseLeave = function (msg) { + return A2( + _terezka$line_charts$Internal_Events$Event, + false, + F2( + function (_p18, _p17) { + return A2( + _elm_lang$svg$Svg_Events$on, + 'mouseleave', + _elm_lang$core$Json_Decode$succeed(msg)); + })); +}; +var _terezka$line_charts$Internal_Events$Decoder = function (a) { + return {ctor: 'Decoder', _0: a}; +}; +var _terezka$line_charts$Internal_Events$getSvg = _terezka$line_charts$Internal_Events$Decoder( + F3( + function (points, system, searched) { + return searched; + })); +var _terezka$line_charts$Internal_Events$getData = _terezka$line_charts$Internal_Events$Decoder( + F3( + function (points, system, searchedSvg) { + return A2(_terezka$line_charts$LineChart_Coordinate$toData, system, searchedSvg); + })); +var _terezka$line_charts$Internal_Events$getNearest = _terezka$line_charts$Internal_Events$Decoder( + F3( + function (points, system, searchedSvg) { + var searched = A2(_terezka$line_charts$LineChart_Coordinate$toData, system, searchedSvg); + return A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.user; + }, + A3(_terezka$line_charts$Internal_Events$getNearestHelp, points, system, searched)); + })); +var _terezka$line_charts$Internal_Events$getWithin = function (radius) { + return _terezka$line_charts$Internal_Events$Decoder( + F3( + function (points, system, searchedSvg) { + var searched = A2(_terezka$line_charts$LineChart_Coordinate$toData, system, searchedSvg); + var keepIfEligible = function (closest) { + return A4(_terezka$line_charts$Internal_Events$withinRadius, system, radius, searched, closest.point) ? _elm_lang$core$Maybe$Just(closest.user) : _elm_lang$core$Maybe$Nothing; + }; + return A2( + _elm_lang$core$Maybe$andThen, + keepIfEligible, + A3(_terezka$line_charts$Internal_Events$getNearestHelp, points, system, searched)); + })); +}; +var _terezka$line_charts$Internal_Events$getNearestX = _terezka$line_charts$Internal_Events$Decoder( + F3( + function (points, system, searchedSvg) { + var searched = A2(_terezka$line_charts$LineChart_Coordinate$toData, system, searchedSvg); + return A2( + _elm_lang$core$List$map, + function (_) { + return _.user; + }, + A3(_terezka$line_charts$Internal_Events$getNearestXHelp, points, system, searched)); + })); +var _terezka$line_charts$Internal_Events$getWithinX = function (radius) { + return _terezka$line_charts$Internal_Events$Decoder( + F3( + function (points, system, searchedSvg) { + var searched = A2(_terezka$line_charts$LineChart_Coordinate$toData, system, searchedSvg); + var keepIfEligible = function (_p19) { + return A4( + _terezka$line_charts$Internal_Events$withinRadiusX, + system, + radius, + searched, + function (_) { + return _.point; + }(_p19)); + }; + return A2( + _elm_lang$core$List$map, + function (_) { + return _.user; + }, + A2( + _elm_lang$core$List$filter, + keepIfEligible, + A3(_terezka$line_charts$Internal_Events$getNearestXHelp, points, system, searched))); + })); +}; +var _terezka$line_charts$Internal_Events$map = F2( + function (f, _p20) { + var _p21 = _p20; + return _terezka$line_charts$Internal_Events$Decoder( + F3( + function (ps, s, p) { + return f( + A3(_p21._0, ps, s, p)); + })); + }); +var _terezka$line_charts$Internal_Events$on = F3( + function (event, toMsg, decoder) { + return A2( + _terezka$line_charts$Internal_Events$Event, + false, + F2( + function (data, system) { + return A2( + _elm_lang$svg$Svg_Events$on, + event, + A3( + _terezka$line_charts$Internal_Events$toJsonDecoder, + data, + system, + A2(_terezka$line_charts$Internal_Events$map, toMsg, decoder))); + })); + }); +var _terezka$line_charts$Internal_Events$onClick = _terezka$line_charts$Internal_Events$on('click'); +var _terezka$line_charts$Internal_Events$click = function (msg) { + return _terezka$line_charts$Internal_Events$custom( + { + ctor: '::', + _0: A2( + _terezka$line_charts$Internal_Events$onClick, + msg, + _terezka$line_charts$Internal_Events$getWithin(30)), + _1: {ctor: '[]'} + }); +}; +var _terezka$line_charts$Internal_Events$onMouseMove = _terezka$line_charts$Internal_Events$on('mousemove'); +var _terezka$line_charts$Internal_Events$hoverMany = function (msg) { + return _terezka$line_charts$Internal_Events$custom( + { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Events$onMouseMove, msg, _terezka$line_charts$Internal_Events$getNearestX), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Events$onMouseLeave( + msg( + {ctor: '[]'})), + _1: {ctor: '[]'} + } + }); +}; +var _terezka$line_charts$Internal_Events$hoverOne = function (msg) { + return _terezka$line_charts$Internal_Events$custom( + { + ctor: '::', + _0: A2( + _terezka$line_charts$Internal_Events$onMouseMove, + msg, + _terezka$line_charts$Internal_Events$getWithin(30)), + _1: { + ctor: '::', + _0: A3( + _terezka$line_charts$Internal_Events$on, + 'touchstart', + msg, + _terezka$line_charts$Internal_Events$getWithin(100)), + _1: { + ctor: '::', + _0: A3( + _terezka$line_charts$Internal_Events$on, + 'touchmove', + msg, + _terezka$line_charts$Internal_Events$getWithin(100)), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Events$onMouseLeave( + msg(_elm_lang$core$Maybe$Nothing)), + _1: {ctor: '[]'} + } + } + } + }); +}; +var _terezka$line_charts$Internal_Events$onMouseDown = _terezka$line_charts$Internal_Events$on('mousedown'); +var _terezka$line_charts$Internal_Events$onMouseUp = _terezka$line_charts$Internal_Events$on('mouseup'); +var _terezka$line_charts$Internal_Events$onWithOptions = F4( + function (event, options, toMsg, decoder) { + return A2( + _terezka$line_charts$Internal_Events$Event, + options.catchOutsideChart, + F2( + function (data, system) { + return A3( + _elm_lang$html$Html_Events$onWithOptions, + event, + A2(_elm_lang$html$Html_Events$Options, options.stopPropagation, options.preventDefault), + A3( + _terezka$line_charts$Internal_Events$toJsonDecoder, + data, + system, + A2(_terezka$line_charts$Internal_Events$map, toMsg, decoder))); + })); + }); +var _terezka$line_charts$Internal_Events$map2 = F3( + function (f, _p23, _p22) { + var _p24 = _p23; + var _p25 = _p22; + return _terezka$line_charts$Internal_Events$Decoder( + F3( + function (ps, s, p) { + return A2( + f, + A3(_p24._0, ps, s, p), + A3(_p25._0, ps, s, p)); + })); + }); +var _terezka$line_charts$Internal_Events$map3 = F4( + function (f, _p28, _p27, _p26) { + var _p29 = _p28; + var _p30 = _p27; + var _p31 = _p26; + return _terezka$line_charts$Internal_Events$Decoder( + F3( + function (ps, s, p) { + return A3( + f, + A3(_p29._0, ps, s, p), + A3(_p30._0, ps, s, p), + A3(_p31._0, ps, s, p)); + })); + }); + +var _terezka$line_charts$LineChart_Events$map3 = _terezka$line_charts$Internal_Events$map3; +var _terezka$line_charts$LineChart_Events$map2 = _terezka$line_charts$Internal_Events$map2; +var _terezka$line_charts$LineChart_Events$map = _terezka$line_charts$Internal_Events$map; +var _terezka$line_charts$LineChart_Events$getWithinX = _terezka$line_charts$Internal_Events$getWithinX; +var _terezka$line_charts$LineChart_Events$getNearestX = _terezka$line_charts$Internal_Events$getNearestX; +var _terezka$line_charts$LineChart_Events$getWithin = _terezka$line_charts$Internal_Events$getWithin; +var _terezka$line_charts$LineChart_Events$getNearest = _terezka$line_charts$Internal_Events$getNearest; +var _terezka$line_charts$LineChart_Events$getData = _terezka$line_charts$Internal_Events$getData; +var _terezka$line_charts$LineChart_Events$getSvg = _terezka$line_charts$Internal_Events$getSvg; +var _terezka$line_charts$LineChart_Events$onWithOptions = _terezka$line_charts$Internal_Events$onWithOptions; +var _terezka$line_charts$LineChart_Events$on = _terezka$line_charts$Internal_Events$on; +var _terezka$line_charts$LineChart_Events$onMouseLeave = _terezka$line_charts$Internal_Events$onMouseLeave; +var _terezka$line_charts$LineChart_Events$onMouseUp = _terezka$line_charts$Internal_Events$onMouseUp; +var _terezka$line_charts$LineChart_Events$onMouseDown = _terezka$line_charts$Internal_Events$onMouseDown; +var _terezka$line_charts$LineChart_Events$onMouseMove = _terezka$line_charts$Internal_Events$onMouseMove; +var _terezka$line_charts$LineChart_Events$onClick = _terezka$line_charts$Internal_Events$onClick; +var _terezka$line_charts$LineChart_Events$custom = _terezka$line_charts$Internal_Events$custom; +var _terezka$line_charts$LineChart_Events$click = _terezka$line_charts$Internal_Events$click; +var _terezka$line_charts$LineChart_Events$hoverMany = _terezka$line_charts$Internal_Events$hoverMany; +var _terezka$line_charts$LineChart_Events$hoverOne = _terezka$line_charts$Internal_Events$hoverOne; +var _terezka$line_charts$LineChart_Events$default = _terezka$line_charts$Internal_Events$default; +var _terezka$line_charts$LineChart_Events$Options = F3( + function (a, b, c) { + return {stopPropagation: a, preventDefault: b, catchOutsideChart: c}; + }); + +var _terezka$line_charts$Internal_Legends$defaultLegend = F2( + function (index, _p0) { + var _p1 = _p0; + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__legend'), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$transform( + { + ctor: '::', + _0: A2( + _terezka$line_charts$Internal_Svg$offset, + 20, + _elm_lang$core$Basics$toFloat(index) * 20), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: _p1.sample, + _1: { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$transform( + { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Svg$offset, 40, 4), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Svg$label, 'inherit', _p1.label), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + }); + }); +var _terezka$line_charts$Internal_Legends$defaultLegends = F8( + function (toX, toY, offsetX, offsetY, hovered, $arguments, system, legends) { + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__legends'), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$transform( + { + ctor: '::', + _0: A3( + _terezka$line_charts$Internal_Svg$move, + system, + toX(system.x), + toY(system.y)), + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Svg$offset, offsetX, offsetY), + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + } + }, + A2(_elm_lang$core$List$indexedMap, _terezka$line_charts$Internal_Legends$defaultLegend, legends)); + }); +var _terezka$line_charts$Internal_Legends$viewSample = F4( + function (_p2, sampleWidth, line, data) { + var _p3 = _p2; + var _p5 = _p3.system; + var _p4 = _p3.lineConfig; + var shape = _terezka$line_charts$Internal_Line$shape(line); + var color = A3(_terezka$line_charts$Internal_Line$color, _p4, line, data); + var dotPosition = A2( + _terezka$line_charts$LineChart_Coordinate$toData, + _p5, + A2(_terezka$line_charts$Internal_Data$Point, sampleWidth / 2, 0)); + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__sample'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A5(_terezka$line_charts$Internal_Line$viewSample, _p4, line, _p3.area, data, sampleWidth), + _1: { + ctor: '::', + _0: A6(_terezka$line_charts$Internal_Dots$viewSample, _p3.dotsConfig, shape, color, _p5, data, dotPosition), + _1: {ctor: '[]'} + } + }); + }); +var _terezka$line_charts$Internal_Legends$viewGrouped = F3( + function ($arguments, sampleWidth, container) { + var toLegend = F2( + function (line, data) { + return { + sample: A4(_terezka$line_charts$Internal_Legends$viewSample, $arguments, sampleWidth, line, data), + label: _terezka$line_charts$Internal_Line$label(line) + }; + }); + var legends = A3(_elm_lang$core$List$map2, toLegend, $arguments.lines, $arguments.data); + return A2(container, $arguments.system, legends); + }); +var _terezka$line_charts$Internal_Legends$viewFree = F5( + function (system, placement, viewLabel, line, data) { + var _p6 = function () { + var _p7 = placement; + if (_p7.ctor === 'Beginning') { + return {ctor: '_Tuple3', _0: data, _1: _terezka$line_charts$Internal_Svg$End, _2: -10}; + } else { + return { + ctor: '_Tuple3', + _0: _elm_lang$core$List$reverse(data), + _1: _terezka$line_charts$Internal_Svg$Start, + _2: 10 + }; + } + }(); + var orderedPoints = _p6._0; + var anchor = _p6._1; + var xOffset = _p6._2; + var transform = function (_p8) { + var _p9 = _p8; + return _terezka$line_charts$Internal_Svg$transform( + { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Svg$move, system, _p9.x, _p9.y), + _1: { + ctor: '::', + _0: A2(_terezka$line_charts$Internal_Svg$offset, xOffset, 3), + _1: {ctor: '[]'} + } + }); + }; + var viewLegend = function (_p10) { + var _p11 = _p10; + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: transform(_p11.point), + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Svg$anchorStyle(anchor), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: viewLabel( + _terezka$line_charts$Internal_Line$label(line)), + _1: {ctor: '[]'} + }); + }; + return A2( + _terezka$line_charts$Internal_Utils$viewMaybe, + _elm_lang$core$List$head(orderedPoints), + viewLegend); + }); +var _terezka$line_charts$Internal_Legends$viewFrees = F3( + function (_p12, placement, view) { + var _p13 = _p12; + return A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__legends'), + _1: {ctor: '[]'} + }, + A3( + _elm_lang$core$List$map2, + A3(_terezka$line_charts$Internal_Legends$viewFree, _p13.system, placement, view), + _p13.lines, + _p13.data)); + }); +var _terezka$line_charts$Internal_Legends$view = function ($arguments) { + var _p14 = $arguments.legends; + switch (_p14.ctor) { + case 'Free': + return A3(_terezka$line_charts$Internal_Legends$viewFrees, $arguments, _p14._0, _p14._1); + case 'Grouped': + return A3( + _terezka$line_charts$Internal_Legends$viewGrouped, + $arguments, + _p14._0, + _p14._1($arguments)); + default: + return _elm_lang$svg$Svg$text(''); + } +}; +var _terezka$line_charts$Internal_Legends$Legend = F2( + function (a, b) { + return {sample: a, label: b}; + }); +var _terezka$line_charts$Internal_Legends$Arguments = F9( + function (a, b, c, d, e, f, g, h, i) { + return {system: a, dotsConfig: b, lineConfig: c, area: d, lines: e, data: f, x: g, y: h, legends: i}; + }); +var _terezka$line_charts$Internal_Legends$Grouped = F2( + function (a, b) { + return {ctor: 'Grouped', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Legends$hover = function (data) { + return A2( + _terezka$line_charts$Internal_Legends$Grouped, + 30, + A5( + _terezka$line_charts$Internal_Legends$defaultLegends, + function (_) { + return _.max; + }, + function (_) { + return _.max; + }, + 0, + 10, + data)); +}; +var _terezka$line_charts$Internal_Legends$default = _terezka$line_charts$Internal_Legends$hover( + {ctor: '[]'}); +var _terezka$line_charts$Internal_Legends$hoverOne = function (maybeOne) { + var _p15 = maybeOne; + if (_p15.ctor === 'Just') { + return _terezka$line_charts$Internal_Legends$hover( + { + ctor: '::', + _0: _p15._0, + _1: {ctor: '[]'} + }); + } else { + return _terezka$line_charts$Internal_Legends$hover( + {ctor: '[]'}); + } +}; +var _terezka$line_charts$Internal_Legends$grouped = F4( + function (toX, toY, offsetX, offsetY) { + return A2( + _terezka$line_charts$Internal_Legends$Grouped, + 30, + A5( + _terezka$line_charts$Internal_Legends$defaultLegends, + toX, + toY, + offsetX, + offsetY, + {ctor: '[]'})); + }); +var _terezka$line_charts$Internal_Legends$groupedCustom = F2( + function (sampleWidth, container) { + return A2( + _terezka$line_charts$Internal_Legends$Grouped, + sampleWidth, + function (_p16) { + return container; + }); + }); +var _terezka$line_charts$Internal_Legends$Free = F2( + function (a, b) { + return {ctor: 'Free', _0: a, _1: b}; + }); +var _terezka$line_charts$Internal_Legends$None = {ctor: 'None'}; +var _terezka$line_charts$Internal_Legends$none = _terezka$line_charts$Internal_Legends$None; +var _terezka$line_charts$Internal_Legends$Ending = {ctor: 'Ending'}; +var _terezka$line_charts$Internal_Legends$byEnding = _terezka$line_charts$Internal_Legends$Free(_terezka$line_charts$Internal_Legends$Ending); +var _terezka$line_charts$Internal_Legends$Beginning = {ctor: 'Beginning'}; +var _terezka$line_charts$Internal_Legends$byBeginning = _terezka$line_charts$Internal_Legends$Free(_terezka$line_charts$Internal_Legends$Beginning); + +var _terezka$line_charts$LineChart_Legends$groupedCustom = _terezka$line_charts$Internal_Legends$groupedCustom; +var _terezka$line_charts$LineChart_Legends$grouped = _terezka$line_charts$Internal_Legends$grouped; +var _terezka$line_charts$LineChart_Legends$byBeginning = _terezka$line_charts$Internal_Legends$byBeginning; +var _terezka$line_charts$LineChart_Legends$byEnding = _terezka$line_charts$Internal_Legends$byEnding; +var _terezka$line_charts$LineChart_Legends$none = _terezka$line_charts$Internal_Legends$none; +var _terezka$line_charts$LineChart_Legends$default = _terezka$line_charts$Internal_Legends$default; +var _terezka$line_charts$LineChart_Legends$Legend = F2( + function (a, b) { + return {sample: a, label: b}; + }); + +var _terezka$line_charts$LineChart_Interpolation$stepped = _terezka$line_charts$Internal_Interpolation$Stepped; +var _terezka$line_charts$LineChart_Interpolation$monotone = _terezka$line_charts$Internal_Interpolation$Monotone; +var _terezka$line_charts$LineChart_Interpolation$linear = _terezka$line_charts$Internal_Interpolation$Linear; +var _terezka$line_charts$LineChart_Interpolation$default = _terezka$line_charts$LineChart_Interpolation$linear; + +var _terezka$line_charts$LineChart_Axis_Intersection$custom = _terezka$line_charts$Internal_Axis_Intersection$custom; +var _terezka$line_charts$LineChart_Axis_Intersection$at = _terezka$line_charts$Internal_Axis_Intersection$at; +var _terezka$line_charts$LineChart_Axis_Intersection$atOrigin = _terezka$line_charts$Internal_Axis_Intersection$atOrigin; +var _terezka$line_charts$LineChart_Axis_Intersection$default = _terezka$line_charts$Internal_Axis_Intersection$default; + +var _terezka$line_charts$LineChart$defaultLabel = { + ctor: '::', + _0: 'First', + _1: { + ctor: '::', + _0: 'Second', + _1: { + ctor: '::', + _0: 'Third', + _1: {ctor: '[]'} + } + } +}; +var _terezka$line_charts$LineChart$defaultShapes = { + ctor: '::', + _0: _terezka$line_charts$Internal_Dots$Circle, + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Dots$Triangle, + _1: { + ctor: '::', + _0: _terezka$line_charts$Internal_Dots$Cross, + _1: {ctor: '[]'} + } + } +}; +var _terezka$line_charts$LineChart$defaultColors = { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$pink, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$blue, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$gold, + _1: {ctor: '[]'} + } + } +}; +var _terezka$line_charts$LineChart$defaultLines = A4(_elm_lang$core$List$map4, _terezka$line_charts$Internal_Line$line, _terezka$line_charts$LineChart$defaultColors, _terezka$line_charts$LineChart$defaultShapes, _terezka$line_charts$LineChart$defaultLabel); +var _terezka$line_charts$LineChart$defaultConfig = F2( + function (toX, toY) { + return { + y: A3(_terezka$line_charts$LineChart_Axis$default, 400, '', toY), + x: A3(_terezka$line_charts$LineChart_Axis$default, 700, '', toX), + container: _terezka$line_charts$LineChart_Container$default('line-chart-1'), + interpolation: _terezka$line_charts$LineChart_Interpolation$default, + intersection: _terezka$line_charts$LineChart_Axis_Intersection$default, + legends: _terezka$line_charts$LineChart_Legends$default, + events: _terezka$line_charts$LineChart_Events$default, + junk: _terezka$line_charts$LineChart_Junk$default, + grid: _terezka$line_charts$LineChart_Grid$default, + area: _terezka$line_charts$LineChart_Area$default, + line: _terezka$line_charts$LineChart_Line$default, + dots: _terezka$line_charts$LineChart_Dots$default + }; + }); +var _terezka$line_charts$LineChart$toSystem = F2( + function (config, data) { + var yRange = A2( + _terezka$line_charts$Internal_Coordinate$range, + function (_p0) { + return function (_) { + return _.y; + }( + function (_) { + return _.point; + }(_p0)); + }, + data); + var xRange = A2( + _terezka$line_charts$Internal_Coordinate$range, + function (_p1) { + return function (_) { + return _.x; + }( + function (_) { + return _.point; + }(_p1)); + }, + data); + var size = A2( + _terezka$line_charts$Internal_Coordinate$Size, + _terezka$line_charts$Internal_Axis$pixels(config.x), + _terezka$line_charts$Internal_Axis$pixels(config.y)); + var hasArea = _terezka$line_charts$Internal_Area$hasArea(config.area); + var adjustDomainRange = function (domain) { + return hasArea ? _terezka$line_charts$Internal_Coordinate$ground(domain) : domain; + }; + var container = A2(_terezka$line_charts$Internal_Container$properties, _elm_lang$core$Basics$identity, config.container); + var frame = A2(_terezka$line_charts$Internal_Coordinate$Frame, container.margin, size); + var system = { + frame: frame, + x: xRange, + y: adjustDomainRange(yRange), + xData: xRange, + yData: yRange, + id: container.id + }; + return _elm_lang$core$Native_Utils.update( + system, + { + x: A2( + _terezka$line_charts$Internal_Axis_Range$applyX, + _terezka$line_charts$Internal_Axis$range(config.x), + system), + y: A2( + _terezka$line_charts$Internal_Axis_Range$applyY, + _terezka$line_charts$Internal_Axis$range(config.y), + system) + }); + }); +var _terezka$line_charts$LineChart$setY = F2( + function (datum, y) { + return A3( + _terezka$line_charts$Internal_Data$Data, + datum.user, + A2(_terezka$line_charts$Internal_Data$Point, datum.point.x, y), + datum.isReal); + }); +var _terezka$line_charts$LineChart$normalize = function (datasets) { + var _p2 = datasets; + if (_p2.ctor === '::') { + var _p3 = _p2._0; + var toPercentage = F2( + function (highest, datum) { + return A2(_terezka$line_charts$LineChart$setY, datum, (100 * datum.point.y) / highest.point.y); + }); + return A2( + _elm_lang$core$List$map, + A2(_elm_lang$core$List$map2, toPercentage, _p3), + {ctor: '::', _0: _p3, _1: _p2._1}); + } else { + return datasets; + } +}; +var _terezka$line_charts$LineChart$addBelows = F2( + function (data, dataBelow) { + var add = F2( + function (below, datum) { + return A2(_terezka$line_charts$LineChart$setY, below, below.point.y + datum.point.y); + }); + var iterate = F4( + function (datum0, data, dataBelow, result) { + iterate: + while (true) { + var _p4 = {ctor: '_Tuple2', _0: data, _1: dataBelow}; + if (_p4._0.ctor === '::') { + if (_p4._1.ctor === '::') { + var _p8 = _p4._1._0; + var _p7 = _p4._0._0; + var _p6 = _p4._1._1; + var _p5 = _p4._0._1; + if (_elm_lang$core$Native_Utils.cmp(_p7.point.x, _p8.point.x) > 0) { + if (_p8.isReal) { + var _v2 = datum0, + _v3 = {ctor: '::', _0: _p7, _1: _p5}, + _v4 = _p6, + _v5 = { + ctor: '::', + _0: A2(add, _p8, datum0), + _1: result + }; + datum0 = _v2; + data = _v3; + dataBelow = _v4; + result = _v5; + continue iterate; + } else { + var breakdata = _elm_lang$core$Native_Utils.update( + datum0, + {isReal: false}); + var _v6 = datum0, + _v7 = {ctor: '::', _0: _p7, _1: _p5}, + _v8 = _p6, + _v9 = { + ctor: '::', + _0: A2(add, _p8, datum0), + _1: result + }; + datum0 = _v6; + data = _v7; + dataBelow = _v8; + result = _v9; + continue iterate; + } + } else { + var _v10 = _p7, + _v11 = _p5, + _v12 = {ctor: '::', _0: _p8, _1: _p6}, + _v13 = result; + datum0 = _v10; + data = _v11; + dataBelow = _v12; + result = _v13; + continue iterate; + } + } else { + return result; + } + } else { + if (_p4._1.ctor === '::') { + var _p10 = _p4._1._0; + var _p9 = _p4._1._1; + if (_elm_lang$core$Native_Utils.cmp(datum0.point.x, _p10.point.x) < 1) { + var _v14 = datum0, + _v15 = {ctor: '[]'}, + _v16 = _p9, + _v17 = { + ctor: '::', + _0: A2(add, _p10, datum0), + _1: result + }; + datum0 = _v14; + data = _v15; + dataBelow = _v16; + result = _v17; + continue iterate; + } else { + var _v18 = datum0, + _v19 = {ctor: '[]'}, + _v20 = _p9, + _v21 = {ctor: '::', _0: _p10, _1: result}; + datum0 = _v18; + data = _v19; + dataBelow = _v20; + result = _v21; + continue iterate; + } + } else { + return result; + } + } + } + }); + return _elm_lang$core$List$reverse( + A2( + _elm_lang$core$Maybe$withDefault, + {ctor: '[]'}, + A2( + _terezka$line_charts$Internal_Utils$withFirst, + data, + F2( + function (first, rest) { + return A4( + iterate, + first, + rest, + dataBelow, + {ctor: '[]'}); + })))); + }); +var _terezka$line_charts$LineChart$stack = function (dataset) { + var stackBelows = F2( + function (dataset, result) { + stackBelows: + while (true) { + var _p11 = dataset; + if (_p11.ctor === '::') { + var _p12 = _p11._1; + var _v23 = _p12, + _v24 = { + ctor: '::', + _0: A3(_elm_lang$core$List$foldl, _terezka$line_charts$LineChart$addBelows, _p11._0, _p12), + _1: result + }; + dataset = _v23; + result = _v24; + continue stackBelows; + } else { + return result; + } + } + }); + return _elm_lang$core$List$reverse( + A2( + stackBelows, + dataset, + {ctor: '[]'})); +}; +var _terezka$line_charts$LineChart$toDataPoints = F2( + function (config, lines) { + var y = _terezka$line_charts$Internal_Axis$variable(config.y); + var x = _terezka$line_charts$Internal_Axis$variable(config.x); + var addPoint = function (datum) { + var _p13 = { + ctor: '_Tuple2', + _0: x(datum), + _1: y(datum) + }; + if (_p13._0.ctor === 'Just') { + if (_p13._1.ctor === 'Just') { + return _elm_lang$core$Maybe$Just( + A3( + _terezka$line_charts$Internal_Data$Data, + datum, + A2(_terezka$line_charts$Internal_Data$Point, _p13._0._0, _p13._1._0), + true)); + } else { + return _elm_lang$core$Maybe$Just( + A3( + _terezka$line_charts$Internal_Data$Data, + datum, + A2(_terezka$line_charts$Internal_Data$Point, _p13._0._0, 0), + false)); + } + } else { + if (_p13._1.ctor === 'Just') { + return _elm_lang$core$Maybe$Nothing; + } else { + return _elm_lang$core$Maybe$Nothing; + } + } + }; + var data = A2( + _elm_lang$core$List$map, + function (_p14) { + return A2( + _elm_lang$core$List$filterMap, + addPoint, + _terezka$line_charts$Internal_Line$data(_p14)); + }, + lines); + var _p15 = config.area; + switch (_p15.ctor) { + case 'None': + return data; + case 'Normal': + return data; + case 'Stacked': + return _terezka$line_charts$LineChart$stack(data); + default: + return _terezka$line_charts$LineChart$normalize( + _terezka$line_charts$LineChart$stack(data)); + } + }); +var _terezka$line_charts$LineChart$chartAreaAttributes = function (system) { + return { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$x( + _elm_lang$core$Basics$toString(system.frame.margin.left)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$y( + _elm_lang$core$Basics$toString(system.frame.margin.top)), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$width( + _elm_lang$core$Basics$toString( + _terezka$line_charts$Internal_Coordinate$lengthX(system))), + _1: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$height( + _elm_lang$core$Basics$toString( + _terezka$line_charts$Internal_Coordinate$lengthY(system))), + _1: {ctor: '[]'} + } + } + } + }; +}; +var _terezka$line_charts$LineChart$chartAreaPlatform = F3( + function (config, data, system) { + var attributes = _elm_lang$core$List$concat( + { + ctor: '::', + _0: { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$fill('transparent'), + _1: {ctor: '[]'} + }, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart$chartAreaAttributes(system), + _1: { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Events$toChartAttributes, data, system, config.events), + _1: {ctor: '[]'} + } + } + }); + return A2( + _elm_lang$svg$Svg$rect, + attributes, + {ctor: '[]'}); + }); +var _terezka$line_charts$LineChart$clipPath = function (system) { + return A2( + _elm_lang$svg$Svg$clipPath, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$id( + _terezka$line_charts$Internal_Utils$toChartAreaId(system.id)), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$rect, + _terezka$line_charts$LineChart$chartAreaAttributes(system), + {ctor: '[]'}), + _1: {ctor: '[]'} + }); +}; +var _terezka$line_charts$LineChart$container = F4( + function (config, _p16, junkHtml, plot) { + var _p17 = _p16; + var _p18 = _p17.frame; + var sizeStyles = A3(_terezka$line_charts$Internal_Container$sizeStyles, config.container, _p18.size.width, _p18.size.height); + var styles = _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'position', _1: 'relative'}, + _1: sizeStyles + }); + var userAttributes = A2( + _terezka$line_charts$Internal_Container$properties, + function (_) { + return _.attributesHtml; + }, + config.container); + return A2( + _elm_lang$html$Html$div, + {ctor: '::', _0: styles, _1: userAttributes}, + {ctor: '::', _0: plot, _1: junkHtml}); + }); +var _terezka$line_charts$LineChart$viewBoxAttribute = function (_p19) { + var _p20 = _p19; + var _p21 = _p20.frame; + return _elm_lang$svg$Svg_Attributes$viewBox( + A2( + _elm_lang$core$Basics_ops['++'], + '0 0 ', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$core$Basics$toString(_p21.size.width), + A2( + _elm_lang$core$Basics_ops['++'], + ' ', + _elm_lang$core$Basics$toString(_p21.size.height))))); +}; +var _terezka$line_charts$LineChart$viewCustom = F2( + function (config, lines) { + var junkLineInfo = function (line) { + return { + ctor: '_Tuple3', + _0: A3( + _terezka$line_charts$Internal_Line$color, + config.line, + line, + {ctor: '[]'}), + _1: _terezka$line_charts$Internal_Line$label(line), + _2: _terezka$line_charts$Internal_Line$data(line) + }; + }; + var getJunk = A3( + _terezka$line_charts$Internal_Junk$getLayers, + A2(_elm_lang$core$List$map, junkLineInfo, lines), + _terezka$line_charts$Internal_Axis$variable(config.x), + _terezka$line_charts$Internal_Axis$variable(config.y)); + var data = A2(_terezka$line_charts$LineChart$toDataPoints, config, lines); + var dataSafe = A2( + _elm_lang$core$List$map, + _elm_lang$core$List$filter( + function (_) { + return _.isReal; + }), + data); + var dataAllSafe = _elm_lang$core$List$concat(dataSafe); + var system = A2(_terezka$line_charts$LineChart$toSystem, config, dataAllSafe); + var addGrid = _terezka$line_charts$Internal_Junk$addBelow( + A4(_terezka$line_charts$Internal_Grid$view, system, config.x, config.y, config.grid)); + var junk = addGrid( + A2(getJunk, system, config.junk)); + var viewLines = _terezka$line_charts$Internal_Line$view( + {system: system, interpolation: config.interpolation, dotsConfig: config.dots, lineConfig: config.line, area: config.area}); + var viewLegends = _terezka$line_charts$Internal_Legends$view( + { + system: system, + legends: config.legends, + x: _terezka$line_charts$Internal_Axis$variable(config.x), + y: _terezka$line_charts$Internal_Axis$variable(config.y), + dotsConfig: config.dots, + lineConfig: config.line, + area: config.area, + data: dataSafe, + lines: lines + }); + var dataAll = _elm_lang$core$List$concat(data); + var attributes = _elm_lang$core$List$concat( + { + ctor: '::', + _0: A2( + _terezka$line_charts$Internal_Container$properties, + function (_) { + return _.attributesSvg; + }, + config.container), + _1: { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Events$toContainerAttributes, dataAll, system, config.events), + _1: { + ctor: '::', + _0: { + ctor: '::', + _0: _terezka$line_charts$LineChart$viewBoxAttribute(system), + _1: {ctor: '[]'} + }, + _1: {ctor: '[]'} + } + } + }); + return A4( + _terezka$line_charts$LineChart$container, + config, + system, + junk.html, + A2( + _elm_lang$svg$Svg$svg, + attributes, + { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$defs, + {ctor: '[]'}, + { + ctor: '::', + _0: _terezka$line_charts$LineChart$clipPath(system), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__junk--below'), + _1: {ctor: '[]'} + }, + junk.below), + _1: { + ctor: '::', + _0: A2(viewLines, lines, data), + _1: { + ctor: '::', + _0: A3(_terezka$line_charts$LineChart$chartAreaPlatform, config, dataAll, system), + _1: { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Axis$viewHorizontal, system, config.intersection, config.x), + _1: { + ctor: '::', + _0: A3(_terezka$line_charts$Internal_Axis$viewVertical, system, config.intersection, config.y), + _1: { + ctor: '::', + _0: viewLegends, + _1: { + ctor: '::', + _0: A2( + _elm_lang$svg$Svg$g, + { + ctor: '::', + _0: _elm_lang$svg$Svg_Attributes$class('chart__junk--above'), + _1: {ctor: '[]'} + }, + junk.above), + _1: {ctor: '[]'} + } + } + } + } + } + } + } + })); + }); +var _terezka$line_charts$LineChart$dash = _terezka$line_charts$Internal_Line$dash; +var _terezka$line_charts$LineChart$line = _terezka$line_charts$Internal_Line$line; +var _terezka$line_charts$LineChart$view = F2( + function (toX, toY) { + return _terezka$line_charts$LineChart$viewCustom( + A2(_terezka$line_charts$LineChart$defaultConfig, toX, toY)); + }); +var _terezka$line_charts$LineChart$view3 = F5( + function (toX, toY, dataset1, dataset2, dataset3) { + return A3( + _terezka$line_charts$LineChart$view, + toX, + toY, + _terezka$line_charts$LineChart$defaultLines( + { + ctor: '::', + _0: dataset1, + _1: { + ctor: '::', + _0: dataset2, + _1: { + ctor: '::', + _0: dataset3, + _1: {ctor: '[]'} + } + } + })); + }); +var _terezka$line_charts$LineChart$view2 = F4( + function (toX, toY, dataset1, dataset2) { + return A3( + _terezka$line_charts$LineChart$view, + toX, + toY, + _terezka$line_charts$LineChart$defaultLines( + { + ctor: '::', + _0: dataset1, + _1: { + ctor: '::', + _0: dataset2, + _1: {ctor: '[]'} + } + })); + }); +var _terezka$line_charts$LineChart$view1 = F3( + function (toX, toY, dataset) { + return A3( + _terezka$line_charts$LineChart$view, + toX, + toY, + _terezka$line_charts$LineChart$defaultLines( + { + ctor: '::', + _0: dataset, + _1: {ctor: '[]'} + })); + }); +var _terezka$line_charts$LineChart$Config = function (a) { + return function (b) { + return function (c) { + return function (d) { + return function (e) { + return function (f) { + return function (g) { + return function (h) { + return function (i) { + return function (j) { + return function (k) { + return function (l) { + return {x: a, y: b, container: c, intersection: d, interpolation: e, legends: f, events: g, area: h, grid: i, line: j, dots: k, junk: l}; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; +}; + +var _seatgeek$wrecker_ui$Graph_Types$YLegend = F2( + function (a, b) { + return {ctor: 'YLegend', _0: a, _1: b}; + }); +var _seatgeek$wrecker_ui$Graph_Types$XLegend = F2( + function (a, b) { + return {ctor: 'XLegend', _0: a, _1: b}; + }); +var _seatgeek$wrecker_ui$Graph_Types$XValueGetter = function (a) { + return {ctor: 'XValueGetter', _0: a}; +}; +var _seatgeek$wrecker_ui$Graph_Types$YValueGetter = function (a) { + return {ctor: 'YValueGetter', _0: a}; +}; + +var _seatgeek$wrecker_ui$Graph_Coloring$allColors = { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$pink, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$blue, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$gold, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$red, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$green, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$cyan, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$teal, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$purple, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$pinkLight, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$blueLight, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$goldLight, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$redLight, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$greenLight, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$cyanLight, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$tealLight, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$purpleLight, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$black, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$gray, + _1: { + ctor: '::', + _0: _terezka$line_charts$LineChart_Colors$grayLight, + _1: {ctor: '[]'} + } + } + } + } + } + } + } + } + } + } + } + } + } + } + } + } + } + } +}; +var _seatgeek$wrecker_ui$Graph_Coloring$totalColors = _elm_lang$core$List$length(_seatgeek$wrecker_ui$Graph_Coloring$allColors); +var _seatgeek$wrecker_ui$Graph_Coloring$pickColor = function (num) { + var index = A2(_elm_lang$core$Basics_ops['%'], num, _seatgeek$wrecker_ui$Graph_Coloring$totalColors); + return A2( + _elm_lang$core$Maybe$withDefault, + _terezka$line_charts$LineChart_Colors$blue, + A2(_elm_community$list_extra$List_Extra$getAt, index, _seatgeek$wrecker_ui$Graph_Coloring$allColors)); +}; + +var _seatgeek$wrecker_ui$LineGraph$containerConfig = _terezka$line_charts$LineChart_Container$custom( + { + attributesHtml: {ctor: '[]'}, + attributesSvg: {ctor: '[]'}, + size: _terezka$line_charts$LineChart_Container$relative, + margin: A4(_terezka$line_charts$LineChart_Container$Margin, 30, 100, 30, 70), + id: 'line-chart-area' + }); +var _seatgeek$wrecker_ui$LineGraph$createLineSerie = F2( + function (runGroup, runData) { + var _p0 = runGroup; + if (_p0.ctor === 'Just') { + var _p1 = _p0._0; + return A4( + _terezka$line_charts$LineChart$line, + _seatgeek$wrecker_ui$Graph_Coloring$pickColor(_p1.id), + _terezka$line_charts$LineChart_Dots$circle, + _p1.title, + runData); + } else { + return A4( + _terezka$line_charts$LineChart$line, + _terezka$line_charts$LineChart_Colors$transparent, + _terezka$line_charts$LineChart_Dots$circle, + '', + {ctor: '[]'}); + } + }); +var _seatgeek$wrecker_ui$LineGraph$createSeries = F2( + function (allRunGroups, allRuns) { + var getRunGroup = function (groupId) { + return A2(_elm_lang$core$Dict$get, groupId, allRunGroups); + }; + return A2( + _elm_lang$core$List$map, + function (_p2) { + return A2( + _elm_lang$core$Basics$uncurry, + _seatgeek$wrecker_ui$LineGraph$createLineSerie, + A2(_elm_lang$core$Tuple$mapFirst, getRunGroup, _p2)); + }, + _elm_lang$core$Dict$toList(allRuns)); + }); +var _seatgeek$wrecker_ui$LineGraph$addCmd = F2( + function (cmd, model) { + return {ctor: '_Tuple2', _0: model, _1: _elm_lang$core$Platform_Cmd$none}; + }); +var _seatgeek$wrecker_ui$LineGraph$setHint = F2( + function (hinted, model) { + return _elm_lang$core$Native_Utils.update( + model, + {hinted: hinted}); + }); +var _seatgeek$wrecker_ui$LineGraph$update = F2( + function (msg, model) { + var _p3 = msg; + return A2( + _seatgeek$wrecker_ui$LineGraph$addCmd, + _elm_lang$core$Platform_Cmd$none, + A2(_seatgeek$wrecker_ui$LineGraph$setHint, _p3._0, model)); + }); +var _seatgeek$wrecker_ui$LineGraph$Model = function (a) { + return {hinted: a}; +}; +var _seatgeek$wrecker_ui$LineGraph$defaultModel = _seatgeek$wrecker_ui$LineGraph$Model( + {ctor: '[]'}); +var _seatgeek$wrecker_ui$LineGraph$Config = F4( + function (a, b, c, d) { + return {xLegend: a, xGetter: b, yLegend: c, yGetter: d}; + }); +var _seatgeek$wrecker_ui$LineGraph$Hint = function (a) { + return {ctor: 'Hint', _0: a}; +}; +var _seatgeek$wrecker_ui$LineGraph$chartConfig = F2( + function (config, model) { + var _p4 = config.yGetter; + var yGetter = _p4._0; + var _p5 = config.yLegend; + var yTitle = _p5._0; + var yTitler = _p5._1; + var _p6 = config.xGetter; + var xGetter = _p6._0; + var _p7 = config.xLegend; + var xTitle = _p7._0; + var xTitler = _p7._1; + return { + y: A3(_terezka$line_charts$LineChart_Axis$default, 800, yTitle, yGetter), + x: A3(_terezka$line_charts$LineChart_Axis$default, 1200, xTitle, xGetter), + container: _seatgeek$wrecker_ui$LineGraph$containerConfig, + interpolation: _terezka$line_charts$LineChart_Interpolation$monotone, + intersection: _terezka$line_charts$LineChart_Axis_Intersection$default, + legends: _terezka$line_charts$LineChart_Legends$none, + events: _terezka$line_charts$LineChart_Events$hoverMany(_seatgeek$wrecker_ui$LineGraph$Hint), + junk: A3(_terezka$line_charts$LineChart_Junk$hoverMany, model.hinted, xTitler, yTitler), + grid: A2(_terezka$line_charts$LineChart_Grid$dots, 1, _terezka$line_charts$LineChart_Colors$gray), + area: _terezka$line_charts$LineChart_Area$default, + line: _terezka$line_charts$LineChart_Line$default, + dots: _terezka$line_charts$LineChart_Dots$default + }; + }); +var _seatgeek$wrecker_ui$LineGraph$view = F4( + function (config, model, allRunGroups, data) { + return A2( + _elm_lang$html$Html$div, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _terezka$line_charts$LineChart$viewCustom, + A2(_seatgeek$wrecker_ui$LineGraph$chartConfig, config, model), + A2(_seatgeek$wrecker_ui$LineGraph$createSeries, allRunGroups, data)), + _1: {ctor: '[]'} + }); + }); + +var _seatgeek$wrecker_ui$Graph$round1000 = function ($float) { + return _elm_lang$core$Basics$toFloat( + _elm_lang$core$Basics$round($float * 1000)) / 1000; +}; +var _seatgeek$wrecker_ui$Graph$Model = function (a) { + return {lineGraphModel: a}; +}; +var _seatgeek$wrecker_ui$Graph$defaultModel = _seatgeek$wrecker_ui$Graph$Model(_seatgeek$wrecker_ui$LineGraph$defaultModel); +var _seatgeek$wrecker_ui$Graph$Timeline = F2( + function (a, b) { + return {ctor: 'Timeline', _0: a, _1: b}; + }); +var _seatgeek$wrecker_ui$Graph$Scatter = F4( + function (a, b, c, d) { + return {ctor: 'Scatter', _0: a, _1: b, _2: c, _3: d}; + }); +var _seatgeek$wrecker_ui$Graph$validGraphs = function () { + var throughputGetter = _seatgeek$wrecker_ui$Graph_Types$YValueGetter( + function (s) { + return _elm_lang$core$Basics$toFloat(s.run.concurrency) / s.stats.meanTime; + }); + var stats = function (getter) { + return _seatgeek$wrecker_ui$Graph_Types$YValueGetter( + function (_p0) { + return getter( + function (_) { + return _.stats; + }(_p0)); + }); + }; + var intStats = function (getter) { + return stats( + function (_p1) { + return _elm_lang$core$Basics$toFloat( + getter(_p1)); + }); + }; + var concurrency = function (_p2) { + return _elm_lang$core$Basics$toFloat( + function (_) { + return _.concurrency; + }( + function (_) { + return _.run; + }(_p2))); + }; + var concurrencyAxis = _seatgeek$wrecker_ui$Graph_Types$XValueGetter(concurrency); + var concurrencyLegend = A2( + _seatgeek$wrecker_ui$Graph_Types$XLegend, + 'Concurrency', + function (_p3) { + return A2( + F2( + function (x, y) { + return A2(_elm_lang$core$Basics_ops['++'], x, y); + }), + 'Concurrency: ', + _elm_lang$core$Basics$toString( + concurrency(_p3))); + }); + var legendLabel = F2( + function (_p4, append) { + var _p5 = _p4; + return function (_p6) { + return A3( + _elm_lang$core$Basics$flip, + F2( + function (x, y) { + return A2(_elm_lang$core$Basics_ops['++'], x, y); + }), + append, + _elm_lang$core$Basics$toString( + _seatgeek$wrecker_ui$Graph$round1000( + _p5._0(_p6)))); + }; + }); + var timeLegend = function (getter) { + return A2( + _seatgeek$wrecker_ui$Graph_Types$YLegend, + 'Resp.', + A2(legendLabel, getter, 'secs')); + }; + var baseScatter = function (getter) { + return A4( + _seatgeek$wrecker_ui$Graph$Scatter, + concurrencyLegend, + concurrencyAxis, + timeLegend(getter), + getter); + }; + var totalLegend = function (getter) { + return A2( + _seatgeek$wrecker_ui$Graph_Types$YLegend, + 'Total', + A2(legendLabel, getter, 'reqs')); + }; + var totalScatter = function (getter) { + return A4( + _seatgeek$wrecker_ui$Graph$Scatter, + concurrencyLegend, + concurrencyAxis, + totalLegend(getter), + getter); + }; + var throughput = function (getter) { + return A4( + _seatgeek$wrecker_ui$Graph$Scatter, + concurrencyLegend, + concurrencyAxis, + A2( + _seatgeek$wrecker_ui$Graph_Types$YLegend, + 'Users/sec', + A2(legendLabel, getter, 'u/s')), + getter); + }; + return { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Mean Time / Concurrency', + _1: baseScatter( + stats( + function (_) { + return _.meanTime; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Percentile 95 / Concurrency', + _1: baseScatter( + stats( + function (_) { + return _.quantile95; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Total Requests / Concurrency', + _1: totalScatter( + intStats( + function (_) { + return _.hits; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Failed Requests / Concurrency', + _1: totalScatter( + intStats( + function (s) { + return s.serverErrorHits + s.failedHits; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: '2xx Requests / Concurrency', + _1: totalScatter( + intStats( + function (_) { + return _.successHits; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: '4xx Requests / Concurrency', + _1: totalScatter( + intStats( + function (_) { + return _.userErrorHits; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Throughput / Concurrency', + _1: throughput(throughputGetter) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Fastest Time / Concurrency', + _1: baseScatter( + stats( + function (_) { + return _.minTime; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Slowest Time / Concurrency', + _1: baseScatter( + stats( + function (_) { + return _.maxTime; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Aggregated Time / Concurrency', + _1: baseScatter( + stats( + function (_) { + return _.totalTime; + })) + }, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'Variance / Concurrency', + _1: baseScatter( + stats( + function (_) { + return _.variance; + })) + }, + _1: {ctor: '[]'} + } + } + } + } + } + } + } + } + } + } + }; +}(); +var _seatgeek$wrecker_ui$Graph$chooseGraphType = F2( + function (name, runs) { + var appropriateConcurrency = function (runs) { + return _elm_lang$core$List$maximum( + A2( + _elm_lang$core$List$map, + function (_p7) { + return function (_) { + return _.concurrency; + }( + function (_) { + return _.run; + }(_p7)); + }, + runs)); + }; + var graphType = _elm_lang$core$List$head( + A2( + _elm_lang$core$List$filter, + function (_p8) { + var _p9 = _p8; + return _elm_lang$core$Native_Utils.eq(_p9._0, name); + }, + _seatgeek$wrecker_ui$Graph$validGraphs)); + var _p10 = graphType; + if (_p10.ctor === 'Nothing') { + return {ctor: '_Tuple2', _0: _elm_lang$core$Maybe$Nothing, _1: _elm_lang$core$Maybe$Nothing}; + } else { + if (_p10._0._1.ctor === 'Timeline') { + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Maybe$Just(_p10._0._0), + _1: appropriateConcurrency(runs) + }; + } else { + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Maybe$Just(_p10._0._0), + _1: _elm_lang$core$Maybe$Nothing + }; + } + } + }); +var _seatgeek$wrecker_ui$Graph$graphDefinition = function (title) { + return _elm_lang$core$List$head( + A2( + _elm_lang$core$List$map, + _elm_lang$core$Tuple$second, + A2( + _elm_lang$core$List$filter, + function (_p11) { + var _p12 = _p11; + return _elm_lang$core$Native_Utils.eq(title, _p12._0); + }, + _seatgeek$wrecker_ui$Graph$validGraphs))); +}; +var _seatgeek$wrecker_ui$Graph$LineGraphMsg = function (a) { + return {ctor: 'LineGraphMsg', _0: a}; +}; +var _seatgeek$wrecker_ui$Graph$update = F2( + function (_p13, model) { + var _p14 = _p13; + var _p15 = A2(_seatgeek$wrecker_ui$LineGraph$update, _p14._0, model.lineGraphModel); + var lineGraphModel = _p15._0; + var cmd = _p15._1; + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Native_Utils.update( + model, + {lineGraphModel: lineGraphModel}), + _1: A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Graph$LineGraphMsg, cmd) + }; + }); +var _seatgeek$wrecker_ui$Graph$view = F4( + function (model, graph, allGroups, runs) { + var _p16 = _seatgeek$wrecker_ui$Graph$graphDefinition(graph); + if ((_p16.ctor === 'Just') && (_p16._0.ctor === 'Scatter')) { + return A2( + _elm_lang$html$Html$map, + _seatgeek$wrecker_ui$Graph$LineGraphMsg, + A4( + _seatgeek$wrecker_ui$LineGraph$view, + A4(_seatgeek$wrecker_ui$LineGraph$Config, _p16._0._0, _p16._0._1, _p16._0._2, _p16._0._3), + model.lineGraphModel, + allGroups, + runs)); + } else { + return _elm_lang$core$Native_Utils.crashCase( + 'Graph', + { + start: {line: 154, column: 5}, + end: {line: 164, column: 63} + }, + _p16)( + A2(_elm_lang$core$Basics_ops['++'], 'got invalid graph title: ', graph)); + } + }); + +var _seatgeek$wrecker_ui$Router$toQueryString = function (params) { + return function (s) { + return _elm_lang$core$Native_Utils.eq(s, '?') ? '' : s; + }( + A3( + _elm_lang$core$List$foldl, + F2( + function (q, acc) { + return A2( + _elm_lang$core$Basics_ops['++'], + acc, + A2(_elm_lang$core$Basics_ops['++'], q, '&')); + }), + '?', + A2( + _elm_lang$core$List$filterMap, + function (_p0) { + var _p1 = _p0; + return A2( + _elm_lang$core$Maybe$map, + function (v) { + return A2( + _elm_lang$core$Basics_ops['++'], + _p1._0, + A2( + _elm_lang$core$Basics_ops['++'], + '=', + _elm_lang$http$Http$encodeUri(v))); + }, + _p1._1); + }, + params))); +}; +var _seatgeek$wrecker_ui$Router$routeToString = function (page) { + var _p2 = function () { + var _p3 = page; + switch (_p3.ctor) { + case 'Home': + return { + ctor: '_Tuple2', + _0: {ctor: '[]'}, + _1: {ctor: '[]'} + }; + case 'ScheduleTest': + return { + ctor: '_Tuple2', + _0: { + ctor: '::', + _0: 'schedule', + _1: {ctor: '[]'} + }, + _1: {ctor: '[]'} + }; + case 'SimplePlot': + return { + ctor: '_Tuple2', + _0: { + ctor: '::', + _0: 'plot', + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(_p3._0), + _1: {ctor: '[]'} + } + }, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'test', _1: _p3._1}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'page', _1: _p3._2}, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'groupSet', + _1: A2(_elm_lang$core$Maybe$map, _elm_community$string_extra$String_Extra$fromInt, _p3._3) + }, + _1: {ctor: '[]'} + } + } + } + }; + default: + return { + ctor: '_Tuple2', + _0: { + ctor: '::', + _0: 'plot', + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(_p3._0), + _1: { + ctor: '::', + _0: _elm_lang$core$Basics$toString(_p3._1), + _1: {ctor: '[]'} + } + } + }, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'test', _1: _p3._2}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'page', _1: _p3._3}, + _1: { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'groupSet', + _1: A2(_elm_lang$core$Maybe$map, _elm_community$string_extra$String_Extra$fromInt, _p3._4) + }, + _1: {ctor: '[]'} + } + } + } + }; + } + }(); + var path = _p2._0; + var query = _p2._1; + return A2( + _elm_lang$core$Basics_ops['++'], + _seatgeek$wrecker_ui$Router$toQueryString(query), + A2( + _elm_lang$core$Basics_ops['++'], + '#/', + A2(_elm_lang$core$String$join, '/', path))); +}; +var _seatgeek$wrecker_ui$Router$modifyUrl = function (_p4) { + return _elm_lang$navigation$Navigation$newUrlWithoutNotify( + _seatgeek$wrecker_ui$Router$routeToString(_p4)); +}; +var _seatgeek$wrecker_ui$Router$ComparisonPlot = F5( + function (a, b, c, d, e) { + return {ctor: 'ComparisonPlot', _0: a, _1: b, _2: c, _3: d, _4: e}; + }); +var _seatgeek$wrecker_ui$Router$SimplePlot = F4( + function (a, b, c, d) { + return {ctor: 'SimplePlot', _0: a, _1: b, _2: c, _3: d}; + }); +var _seatgeek$wrecker_ui$Router$ScheduleTest = {ctor: 'ScheduleTest'}; +var _seatgeek$wrecker_ui$Router$Home = {ctor: 'Home'}; +var _seatgeek$wrecker_ui$Router$route = _evancz$url_parser$UrlParser$oneOf( + { + ctor: '::', + _0: A2( + _evancz$url_parser$UrlParser$map, + _seatgeek$wrecker_ui$Router$Home, + _evancz$url_parser$UrlParser$s('')), + _1: { + ctor: '::', + _0: A2( + _evancz$url_parser$UrlParser$map, + _seatgeek$wrecker_ui$Router$ScheduleTest, + _evancz$url_parser$UrlParser$s('schedule')), + _1: { + ctor: '::', + _0: A2( + _evancz$url_parser$UrlParser$map, + _seatgeek$wrecker_ui$Router$SimplePlot, + A2( + _evancz$url_parser$UrlParser_ops[''], + _evancz$url_parser$UrlParser$s('plot'), + A2( + _evancz$url_parser$UrlParser_ops[''], + A2( + _evancz$url_parser$UrlParser_ops[''], + A2( + _evancz$url_parser$UrlParser_ops[''], + _evancz$url_parser$UrlParser$int, + _evancz$url_parser$UrlParser$stringParam('test')), + _evancz$url_parser$UrlParser$stringParam('page')), + _evancz$url_parser$UrlParser$intParam('groupSet')))), + _1: { + ctor: '::', + _0: A2( + _evancz$url_parser$UrlParser$map, + _seatgeek$wrecker_ui$Router$ComparisonPlot, + A2( + _evancz$url_parser$UrlParser_ops[''], + _evancz$url_parser$UrlParser$s('comparison'), + A2( + _evancz$url_parser$UrlParser_ops[''], + _evancz$url_parser$UrlParser$int, + A2( + _evancz$url_parser$UrlParser_ops[''], + A2( + _evancz$url_parser$UrlParser_ops[''], + A2( + _evancz$url_parser$UrlParser_ops[''], + _evancz$url_parser$UrlParser$int, + _evancz$url_parser$UrlParser$stringParam('test')), + _evancz$url_parser$UrlParser$stringParam('page')), + _evancz$url_parser$UrlParser$intParam('groupSet'))))), + _1: {ctor: '[]'} + } + } + } + }); +var _seatgeek$wrecker_ui$Router$fromLocation = function (location) { + return _elm_lang$core$String$isEmpty(location.hash) ? _elm_lang$core$Maybe$Just(_seatgeek$wrecker_ui$Router$Home) : A2(_evancz$url_parser$UrlParser$parseHash, _seatgeek$wrecker_ui$Router$route, location); +}; + +var _seatgeek$wrecker_ui$Util$onChangeInt = function (msg) { + var action = A2( + _elm_lang$core$Json_Decode$map, + msg, + A2( + _elm_lang$core$Json_Decode$andThen, + function (txt) { + var _p0 = _elm_lang$core$String$toInt(txt); + if (_p0.ctor === 'Ok') { + return _elm_lang$core$Json_Decode$succeed(_p0._0); + } else { + return _elm_lang$core$Json_Decode$fail(_p0._0); + } + }, + A2( + _elm_lang$core$Json_Decode$at, + { + ctor: '::', + _0: 'target', + _1: { + ctor: '::', + _0: 'value', + _1: {ctor: '[]'} + } + }, + _elm_lang$core$Json_Decode$string))); + return A2(_elm_lang$html$Html_Events$on, 'change', action); +}; +var _seatgeek$wrecker_ui$Util$onChange = function (msg) { + var action = A2( + _elm_lang$core$Json_Decode$map, + msg, + A2( + _elm_lang$core$Json_Decode$at, + { + ctor: '::', + _0: 'target', + _1: { + ctor: '::', + _0: 'value', + _1: {ctor: '[]'} + } + }, + _elm_lang$core$Json_Decode$string)); + return A2(_elm_lang$html$Html_Events$on, 'change', action); +}; +var _seatgeek$wrecker_ui$Util$onEnter = function (msg) { + var isEnter = function (code) { + return _elm_lang$core$Native_Utils.eq(code, 13) ? _elm_lang$core$Json_Decode$succeed(msg) : _elm_lang$core$Json_Decode$fail('not ENTER'); + }; + return A2( + _elm_lang$html$Html_Events$on, + 'keydown', + A2(_elm_lang$core$Json_Decode$andThen, isEnter, _elm_lang$html$Html_Events$keyCode)); +}; +var _seatgeek$wrecker_ui$Util$natSort = F2( + function (a, b) { + var _p1 = { + ctor: '_Tuple2', + _0: _elm_lang$core$String$toInt( + A2(_elm_community$string_extra$String_Extra$leftOf, ' -', a)), + _1: _elm_lang$core$String$toInt( + A2(_elm_community$string_extra$String_Extra$leftOf, ' -', b)) + }; + if (((_p1.ctor === '_Tuple2') && (_p1._0.ctor === 'Ok')) && (_p1._1.ctor === 'Ok')) { + return A2(_elm_lang$core$Basics$compare, _p1._0._0, _p1._1._0); + } else { + return A2(_elm_lang$core$Basics$compare, a, b); + } + }); +var _seatgeek$wrecker_ui$Util$return = _Fresheyeball$elm_return$Return$singleton; + +var _seatgeek$wrecker_ui$ServerState$getGroupSets = A2( + _elm_lang$http$Http$get, + '/group-sets', + A2( + _elm_lang$core$Json_Decode$at, + { + ctor: '::', + _0: 'groupSets', + _1: {ctor: '[]'} + }, + _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodeGroupSet))); +var _seatgeek$wrecker_ui$ServerState$update = F2( + function (msg, model) { + var _p0 = msg; + if (_p0.ctor === 'LoadTestSchedule') { + if (_p0._0.ctor === 'Err') { + return { + ctor: '_Tuple2', + _0: A2( + _elm_lang$core$Debug$log, + _elm_lang$core$Basics$toString(_p0._0._0), + model), + _1: _elm_lang$core$Platform_Cmd$none + }; + } else { + return _seatgeek$wrecker_ui$Util$return( + _elm_lang$core$Native_Utils.update( + model, + {testList: _p0._0._0})); + } + } else { + if (_p0._0.ctor === 'Err') { + return { + ctor: '_Tuple2', + _0: A2( + _elm_lang$core$Debug$log, + _elm_lang$core$Basics$toString(_p0._0._0), + model), + _1: _elm_lang$core$Platform_Cmd$none + }; + } else { + return _seatgeek$wrecker_ui$Util$return( + _elm_lang$core$Native_Utils.update( + model, + { + groupSets: A2( + _elm_lang$core$List$sortBy, + function (_p1) { + return _elm_lang$core$Date$toTime( + function (_) { + return _.created; + }(_p1)); + }, + _p0._0._0) + })); + } + } + }); +var _seatgeek$wrecker_ui$ServerState$State = F2( + function (a, b) { + return {testList: a, groupSets: b}; + }); +var _seatgeek$wrecker_ui$ServerState$NotYet = {ctor: 'NotYet'}; +var _seatgeek$wrecker_ui$ServerState$Scheduled = {ctor: 'Scheduled'}; +var _seatgeek$wrecker_ui$ServerState$Done = {ctor: 'Done'}; +var _seatgeek$wrecker_ui$ServerState$Running = {ctor: 'Running'}; +var _seatgeek$wrecker_ui$ServerState$decodeRunStatus = A2( + _elm_lang$core$Json_Decode$andThen, + function (s) { + var _p2 = s; + switch (_p2) { + case 'running': + return _elm_lang$core$Json_Decode$succeed(_seatgeek$wrecker_ui$ServerState$Running); + case 'done': + return _elm_lang$core$Json_Decode$succeed(_seatgeek$wrecker_ui$ServerState$Done); + case 'scheduled': + return _elm_lang$core$Json_Decode$succeed(_seatgeek$wrecker_ui$ServerState$Scheduled); + case 'none': + return _elm_lang$core$Json_Decode$succeed(_seatgeek$wrecker_ui$ServerState$NotYet); + default: + return _elm_lang$core$Json_Decode$fail( + A2( + _elm_lang$core$Basics_ops['++'], + 'Could not decode ', + A2(_elm_lang$core$Basics_ops['++'], s, ' as a RunStatus'))); + } + }, + _elm_lang$core$Json_Decode$string); +var _seatgeek$wrecker_ui$ServerState$TestList = function (a) { + return {ctor: 'TestList', _0: a}; +}; +var _seatgeek$wrecker_ui$ServerState$defaultState = A2( + _seatgeek$wrecker_ui$ServerState$State, + _seatgeek$wrecker_ui$ServerState$TestList(_elm_lang$core$Dict$empty), + {ctor: '[]'}); +var _seatgeek$wrecker_ui$ServerState$decodeTestList = A3( + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$required, + 'tests', + _elm_lang$core$Json_Decode$dict(_seatgeek$wrecker_ui$ServerState$decodeRunStatus), + _NoRedInk$elm_decode_pipeline$Json_Decode_Pipeline$decode(_seatgeek$wrecker_ui$ServerState$TestList)); +var _seatgeek$wrecker_ui$ServerState$getTestList = A2(_elm_lang$http$Http$get, '/test-list', _seatgeek$wrecker_ui$ServerState$decodeTestList); +var _seatgeek$wrecker_ui$ServerState$LoadGroupSets = function (a) { + return {ctor: 'LoadGroupSets', _0: a}; +}; +var _seatgeek$wrecker_ui$ServerState$LoadTestSchedule = function (a) { + return {ctor: 'LoadTestSchedule', _0: a}; +}; +var _seatgeek$wrecker_ui$ServerState$init = A2( + _Fresheyeball$elm_return$Return$command, + A2(_elm_lang$http$Http$send, _seatgeek$wrecker_ui$ServerState$LoadGroupSets, _seatgeek$wrecker_ui$ServerState$getGroupSets), + A2( + _Fresheyeball$elm_return$Return$command, + A2(_elm_lang$http$Http$send, _seatgeek$wrecker_ui$ServerState$LoadTestSchedule, _seatgeek$wrecker_ui$ServerState$getTestList), + _seatgeek$wrecker_ui$Util$return(_seatgeek$wrecker_ui$ServerState$defaultState))); + +var _seatgeek$wrecker_ui$Scheduler$groupSetOption = function (groupSet) { + return A2( + _elm_lang$html$Html$option, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value( + _elm_lang$core$Basics$toString(groupSet.id)), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(groupSet.name), + _1: {ctor: '[]'} + }); +}; +var _seatgeek$wrecker_ui$Scheduler$buildTestItems = F3( + function (clickMsg, selected, _p0) { + var _p1 = _p0; + var _p3 = _p1._0; + var classes = { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'selected', + _1: _elm_lang$core$Native_Utils.eq(selected, _p3) + }, + _1: {ctor: '[]'} + }; + var showStatus = function (s) { + var _p2 = s; + if (_p2.ctor === 'NotYet') { + return _elm_lang$html$Html$text(''); + } else { + return A2( + _elm_lang$html$Html$span, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('status'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text( + A2( + _elm_lang$core$Basics_ops['++'], + ' - ', + _elm_lang$core$Basics$toString(s))), + _1: {ctor: '[]'} + }); + } + }; + return A2( + _elm_lang$html$Html$li, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$a, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick( + clickMsg(_p3)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$classList(classes), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(_p3), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: showStatus(_p1._1), + _1: {ctor: '[]'} + } + }); + }); +var _seatgeek$wrecker_ui$Scheduler$updateOptions = F3( + function (field, value, opts) { + var _p4 = field; + switch (_p4.ctor) { + case 'AnnotationTitle': + return _elm_lang$core$Native_Utils.update( + opts, + {annotationTitle: value}); + case 'Notes': + return _elm_lang$core$Native_Utils.update( + opts, + {notes: value}); + case 'ConcurrencyStart': + return _elm_lang$core$Native_Utils.update( + opts, + { + concurrencyStart: A2( + _elm_lang$core$Result$withDefault, + opts.concurrencyStart, + _elm_lang$core$String$toInt(value)) + }); + case 'ConcurrencyEnd': + return _elm_lang$core$Native_Utils.update( + opts, + { + concurrencyEnd: A2( + _elm_lang$core$Result$withDefault, + opts.concurrencyEnd, + _elm_lang$core$String$toInt(value)) + }); + case 'StepSize': + return _elm_lang$core$Native_Utils.update( + opts, + { + stepSize: A2( + _elm_lang$core$Result$withDefault, + opts.stepSize, + _elm_lang$core$String$toInt(value)) + }); + case 'RunTime': + return _elm_lang$core$Native_Utils.update( + opts, + { + runTime: A2( + _elm_lang$core$Result$withDefault, + opts.runTime, + _elm_lang$core$String$toInt(value)) + }); + default: + return _elm_lang$core$Native_Utils.update( + opts, + { + groupSetId: _elm_lang$core$Result$toMaybe( + _elm_lang$core$String$toInt(value)) + }); + } + }); +var _seatgeek$wrecker_ui$Scheduler$postGroupSet = function (options) { + var body = _elm_lang$http$Http$multipartBody( + { + ctor: '::', + _0: A2(_elm_lang$http$Http$stringPart, 'name', options.name), + _1: { + ctor: '::', + _0: A2(_elm_lang$http$Http$stringPart, 'description', options.description), + _1: {ctor: '[]'} + } + }); + return A3(_elm_lang$http$Http$post, '/group-sets', body, _elm_lang$core$Json_Decode$value); +}; +var _seatgeek$wrecker_ui$Scheduler$postTestSchedule = function (options) { + var groupPart = A2( + _elm_lang$core$Maybe$withDefault, + {ctor: '[]'}, + A2( + _elm_lang$core$Maybe$map, + function (p) { + return { + ctor: '::', + _0: p, + _1: {ctor: '[]'} + }; + }, + A2( + _elm_lang$core$Maybe$map, + function (_p5) { + return A2( + _elm_lang$http$Http$stringPart, + 'groupSetId', + _elm_community$string_extra$String_Extra$fromInt(_p5)); + }, + options.groupSetId))); + var body = _elm_lang$http$Http$multipartBody( + A2( + _elm_lang$core$Basics_ops['++'], + { + ctor: '::', + _0: A2(_elm_lang$http$Http$stringPart, 'testTitle', options.testTitle), + _1: { + ctor: '::', + _0: A2(_elm_lang$http$Http$stringPart, 'notes', options.notes), + _1: { + ctor: '::', + _0: A2(_elm_lang$http$Http$stringPart, 'groupName', options.annotationTitle), + _1: { + ctor: '::', + _0: A2( + _elm_lang$http$Http$stringPart, + 'concurrencyStart', + _elm_community$string_extra$String_Extra$fromInt(options.concurrencyStart)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$http$Http$stringPart, + 'concurrencyEnd', + _elm_community$string_extra$String_Extra$fromInt(options.concurrencyEnd)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$http$Http$stringPart, + 'stepSize', + _elm_community$string_extra$String_Extra$fromInt(options.stepSize)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$http$Http$stringPart, + 'runTime', + _elm_community$string_extra$String_Extra$fromInt(options.runTime)), + _1: {ctor: '[]'} + } + } + } + } + } + } + }, + groupPart)); + return A3(_elm_lang$http$Http$post, '/test-list', body, _elm_lang$core$Json_Decode$value); +}; +var _seatgeek$wrecker_ui$Scheduler$SchedulerOptions = F8( + function (a, b, c, d, e, f, g, h) { + return {testTitle: a, annotationTitle: b, concurrencyStart: c, concurrencyEnd: d, stepSize: e, runTime: f, notes: g, groupSetId: h}; + }); +var _seatgeek$wrecker_ui$Scheduler$defaultOptions = F2( + function (title, groupSets) { + return A8( + _seatgeek$wrecker_ui$Scheduler$SchedulerOptions, + title, + '', + 10, + 300, + 10, + 10, + 'No Notes', + A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.id; + }, + _elm_lang$core$List$head(groupSets))); + }); +var _seatgeek$wrecker_ui$Scheduler$GroupSetOptions = F2( + function (a, b) { + return {name: a, description: b}; + }); +var _seatgeek$wrecker_ui$Scheduler$defaultModel = { + schedulerOptions: _elm_lang$core$Maybe$Nothing, + showGroupsetForm: false, + groupSetOptions: A2(_seatgeek$wrecker_ui$Scheduler$GroupSetOptions, '', ''), + groupSetSaving: false +}; +var _seatgeek$wrecker_ui$Scheduler$init = {ctor: '_Tuple2', _0: _seatgeek$wrecker_ui$Scheduler$defaultModel, _1: _elm_lang$core$Platform_Cmd$none}; +var _seatgeek$wrecker_ui$Scheduler$Model = F4( + function (a, b, c, d) { + return {schedulerOptions: a, showGroupsetForm: b, groupSetOptions: c, groupSetSaving: d}; + }); +var _seatgeek$wrecker_ui$Scheduler$GroupSetOption = {ctor: 'GroupSetOption'}; +var _seatgeek$wrecker_ui$Scheduler$Notes = {ctor: 'Notes'}; +var _seatgeek$wrecker_ui$Scheduler$RunTime = {ctor: 'RunTime'}; +var _seatgeek$wrecker_ui$Scheduler$StepSize = {ctor: 'StepSize'}; +var _seatgeek$wrecker_ui$Scheduler$ConcurrencyEnd = {ctor: 'ConcurrencyEnd'}; +var _seatgeek$wrecker_ui$Scheduler$ConcurrencyStart = {ctor: 'ConcurrencyStart'}; +var _seatgeek$wrecker_ui$Scheduler$AnnotationTitle = {ctor: 'AnnotationTitle'}; +var _seatgeek$wrecker_ui$Scheduler$ScheduleTestSent = function (a) { + return {ctor: 'ScheduleTestSent', _0: a}; +}; +var _seatgeek$wrecker_ui$Scheduler$ScheduleTestClicked = {ctor: 'ScheduleTestClicked'}; +var _seatgeek$wrecker_ui$Scheduler$SchedulerGroupSetIdSet = function (a) { + return {ctor: 'SchedulerGroupSetIdSet', _0: a}; +}; +var _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged = F2( + function (a, b) { + return {ctor: 'SchedulerFieldChanged', _0: a, _1: b}; + }); +var _seatgeek$wrecker_ui$Scheduler$renderOptions = F2( + function (options, groupSets) { + var emptyAnnotation = _elm_lang$core$Native_Utils.eq( + _elm_lang$core$String$trim(options.annotationTitle), + ''); + var buttonOpts = emptyAnnotation ? {ctor: '[]'} : { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick(_seatgeek$wrecker_ui$Scheduler$ScheduleTestClicked), + _1: {ctor: '[]'} + }; + var duration = _elm_community$string_extra$String_Extra$fromInt(options.runTime); + return A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot--right__concurrency'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Test Set'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$select, + { + ctor: '::', + _0: _seatgeek$wrecker_ui$Util$onChange( + _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$GroupSetOption)), + _1: {ctor: '[]'} + }, + A2(_elm_lang$core$List$map, _seatgeek$wrecker_ui$Scheduler$groupSetOption, groupSets)), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$classList( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'field-error', _1: emptyAnnotation}, + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Test Annotation *'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$input, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onInput( + _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$AnnotationTitle)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$placeholder('E.g. Migrated to PHP 7'), + _1: {ctor: '[]'} + } + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Concurrency Start'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$input, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onInput( + _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$ConcurrencyStart)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$type_('number'), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value( + _elm_community$string_extra$String_Extra$fromInt(options.concurrencyStart)), + _1: {ctor: '[]'} + } + } + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Concurrency Target'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$input, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onInput( + _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$ConcurrencyEnd)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$type_('number'), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value( + _elm_community$string_extra$String_Extra$fromInt(options.concurrencyEnd)), + _1: {ctor: '[]'} + } + } + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Step Size'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$input, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onInput( + _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$StepSize)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$type_('number'), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value( + _elm_community$string_extra$String_Extra$fromInt(options.stepSize)), + _1: {ctor: '[]'} + } + } + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Duration (secs)'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$input, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onInput( + _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$RunTime)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$type_('number'), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value(duration), + _1: {ctor: '[]'} + } + } + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'width', _1: '100%'}, + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Test Notes (Markdown will be rendered)'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$textarea, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onInput( + _seatgeek$wrecker_ui$Scheduler$SchedulerFieldChanged(_seatgeek$wrecker_ui$Scheduler$Notes)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value(options.notes), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$rows(20), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'width', _1: '640px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'margin-top', _1: '10px'}, + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + } + } + } + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$button, + buttonOpts, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Schedule Test'), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + } + } + } + } + } + } + }); + }); +var _seatgeek$wrecker_ui$Scheduler$GroupSetSent = function (a) { + return {ctor: 'GroupSetSent', _0: a}; +}; +var _seatgeek$wrecker_ui$Scheduler$update = F3( + function (groupSets, msg, model) { + var _p6 = msg; + switch (_p6.ctor) { + case 'TestTitleClicked': + var _p7 = _p6._0; + var schedulerOptions = A2( + _elm_lang$core$Maybe$withDefault, + A2(_seatgeek$wrecker_ui$Scheduler$defaultOptions, _p7, groupSets), + A2( + _elm_lang$core$Maybe$map, + function (s) { + return _elm_lang$core$Native_Utils.update( + s, + {testTitle: _p7}); + }, + model.schedulerOptions)); + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + { + schedulerOptions: _elm_lang$core$Maybe$Just(schedulerOptions), + showGroupsetForm: false + }), + _1: _elm_lang$core$Platform_Cmd$none, + _2: false + }; + case 'SchedulerFieldChanged': + var schedulerOptions = A2( + _elm_lang$core$Maybe$map, + A2(_seatgeek$wrecker_ui$Scheduler$updateOptions, _p6._0, _p6._1), + model.schedulerOptions); + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + {schedulerOptions: schedulerOptions}), + _1: _elm_lang$core$Platform_Cmd$none, + _2: false + }; + case 'SchedulerGroupSetIdSet': + var schedulerOptions = A2( + _elm_lang$core$Maybe$map, + function (opts) { + return _elm_lang$core$Native_Utils.update( + opts, + { + groupSetId: _elm_lang$core$Maybe$Just(_p6._0) + }); + }, + model.schedulerOptions); + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + {schedulerOptions: schedulerOptions}), + _1: _elm_lang$core$Platform_Cmd$none, + _2: false + }; + case 'ScheduleTestClicked': + var effect = A2( + _elm_lang$core$Maybe$withDefault, + _elm_lang$core$Platform_Cmd$none, + A2( + _elm_lang$core$Maybe$map, + function (o) { + return A2( + _elm_lang$http$Http$send, + _seatgeek$wrecker_ui$Scheduler$ScheduleTestSent, + _seatgeek$wrecker_ui$Scheduler$postTestSchedule(o)); + }, + model.schedulerOptions)); + return {ctor: '_Tuple3', _0: model, _1: effect, _2: false}; + case 'ScheduleTestSent': + if (_p6._0.ctor === 'Err') { + var _p8 = A2(_elm_lang$core$Debug$log, 'ScheduleTestSent', _p6._0._0); + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + {schedulerOptions: _elm_lang$core$Maybe$Nothing}), + _1: _elm_lang$core$Platform_Cmd$none, + _2: false + }; + } else { + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + {schedulerOptions: _elm_lang$core$Maybe$Nothing}), + _1: _elm_lang$core$Platform_Cmd$none, + _2: true + }; + } + case 'GroupSetButtonClicked': + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + {showGroupsetForm: true}), + _1: _elm_lang$core$Platform_Cmd$none, + _2: false + }; + case 'GroupSetNameChanged': + var groupSetOptions = model.groupSetOptions; + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + { + groupSetOptions: _elm_lang$core$Native_Utils.update( + groupSetOptions, + {name: _p6._0}) + }), + _1: _elm_lang$core$Platform_Cmd$none, + _2: false + }; + case 'GroupSetDescriptionChanged': + var groupSetOptions = model.groupSetOptions; + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + { + groupSetOptions: _elm_lang$core$Native_Utils.update( + groupSetOptions, + {description: _p6._0}) + }), + _1: _elm_lang$core$Platform_Cmd$none, + _2: false + }; + case 'GroupSetSaveClicked': + var effect = ((!_elm_lang$core$Native_Utils.eq( + _elm_lang$core$String$trim(model.groupSetOptions.name), + '')) && ((!_elm_lang$core$Native_Utils.eq( + _elm_lang$core$String$trim(model.groupSetOptions.description), + '')) && (!model.groupSetSaving))) ? A2( + _elm_lang$http$Http$send, + _seatgeek$wrecker_ui$Scheduler$GroupSetSent, + _seatgeek$wrecker_ui$Scheduler$postGroupSet(model.groupSetOptions)) : _elm_lang$core$Platform_Cmd$none; + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + {groupSetSaving: true}), + _1: effect, + _2: false + }; + default: + if (_p6._0.ctor === 'Err') { + var _p9 = A2(_elm_lang$core$Debug$log, 'GroupSetSent', _p6._0._0); + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + {groupSetSaving: false}), + _1: _elm_lang$core$Platform_Cmd$none, + _2: false + }; + } else { + return { + ctor: '_Tuple3', + _0: _elm_lang$core$Native_Utils.update( + model, + { + groupSetOptions: A2(_seatgeek$wrecker_ui$Scheduler$GroupSetOptions, '', ''), + showGroupsetForm: false, + groupSetSaving: false + }), + _1: _elm_lang$core$Platform_Cmd$none, + _2: true + }; + } + } + }); +var _seatgeek$wrecker_ui$Scheduler$GroupSetSaveClicked = {ctor: 'GroupSetSaveClicked'}; +var _seatgeek$wrecker_ui$Scheduler$GroupSetDescriptionChanged = function (a) { + return {ctor: 'GroupSetDescriptionChanged', _0: a}; +}; +var _seatgeek$wrecker_ui$Scheduler$GroupSetNameChanged = function (a) { + return {ctor: 'GroupSetNameChanged', _0: a}; +}; +var _seatgeek$wrecker_ui$Scheduler$renderGroupSetForm = function (opts) { + var hasDesc = !_elm_lang$core$Native_Utils.eq( + _elm_lang$core$String$trim(opts.description), + ''); + var hasName = !_elm_lang$core$Native_Utils.eq( + _elm_lang$core$String$trim(opts.name), + ''); + var buttonOpts = (!(hasName && hasDesc)) ? {ctor: '[]'} : { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick(_seatgeek$wrecker_ui$Scheduler$GroupSetSaveClicked), + _1: {ctor: '[]'} + }; + return A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot--right__concurrency'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$classList( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'field-error', _1: !hasName}, + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Name *'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$input, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onInput(_seatgeek$wrecker_ui$Scheduler$GroupSetNameChanged), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$placeholder('E.g. Changing EC2 instance sizes'), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'width', _1: '60%'}, + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + } + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$classList( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'field-error', _1: !hasDesc}, + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'width', _1: '100%'}, + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Group Notes (Markdown will be rendered) *'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$textarea, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onInput(_seatgeek$wrecker_ui$Scheduler$GroupSetDescriptionChanged), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$rows(20), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'width', _1: '640px'}, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'margin-top', _1: '10px'}, + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + } + } + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$label, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$button, + buttonOpts, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Save Group'), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + } + }); +}; +var _seatgeek$wrecker_ui$Scheduler$GroupSetButtonClicked = {ctor: 'GroupSetButtonClicked'}; +var _seatgeek$wrecker_ui$Scheduler$TestTitleClicked = function (a) { + return {ctor: 'TestTitleClicked', _0: a}; +}; +var _seatgeek$wrecker_ui$Scheduler$view = F3( + function (testList, groupSets, _p10) { + var _p11 = _p10; + var _p19 = _p11.schedulerOptions; + var active = A2( + _elm_lang$core$Maybe$withDefault, + '', + A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.testTitle; + }, + _p19)); + var testNames = function (_p12) { + var _p13 = _p12; + return A2( + _elm_lang$core$List$sortWith, + F2( + function (_p15, _p14) { + var _p16 = _p15; + var _p17 = _p14; + return A2(_seatgeek$wrecker_ui$Util$natSort, _p16._0, _p17._0); + }), + _elm_lang$core$Dict$toList(_p13._0)); + }; + return A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot view-plot__closed'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot--left'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('group-set-button'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$a, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick(_seatgeek$wrecker_ui$Scheduler$GroupSetButtonClicked), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('⛱ Add GroupSet'), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$h4, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('...or schedule a test 👩‍🔬'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$ul, + {ctor: '[]'}, + A2( + _elm_lang$core$List$map, + A2(_seatgeek$wrecker_ui$Scheduler$buildTestItems, _seatgeek$wrecker_ui$Scheduler$TestTitleClicked, active), + testNames(testList))), + _1: {ctor: '[]'} + } + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot--right view-plot--right__wide'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: function () { + var _p18 = {ctor: '_Tuple2', _0: _p19, _1: _p11.showGroupsetForm}; + _v8_2: + do { + if (_p18.ctor === '_Tuple2') { + if (_p18._1 === false) { + if (_p18._0.ctor === 'Just') { + return A2(_seatgeek$wrecker_ui$Scheduler$renderOptions, _p18._0._0, groupSets); + } else { + break _v8_2; + } + } else { + return _seatgeek$wrecker_ui$Scheduler$renderGroupSetForm(_p11.groupSetOptions); + } + } else { + break _v8_2; + } + } while(false); + return _elm_lang$html$Html$text(''); + }(), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + }); + }); + +var _seatgeek$wrecker_ui$RunGroupPanel$panelItem = F2( + function (title, value) { + return A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--item'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--title'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(title), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--value'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(value), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + }); + }); +var _seatgeek$wrecker_ui$RunGroupPanel$panelDetails = function (group) { + return A2( + _elm_lang$html$Html$div, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _seatgeek$wrecker_ui$RunGroupPanel$panelItem, + 'Concurrency Start', + _elm_community$string_extra$String_Extra$fromInt(group.concurrencyStart)), + _1: { + ctor: '::', + _0: A2( + _seatgeek$wrecker_ui$RunGroupPanel$panelItem, + 'Concurrency Target', + _elm_community$string_extra$String_Extra$fromInt(group.concurrencyTarget)), + _1: { + ctor: '::', + _0: A2( + _seatgeek$wrecker_ui$RunGroupPanel$panelItem, + 'Step Size', + _elm_community$string_extra$String_Extra$fromInt(group.rampupStep)), + _1: { + ctor: '::', + _0: A2( + _seatgeek$wrecker_ui$RunGroupPanel$panelItem, + 'Step duration time', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_community$string_extra$String_Extra$fromInt(group.runKeepTime), + ' secs')), + _1: { + ctor: '::', + _0: A2( + _seatgeek$wrecker_ui$RunGroupPanel$panelItem, + 'Run started', + A2(_mgold$elm_date_format$Date_Format$format, '%Y-%m-%d %H:%I:%S', group.created)), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$h5, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--notes-title'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Notes'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _evancz$elm_markdown$Markdown$toHtml, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--notes'), + _1: {ctor: '[]'} + }, + group.notes), + _1: {ctor: '[]'} + } + } + } + } + } + } + }); +}; +var _seatgeek$wrecker_ui$RunGroupPanel$onlyFiltered = F2( + function (filtered, allGroups) { + return _elm_lang$core$List$reverse( + A2( + _elm_lang$core$List$sortBy, + function (_) { + return _.id; + }, + A2( + _elm_lang$core$List$filter, + function (group) { + return A2(_elm_lang$core$List$member, group, filtered); + }, + allGroups))); + }); +var _seatgeek$wrecker_ui$RunGroupPanel$update = F2( + function (msg, model) { + var _p0 = msg; + if (_p0.ctor === 'Expand') { + return _elm_lang$core$Native_Utils.update( + model, + { + openPanels: {ctor: '::', _0: _p0._0, _1: model.openPanels} + }); + } else { + return _elm_lang$core$Native_Utils.update( + model, + { + openPanels: A2( + _elm_lang$core$List$filter, + F2( + function (x, y) { + return !_elm_lang$core$Native_Utils.eq(x, y); + })(_p0._0), + model.openPanels) + }); + } + }); +var _seatgeek$wrecker_ui$RunGroupPanel$Model = function (a) { + return {openPanels: a}; +}; +var _seatgeek$wrecker_ui$RunGroupPanel$init = _seatgeek$wrecker_ui$RunGroupPanel$Model( + {ctor: '[]'}); +var _seatgeek$wrecker_ui$RunGroupPanel$Collapse = function (a) { + return {ctor: 'Collapse', _0: a}; +}; +var _seatgeek$wrecker_ui$RunGroupPanel$Expand = function (a) { + return {ctor: 'Expand', _0: a}; +}; +var _seatgeek$wrecker_ui$RunGroupPanel$panel = F2( + function (openPanels, group) { + var color = _seatgeek$wrecker_ui$Graph_Coloring$pickColor(group.id); + var expanded = A2(_elm_lang$core$List$member, group.id, openPanels); + var msg = expanded ? _seatgeek$wrecker_ui$RunGroupPanel$Collapse : _seatgeek$wrecker_ui$RunGroupPanel$Expand; + return A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('run-group-panel--group--header'), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick( + msg(group.id)), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'color', + _1: _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color) + }, + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('●'), + _1: { + ctor: '::', + _0: _elm_lang$html$Html$text(' '), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: _elm_lang$html$Html$text(group.title), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: expanded ? _seatgeek$wrecker_ui$RunGroupPanel$panelDetails(group) : _elm_lang$html$Html$text(''), + _1: {ctor: '[]'} + } + }); + }); +var _seatgeek$wrecker_ui$RunGroupPanel$view = F3( + function (groups, filteredGroups, _p1) { + var _p2 = _p1; + return A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('run-group-panel'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$h3, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Test Runs'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + {ctor: '[]'}, + A2( + _elm_lang$core$List$map, + _seatgeek$wrecker_ui$RunGroupPanel$panel(_p2.openPanels), + A2(_seatgeek$wrecker_ui$RunGroupPanel$onlyFiltered, filteredGroups, groups))), + _1: {ctor: '[]'} + } + }); + }); + +var _seatgeek$wrecker_ui$Main$extractSelectedPage = function (selection) { + return A2( + _elm_lang$core$Maybe$withDefault, + '', + A2( + _elm_lang$core$Maybe$map, + function (_p0) { + var _p1 = _p0; + return _p1._0; + }, + selection)); +}; +var _seatgeek$wrecker_ui$Main$graphTypeOption = F2( + function (current, _p2) { + var _p3 = _p2; + var _p4 = _p3._0; + return A2( + _elm_lang$html$Html$option, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value(_p4), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$selected( + _elm_lang$core$Native_Utils.eq(current, _p4)), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(_p4), + _1: {ctor: '[]'} + }); + }); +var _seatgeek$wrecker_ui$Main$groupSetOption = F2( + function (selectedGroupSet, _p5) { + var _p6 = _p5; + var _p7 = _p6.id; + var isSelected = A2( + _elm_lang$core$Maybe$withDefault, + false, + A2( + _elm_lang$core$Maybe$map, + function (s) { + return _elm_lang$core$Native_Utils.eq(s.id, _p7); + }, + selectedGroupSet)); + return A2( + _elm_lang$html$Html$option, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value( + _elm_community$string_extra$String_Extra$fromInt(_p7)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$selected(isSelected), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(_p6.name), + _1: {ctor: '[]'} + }); + }); +var _seatgeek$wrecker_ui$Main$pageOrRunData = F2( + function (pages, runs) { + var _p8 = pages; + if (_p8.ctor === 'Nothing') { + return runs; + } else { + return A2( + _elm_lang$core$List$filterMap, + function (r) { + var _p9 = A2(_elm_lang$core$Dict$get, r.run.id, _p8._0._1); + if (_p9.ctor === 'Nothing') { + return _elm_lang$core$Maybe$Nothing; + } else { + return _elm_lang$core$Maybe$Just( + _elm_lang$core$Native_Utils.update( + r, + {stats: _p9._0.stats})); + } + }, + runs); + } + }); +var _seatgeek$wrecker_ui$Main$indexedBy = F2( + function (getter, list) { + return _elm_lang$core$Dict$fromList( + A2( + _elm_lang$core$List$map, + function (elem) { + return { + ctor: '_Tuple2', + _0: getter(elem), + _1: elem + }; + }, + list)); + }); +var _seatgeek$wrecker_ui$Main$selectRunData = function (_p10) { + var _p11 = _p10; + var groups = A2( + _seatgeek$wrecker_ui$Main$indexedBy, + function (_) { + return _.id; + }, + _p11.filteredGroups); + var existsInFiltered = function (runGroupId) { + var _p12 = A2(_elm_lang$core$Dict$get, runGroupId, groups); + if (_p12.ctor === 'Nothing') { + return _elm_lang$core$Maybe$Nothing; + } else { + return _elm_lang$core$Maybe$Just(runGroupId); + } + }; + return A2( + _elm_community$dict_extra$Dict_Extra$filterGroupBy, + function (_p13) { + return existsInFiltered( + function (_) { + return _.runGroupId; + }( + function (_) { + return _.run; + }(_p13))); + }, + A2(_seatgeek$wrecker_ui$Main$pageOrRunData, _p11.selectedPage, _p11.runs)); +}; +var _seatgeek$wrecker_ui$Main$getPageStats = F2( + function (ids, page) { + var idsQ = A3( + _elm_lang$core$List$foldl, + F2( + function (id, acc) { + return A2( + _elm_lang$core$Basics_ops['++'], + acc, + A2( + _elm_lang$core$Basics_ops['++'], + _elm_community$string_extra$String_Extra$fromInt(id), + ',')); + }), + '', + ids); + return A2( + _elm_lang$http$Http$get, + A2( + _elm_lang$core$Basics_ops['++'], + '/runs/page?ids=', + A2( + _elm_lang$core$Basics_ops['++'], + idsQ, + A2( + _elm_lang$core$Basics_ops['++'], + '&name=', + _elm_lang$http$Http$encodeUri(page)))), + _elm_lang$core$Json_Decode$list(_seatgeek$wrecker_ui$Data$decodePage)); + }); +var _seatgeek$wrecker_ui$Main$getPageByRuns = F2( + function (runs, page) { + return A2( + _seatgeek$wrecker_ui$Main$getPageStats, + A2( + _elm_lang$core$List$map, + function (_p14) { + return function (_) { + return _.id; + }( + function (_) { + return _.run; + }(_p14)); + }, + runs), + page); + }); +var _seatgeek$wrecker_ui$Main$getManyRuns = F2( + function (match, groupSet) { + var groupSetParam = function () { + var _p15 = groupSet; + if (_p15.ctor === 'Just') { + return A2( + _elm_lang$core$Basics_ops['++'], + '&groupSet=', + _elm_lang$http$Http$encodeUri( + _elm_community$string_extra$String_Extra$fromInt(_p15._0))); + } else { + return ''; + } + }(); + return A2( + _elm_lang$http$Http$get, + A2( + _elm_lang$core$Basics_ops['++'], + '/runs/rollup/?groupLimit=30&match=', + A2( + _elm_lang$core$Basics_ops['++'], + _elm_lang$http$Http$encodeUri(match), + groupSetParam)), + _seatgeek$wrecker_ui$Data$decodeResults); + }); +var _seatgeek$wrecker_ui$Main$buildPlotRoute = function (model) { + var level = A2(_elm_lang$core$Maybe$withDefault, 0, model.concurrencyComparison); + var page = A2( + _elm_lang$core$Maybe$map, + function (_p16) { + var _p17 = _p16; + return _p17._0; + }, + model.selectedPage); + var graphIndex = _elm_lang$core$List$head( + A2( + _elm_lang$core$List$filterMap, + _elm_lang$core$Basics$identity, + A2( + _elm_lang$core$List$indexedMap, + F2( + function (index, _p18) { + var _p19 = _p18; + return _elm_lang$core$Native_Utils.eq(_p19._0, model.graph) ? _elm_lang$core$Maybe$Just( + {ctor: '_Tuple2', _0: index, _1: _p19._1}) : _elm_lang$core$Maybe$Nothing; + }), + _seatgeek$wrecker_ui$Graph$validGraphs))); + var _p20 = model.displayTestResults; + if (_p20.ctor === 'Nothing') { + return _seatgeek$wrecker_ui$Router$Home; + } else { + var _p21 = graphIndex; + if (_p21.ctor === 'Nothing') { + return _seatgeek$wrecker_ui$Router$Home; + } else { + if (_p21._0._1.ctor === 'Scatter') { + return A4( + _seatgeek$wrecker_ui$Router$SimplePlot, + _p21._0._0, + model.displayTestResults, + page, + A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.id; + }, + model.selectedGroupSet)); + } else { + return A5( + _seatgeek$wrecker_ui$Router$ComparisonPlot, + _p21._0._0, + level, + model.displayTestResults, + page, + A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.id; + }, + model.selectedGroupSet)); + } + } + } +}; +var _seatgeek$wrecker_ui$Main$updateTheUrl = function (m) { + return { + ctor: '_Tuple2', + _0: m, + _1: _seatgeek$wrecker_ui$Router$modifyUrl( + _seatgeek$wrecker_ui$Main$buildPlotRoute(m)) + }; +}; +var _seatgeek$wrecker_ui$Main$screenToRoute = F2( + function (screen, model) { + var _p22 = screen; + if (_p22.ctor === 'ScheduleRunScreen') { + return _seatgeek$wrecker_ui$Router$ScheduleTest; + } else { + return _seatgeek$wrecker_ui$Main$buildPlotRoute(model); + } + }); +var _seatgeek$wrecker_ui$Main$loadRunThenPage = F4( + function (action, maybeTestName, maybeGroupSet, maybePageName) { + return A2( + _elm_lang$core$Task$perform, + action, + A2( + _elm_lang$core$Task$onError, + function (e) { + return _elm_lang$core$Task$succeed( + _elm_lang$core$Result$Err(e)); + }, + A2( + _elm_lang$core$Task$andThen, + function (_p23) { + var _p24 = _p23; + var _p27 = _p24; + var _p25 = maybePageName; + if (_p25.ctor === 'Nothing') { + return _elm_lang$core$Task$succeed( + _elm_lang$core$Result$Ok( + {ctor: '_Tuple4', _0: _p27, _1: '', _2: _elm_lang$core$Maybe$Nothing, _3: maybeGroupSet})); + } else { + var _p26 = _p25._0; + return A2( + _elm_lang$core$Task$andThen, + function (stats) { + return _elm_lang$core$Task$succeed( + _elm_lang$core$Result$Ok( + { + ctor: '_Tuple4', + _0: _p27, + _1: _p26, + _2: _elm_lang$core$Maybe$Just(stats), + _3: maybeGroupSet + })); + }, + _elm_lang$http$Http$toTask( + A2(_seatgeek$wrecker_ui$Main$getPageByRuns, _p24.runs, _p26))); + } + }, + _elm_lang$http$Http$toTask( + A2( + _seatgeek$wrecker_ui$Main$getManyRuns, + A2(_elm_lang$core$Maybe$withDefault, '__', maybeTestName), + maybeGroupSet))))); + }); +var _seatgeek$wrecker_ui$Main$debugError = F3( + function (model, place, err) { + var _p28 = A2( + _elm_lang$core$Debug$log, + A2( + _elm_lang$core$Basics_ops['++'], + 'error at ', + A2(_elm_lang$core$Basics_ops['++'], place, ':')), + err); + return {ctor: '_Tuple2', _0: model, _1: _elm_lang$core$Platform_Cmd$none}; + }); +var _seatgeek$wrecker_ui$Main$startPollingForResults = F3( + function (testName, selectedSet, model) { + return _elm_lang$core$Native_Utils.update( + model, + { + displayTestResults: _elm_lang$core$Maybe$Just(testName), + selectedGroupSet: selectedSet + }); + }); +var _seatgeek$wrecker_ui$Main$setGroupSetSelection = F3( + function (maybeId, groupSets, model) { + var groupSetFromId = _elm_lang$core$List$head( + A2( + _elm_lang$core$List$filter, + function (set) { + return _elm_lang$core$Native_Utils.eq( + _elm_lang$core$Maybe$Just(set.id), + maybeId); + }, + groupSets)); + return _elm_lang$core$Native_Utils.update( + model, + {selectedGroupSet: groupSetFromId}); + }); +var _seatgeek$wrecker_ui$Main$setPageMap = F2( + function (pages, model) { + return _elm_lang$core$Native_Utils.update( + model, + {pages: pages}); + }); +var _seatgeek$wrecker_ui$Main$setRuns = F4( + function (runs, runGroups, availableGroupSets, model) { + return _elm_lang$core$Native_Utils.update( + model, + {runs: runs, currentRunGroups: runGroups, filteredGroups: runGroups, availableGroupSets: availableGroupSets}); + }); +var _seatgeek$wrecker_ui$Main$setGraphByIndex = F2( + function (index, model) { + var graph = A2( + _elm_lang$core$Maybe$map, + function (_p29) { + var _p30 = _p29; + return _p30._1._0; + }, + _elm_lang$core$List$head( + A2( + _elm_lang$core$List$filter, + function (_p31) { + var _p32 = _p31; + return _elm_lang$core$Native_Utils.eq(_p32._0, index); + }, + A2( + _elm_lang$core$List$indexedMap, + F2( + function (ix, graph) { + return {ctor: '_Tuple2', _0: ix, _1: graph}; + }), + _seatgeek$wrecker_ui$Graph$validGraphs)))); + return _elm_lang$core$Native_Utils.update( + model, + { + graph: A2(_elm_lang$core$Maybe$withDefault, model.graph, graph) + }); + }); +var _seatgeek$wrecker_ui$Main$resetRunsState = function (model) { + return _elm_lang$core$Native_Utils.update( + model, + { + runs: {ctor: '[]'}, + filteredGroups: {ctor: '[]'} + }); +}; +var _seatgeek$wrecker_ui$Main$Model = function (a) { + return function (b) { + return function (c) { + return function (d) { + return function (e) { + return function (f) { + return function (g) { + return function (h) { + return function (i) { + return function (j) { + return function (k) { + return function (l) { + return function (m) { + return function (n) { + return function (o) { + return function (p) { + return {serverState: a, runs: b, runLoadNumber: c, pages: d, graph: e, graphState: f, currentRunGroups: g, filteredGroups: h, concurrencyComparison: i, selectedPage: j, currentScreen: k, schedulerState: l, displayTestResults: m, runGroupsPanel: n, selectedGroupSet: o, availableGroupSets: p}; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; + }; +}; +var _seatgeek$wrecker_ui$Main$ScheduleRunScreen = {ctor: 'ScheduleRunScreen'}; +var _seatgeek$wrecker_ui$Main$PlotScreen = {ctor: 'PlotScreen'}; +var _seatgeek$wrecker_ui$Main$PageSelection = F2( + function (a, b) { + return {ctor: 'PageSelection', _0: a, _1: b}; + }); +var _seatgeek$wrecker_ui$Main$setPageSelection = F3( + function (page, pages, model) { + var indexed = _elm_lang$core$Dict$fromList( + A2( + _elm_lang$core$List$map, + function (p) { + return {ctor: '_Tuple2', _0: p.runId, _1: p}; + }, + pages)); + return _elm_lang$core$Native_Utils.update( + model, + { + selectedPage: _elm_lang$core$Maybe$Just( + A2(_seatgeek$wrecker_ui$Main$PageSelection, page, indexed)) + }); + }); +var _seatgeek$wrecker_ui$Main$ChangeGroupSet = function (a) { + return {ctor: 'ChangeGroupSet', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$groupSetFilter = F2( + function (selectedSet, sets) { + return A2( + _elm_lang$html$Html$select, + { + ctor: '::', + _0: _seatgeek$wrecker_ui$Util$onChange( + function (_p33) { + return _seatgeek$wrecker_ui$Main$ChangeGroupSet( + A2( + _elm_lang$core$Result$withDefault, + -1, + _elm_lang$core$String$toInt(_p33))); + }), + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$Basics_ops['++'], + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$option, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value(''), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('- All Sets -'), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$List$map, + _seatgeek$wrecker_ui$Main$groupSetOption(selectedSet), + sets))); + }); +var _seatgeek$wrecker_ui$Main$RunGroupPanelMsg = function (a) { + return {ctor: 'RunGroupPanelMsg', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$PollForResults = function (a) { + return {ctor: 'PollForResults', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$subscriptions = function (model) { + var _p34 = model.displayTestResults; + if (_p34.ctor === 'Nothing') { + return _elm_lang$core$Platform_Sub$none; + } else { + return A2( + _elm_lang$core$Time$every, + 30 * _elm_lang$core$Time$second, + function (_p35) { + return _seatgeek$wrecker_ui$Main$PollForResults(_p34._0); + }); + } +}; +var _seatgeek$wrecker_ui$Main$ServerStateMsg = function (a) { + return {ctor: 'ServerStateMsg', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$SchedulerMsg = function (a) { + return {ctor: 'SchedulerMsg', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$changeScreen = F2( + function (screen, model) { + var effect = function () { + var _p36 = screen; + if (_p36.ctor === 'ScheduleRunScreen') { + return A2( + _elm_lang$core$Platform_Cmd$map, + _seatgeek$wrecker_ui$Main$SchedulerMsg, + _elm_lang$core$Tuple$second(_seatgeek$wrecker_ui$Scheduler$init)); + } else { + return _elm_lang$core$Platform_Cmd$none; + } + }(); + var allEffects = _elm_lang$core$Platform_Cmd$batch( + { + ctor: '::', + _0: effect, + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Platform_Cmd$map, + _seatgeek$wrecker_ui$Main$ServerStateMsg, + _elm_lang$core$Tuple$second(_seatgeek$wrecker_ui$ServerState$init)), + _1: {ctor: '[]'} + } + }); + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Native_Utils.update( + model, + {currentScreen: screen}), + _1: allEffects + }; + }); +var _seatgeek$wrecker_ui$Main$ChangeScreen = function (a) { + return {ctor: 'ChangeScreen', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$ChangeConcurrencyComparison = function (a) { + return {ctor: 'ChangeConcurrencyComparison', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$concurrencySelector = F2( + function (current, runs) { + var _p37 = current; + if (_p37.ctor === 'Nothing') { + return _elm_lang$html$Html$text(''); + } else { + var buildOption = function (level) { + return A2( + _elm_lang$html$Html$option, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$value( + _elm_lang$core$Basics$toString(level)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$selected( + _elm_lang$core$Native_Utils.eq(_p37._0, level)), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text( + _elm_lang$core$Basics$toString(level)), + _1: {ctor: '[]'} + }); + }; + var levels = _elm_lang$core$List$sort( + _elm_community$list_extra$List_Extra$unique( + A2( + _elm_lang$core$List$map, + function (_p38) { + return function (_) { + return _.concurrency; + }( + function (_) { + return _.run; + }(_p38)); + }, + runs))); + return A2( + _elm_lang$html$Html$select, + { + ctor: '::', + _0: _seatgeek$wrecker_ui$Util$onChangeInt(_seatgeek$wrecker_ui$Main$ChangeConcurrencyComparison), + _1: {ctor: '[]'} + }, + A2(_elm_lang$core$List$map, buildOption, levels)); + } + }); +var _seatgeek$wrecker_ui$Main$PageNameClicked = function (a) { + return {ctor: 'PageNameClicked', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$pageItem = F2( + function (selected, page) { + var classes = { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'selected', + _1: _elm_lang$core$Native_Utils.eq(selected, page) + }, + _1: {ctor: '[]'} + }; + return A2( + _elm_lang$html$Html$li, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$a, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$classList(classes), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick( + _seatgeek$wrecker_ui$Main$PageNameClicked(page)), + _1: {ctor: '[]'} + } + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(page), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }); + }); +var _seatgeek$wrecker_ui$Main$pagesList = F2( + function (selected, pages) { + return A2( + _elm_lang$html$Html$ul, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot--right__pages'), + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$List$map, + _seatgeek$wrecker_ui$Main$pageItem(selected), + _elm_lang$core$Dict$keys(pages))); + }); +var _seatgeek$wrecker_ui$Main$ShowOnlyGroup = function (a) { + return {ctor: 'ShowOnlyGroup', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$ToggleFilterGroup = function (a) { + return {ctor: 'ToggleFilterGroup', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$groupItem = F2( + function (filtered, runGroup) { + var color = _seatgeek$wrecker_ui$Graph_Coloring$pickColor(runGroup.id); + var isFiltered = function () { + var _p39 = filtered; + if (_p39.ctor === '[]') { + return false; + } else { + return _elm_lang$core$List$isEmpty( + A2( + _elm_lang$core$List$filter, + F2( + function (x, y) { + return _elm_lang$core$Native_Utils.eq(x, y); + })(runGroup), + filtered)); + } + }(); + return A2( + _elm_lang$html$Html$li, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'cursor', _1: 'pointer'}, + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$classList( + { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'grayed-out', _1: isFiltered}, + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick( + _seatgeek$wrecker_ui$Main$ToggleFilterGroup(runGroup.id)), + _1: { + ctor: '::', + _0: _elm_lang$html$Html_Events$onDoubleClick( + _seatgeek$wrecker_ui$Main$ShowOnlyGroup(runGroup.id)), + _1: {ctor: '[]'} + } + } + } + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$span, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$style( + { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'color', + _1: _eskimoblood$elm_color_extra$Color_Convert$colorToHex(color) + }, + _1: { + ctor: '::', + _0: {ctor: '_Tuple2', _0: 'font-size', _1: '25px'}, + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('●'), + _1: { + ctor: '::', + _0: _elm_lang$html$Html$text(' '), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: _elm_lang$html$Html$text(runGroup.title), + _1: {ctor: '[]'} + } + }); + }); +var _seatgeek$wrecker_ui$Main$runGroupsList = F2( + function (allGroups, filteredGroups) { + return A2( + _elm_lang$html$Html$ul, + {ctor: '[]'}, + A2( + _elm_lang$core$List$map, + _seatgeek$wrecker_ui$Main$groupItem(filteredGroups), + _elm_lang$core$List$reverse( + A2( + _elm_lang$core$List$sortBy, + function (_) { + return _.id; + }, + allGroups)))); + }); +var _seatgeek$wrecker_ui$Main$ChangeGraphType = function (a) { + return {ctor: 'ChangeGraphType', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$graphTypeOptions = function (graph) { + return A2( + _elm_lang$html$Html$select, + { + ctor: '::', + _0: _seatgeek$wrecker_ui$Util$onChange(_seatgeek$wrecker_ui$Main$ChangeGraphType), + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$List$map, + _seatgeek$wrecker_ui$Main$graphTypeOption(graph), + _seatgeek$wrecker_ui$Graph$validGraphs)); +}; +var _seatgeek$wrecker_ui$Main$rightmostPanel = function (_p40) { + var _p41 = _p40; + return A2( + _elm_lang$html$Html$div, + {ctor: '[]'}, + { + ctor: '::', + _0: A2(_seatgeek$wrecker_ui$Main$groupSetFilter, _p41.selectedGroupSet, _p41.availableGroupSets), + _1: { + ctor: '::', + _0: _seatgeek$wrecker_ui$Main$graphTypeOptions(_p41.graph), + _1: { + ctor: '::', + _0: A2(_seatgeek$wrecker_ui$Main$concurrencySelector, _p41.concurrencyComparison, _p41.runs), + _1: { + ctor: '::', + _0: A3(_elm_lang$html$Html_Lazy$lazy2, _seatgeek$wrecker_ui$Main$runGroupsList, _p41.currentRunGroups, _p41.filteredGroups), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$h4, + {ctor: '[]'}, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Pages'), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _seatgeek$wrecker_ui$Main$pagesList, + _seatgeek$wrecker_ui$Main$extractSelectedPage(_p41.selectedPage), + _p41.pages), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('scrollFader'), + _1: {ctor: '[]'} + }, + {ctor: '[]'}), + _1: {ctor: '[]'} + } + } + } + } + } + } + }); +}; +var _seatgeek$wrecker_ui$Main$RunTitleClicked = function (a) { + return {ctor: 'RunTitleClicked', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$runListItem = F2( + function (selected, _p42) { + var _p43 = _p42; + var _p45 = _p43._0; + var indicator = function () { + var _p44 = _p43._1; + switch (_p44.ctor) { + case 'Running': + return _elm_lang$html$Html$text(' ▶️'); + case 'Done': + return _elm_lang$html$Html$text(' ✅'); + default: + return _elm_lang$html$Html$text(''); + } + }(); + var classes = { + ctor: '::', + _0: { + ctor: '_Tuple2', + _0: 'selected', + _1: _elm_lang$core$Native_Utils.eq( + selected, + _elm_lang$core$Maybe$Just(_p45)) + }, + _1: {ctor: '[]'} + }; + return A2( + _elm_lang$html$Html$li, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick( + _seatgeek$wrecker_ui$Main$RunTitleClicked(_p45)), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$a, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$classList(classes), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text(_p45), + _1: { + ctor: '::', + _0: indicator, + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + }); + }); +var _seatgeek$wrecker_ui$Main$leftPanel = F3( + function (screen, defaultTitle, _p46) { + var _p47 = _p46; + var bottomItems = function () { + var _p48 = screen; + if (_p48.ctor === 'ScheduleRunScreen') { + return {ctor: '[]'}; + } else { + return { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-header__search'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$ul, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-header__runs'), + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$List$map, + _seatgeek$wrecker_ui$Main$runListItem(defaultTitle), + _elm_lang$core$Dict$toList(_p47._0))), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }; + } + }(); + return A2( + _elm_lang$html$Html$header, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-header'), + _1: {ctor: '[]'} + }, + A2( + _elm_lang$core$Basics_ops['++'], + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$a, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick( + _seatgeek$wrecker_ui$Main$ChangeScreen(_seatgeek$wrecker_ui$Main$ScheduleRunScreen)), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Schedule Run ➕ '), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$h1, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-header__title'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$a, + { + ctor: '::', + _0: _elm_lang$html$Html_Events$onClick( + _seatgeek$wrecker_ui$Main$ChangeScreen(_seatgeek$wrecker_ui$Main$PlotScreen)), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _elm_lang$html$Html$text('Wrecker-UI'), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + }, + bottomItems)); + }); +var _seatgeek$wrecker_ui$Main$GraphMsg = function (a) { + return {ctor: 'GraphMsg', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$rightPlotPanel = function (model) { + var _p49 = model.runs; + if (_p49.ctor === '[]') { + return _elm_lang$html$Html$text(''); + } else { + return A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot view-plot__closed'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot--left'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$map, + _seatgeek$wrecker_ui$Main$GraphMsg, + A4( + _seatgeek$wrecker_ui$Graph$view, + model.graphState, + model.graph, + A2( + _seatgeek$wrecker_ui$Main$indexedBy, + function (_) { + return _.id; + }, + model.currentRunGroups), + _seatgeek$wrecker_ui$Main$selectRunData(model))), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$map, + _seatgeek$wrecker_ui$Main$RunGroupPanelMsg, + A4(_elm_lang$html$Html_Lazy$lazy3, _seatgeek$wrecker_ui$RunGroupPanel$view, model.currentRunGroups, model.filteredGroups, model.runGroupsPanel)), + _1: {ctor: '[]'} + } + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view-plot--right'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: _seatgeek$wrecker_ui$Main$rightmostPanel(model), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + }); + } +}; +var _seatgeek$wrecker_ui$Main$view = function (model) { + return A2( + _elm_lang$html$Html$div, + {ctor: '[]'}, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view--left'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: A4(_elm_lang$html$Html_Lazy$lazy3, _seatgeek$wrecker_ui$Main$leftPanel, model.currentScreen, model.displayTestResults, model.serverState.testList), + _1: {ctor: '[]'} + }), + _1: { + ctor: '::', + _0: A2( + _elm_lang$html$Html$div, + { + ctor: '::', + _0: _elm_lang$html$Html_Attributes$class('view--right'), + _1: {ctor: '[]'} + }, + { + ctor: '::', + _0: function () { + var _p50 = model.currentScreen; + if (_p50.ctor === 'PlotScreen') { + return _seatgeek$wrecker_ui$Main$rightPlotPanel(model); + } else { + return A2( + _elm_lang$html$Html$map, + _seatgeek$wrecker_ui$Main$SchedulerMsg, + A3(_seatgeek$wrecker_ui$Scheduler$view, model.serverState.testList, model.serverState.groupSets, model.schedulerState)); + } + }(), + _1: {ctor: '[]'} + }), + _1: {ctor: '[]'} + } + }), + _1: {ctor: '[]'} + }); +}; +var _seatgeek$wrecker_ui$Main$RefreshRunStats = function (a) { + return {ctor: 'RefreshRunStats', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$LoadFromLocation = function (a) { + return {ctor: 'LoadFromLocation', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$setRoute = F2( + function (maybeRoute, model) { + var _p51 = maybeRoute; + if (_p51.ctor === 'Nothing') { + return {ctor: '_Tuple2', _0: model, _1: _elm_lang$core$Platform_Cmd$none}; + } else { + switch (_p51._0.ctor) { + case 'Home': + return A2(_seatgeek$wrecker_ui$Main$changeScreen, _seatgeek$wrecker_ui$Main$PlotScreen, model); + case 'ScheduleTest': + return A2(_seatgeek$wrecker_ui$Main$changeScreen, _seatgeek$wrecker_ui$Main$ScheduleRunScreen, model); + case 'SimplePlot': + var _p52 = _p51._0._1; + return A2( + _Fresheyeball$elm_return$Return$command, + A4(_seatgeek$wrecker_ui$Main$loadRunThenPage, _seatgeek$wrecker_ui$Main$LoadFromLocation, _p52, _p51._0._3, _p51._0._2), + _seatgeek$wrecker_ui$Util$return( + A2( + _seatgeek$wrecker_ui$Main$setGraphByIndex, + _p51._0._0, + _elm_lang$core$Native_Utils.update( + model, + {displayTestResults: _p52})))); + default: + var _p53 = _p51._0._2; + return A2( + _Fresheyeball$elm_return$Return$command, + A4(_seatgeek$wrecker_ui$Main$loadRunThenPage, _seatgeek$wrecker_ui$Main$LoadFromLocation, _p53, _p51._0._4, _p51._0._3), + _seatgeek$wrecker_ui$Util$return( + A2( + _seatgeek$wrecker_ui$Main$setGraphByIndex, + _p51._0._0, + _elm_lang$core$Native_Utils.update( + model, + { + concurrencyComparison: _elm_lang$core$Maybe$Just(_p51._0._1), + displayTestResults: _p53 + })))); + } + } + }); +var _seatgeek$wrecker_ui$Main$init = function (location) { + var _p54 = _seatgeek$wrecker_ui$ServerState$init; + var serverState = _p54._0; + var serverStateInit = _p54._1; + var _p55 = _seatgeek$wrecker_ui$Scheduler$init; + var schedulerModel = _p55._0; + var scheduleInit = _p55._1; + var initialReturn = A2( + _seatgeek$wrecker_ui$Main$setRoute, + _seatgeek$wrecker_ui$Router$fromLocation(location), + { + serverState: serverState, + runs: {ctor: '[]'}, + runLoadNumber: 0, + pages: _elm_lang$core$Dict$empty, + graph: 'Mean Time / Concurrency', + graphState: _seatgeek$wrecker_ui$Graph$defaultModel, + currentRunGroups: {ctor: '[]'}, + filteredGroups: {ctor: '[]'}, + selectedPage: _elm_lang$core$Maybe$Nothing, + concurrencyComparison: _elm_lang$core$Maybe$Nothing, + currentScreen: _seatgeek$wrecker_ui$Main$PlotScreen, + schedulerState: schedulerModel, + displayTestResults: _elm_lang$core$Maybe$Nothing, + runGroupsPanel: _seatgeek$wrecker_ui$RunGroupPanel$init, + selectedGroupSet: _elm_lang$core$Maybe$Nothing, + availableGroupSets: {ctor: '[]'} + }); + return A2( + _Fresheyeball$elm_return$Return$command, + A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$ServerStateMsg, serverStateInit), + A2( + _Fresheyeball$elm_return$Return$command, + A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$SchedulerMsg, scheduleInit), + initialReturn)); +}; +var _seatgeek$wrecker_ui$Main$LoadPageStats = function (a) { + return {ctor: 'LoadPageStats', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$LoadRunStats = F2( + function (a, b) { + return {ctor: 'LoadRunStats', _0: a, _1: b}; + }); +var _seatgeek$wrecker_ui$Main$loadRunsData = F3( + function (testName, selectedSet, model) { + var newRunNumber = model.runLoadNumber + 1; + return A2( + _Fresheyeball$elm_return$Return$andThen, + _seatgeek$wrecker_ui$Main$updateTheUrl, + A2( + _Fresheyeball$elm_return$Return$command, + A2( + _elm_lang$http$Http$send, + _seatgeek$wrecker_ui$Main$LoadRunStats(newRunNumber), + A2( + _seatgeek$wrecker_ui$Main$getManyRuns, + testName, + A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.id; + }, + selectedSet))), + _seatgeek$wrecker_ui$Util$return( + _seatgeek$wrecker_ui$Main$resetRunsState( + A3( + _seatgeek$wrecker_ui$Main$startPollingForResults, + testName, + selectedSet, + _elm_lang$core$Native_Utils.update( + model, + {runLoadNumber: newRunNumber})))))); + }); +var _seatgeek$wrecker_ui$Main$update = F2( + function (msg, model) { + var _p56 = msg; + switch (_p56.ctor) { + case 'SetRoute': + return A2(_seatgeek$wrecker_ui$Main$setRoute, _p56._0, model); + case 'ChangeScreen': + var _p57 = _p56._0; + return A2( + _Fresheyeball$elm_return$Return$command, + _seatgeek$wrecker_ui$Router$modifyUrl( + A2(_seatgeek$wrecker_ui$Main$screenToRoute, _p57, model)), + A2(_seatgeek$wrecker_ui$Main$changeScreen, _p57, model)); + case 'RunTitleClicked': + return A3( + _seatgeek$wrecker_ui$Main$loadRunsData, + _p56._0, + _elm_lang$core$Maybe$Nothing, + _elm_lang$core$Native_Utils.update( + model, + {selectedGroupSet: _elm_lang$core$Maybe$Nothing})); + case 'ChangeGroupSet': + var testName = A2(_elm_lang$core$Maybe$withDefault, '', model.displayTestResults); + var selectedSet = _elm_lang$core$List$head( + A2( + _elm_lang$core$List$filter, + function (set) { + return _elm_lang$core$Native_Utils.eq(set.id, _p56._0); + }, + model.availableGroupSets)); + return A3(_seatgeek$wrecker_ui$Main$loadRunsData, testName, selectedSet, model); + case 'LoadRunStats': + if (_p56._1.ctor === 'Err') { + return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadRunStats', _p56._1._0); + } else { + var _p58 = _p56._0; + return (_elm_lang$core$Native_Utils.cmp(model.runLoadNumber, _p58) > 0) ? {ctor: '_Tuple2', _0: model, _1: _elm_lang$core$Platform_Cmd$none} : _seatgeek$wrecker_ui$Util$return( + A2( + _seatgeek$wrecker_ui$Main$setPageMap, + _p56._1._0.pages, + A4( + _seatgeek$wrecker_ui$Main$setRuns, + _p56._1._0.runs, + _p56._1._0.runGroups, + _p56._1._0.availableGroupSets, + _elm_lang$core$Native_Utils.update( + model, + {selectedPage: _elm_lang$core$Maybe$Nothing, runLoadNumber: _p58})))); + } + case 'LoadPageStats': + if (_p56._0.ctor === 'Err') { + return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadPageStats', _p56._0._0); + } else { + var _p59 = model.selectedPage; + if (_p59.ctor === 'Nothing') { + return _seatgeek$wrecker_ui$Util$return(model); + } else { + return _seatgeek$wrecker_ui$Util$return( + A3(_seatgeek$wrecker_ui$Main$setPageSelection, _p59._0._0, _p56._0._0, model)); + } + } + case 'LoadFromLocation': + if (_p56._0.ctor === 'Err') { + return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadFromLocation', _p56._0._0); + } else { + if (_p56._0._0._2.ctor === 'Just') { + var _p60 = _p56._0._0._0.availableGroupSets; + return _seatgeek$wrecker_ui$Util$return( + A3( + _seatgeek$wrecker_ui$Main$setGroupSetSelection, + _p56._0._0._3, + _p60, + A3( + _seatgeek$wrecker_ui$Main$setPageSelection, + _p56._0._0._1, + _p56._0._0._2._0, + A2( + _seatgeek$wrecker_ui$Main$setPageMap, + _p56._0._0._0.pages, + A4(_seatgeek$wrecker_ui$Main$setRuns, _p56._0._0._0.runs, _p56._0._0._0.runGroups, _p60, model))))); + } else { + var _p61 = _p56._0._0._0.availableGroupSets; + return _seatgeek$wrecker_ui$Util$return( + A3( + _seatgeek$wrecker_ui$Main$setGroupSetSelection, + _p56._0._0._3, + _p61, + A2( + _seatgeek$wrecker_ui$Main$setPageMap, + _p56._0._0._0.pages, + A4( + _seatgeek$wrecker_ui$Main$setRuns, + _p56._0._0._0.runs, + _p56._0._0._0.runGroups, + _p61, + _elm_lang$core$Native_Utils.update( + model, + {selectedPage: _elm_lang$core$Maybe$Nothing}))))); + } + } + case 'RefreshRunStats': + if (_p56._0.ctor === 'Err') { + return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'RefreshRunStats', _p56._0._0); + } else { + if (_p56._0._0._2.ctor === 'Just') { + var _p62 = _p56._0._0._0.availableGroupSets; + return _seatgeek$wrecker_ui$Util$return( + A3( + _seatgeek$wrecker_ui$Main$setGroupSetSelection, + _p56._0._0._3, + _p62, + A3( + _seatgeek$wrecker_ui$Main$setPageSelection, + _p56._0._0._1, + _p56._0._0._2._0, + A2( + _seatgeek$wrecker_ui$Main$setPageMap, + _p56._0._0._0.pages, + _elm_lang$core$Native_Utils.update( + model, + {runs: _p56._0._0._0.runs, availableGroupSets: _p62, currentRunGroups: _p56._0._0._0.runGroups}))))); + } else { + var _p63 = _p56._0._0._0.availableGroupSets; + return _seatgeek$wrecker_ui$Util$return( + A3( + _seatgeek$wrecker_ui$Main$setGroupSetSelection, + _p56._0._0._3, + _p63, + A2( + _seatgeek$wrecker_ui$Main$setPageMap, + _p56._0._0._0.pages, + _elm_lang$core$Native_Utils.update( + model, + {runs: _p56._0._0._0.runs, availableGroupSets: _p63, currentRunGroups: _p56._0._0._0.runGroups})))); + } + } + case 'GraphMsg': + var _p64 = A2(_seatgeek$wrecker_ui$Graph$update, _p56._0, model.graphState); + var m = _p64._0; + var c = _p64._1; + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Native_Utils.update( + model, + {graphState: m}), + _1: A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$GraphMsg, c) + }; + case 'ChangeGraphType': + var _p65 = A2(_seatgeek$wrecker_ui$Graph$chooseGraphType, _p56._0, model.runs); + var newType = _p65._0; + var newConcurrency = _p65._1; + return A2( + _Fresheyeball$elm_return$Return$andThen, + _seatgeek$wrecker_ui$Main$updateTheUrl, + _seatgeek$wrecker_ui$Util$return( + _elm_lang$core$Native_Utils.update( + model, + { + graph: A2(_elm_lang$core$Maybe$withDefault, model.graph, newType), + concurrencyComparison: newConcurrency + }))); + case 'ToggleFilterGroup': + var _p66 = _p56._0; + var filteredGroups = (!_elm_lang$core$Native_Utils.eq( + A2( + _elm_lang$core$List$filter, + function (g) { + return _elm_lang$core$Native_Utils.eq(g.id, _p66); + }, + model.filteredGroups), + {ctor: '[]'})) ? A2( + _elm_lang$core$List$filter, + function (g) { + return !_elm_lang$core$Native_Utils.eq(g.id, _p66); + }, + model.filteredGroups) : A2( + _elm_lang$core$List$append, + A2( + _elm_lang$core$List$filter, + function (g) { + return _elm_lang$core$Native_Utils.eq(g.id, _p66); + }, + model.currentRunGroups), + model.filteredGroups); + var newFilteredGroups = _elm_lang$core$List$isEmpty(filteredGroups) ? model.currentRunGroups : filteredGroups; + return _seatgeek$wrecker_ui$Util$return( + _elm_lang$core$Native_Utils.update( + model, + {filteredGroups: newFilteredGroups})); + case 'ShowOnlyGroup': + return _seatgeek$wrecker_ui$Util$return( + _elm_lang$core$Native_Utils.update( + model, + { + filteredGroups: A2( + _elm_lang$core$List$filter, + function (g) { + return _elm_lang$core$Native_Utils.eq(g.id, _p56._0); + }, + model.currentRunGroups) + })); + case 'PageNameClicked': + var _p68 = _p56._0; + var result = A2( + _Fresheyeball$elm_return$Return$andThen, + _seatgeek$wrecker_ui$Main$updateTheUrl, + A2( + _Fresheyeball$elm_return$Return$command, + A2( + _elm_lang$http$Http$send, + _seatgeek$wrecker_ui$Main$LoadPageStats, + A2(_seatgeek$wrecker_ui$Main$getPageByRuns, model.runs, _p68)), + _seatgeek$wrecker_ui$Util$return( + _elm_lang$core$Native_Utils.update( + model, + { + selectedPage: _elm_lang$core$Maybe$Just( + A2(_seatgeek$wrecker_ui$Main$PageSelection, _p68, _elm_lang$core$Dict$empty)) + })))); + var _p67 = model.selectedPage; + if (_p67.ctor === 'Nothing') { + return result; + } else { + return _elm_lang$core$Native_Utils.eq(_p68, _p67._0._0) ? A2( + _Fresheyeball$elm_return$Return$andThen, + _seatgeek$wrecker_ui$Main$updateTheUrl, + _seatgeek$wrecker_ui$Util$return( + _elm_lang$core$Native_Utils.update( + model, + {selectedPage: _elm_lang$core$Maybe$Nothing}))) : result; + } + case 'ChangeConcurrencyComparison': + return A2( + _Fresheyeball$elm_return$Return$andThen, + _seatgeek$wrecker_ui$Main$updateTheUrl, + _seatgeek$wrecker_ui$Util$return( + _elm_lang$core$Native_Utils.update( + model, + { + concurrencyComparison: _elm_lang$core$Maybe$Just(_p56._0) + }))); + case 'SchedulerMsg': + var _p69 = A3(_seatgeek$wrecker_ui$Scheduler$update, model.serverState.groupSets, _p56._0, model.schedulerState); + var m = _p69._0; + var c = _p69._1; + var reloadServerState = _p69._2; + var effect = A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$SchedulerMsg, c); + var allEffects = reloadServerState ? _elm_lang$core$Platform_Cmd$batch( + { + ctor: '::', + _0: effect, + _1: { + ctor: '::', + _0: A2( + _elm_lang$core$Platform_Cmd$map, + _seatgeek$wrecker_ui$Main$ServerStateMsg, + _elm_lang$core$Tuple$second(_seatgeek$wrecker_ui$ServerState$init)), + _1: {ctor: '[]'} + } + }) : effect; + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Native_Utils.update( + model, + {schedulerState: m}), + _1: allEffects + }; + case 'ServerStateMsg': + var _p70 = A2(_seatgeek$wrecker_ui$ServerState$update, _p56._0, model.serverState); + var m = _p70._0; + var c = _p70._1; + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Native_Utils.update( + model, + {serverState: m}), + _1: A2(_elm_lang$core$Platform_Cmd$map, _seatgeek$wrecker_ui$Main$ServerStateMsg, c) + }; + case 'RunGroupPanelMsg': + return { + ctor: '_Tuple2', + _0: _elm_lang$core$Native_Utils.update( + model, + { + runGroupsPanel: A2(_seatgeek$wrecker_ui$RunGroupPanel$update, _p56._0, model.runGroupsPanel) + }), + _1: _elm_lang$core$Platform_Cmd$none + }; + default: + return A2( + _Fresheyeball$elm_return$Return$command, + A2( + _elm_lang$core$Platform_Cmd$map, + _seatgeek$wrecker_ui$Main$ServerStateMsg, + _elm_lang$core$Tuple$second(_seatgeek$wrecker_ui$ServerState$init)), + A2( + _Fresheyeball$elm_return$Return$command, + A4( + _seatgeek$wrecker_ui$Main$loadRunThenPage, + _seatgeek$wrecker_ui$Main$RefreshRunStats, + _elm_lang$core$Maybe$Just(_p56._0), A2( _elm_lang$core$Maybe$map, function (_) { diff --git a/assets/main.css b/assets/main.css --- a/assets/main.css +++ b/assets/main.css @@ -90,6 +90,7 @@ .view-plot--left { + font-size: 13px; padding-right: 3em; width: 75%; } diff --git a/src/Main.hs b/src/Main.hs --- a/src/Main.hs +++ b/src/Main.hs @@ -146,11 +146,12 @@ putStrLn "Using SQLite" return Sqlite Just info -> - case parseDatabaseUrl info of - Nothing -> error "Invalid WRECKER_DB url" - Just connDetails -> do - putStrLn "Using PostgreSQL" - return (Postgresql connDetails) + let protocolFixedInfo = Text.replace "postgresql://" "postgres://" (Text.pack info) + in case parseDatabaseUrl (Text.unpack protocolFixedInfo) of + Nothing -> error "Invalid WRECKER_DB url" + Just connDetails -> do + putStrLn "Using PostgreSQL" + return (Postgresql connDetails) getStaticSlaves :: IO [NodeId] getStaticSlaves = do @@ -221,7 +222,7 @@ json $ object ["runs" .= result, "success" .= True] where fetchRuns :: Text -> Maybe Int -> IO [P.Entity Run] - fetchRuns match groupSet = runDbAction db $ findRunsByMatchAndSet match groupSet + fetchRuns match groupSet = runDbAction db $ findRunsByMatchAndSet match groupSet Nothing listGroupSets :: Database -> ActionM () listGroupSets db = do @@ -430,8 +431,9 @@ where idsFromMatch = do match <- param "match" + runGroupLimit <- readMaybe <$> optionalParam "groupLimit" groupSet <- readMaybe <$> optionalParam "groupSet" - runs <- liftAndCatchIO (runDbAction db $ findRunsByMatchAndSet match groupSet) + runs <- liftAndCatchIO (runDbAction db $ findRunsByMatchAndSet match groupSet runGroupLimit) return (fmap (fromIntegral . Sql.fromSqlKey . P.entityKey) runs) toSqlKey :: Int -> Key Run diff --git a/src/Model.hs b/src/Model.hs --- a/src/Model.hs +++ b/src/Model.hs @@ -186,23 +186,41 @@ findGroupSetsByRunMatch :: MonadIO m => Text -> SqlReadT m [Entity GroupSet] findGroupSetsByRunMatch match = let matchWithExpanse = val ("%" <> match <> "%") - in select $ distinct $ + in select $ + distinct $ from $ \(r, rg, gs) -> do where_ (r ^. RunRunGroupId ==. rg ^. RunGroupId) where_ (rg ^. RunGroupGroupSetId ==. gs ^. GroupSetId) where_ (r ^. RunMatch `like` matchWithExpanse) return gs -findRunsByMatchAndSet :: MonadIO m => Text -> Maybe Int -> SqlReadT m [Entity Run] -findRunsByMatchAndSet match groupSetId = - let matchWithExpanse = val ("%" <> match <> "%") - in select $ - from $ \(r `InnerJoin` rg) -> do - on (r ^. RunRunGroupId ==. rg ^. RunGroupId) - where_ (r ^. RunMatch `like` matchWithExpanse) - unless (Data.Maybe.isNothing groupSetId) $ - where_ (rg ^. RunGroupGroupSetId ==. val (toKey $ Data.Maybe.fromMaybe 0 groupSetId)) - return r +findRunsByMatchAndSet :: + MonadIO m + => Text -- ^ The test title + -> Maybe Int -- ^ Optionally the groupset id to filter on + -> Maybe Int -- ^ Optionally limit the number of distinct run gorups + -> SqlReadT m [Entity Run] +findRunsByMatchAndSet match groupSetId runGroupLimit = + select $ + from $ \r -> do + where_ (r ^. RunRunGroupId `in_` subList_select countFilter) + return r + where + matchFilter = + let matchWithExpanse = val ("%" <> match <> "%") + in from $ \r -> do + where_ (r ^. RunMatch `like` matchWithExpanse) + return $ r ^. RunRunGroupId + countFilter = + from $ \rg -> do + where_ (rg ^. RunGroupId `in_` subList_select matchFilter) + unless (Data.Maybe.isNothing groupSetId) $ + where_ + (rg ^. RunGroupGroupSetId ==. val (toKey $ Data.Maybe.fromMaybe 0 groupSetId)) + orderBy [desc (rg ^. RunGroupCreated)] + unless (Data.Maybe.isNothing runGroupLimit) $ + limit $ fromIntegral (Data.Maybe.fromMaybe 1 runGroupLimit) + return $ rg ^. RunGroupId findRuns :: MonadIO m => [Key Run] -> SqlReadT m [Entity Run] findRuns keys = diff --git a/src/Scheduler.hs b/src/Scheduler.hs --- a/src/Scheduler.hs +++ b/src/Scheduler.hs @@ -197,12 +197,12 @@ divideWork nodes@(selfNode :| _) = let Wrecker.Concurrency conc_ = concurrency conc = fromIntegral conc_ - in if null slaves || conc < 2000 + in if null slaves || conc < 20 then [buildTask command selfNode] else let (first:rest) = [ nodes !! (i - 1) -- Return the node at position i | i <- [1 .. length nodes] -- Select one more node - , (conc / fromIntegral i) >= 1000 -- If there are at least 1000 threads to run on it + , (conc / fromIntegral i) >= 10 -- If there are at least 10 threads to run on it ] -- Calculate the number of threads per task to execute total = fromIntegral (length (first : rest)) -- Get the total available workers @@ -214,7 +214,7 @@ setConcurrency c = command {Wrecker.concurrency = Wrecker.Concurrency c} -- -- Build the async tasks that should be executed - firstTask = buildTask (setConcurrency remainderConcurrency) first -- First task gets teh remainder + firstTask = buildTask (setConcurrency remainderConcurrency) first -- First task gets the remainder restTasks = fmap (buildTask (setConcurrency avgConcurrency)) rest -- But the rest get the same amount of threads in firstTask : restTasks diff --git a/wrecker-ui.cabal b/wrecker-ui.cabal --- a/wrecker-ui.cabal +++ b/wrecker-ui.cabal @@ -2,10 +2,10 @@ -- -- see: https://github.com/sol/hpack -- --- hash: 741cebc9d0ce3d6b63be18821ada7b9fa21d9606970059dd7a3f1ceb011d2930 +-- hash: de2320ca3937b2c02ed852468e046be9975e3bd38b7a6aac947d2e7372187b10 name: wrecker-ui -version: 3.1.1.0 +version: 3.3.1.0 synopsis: A web interface for Wrecker, the HTTP Performance Benchmarker description: 'wrecker-ui' is a web based interface to visualize performance tests built using the wrecker library and schedule test runs. category: Web