diff --git a/assets/app.js b/assets/app.js --- a/assets/app.js +++ b/assets/app.js @@ -11053,13784 +11053,9930 @@ }(); -var _elm_lang$virtual_dom$Native_Debug = function() { - - -// IMPORT / EXPORT - -function unsafeCoerce(value) -{ - return value; -} - -var upload = _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) -{ - var element = document.createElement('input'); - element.setAttribute('type', 'file'); - element.setAttribute('accept', 'text/json'); - element.style.display = 'none'; - element.addEventListener('change', function(event) - { - var fileReader = new FileReader(); - fileReader.onload = function(e) - { - callback(_elm_lang$core$Native_Scheduler.succeed(e.target.result)); - }; - fileReader.readAsText(event.target.files[0]); - document.body.removeChild(element); - }); - document.body.appendChild(element); - element.click(); -}); - -function download(historyLength, json) -{ - return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback) - { - var fileName = 'history-' + historyLength + '.txt'; - var jsonString = JSON.stringify(json); - var mime = 'text/plain;charset=utf-8'; - var done = _elm_lang$core$Native_Scheduler.succeed(_elm_lang$core$Native_Utils.Tuple0); - - // for IE10+ - if (navigator.msSaveBlob) - { - navigator.msSaveBlob(new Blob([jsonString], {type: mime}), fileName); - return callback(done); - } - - // for HTML5 - var element = document.createElement('a'); - element.setAttribute('href', 'data:' + mime + ',' + encodeURIComponent(jsonString)); - element.setAttribute('download', fileName); - element.style.display = 'none'; - document.body.appendChild(element); - element.click(); - document.body.removeChild(element); - callback(done); - }); -} - - -// POPOUT - -function messageToString(value) -{ - switch (typeof value) - { - case 'boolean': - return value ? 'True' : 'False'; - case 'number': - return value + ''; - case 'string': - return '"' + addSlashes(value, false) + '"'; - } - if (value instanceof String) - { - return '\'' + addSlashes(value, true) + '\''; - } - if (typeof value !== 'object' || value === null || !('ctor' in value)) - { - return '…'; - } - - var ctorStarter = value.ctor.substring(0, 5); - if (ctorStarter === '_Tupl' || ctorStarter === '_Task') - { - return '…' - } - if (['_Array', '', '_Process', '::', '[]', 'Set_elm_builtin', 'RBNode_elm_builtin', 'RBEmpty_elm_builtin'].indexOf(value.ctor) >= 0) - { - return '…'; - } - - var keys = Object.keys(value); - switch (keys.length) - { - case 1: - return value.ctor; - case 2: - return value.ctor + ' ' + messageToString(value._0); - default: - return value.ctor + ' … ' + messageToString(value[keys[keys.length - 1]]); - } -} - - -function primitive(str) -{ - return { ctor: 'Primitive', _0: str }; -} - - -function init(value) -{ - var type = typeof value; - - if (type === 'boolean') - { - return { - ctor: 'Constructor', - _0: _elm_lang$core$Maybe$Just(value ? 'True' : 'False'), - _1: true, - _2: _elm_lang$core$Native_List.Nil - }; - } - - if (type === 'number') - { - return primitive(value + ''); - } - - if (type === 'string') - { - return { ctor: 'S', _0: '"' + addSlashes(value, false) + '"' }; - } - - if (value instanceof String) - { - return { ctor: 'S', _0: "'" + addSlashes(value, true) + "'" }; - } - - if (value instanceof Date) - { - return primitive('<' + value.toString() + '>'); - } - - if (value === null) - { - return primitive('XXX'); - } - - if (type === 'object' && 'ctor' in value) - { - var ctor = value.ctor; - - if (ctor === '::' || ctor === '[]') - { - return { - ctor: 'Sequence', - _0: {ctor: 'ListSeq'}, - _1: true, - _2: A2(_elm_lang$core$List$map, init, value) - }; - } - - if (ctor === 'Set_elm_builtin') - { - return { - ctor: 'Sequence', - _0: {ctor: 'SetSeq'}, - _1: true, - _2: A3(_elm_lang$core$Set$foldr, initCons, _elm_lang$core$Native_List.Nil, value) - }; - } - - if (ctor === 'RBNode_elm_builtin' || ctor == 'RBEmpty_elm_builtin') - { - return { - ctor: 'Dictionary', - _0: true, - _1: A3(_elm_lang$core$Dict$foldr, initKeyValueCons, _elm_lang$core$Native_List.Nil, value) - }; - } - - if (ctor === '_Array') - { - return { - ctor: 'Sequence', - _0: {ctor: 'ArraySeq'}, - _1: true, - _2: A3(_elm_lang$core$Array$foldr, initCons, _elm_lang$core$Native_List.Nil, value) - }; - } - - var ctorStarter = value.ctor.substring(0, 5); - if (ctorStarter === '_Task') - { - return primitive(''); - } - - if (ctor === '') - { - return primitive(ctor); - } - - if (ctor === '_Process') - { - return primitive(''); - } - - var list = _elm_lang$core$Native_List.Nil; - for (var i in value) - { - if (i === 'ctor') continue; - list = _elm_lang$core$Native_List.Cons(init(value[i]), list); - } - return { - ctor: 'Constructor', - _0: ctorStarter === '_Tupl' ? _elm_lang$core$Maybe$Nothing : _elm_lang$core$Maybe$Just(ctor), - _1: true, - _2: _elm_lang$core$List$reverse(list) - }; - } - - if (type === 'object') - { - var dict = _elm_lang$core$Dict$empty; - for (var i in value) - { - dict = A3(_elm_lang$core$Dict$insert, i, init(value[i]), dict); - } - return { ctor: 'Record', _0: true, _1: dict }; - } - - return primitive('XXX'); -} - -var initCons = F2(initConsHelp); - -function initConsHelp(value, list) -{ - return _elm_lang$core$Native_List.Cons(init(value), list); -} - -var initKeyValueCons = F3(initKeyValueConsHelp); - -function initKeyValueConsHelp(key, value, list) -{ - return _elm_lang$core$Native_List.Cons( - _elm_lang$core$Native_Utils.Tuple2(init(key), init(value)), - list - ); -} - -function addSlashes(str, isChar) -{ - var s = str.replace(/\\/g, '\\\\') - .replace(/\n/g, '\\n') - .replace(/\t/g, '\\t') - .replace(/\r/g, '\\r') - .replace(/\v/g, '\\v') - .replace(/\0/g, '\\0'); - if (isChar) - { - return s.replace(/\'/g, '\\\''); - } - else - { - return s.replace(/\"/g, '\\"'); - } -} - - -return { - upload: upload, - download: F2(download), - unsafeCoerce: unsafeCoerce, - messageToString: messageToString, - init: init -} - -}(); - -var _elm_lang$virtual_dom$VirtualDom_Helpers$keyedNode = _elm_lang$virtual_dom$Native_VirtualDom.keyedNode; -var _elm_lang$virtual_dom$VirtualDom_Helpers$lazy3 = _elm_lang$virtual_dom$Native_VirtualDom.lazy3; -var _elm_lang$virtual_dom$VirtualDom_Helpers$lazy2 = _elm_lang$virtual_dom$Native_VirtualDom.lazy2; -var _elm_lang$virtual_dom$VirtualDom_Helpers$lazy = _elm_lang$virtual_dom$Native_VirtualDom.lazy; -var _elm_lang$virtual_dom$VirtualDom_Helpers$defaultOptions = {stopPropagation: false, preventDefault: false}; -var _elm_lang$virtual_dom$VirtualDom_Helpers$onWithOptions = _elm_lang$virtual_dom$Native_VirtualDom.on; -var _elm_lang$virtual_dom$VirtualDom_Helpers$on = F2( - function (eventName, decoder) { - return A3(_elm_lang$virtual_dom$VirtualDom_Helpers$onWithOptions, eventName, _elm_lang$virtual_dom$VirtualDom_Helpers$defaultOptions, decoder); - }); -var _elm_lang$virtual_dom$VirtualDom_Helpers$onClick = function (msg) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$on, - 'click', - _elm_lang$core$Json_Decode$succeed(msg)); -}; -var _elm_lang$virtual_dom$VirtualDom_Helpers$style = _elm_lang$virtual_dom$Native_VirtualDom.style; -var _elm_lang$virtual_dom$VirtualDom_Helpers$attribute = _elm_lang$virtual_dom$Native_VirtualDom.attribute; -var _elm_lang$virtual_dom$VirtualDom_Helpers$id = _elm_lang$virtual_dom$VirtualDom_Helpers$attribute('id'); -var _elm_lang$virtual_dom$VirtualDom_Helpers$property = _elm_lang$virtual_dom$Native_VirtualDom.property; -var _elm_lang$virtual_dom$VirtualDom_Helpers$class = function (name) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$property, - 'className', - _elm_lang$core$Json_Encode$string(name)); -}; -var _elm_lang$virtual_dom$VirtualDom_Helpers$href = function (name) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$property, - 'href', - _elm_lang$core$Json_Encode$string(name)); -}; -var _elm_lang$virtual_dom$VirtualDom_Helpers$map = _elm_lang$virtual_dom$Native_VirtualDom.map; -var _elm_lang$virtual_dom$VirtualDom_Helpers$text = _elm_lang$virtual_dom$Native_VirtualDom.text; -var _elm_lang$virtual_dom$VirtualDom_Helpers$node = _elm_lang$virtual_dom$Native_VirtualDom.node; -var _elm_lang$virtual_dom$VirtualDom_Helpers$div = _elm_lang$virtual_dom$VirtualDom_Helpers$node('div'); -var _elm_lang$virtual_dom$VirtualDom_Helpers$span = _elm_lang$virtual_dom$VirtualDom_Helpers$node('span'); -var _elm_lang$virtual_dom$VirtualDom_Helpers$a = _elm_lang$virtual_dom$VirtualDom_Helpers$node('a'); -var _elm_lang$virtual_dom$VirtualDom_Helpers$h1 = _elm_lang$virtual_dom$VirtualDom_Helpers$node('h1'); -var _elm_lang$virtual_dom$VirtualDom_Helpers$Options = F2( - function (a, b) { - return {stopPropagation: a, preventDefault: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Helpers$Node = {ctor: 'Node'}; -var _elm_lang$virtual_dom$VirtualDom_Helpers$Property = {ctor: 'Property'}; - -var _elm_lang$virtual_dom$VirtualDom_Expando$purple = _elm_lang$virtual_dom$VirtualDom_Helpers$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'color', _1: 'rgb(136, 19, 145)'}, - _1: {ctor: '[]'} - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$blue = _elm_lang$virtual_dom$VirtualDom_Helpers$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'color', _1: 'rgb(28, 0, 207)'}, - _1: {ctor: '[]'} - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$red = _elm_lang$virtual_dom$VirtualDom_Helpers$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'color', _1: 'rgb(196, 26, 22)'}, - _1: {ctor: '[]'} - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$leftPad = function (maybeKey) { - var _p0 = maybeKey; - if (_p0.ctor === 'Nothing') { - return _elm_lang$virtual_dom$VirtualDom_Helpers$style( - {ctor: '[]'}); - } else { - return _elm_lang$virtual_dom$VirtualDom_Helpers$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'padding-left', _1: '4ch'}, - _1: {ctor: '[]'} - }); - } -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$makeArrow = function (arrow) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'color', _1: '#777'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'padding-left', _1: '2ch'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'width', _1: '2ch'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'display', _1: 'inline-block'}, - _1: {ctor: '[]'} - } - } - } - }), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(arrow), - _1: {ctor: '[]'} - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$lineStarter = F3( - function (maybeKey, maybeIsClosed, description) { - var arrow = function () { - var _p1 = maybeIsClosed; - if (_p1.ctor === 'Nothing') { - return _elm_lang$virtual_dom$VirtualDom_Expando$makeArrow(''); - } else { - if (_p1._0 === true) { - return _elm_lang$virtual_dom$VirtualDom_Expando$makeArrow('▸'); - } else { - return _elm_lang$virtual_dom$VirtualDom_Expando$makeArrow('▾'); - } - } - }(); - var _p2 = maybeKey; - if (_p2.ctor === 'Nothing') { - return {ctor: '::', _0: arrow, _1: description}; - } else { - return { - ctor: '::', - _0: arrow, - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$purple, - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p2._0), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' = '), - _1: description - } - } - }; - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$viewExtraTinyRecord = F3( - function (length, starter, entries) { - var _p3 = entries; - if (_p3.ctor === '[]') { - return { - ctor: '_Tuple2', - _0: length + 1, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('}'), - _1: {ctor: '[]'} - } - }; - } else { - var _p5 = _p3._0; - var nextLength = (length + _elm_lang$core$String$length(_p5)) + 1; - if (_elm_lang$core$Native_Utils.cmp(nextLength, 18) > 0) { - return { - ctor: '_Tuple2', - _0: length + 2, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('…}'), - _1: {ctor: '[]'} - } - }; - } else { - var _p4 = A3(_elm_lang$virtual_dom$VirtualDom_Expando$viewExtraTinyRecord, nextLength, ',', _p3._1); - var finalLength = _p4._0; - var otherNodes = _p4._1; - return { - ctor: '_Tuple2', - _0: finalLength, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(starter), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$purple, - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p5), - _1: {ctor: '[]'} - }), - _1: otherNodes - } - } - }; - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$elideMiddle = function (str) { - return (_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$String$length(str), - 18) < 1) ? str : A2( - _elm_lang$core$Basics_ops['++'], - A2(_elm_lang$core$String$left, 8, str), - A2( - _elm_lang$core$Basics_ops['++'], - '...', - A2(_elm_lang$core$String$right, 8, str))); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyHelp = function (str) { - return { - ctor: '_Tuple2', - _0: _elm_lang$core$String$length(str), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(str), - _1: {ctor: '[]'} - } - }; -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$updateIndex = F3( - function (n, func, list) { - var _p6 = list; - if (_p6.ctor === '[]') { - return {ctor: '[]'}; - } else { - var _p8 = _p6._1; - var _p7 = _p6._0; - return (_elm_lang$core$Native_Utils.cmp(n, 0) < 1) ? { - ctor: '::', - _0: func(_p7), - _1: _p8 - } : { - ctor: '::', - _0: _p7, - _1: A3(_elm_lang$virtual_dom$VirtualDom_Expando$updateIndex, n - 1, func, _p8) - }; - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$seqTypeToString = F2( - function (n, seqType) { - var _p9 = seqType; - switch (_p9.ctor) { - case 'ListSeq': - return A2( - _elm_lang$core$Basics_ops['++'], - 'List(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(n), - ')')); - case 'SetSeq': - return A2( - _elm_lang$core$Basics_ops['++'], - 'Set(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(n), - ')')); - default: - return A2( - _elm_lang$core$Basics_ops['++'], - 'Array(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(n), - ')')); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$viewTiny = function (value) { - var _p10 = value; - switch (_p10.ctor) { - case 'S': - var str = _elm_lang$virtual_dom$VirtualDom_Expando$elideMiddle(_p10._0); - return { - ctor: '_Tuple2', - _0: _elm_lang$core$String$length(str), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$red, - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(str), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }; - case 'Primitive': - var _p11 = _p10._0; - return { - ctor: '_Tuple2', - _0: _elm_lang$core$String$length(_p11), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$blue, - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p11), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }; - case 'Sequence': - return _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyHelp( - A2( - _elm_lang$virtual_dom$VirtualDom_Expando$seqTypeToString, - _elm_lang$core$List$length(_p10._2), - _p10._0)); - case 'Dictionary': - return _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyHelp( - A2( - _elm_lang$core$Basics_ops['++'], - 'Dict(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString( - _elm_lang$core$List$length(_p10._1)), - ')'))); - case 'Record': - return _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyRecord(_p10._1); - default: - if (_p10._2.ctor === '[]') { - return _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyHelp( - A2(_elm_lang$core$Maybe$withDefault, 'Unit', _p10._0)); - } else { - return _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyHelp( - function () { - var _p12 = _p10._0; - if (_p12.ctor === 'Nothing') { - return A2( - _elm_lang$core$Basics_ops['++'], - 'Tuple(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString( - _elm_lang$core$List$length(_p10._2)), - ')')); - } else { - return A2(_elm_lang$core$Basics_ops['++'], _p12._0, ' …'); - } - }()); - } - } -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyRecord = function (record) { - return _elm_lang$core$Dict$isEmpty(record) ? { - ctor: '_Tuple2', - _0: 2, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('{}'), - _1: {ctor: '[]'} - } - } : A3( - _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyRecordHelp, - 0, - '{ ', - _elm_lang$core$Dict$toList(record)); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyRecordHelp = F3( - function (length, starter, entries) { - var _p13 = entries; - if (_p13.ctor === '[]') { - return { - ctor: '_Tuple2', - _0: length + 2, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' }'), - _1: {ctor: '[]'} - } - }; - } else { - var _p16 = _p13._0._0; - var _p14 = _elm_lang$virtual_dom$VirtualDom_Expando$viewExtraTiny(_p13._0._1); - var valueLen = _p14._0; - var valueNodes = _p14._1; - var fieldLen = _elm_lang$core$String$length(_p16); - var newLength = ((length + fieldLen) + valueLen) + 5; - if (_elm_lang$core$Native_Utils.cmp(newLength, 60) > 0) { - return { - ctor: '_Tuple2', - _0: length + 4, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(', … }'), - _1: {ctor: '[]'} - } - }; - } else { - var _p15 = A3(_elm_lang$virtual_dom$VirtualDom_Expando$viewTinyRecordHelp, newLength, ', ', _p13._1); - var finalLength = _p15._0; - var otherNodes = _p15._1; - return { - ctor: '_Tuple2', - _0: finalLength, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(starter), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$purple, - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p16), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' = '), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - {ctor: '[]'}, - valueNodes), - _1: otherNodes - } - } - } - } - }; - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$viewExtraTiny = function (value) { - var _p17 = value; - if (_p17.ctor === 'Record') { - return A3( - _elm_lang$virtual_dom$VirtualDom_Expando$viewExtraTinyRecord, - 0, - '{', - _elm_lang$core$Dict$keys(_p17._1)); - } else { - return _elm_lang$virtual_dom$VirtualDom_Expando$viewTiny(value); - } -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$Constructor = F3( - function (a, b, c) { - return {ctor: 'Constructor', _0: a, _1: b, _2: c}; - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$Record = F2( - function (a, b) { - return {ctor: 'Record', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$Dictionary = F2( - function (a, b) { - return {ctor: 'Dictionary', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$Sequence = F3( - function (a, b, c) { - return {ctor: 'Sequence', _0: a, _1: b, _2: c}; - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$initHelp = F2( - function (isOuter, expando) { - var _p18 = expando; - switch (_p18.ctor) { - case 'S': - return expando; - case 'Primitive': - return expando; - case 'Sequence': - var _p20 = _p18._0; - var _p19 = _p18._2; - return isOuter ? A3( - _elm_lang$virtual_dom$VirtualDom_Expando$Sequence, - _p20, - false, - A2( - _elm_lang$core$List$map, - _elm_lang$virtual_dom$VirtualDom_Expando$initHelp(false), - _p19)) : ((_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$List$length(_p19), - 8) < 1) ? A3(_elm_lang$virtual_dom$VirtualDom_Expando$Sequence, _p20, false, _p19) : expando); - case 'Dictionary': - var _p23 = _p18._1; - return isOuter ? A2( - _elm_lang$virtual_dom$VirtualDom_Expando$Dictionary, - false, - A2( - _elm_lang$core$List$map, - function (_p21) { - var _p22 = _p21; - return { - ctor: '_Tuple2', - _0: _p22._0, - _1: A2(_elm_lang$virtual_dom$VirtualDom_Expando$initHelp, false, _p22._1) - }; - }, - _p23)) : ((_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$List$length(_p23), - 8) < 1) ? A2(_elm_lang$virtual_dom$VirtualDom_Expando$Dictionary, false, _p23) : expando); - case 'Record': - var _p25 = _p18._1; - return isOuter ? A2( - _elm_lang$virtual_dom$VirtualDom_Expando$Record, - false, - A2( - _elm_lang$core$Dict$map, - F2( - function (_p24, v) { - return A2(_elm_lang$virtual_dom$VirtualDom_Expando$initHelp, false, v); - }), - _p25)) : ((_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$Dict$size(_p25), - 4) < 1) ? A2(_elm_lang$virtual_dom$VirtualDom_Expando$Record, false, _p25) : expando); - default: - var _p27 = _p18._0; - var _p26 = _p18._2; - return isOuter ? A3( - _elm_lang$virtual_dom$VirtualDom_Expando$Constructor, - _p27, - false, - A2( - _elm_lang$core$List$map, - _elm_lang$virtual_dom$VirtualDom_Expando$initHelp(false), - _p26)) : ((_elm_lang$core$Native_Utils.cmp( - _elm_lang$core$List$length(_p26), - 4) < 1) ? A3(_elm_lang$virtual_dom$VirtualDom_Expando$Constructor, _p27, false, _p26) : expando); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$init = function (value) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Expando$initHelp, - true, - _elm_lang$virtual_dom$Native_Debug.init(value)); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$mergeHelp = F2( - function (old, $new) { - var _p28 = {ctor: '_Tuple2', _0: old, _1: $new}; - _v12_6: - do { - if (_p28.ctor === '_Tuple2') { - switch (_p28._1.ctor) { - case 'S': - return $new; - case 'Primitive': - return $new; - case 'Sequence': - if (_p28._0.ctor === 'Sequence') { - return A3( - _elm_lang$virtual_dom$VirtualDom_Expando$Sequence, - _p28._1._0, - _p28._0._1, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$mergeListHelp, _p28._0._2, _p28._1._2)); - } else { - break _v12_6; - } - case 'Dictionary': - if (_p28._0.ctor === 'Dictionary') { - return A2(_elm_lang$virtual_dom$VirtualDom_Expando$Dictionary, _p28._0._0, _p28._1._1); - } else { - break _v12_6; - } - case 'Record': - if (_p28._0.ctor === 'Record') { - return A2( - _elm_lang$virtual_dom$VirtualDom_Expando$Record, - _p28._0._0, - A2( - _elm_lang$core$Dict$map, - _elm_lang$virtual_dom$VirtualDom_Expando$mergeDictHelp(_p28._0._1), - _p28._1._1)); - } else { - break _v12_6; - } - default: - if (_p28._0.ctor === 'Constructor') { - return A3( - _elm_lang$virtual_dom$VirtualDom_Expando$Constructor, - _p28._1._0, - _p28._0._1, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$mergeListHelp, _p28._0._2, _p28._1._2)); - } else { - break _v12_6; - } - } - } else { - break _v12_6; - } - } while(false); - return $new; - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$mergeDictHelp = F3( - function (oldDict, key, value) { - var _p29 = A2(_elm_lang$core$Dict$get, key, oldDict); - if (_p29.ctor === 'Nothing') { - return value; - } else { - return A2(_elm_lang$virtual_dom$VirtualDom_Expando$mergeHelp, _p29._0, value); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$mergeListHelp = F2( - function (olds, news) { - var _p30 = {ctor: '_Tuple2', _0: olds, _1: news}; - if (_p30._0.ctor === '[]') { - return news; - } else { - if (_p30._1.ctor === '[]') { - return news; - } else { - return { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Expando$mergeHelp, _p30._0._0, _p30._1._0), - _1: A2(_elm_lang$virtual_dom$VirtualDom_Expando$mergeListHelp, _p30._0._1, _p30._1._1) - }; - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$merge = F2( - function (value, expando) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Expando$mergeHelp, - expando, - _elm_lang$virtual_dom$Native_Debug.init(value)); - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$update = F2( - function (msg, value) { - var _p31 = value; - switch (_p31.ctor) { - case 'S': - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 168, column: 3}, - end: {line: 235, column: 50} - }, - _p31)('No messages for primitives'); - case 'Primitive': - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 168, column: 3}, - end: {line: 235, column: 50} - }, - _p31)('No messages for primitives'); - case 'Sequence': - var _p39 = _p31._2; - var _p38 = _p31._0; - var _p37 = _p31._1; - var _p34 = msg; - switch (_p34.ctor) { - case 'Toggle': - return A3(_elm_lang$virtual_dom$VirtualDom_Expando$Sequence, _p38, !_p37, _p39); - case 'Index': - if (_p34._0.ctor === 'None') { - return A3( - _elm_lang$virtual_dom$VirtualDom_Expando$Sequence, - _p38, - _p37, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$updateIndex, - _p34._1, - _elm_lang$virtual_dom$VirtualDom_Expando$update(_p34._2), - _p39)); - } else { - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 176, column: 7}, - end: {line: 188, column: 46} - }, - _p34)('No redirected indexes on sequences'); - } - default: - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 176, column: 7}, - end: {line: 188, column: 46} - }, - _p34)('No field on sequences'); - } - case 'Dictionary': - var _p51 = _p31._1; - var _p50 = _p31._0; - var _p40 = msg; - switch (_p40.ctor) { - case 'Toggle': - return A2(_elm_lang$virtual_dom$VirtualDom_Expando$Dictionary, !_p50, _p51); - case 'Index': - var _p48 = _p40._2; - var _p47 = _p40._1; - var _p41 = _p40._0; - switch (_p41.ctor) { - case 'None': - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 196, column: 11}, - end: {line: 206, column: 81} - }, - _p41)('must have redirect for dictionaries'); - case 'Key': - return A2( - _elm_lang$virtual_dom$VirtualDom_Expando$Dictionary, - _p50, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$updateIndex, - _p47, - function (_p43) { - var _p44 = _p43; - return { - ctor: '_Tuple2', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Expando$update, _p48, _p44._0), - _1: _p44._1 - }; - }, - _p51)); - default: - return A2( - _elm_lang$virtual_dom$VirtualDom_Expando$Dictionary, - _p50, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$updateIndex, - _p47, - function (_p45) { - var _p46 = _p45; - return { - ctor: '_Tuple2', - _0: _p46._0, - _1: A2(_elm_lang$virtual_dom$VirtualDom_Expando$update, _p48, _p46._1) - }; - }, - _p51)); - } - default: - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 191, column: 7}, - end: {line: 209, column: 50} - }, - _p40)('no field for dictionaries'); - } - case 'Record': - var _p55 = _p31._1; - var _p54 = _p31._0; - var _p52 = msg; - switch (_p52.ctor) { - case 'Toggle': - return A2(_elm_lang$virtual_dom$VirtualDom_Expando$Record, !_p54, _p55); - case 'Index': - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 212, column: 7}, - end: {line: 220, column: 77} - }, - _p52)('No index for records'); - default: - return A2( - _elm_lang$virtual_dom$VirtualDom_Expando$Record, - _p54, - A3( - _elm_lang$core$Dict$update, - _p52._0, - _elm_lang$virtual_dom$VirtualDom_Expando$updateField(_p52._1), - _p55)); - } - default: - var _p61 = _p31._2; - var _p60 = _p31._0; - var _p59 = _p31._1; - var _p56 = msg; - switch (_p56.ctor) { - case 'Toggle': - return A3(_elm_lang$virtual_dom$VirtualDom_Expando$Constructor, _p60, !_p59, _p61); - case 'Index': - if (_p56._0.ctor === 'None') { - return A3( - _elm_lang$virtual_dom$VirtualDom_Expando$Constructor, - _p60, - _p59, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$updateIndex, - _p56._1, - _elm_lang$virtual_dom$VirtualDom_Expando$update(_p56._2), - _p61)); - } else { - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 223, column: 7}, - end: {line: 235, column: 50} - }, - _p56)('No redirected indexes on sequences'); - } - default: - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 223, column: 7}, - end: {line: 235, column: 50} - }, - _p56)('No field for constructors'); - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$updateField = F2( - function (msg, maybeExpando) { - var _p62 = maybeExpando; - if (_p62.ctor === 'Nothing') { - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Expando', - { - start: {line: 253, column: 3}, - end: {line: 258, column: 32} - }, - _p62)('key does not exist'); - } else { - return _elm_lang$core$Maybe$Just( - A2(_elm_lang$virtual_dom$VirtualDom_Expando$update, msg, _p62._0)); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$Primitive = function (a) { - return {ctor: 'Primitive', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$S = function (a) { - return {ctor: 'S', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$ArraySeq = {ctor: 'ArraySeq'}; -var _elm_lang$virtual_dom$VirtualDom_Expando$SetSeq = {ctor: 'SetSeq'}; -var _elm_lang$virtual_dom$VirtualDom_Expando$ListSeq = {ctor: 'ListSeq'}; -var _elm_lang$virtual_dom$VirtualDom_Expando$Field = F2( - function (a, b) { - return {ctor: 'Field', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$Index = F3( - function (a, b, c) { - return {ctor: 'Index', _0: a, _1: b, _2: c}; - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$Toggle = {ctor: 'Toggle'}; -var _elm_lang$virtual_dom$VirtualDom_Expando$Value = {ctor: 'Value'}; -var _elm_lang$virtual_dom$VirtualDom_Expando$Key = {ctor: 'Key'}; -var _elm_lang$virtual_dom$VirtualDom_Expando$None = {ctor: 'None'}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewConstructorEntry = F2( - function (index, value) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$None, index), - A2( - _elm_lang$virtual_dom$VirtualDom_Expando$view, - _elm_lang$core$Maybe$Just( - _elm_lang$core$Basics$toString(index)), - value)); - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$view = F2( - function (maybeKey, expando) { - var _p64 = expando; - switch (_p64.ctor) { - case 'S': - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$leftPad(maybeKey), - _1: {ctor: '[]'} - }, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$lineStarter, - maybeKey, - _elm_lang$core$Maybe$Nothing, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$red, - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p64._0), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - })); - case 'Primitive': - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$leftPad(maybeKey), - _1: {ctor: '[]'} - }, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$lineStarter, - maybeKey, - _elm_lang$core$Maybe$Nothing, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$blue, - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p64._0), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - })); - case 'Sequence': - return A4(_elm_lang$virtual_dom$VirtualDom_Expando$viewSequence, maybeKey, _p64._0, _p64._1, _p64._2); - case 'Dictionary': - return A3(_elm_lang$virtual_dom$VirtualDom_Expando$viewDictionary, maybeKey, _p64._0, _p64._1); - case 'Record': - return A3(_elm_lang$virtual_dom$VirtualDom_Expando$viewRecord, maybeKey, _p64._0, _p64._1); - default: - return A4(_elm_lang$virtual_dom$VirtualDom_Expando$viewConstructor, maybeKey, _p64._0, _p64._1, _p64._2); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$viewConstructor = F4( - function (maybeKey, maybeName, isClosed, valueList) { - var _p65 = function () { - var _p66 = valueList; - if (_p66.ctor === '[]') { - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Nothing, - _1: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - {ctor: '[]'}) - }; - } else { - if (_p66._1.ctor === '[]') { - var _p67 = _p66._0; - switch (_p67.ctor) { - case 'S': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Nothing, - _1: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - {ctor: '[]'}) - }; - case 'Primitive': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Nothing, - _1: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - {ctor: '[]'}) - }; - case 'Sequence': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(isClosed), - _1: isClosed ? A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - {ctor: '[]'}) : A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$None, 0), - _elm_lang$virtual_dom$VirtualDom_Expando$viewSequenceOpen(_p67._2)) - }; - case 'Dictionary': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(isClosed), - _1: isClosed ? A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - {ctor: '[]'}) : A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$None, 0), - _elm_lang$virtual_dom$VirtualDom_Expando$viewDictionaryOpen(_p67._1)) - }; - case 'Record': - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(isClosed), - _1: isClosed ? A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - {ctor: '[]'}) : A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$None, 0), - _elm_lang$virtual_dom$VirtualDom_Expando$viewRecordOpen(_p67._1)) - }; - default: - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(isClosed), - _1: isClosed ? A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - {ctor: '[]'}) : A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$None, 0), - _elm_lang$virtual_dom$VirtualDom_Expando$viewConstructorOpen(_p67._2)) - }; - } - } else { - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(isClosed), - _1: isClosed ? A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - {ctor: '[]'}) : _elm_lang$virtual_dom$VirtualDom_Expando$viewConstructorOpen(valueList) - }; - } - } - }(); - var maybeIsClosed = _p65._0; - var openHtml = _p65._1; - var tinyArgs = A2( - _elm_lang$core$List$map, - function (_p68) { - return _elm_lang$core$Tuple$second( - _elm_lang$virtual_dom$VirtualDom_Expando$viewExtraTiny(_p68)); - }, - valueList); - var description = function () { - var _p69 = {ctor: '_Tuple2', _0: maybeName, _1: tinyArgs}; - if (_p69._0.ctor === 'Nothing') { - if (_p69._1.ctor === '[]') { - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('()'), - _1: {ctor: '[]'} - }; - } else { - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('( '), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - {ctor: '[]'}, - _p69._1._0), - _1: A3( - _elm_lang$core$List$foldr, - F2( - function (args, rest) { - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(', '), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - {ctor: '[]'}, - args), - _1: rest - } - }; - }), - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' )'), - _1: {ctor: '[]'} - }, - _p69._1._1) - } - }; - } - } else { - if (_p69._1.ctor === '[]') { - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p69._0._0), - _1: {ctor: '[]'} - }; - } else { - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text( - A2(_elm_lang$core$Basics_ops['++'], _p69._0._0, ' ')), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - {ctor: '[]'}, - _p69._1._0), - _1: A3( - _elm_lang$core$List$foldr, - F2( - function (args, rest) { - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' '), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - {ctor: '[]'}, - args), - _1: rest - } - }; - }), - {ctor: '[]'}, - _p69._1._1) - } - }; - } - } - }(); - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$leftPad(maybeKey), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(_elm_lang$virtual_dom$VirtualDom_Expando$Toggle), - _1: {ctor: '[]'} - }, - A3(_elm_lang$virtual_dom$VirtualDom_Expando$lineStarter, maybeKey, maybeIsClosed, description)), - _1: { - ctor: '::', - _0: openHtml, - _1: {ctor: '[]'} - } - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$viewConstructorOpen = function (valueList) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - A2(_elm_lang$core$List$indexedMap, _elm_lang$virtual_dom$VirtualDom_Expando$viewConstructorEntry, valueList)); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewDictionaryOpen = function (keyValuePairs) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - A2(_elm_lang$core$List$indexedMap, _elm_lang$virtual_dom$VirtualDom_Expando$viewDictionaryEntry, keyValuePairs)); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewDictionaryEntry = F2( - function (index, _p70) { - var _p71 = _p70; - var _p74 = _p71._1; - var _p73 = _p71._0; - var _p72 = _p73; - switch (_p72.ctor) { - case 'S': - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$Value, index), - A2( - _elm_lang$virtual_dom$VirtualDom_Expando$view, - _elm_lang$core$Maybe$Just(_p72._0), - _p74)); - case 'Primitive': - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$Value, index), - A2( - _elm_lang$virtual_dom$VirtualDom_Expando$view, - _elm_lang$core$Maybe$Just(_p72._0), - _p74)); - default: - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$Key, index), - A2( - _elm_lang$virtual_dom$VirtualDom_Expando$view, - _elm_lang$core$Maybe$Just('key'), - _p73)), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - A2(_elm_lang$virtual_dom$VirtualDom_Expando$Index, _elm_lang$virtual_dom$VirtualDom_Expando$Value, index), - A2( - _elm_lang$virtual_dom$VirtualDom_Expando$view, - _elm_lang$core$Maybe$Just('value'), - _p74)), - _1: {ctor: '[]'} - } - }); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$viewRecordOpen = function (record) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - A2( - _elm_lang$core$List$map, - _elm_lang$virtual_dom$VirtualDom_Expando$viewRecordEntry, - _elm_lang$core$Dict$toList(record))); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewRecordEntry = function (_p75) { - var _p76 = _p75; - var _p77 = _p76._0; - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - _elm_lang$virtual_dom$VirtualDom_Expando$Field(_p77), - A2( - _elm_lang$virtual_dom$VirtualDom_Expando$view, - _elm_lang$core$Maybe$Just(_p77), - _p76._1)); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewSequenceOpen = function (values) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - A2(_elm_lang$core$List$indexedMap, _elm_lang$virtual_dom$VirtualDom_Expando$viewConstructorEntry, values)); -}; -var _elm_lang$virtual_dom$VirtualDom_Expando$viewDictionary = F3( - function (maybeKey, isClosed, keyValuePairs) { - var starter = A2( - _elm_lang$core$Basics_ops['++'], - 'Dict(', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString( - _elm_lang$core$List$length(keyValuePairs)), - ')')); - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$leftPad(maybeKey), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(_elm_lang$virtual_dom$VirtualDom_Expando$Toggle), - _1: {ctor: '[]'} - }, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$lineStarter, - maybeKey, - _elm_lang$core$Maybe$Just(isClosed), - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(starter), - _1: {ctor: '[]'} - })), - _1: { - ctor: '::', - _0: isClosed ? _elm_lang$virtual_dom$VirtualDom_Helpers$text('') : _elm_lang$virtual_dom$VirtualDom_Expando$viewDictionaryOpen(keyValuePairs), - _1: {ctor: '[]'} - } - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$viewRecord = F3( - function (maybeKey, isClosed, record) { - var _p78 = isClosed ? { - ctor: '_Tuple3', - _0: _elm_lang$core$Tuple$second( - _elm_lang$virtual_dom$VirtualDom_Expando$viewTinyRecord(record)), - _1: _elm_lang$virtual_dom$VirtualDom_Helpers$text(''), - _2: _elm_lang$virtual_dom$VirtualDom_Helpers$text('') - } : { - ctor: '_Tuple3', - _0: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('{'), - _1: {ctor: '[]'} - }, - _1: _elm_lang$virtual_dom$VirtualDom_Expando$viewRecordOpen(record), - _2: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$leftPad( - _elm_lang$core$Maybe$Just( - {ctor: '_Tuple0'})), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('}'), - _1: {ctor: '[]'} - }) - }; - var start = _p78._0; - var middle = _p78._1; - var end = _p78._2; - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$leftPad(maybeKey), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(_elm_lang$virtual_dom$VirtualDom_Expando$Toggle), - _1: {ctor: '[]'} - }, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$lineStarter, - maybeKey, - _elm_lang$core$Maybe$Just(isClosed), - start)), - _1: { - ctor: '::', - _0: middle, - _1: { - ctor: '::', - _0: end, - _1: {ctor: '[]'} - } - } - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Expando$viewSequence = F4( - function (maybeKey, seqType, isClosed, valueList) { - var starter = A2( - _elm_lang$virtual_dom$VirtualDom_Expando$seqTypeToString, - _elm_lang$core$List$length(valueList), - seqType); - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Expando$leftPad(maybeKey), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(_elm_lang$virtual_dom$VirtualDom_Expando$Toggle), - _1: {ctor: '[]'} - }, - A3( - _elm_lang$virtual_dom$VirtualDom_Expando$lineStarter, - maybeKey, - _elm_lang$core$Maybe$Just(isClosed), - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(starter), - _1: {ctor: '[]'} - })), - _1: { - ctor: '::', - _0: isClosed ? _elm_lang$virtual_dom$VirtualDom_Helpers$text('') : _elm_lang$virtual_dom$VirtualDom_Expando$viewSequenceOpen(valueList), - _1: {ctor: '[]'} - } - }); - }); - -var _elm_lang$virtual_dom$VirtualDom_Report$some = function (list) { - return !_elm_lang$core$List$isEmpty(list); -}; -var _elm_lang$virtual_dom$VirtualDom_Report$TagChanges = F4( - function (a, b, c, d) { - return {removed: a, changed: b, added: c, argsMatch: d}; - }); -var _elm_lang$virtual_dom$VirtualDom_Report$emptyTagChanges = function (argsMatch) { - return A4( - _elm_lang$virtual_dom$VirtualDom_Report$TagChanges, - {ctor: '[]'}, - {ctor: '[]'}, - {ctor: '[]'}, - argsMatch); -}; -var _elm_lang$virtual_dom$VirtualDom_Report$hasTagChanges = function (tagChanges) { - return _elm_lang$core$Native_Utils.eq( - tagChanges, - A4( - _elm_lang$virtual_dom$VirtualDom_Report$TagChanges, - {ctor: '[]'}, - {ctor: '[]'}, - {ctor: '[]'}, - true)); -}; -var _elm_lang$virtual_dom$VirtualDom_Report$SomethingChanged = function (a) { - return {ctor: 'SomethingChanged', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Report$MessageChanged = F2( - function (a, b) { - return {ctor: 'MessageChanged', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Report$VersionChanged = F2( - function (a, b) { - return {ctor: 'VersionChanged', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Report$CorruptHistory = {ctor: 'CorruptHistory'}; -var _elm_lang$virtual_dom$VirtualDom_Report$UnionChange = F2( - function (a, b) { - return {ctor: 'UnionChange', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Report$AliasChange = function (a) { - return {ctor: 'AliasChange', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Report$Fine = {ctor: 'Fine'}; -var _elm_lang$virtual_dom$VirtualDom_Report$Risky = {ctor: 'Risky'}; -var _elm_lang$virtual_dom$VirtualDom_Report$Impossible = {ctor: 'Impossible'}; -var _elm_lang$virtual_dom$VirtualDom_Report$worstCase = F2( - function (status, statusList) { - worstCase: - while (true) { - var _p0 = statusList; - if (_p0.ctor === '[]') { - return status; - } else { - switch (_p0._0.ctor) { - case 'Impossible': - return _elm_lang$virtual_dom$VirtualDom_Report$Impossible; - case 'Risky': - var _v1 = _elm_lang$virtual_dom$VirtualDom_Report$Risky, - _v2 = _p0._1; - status = _v1; - statusList = _v2; - continue worstCase; - default: - var _v3 = status, - _v4 = _p0._1; - status = _v3; - statusList = _v4; - continue worstCase; - } - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Report$evaluateChange = function (change) { - var _p1 = change; - if (_p1.ctor === 'AliasChange') { - return _elm_lang$virtual_dom$VirtualDom_Report$Impossible; - } else { - return ((!_p1._1.argsMatch) || (_elm_lang$virtual_dom$VirtualDom_Report$some(_p1._1.changed) || _elm_lang$virtual_dom$VirtualDom_Report$some(_p1._1.removed))) ? _elm_lang$virtual_dom$VirtualDom_Report$Impossible : (_elm_lang$virtual_dom$VirtualDom_Report$some(_p1._1.added) ? _elm_lang$virtual_dom$VirtualDom_Report$Risky : _elm_lang$virtual_dom$VirtualDom_Report$Fine); - } -}; -var _elm_lang$virtual_dom$VirtualDom_Report$evaluate = function (report) { - var _p2 = report; - switch (_p2.ctor) { - case 'CorruptHistory': - return _elm_lang$virtual_dom$VirtualDom_Report$Impossible; - case 'VersionChanged': - return _elm_lang$virtual_dom$VirtualDom_Report$Impossible; - case 'MessageChanged': - return _elm_lang$virtual_dom$VirtualDom_Report$Impossible; - default: - return A2( - _elm_lang$virtual_dom$VirtualDom_Report$worstCase, - _elm_lang$virtual_dom$VirtualDom_Report$Fine, - A2(_elm_lang$core$List$map, _elm_lang$virtual_dom$VirtualDom_Report$evaluateChange, _p2._0)); - } -}; - -var _elm_lang$virtual_dom$VirtualDom_Metadata$encodeDict = F2( - function (f, dict) { - return _elm_lang$core$Json_Encode$object( - _elm_lang$core$Dict$toList( - A2( - _elm_lang$core$Dict$map, - F2( - function (key, value) { - return f(value); - }), - dict))); - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$encodeUnion = function (_p0) { - var _p1 = _p0; - return _elm_lang$core$Json_Encode$object( - { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'args', - _1: _elm_lang$core$Json_Encode$list( - A2(_elm_lang$core$List$map, _elm_lang$core$Json_Encode$string, _p1.args)) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'tags', - _1: A2( - _elm_lang$virtual_dom$VirtualDom_Metadata$encodeDict, - function (_p2) { - return _elm_lang$core$Json_Encode$list( - A2(_elm_lang$core$List$map, _elm_lang$core$Json_Encode$string, _p2)); - }, - _p1.tags) - }, - _1: {ctor: '[]'} - } - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$encodeAlias = function (_p3) { - var _p4 = _p3; - return _elm_lang$core$Json_Encode$object( - { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'args', - _1: _elm_lang$core$Json_Encode$list( - A2(_elm_lang$core$List$map, _elm_lang$core$Json_Encode$string, _p4.args)) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'type', - _1: _elm_lang$core$Json_Encode$string(_p4.tipe) - }, - _1: {ctor: '[]'} - } - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$encodeTypes = function (_p5) { - var _p6 = _p5; - return _elm_lang$core$Json_Encode$object( - { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'message', - _1: _elm_lang$core$Json_Encode$string(_p6.message) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'aliases', - _1: A2(_elm_lang$virtual_dom$VirtualDom_Metadata$encodeDict, _elm_lang$virtual_dom$VirtualDom_Metadata$encodeAlias, _p6.aliases) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'unions', - _1: A2(_elm_lang$virtual_dom$VirtualDom_Metadata$encodeDict, _elm_lang$virtual_dom$VirtualDom_Metadata$encodeUnion, _p6.unions) - }, - _1: {ctor: '[]'} - } - } - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$encodeVersions = function (_p7) { - var _p8 = _p7; - return _elm_lang$core$Json_Encode$object( - { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'elm', - _1: _elm_lang$core$Json_Encode$string(_p8.elm) - }, - _1: {ctor: '[]'} - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$encode = function (_p9) { - var _p10 = _p9; - return _elm_lang$core$Json_Encode$object( - { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'versions', - _1: _elm_lang$virtual_dom$VirtualDom_Metadata$encodeVersions(_p10.versions) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'types', - _1: _elm_lang$virtual_dom$VirtualDom_Metadata$encodeTypes(_p10.types) - }, - _1: {ctor: '[]'} - } - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$checkTag = F4( - function (tag, old, $new, changes) { - return _elm_lang$core$Native_Utils.eq(old, $new) ? changes : _elm_lang$core$Native_Utils.update( - changes, - { - changed: {ctor: '::', _0: tag, _1: changes.changed} - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$addTag = F3( - function (tag, _p11, changes) { - return _elm_lang$core$Native_Utils.update( - changes, - { - added: {ctor: '::', _0: tag, _1: changes.added} - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$removeTag = F3( - function (tag, _p12, changes) { - return _elm_lang$core$Native_Utils.update( - changes, - { - removed: {ctor: '::', _0: tag, _1: changes.removed} - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$checkUnion = F4( - function (name, old, $new, changes) { - var tagChanges = A6( - _elm_lang$core$Dict$merge, - _elm_lang$virtual_dom$VirtualDom_Metadata$removeTag, - _elm_lang$virtual_dom$VirtualDom_Metadata$checkTag, - _elm_lang$virtual_dom$VirtualDom_Metadata$addTag, - old.tags, - $new.tags, - _elm_lang$virtual_dom$VirtualDom_Report$emptyTagChanges( - _elm_lang$core$Native_Utils.eq(old.args, $new.args))); - return _elm_lang$virtual_dom$VirtualDom_Report$hasTagChanges(tagChanges) ? changes : { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Report$UnionChange, name, tagChanges), - _1: changes - }; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$checkAlias = F4( - function (name, old, $new, changes) { - return (_elm_lang$core$Native_Utils.eq(old.tipe, $new.tipe) && _elm_lang$core$Native_Utils.eq(old.args, $new.args)) ? changes : { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Report$AliasChange(name), - _1: changes - }; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$ignore = F3( - function (key, value, report) { - return report; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$checkTypes = F2( - function (old, $new) { - return (!_elm_lang$core$Native_Utils.eq(old.message, $new.message)) ? A2(_elm_lang$virtual_dom$VirtualDom_Report$MessageChanged, old.message, $new.message) : _elm_lang$virtual_dom$VirtualDom_Report$SomethingChanged( - A6( - _elm_lang$core$Dict$merge, - _elm_lang$virtual_dom$VirtualDom_Metadata$ignore, - _elm_lang$virtual_dom$VirtualDom_Metadata$checkUnion, - _elm_lang$virtual_dom$VirtualDom_Metadata$ignore, - old.unions, - $new.unions, - A6( - _elm_lang$core$Dict$merge, - _elm_lang$virtual_dom$VirtualDom_Metadata$ignore, - _elm_lang$virtual_dom$VirtualDom_Metadata$checkAlias, - _elm_lang$virtual_dom$VirtualDom_Metadata$ignore, - old.aliases, - $new.aliases, - {ctor: '[]'}))); - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$check = F2( - function (old, $new) { - return (!_elm_lang$core$Native_Utils.eq(old.versions.elm, $new.versions.elm)) ? A2(_elm_lang$virtual_dom$VirtualDom_Report$VersionChanged, old.versions.elm, $new.versions.elm) : A2(_elm_lang$virtual_dom$VirtualDom_Metadata$checkTypes, old.types, $new.types); - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$hasProblem = F2( - function (tipe, _p13) { - var _p14 = _p13; - return A2(_elm_lang$core$String$contains, _p14._1, tipe) ? _elm_lang$core$Maybe$Just(_p14._0) : _elm_lang$core$Maybe$Nothing; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$Metadata = F2( - function (a, b) { - return {versions: a, types: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$Versions = function (a) { - return {elm: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$decodeVersions = A2( - _elm_lang$core$Json_Decode$map, - _elm_lang$virtual_dom$VirtualDom_Metadata$Versions, - A2(_elm_lang$core$Json_Decode$field, 'elm', _elm_lang$core$Json_Decode$string)); -var _elm_lang$virtual_dom$VirtualDom_Metadata$Types = F3( - function (a, b, c) { - return {message: a, aliases: b, unions: c}; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$Alias = F2( - function (a, b) { - return {args: a, tipe: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$decodeAlias = A3( - _elm_lang$core$Json_Decode$map2, - _elm_lang$virtual_dom$VirtualDom_Metadata$Alias, - A2( - _elm_lang$core$Json_Decode$field, - 'args', - _elm_lang$core$Json_Decode$list(_elm_lang$core$Json_Decode$string)), - A2(_elm_lang$core$Json_Decode$field, 'type', _elm_lang$core$Json_Decode$string)); -var _elm_lang$virtual_dom$VirtualDom_Metadata$Union = F2( - function (a, b) { - return {args: a, tags: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$decodeUnion = A3( - _elm_lang$core$Json_Decode$map2, - _elm_lang$virtual_dom$VirtualDom_Metadata$Union, - A2( - _elm_lang$core$Json_Decode$field, - 'args', - _elm_lang$core$Json_Decode$list(_elm_lang$core$Json_Decode$string)), - A2( - _elm_lang$core$Json_Decode$field, - 'tags', - _elm_lang$core$Json_Decode$dict( - _elm_lang$core$Json_Decode$list(_elm_lang$core$Json_Decode$string)))); -var _elm_lang$virtual_dom$VirtualDom_Metadata$decodeTypes = A4( - _elm_lang$core$Json_Decode$map3, - _elm_lang$virtual_dom$VirtualDom_Metadata$Types, - A2(_elm_lang$core$Json_Decode$field, 'message', _elm_lang$core$Json_Decode$string), - A2( - _elm_lang$core$Json_Decode$field, - 'aliases', - _elm_lang$core$Json_Decode$dict(_elm_lang$virtual_dom$VirtualDom_Metadata$decodeAlias)), - A2( - _elm_lang$core$Json_Decode$field, - 'unions', - _elm_lang$core$Json_Decode$dict(_elm_lang$virtual_dom$VirtualDom_Metadata$decodeUnion))); -var _elm_lang$virtual_dom$VirtualDom_Metadata$decoder = A3( - _elm_lang$core$Json_Decode$map2, - _elm_lang$virtual_dom$VirtualDom_Metadata$Metadata, - A2(_elm_lang$core$Json_Decode$field, 'versions', _elm_lang$virtual_dom$VirtualDom_Metadata$decodeVersions), - A2(_elm_lang$core$Json_Decode$field, 'types', _elm_lang$virtual_dom$VirtualDom_Metadata$decodeTypes)); -var _elm_lang$virtual_dom$VirtualDom_Metadata$Error = F2( - function (a, b) { - return {message: a, problems: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$ProblemType = F2( - function (a, b) { - return {name: a, problems: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$VirtualDom = {ctor: 'VirtualDom'}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$Program = {ctor: 'Program'}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$Request = {ctor: 'Request'}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$Socket = {ctor: 'Socket'}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$Process = {ctor: 'Process'}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$Task = {ctor: 'Task'}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$Decoder = {ctor: 'Decoder'}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$Function = {ctor: 'Function'}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$problemTable = { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$Function, _1: '->'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$Decoder, _1: 'Json.Decode.Decoder'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$Task, _1: 'Task.Task'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$Process, _1: 'Process.Id'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$Socket, _1: 'WebSocket.LowLevel.WebSocket'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$Request, _1: 'Http.Request'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$Program, _1: 'Platform.Program'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$VirtualDom, _1: 'VirtualDom.Node'}, - _1: { - ctor: '::', - _0: {ctor: '_Tuple2', _0: _elm_lang$virtual_dom$VirtualDom_Metadata$VirtualDom, _1: 'VirtualDom.Attribute'}, - _1: {ctor: '[]'} - } - } - } - } - } - } - } - } -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$findProblems = function (tipe) { - return A2( - _elm_lang$core$List$filterMap, - _elm_lang$virtual_dom$VirtualDom_Metadata$hasProblem(tipe), - _elm_lang$virtual_dom$VirtualDom_Metadata$problemTable); -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$collectBadAliases = F3( - function (name, _p15, list) { - var _p16 = _p15; - var _p17 = _elm_lang$virtual_dom$VirtualDom_Metadata$findProblems(_p16.tipe); - if (_p17.ctor === '[]') { - return list; - } else { - return { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Metadata$ProblemType, name, _p17), - _1: list - }; - } - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$collectBadUnions = F3( - function (name, _p18, list) { - var _p19 = _p18; - var _p20 = A2( - _elm_lang$core$List$concatMap, - _elm_lang$virtual_dom$VirtualDom_Metadata$findProblems, - _elm_lang$core$List$concat( - _elm_lang$core$Dict$values(_p19.tags))); - if (_p20.ctor === '[]') { - return list; - } else { - return { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Metadata$ProblemType, name, _p20), - _1: list - }; - } - }); -var _elm_lang$virtual_dom$VirtualDom_Metadata$isPortable = function (_p21) { - var _p22 = _p21; - var _p24 = _p22.types; - var badAliases = A3( - _elm_lang$core$Dict$foldl, - _elm_lang$virtual_dom$VirtualDom_Metadata$collectBadAliases, - {ctor: '[]'}, - _p24.aliases); - var _p23 = A3(_elm_lang$core$Dict$foldl, _elm_lang$virtual_dom$VirtualDom_Metadata$collectBadUnions, badAliases, _p24.unions); - if (_p23.ctor === '[]') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Maybe$Just( - A2(_elm_lang$virtual_dom$VirtualDom_Metadata$Error, _p24.message, _p23)); - } -}; -var _elm_lang$virtual_dom$VirtualDom_Metadata$decode = function (value) { - var _p25 = A2(_elm_lang$core$Json_Decode$decodeValue, _elm_lang$virtual_dom$VirtualDom_Metadata$decoder, value); - if (_p25.ctor === 'Err') { - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.Metadata', - { - start: {line: 229, column: 3}, - end: {line: 239, column: 20} - }, - _p25)('Compiler is generating bad metadata. Report this at .'); - } else { - var _p28 = _p25._0; - var _p27 = _elm_lang$virtual_dom$VirtualDom_Metadata$isPortable(_p28); - if (_p27.ctor === 'Nothing') { - return _elm_lang$core$Result$Ok(_p28); - } else { - return _elm_lang$core$Result$Err(_p27._0); - } - } -}; - -var _elm_lang$virtual_dom$VirtualDom_History$viewMessage = F3( - function (currentIndex, index, msg) { - var messageName = _elm_lang$virtual_dom$Native_Debug.messageToString(msg); - var className = _elm_lang$core$Native_Utils.eq(currentIndex, index) ? 'messages-entry messages-entry-selected' : 'messages-entry'; - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class(className), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$on, - 'click', - _elm_lang$core$Json_Decode$succeed(index)), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('messages-entry-content'), - _1: { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Helpers$attribute, 'title', messageName), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(messageName), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('messages-entry-index'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text( - _elm_lang$core$Basics$toString(index)), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }); - }); -var _elm_lang$virtual_dom$VirtualDom_History$consMsg = F3( - function (currentIndex, msg, _p0) { - var _p1 = _p0; - var _p2 = _p1._0; - return { - ctor: '_Tuple2', - _0: _p2 - 1, - _1: { - ctor: '::', - _0: A4(_elm_lang$virtual_dom$VirtualDom_Helpers$lazy3, _elm_lang$virtual_dom$VirtualDom_History$viewMessage, currentIndex, _p2, msg), - _1: _p1._1 - } - }; - }); -var _elm_lang$virtual_dom$VirtualDom_History$viewSnapshot = F3( - function (currentIndex, index, _p3) { - var _p4 = _p3; - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - _elm_lang$core$Tuple$second( - A3( - _elm_lang$core$Array$foldl, - _elm_lang$virtual_dom$VirtualDom_History$consMsg(currentIndex), - { - ctor: '_Tuple2', - _0: index - 1, - _1: {ctor: '[]'} - }, - _p4.messages))); - }); -var _elm_lang$virtual_dom$VirtualDom_History$undone = function (getResult) { - var _p5 = getResult; - if (_p5.ctor === 'Done') { - return {ctor: '_Tuple2', _0: _p5._1, _1: _p5._0}; - } else { - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.History', - { - start: {line: 195, column: 3}, - end: {line: 200, column: 39} - }, - _p5)('Bug in History.get'); - } -}; -var _elm_lang$virtual_dom$VirtualDom_History$elmToJs = _elm_lang$virtual_dom$Native_Debug.unsafeCoerce; -var _elm_lang$virtual_dom$VirtualDom_History$encodeHelp = F2( - function (snapshot, allMessages) { - return A3( - _elm_lang$core$Array$foldl, - F2( - function (elm, msgs) { - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_History$elmToJs(elm), - _1: msgs - }; - }), - allMessages, - snapshot.messages); - }); -var _elm_lang$virtual_dom$VirtualDom_History$encode = function (_p7) { - var _p8 = _p7; - var recentJson = A2( - _elm_lang$core$List$map, - _elm_lang$virtual_dom$VirtualDom_History$elmToJs, - _elm_lang$core$List$reverse(_p8.recent.messages)); - return _elm_lang$core$Json_Encode$list( - A3(_elm_lang$core$Array$foldr, _elm_lang$virtual_dom$VirtualDom_History$encodeHelp, recentJson, _p8.snapshots)); -}; -var _elm_lang$virtual_dom$VirtualDom_History$jsToElm = _elm_lang$virtual_dom$Native_Debug.unsafeCoerce; -var _elm_lang$virtual_dom$VirtualDom_History$initialModel = function (_p9) { - var _p10 = _p9; - var _p11 = A2(_elm_lang$core$Array$get, 0, _p10.snapshots); - if (_p11.ctor === 'Just') { - return _p11._0.model; - } else { - return _p10.recent.model; - } -}; -var _elm_lang$virtual_dom$VirtualDom_History$size = function (history) { - return history.numMessages; -}; -var _elm_lang$virtual_dom$VirtualDom_History$maxSnapshotSize = 64; -var _elm_lang$virtual_dom$VirtualDom_History$consSnapshot = F3( - function (currentIndex, snapshot, _p12) { - var _p13 = _p12; - var _p14 = _p13._0; - var nextIndex = _p14 - _elm_lang$virtual_dom$VirtualDom_History$maxSnapshotSize; - var currentIndexHelp = ((_elm_lang$core$Native_Utils.cmp(nextIndex, currentIndex) < 1) && (_elm_lang$core$Native_Utils.cmp(currentIndex, _p14) < 0)) ? currentIndex : -1; - return { - ctor: '_Tuple2', - _0: _p14 - _elm_lang$virtual_dom$VirtualDom_History$maxSnapshotSize, - _1: { - ctor: '::', - _0: A4(_elm_lang$virtual_dom$VirtualDom_Helpers$lazy3, _elm_lang$virtual_dom$VirtualDom_History$viewSnapshot, currentIndexHelp, _p14, snapshot), - _1: _p13._1 - } - }; - }); -var _elm_lang$virtual_dom$VirtualDom_History$viewSnapshots = F2( - function (currentIndex, snapshots) { - var highIndex = _elm_lang$virtual_dom$VirtualDom_History$maxSnapshotSize * _elm_lang$core$Array$length(snapshots); - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - {ctor: '[]'}, - _elm_lang$core$Tuple$second( - A3( - _elm_lang$core$Array$foldr, - _elm_lang$virtual_dom$VirtualDom_History$consSnapshot(currentIndex), - { - ctor: '_Tuple2', - _0: highIndex, - _1: {ctor: '[]'} - }, - snapshots))); - }); -var _elm_lang$virtual_dom$VirtualDom_History$view = F2( - function (maybeIndex, _p15) { - var _p16 = _p15; - var _p17 = function () { - var _p18 = maybeIndex; - if (_p18.ctor === 'Nothing') { - return {ctor: '_Tuple2', _0: -1, _1: 'debugger-sidebar-messages'}; - } else { - return {ctor: '_Tuple2', _0: _p18._0, _1: 'debugger-sidebar-messages-paused'}; - } - }(); - var index = _p17._0; - var className = _p17._1; - var oldStuff = A3(_elm_lang$virtual_dom$VirtualDom_Helpers$lazy2, _elm_lang$virtual_dom$VirtualDom_History$viewSnapshots, index, _p16.snapshots); - var newStuff = _elm_lang$core$Tuple$second( - A3( - _elm_lang$core$List$foldl, - _elm_lang$virtual_dom$VirtualDom_History$consMsg(index), - { - ctor: '_Tuple2', - _0: _p16.numMessages - 1, - _1: {ctor: '[]'} - }, - _p16.recent.messages)); - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class(className), - _1: {ctor: '[]'} - }, - {ctor: '::', _0: oldStuff, _1: newStuff}); - }); -var _elm_lang$virtual_dom$VirtualDom_History$History = F3( - function (a, b, c) { - return {snapshots: a, recent: b, numMessages: c}; - }); -var _elm_lang$virtual_dom$VirtualDom_History$RecentHistory = F3( - function (a, b, c) { - return {model: a, messages: b, numMessages: c}; - }); -var _elm_lang$virtual_dom$VirtualDom_History$empty = function (model) { - return A3( - _elm_lang$virtual_dom$VirtualDom_History$History, - _elm_lang$core$Array$empty, - A3( - _elm_lang$virtual_dom$VirtualDom_History$RecentHistory, - model, - {ctor: '[]'}, - 0), - 0); -}; -var _elm_lang$virtual_dom$VirtualDom_History$Snapshot = F2( - function (a, b) { - return {model: a, messages: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_History$addRecent = F3( - function (msg, newModel, _p19) { - var _p20 = _p19; - var _p23 = _p20.numMessages; - var _p22 = _p20.model; - var _p21 = _p20.messages; - return _elm_lang$core$Native_Utils.eq(_p23, _elm_lang$virtual_dom$VirtualDom_History$maxSnapshotSize) ? { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just( - A2( - _elm_lang$virtual_dom$VirtualDom_History$Snapshot, - _p22, - _elm_lang$core$Array$fromList(_p21))), - _1: A3( - _elm_lang$virtual_dom$VirtualDom_History$RecentHistory, - newModel, - { - ctor: '::', - _0: msg, - _1: {ctor: '[]'} - }, - 1) - } : { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Nothing, - _1: A3( - _elm_lang$virtual_dom$VirtualDom_History$RecentHistory, - _p22, - {ctor: '::', _0: msg, _1: _p21}, - _p23 + 1) - }; - }); -var _elm_lang$virtual_dom$VirtualDom_History$add = F3( - function (msg, model, _p24) { - var _p25 = _p24; - var _p28 = _p25.snapshots; - var _p27 = _p25.numMessages; - var _p26 = A3(_elm_lang$virtual_dom$VirtualDom_History$addRecent, msg, model, _p25.recent); - if (_p26._0.ctor === 'Just') { - return A3( - _elm_lang$virtual_dom$VirtualDom_History$History, - A2(_elm_lang$core$Array$push, _p26._0._0, _p28), - _p26._1, - _p27 + 1); - } else { - return A3(_elm_lang$virtual_dom$VirtualDom_History$History, _p28, _p26._1, _p27 + 1); - } - }); -var _elm_lang$virtual_dom$VirtualDom_History$decoder = F2( - function (initialModel, update) { - var addMessage = F2( - function (rawMsg, _p29) { - var _p30 = _p29; - var _p31 = _p30._0; - var msg = _elm_lang$virtual_dom$VirtualDom_History$jsToElm(rawMsg); - return { - ctor: '_Tuple2', - _0: A2(update, msg, _p31), - _1: A3(_elm_lang$virtual_dom$VirtualDom_History$add, msg, _p31, _p30._1) - }; - }); - var updateModel = function (rawMsgs) { - return A3( - _elm_lang$core$List$foldl, - addMessage, - { - ctor: '_Tuple2', - _0: initialModel, - _1: _elm_lang$virtual_dom$VirtualDom_History$empty(initialModel) - }, - rawMsgs); - }; - return A2( - _elm_lang$core$Json_Decode$map, - updateModel, - _elm_lang$core$Json_Decode$list(_elm_lang$core$Json_Decode$value)); - }); -var _elm_lang$virtual_dom$VirtualDom_History$Done = F2( - function (a, b) { - return {ctor: 'Done', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_History$Stepping = F2( - function (a, b) { - return {ctor: 'Stepping', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_History$getHelp = F3( - function (update, msg, getResult) { - var _p32 = getResult; - if (_p32.ctor === 'Done') { - return getResult; - } else { - var _p34 = _p32._0; - var _p33 = _p32._1; - return _elm_lang$core$Native_Utils.eq(_p34, 0) ? A2( - _elm_lang$virtual_dom$VirtualDom_History$Done, - msg, - _elm_lang$core$Tuple$first( - A2(update, msg, _p33))) : A2( - _elm_lang$virtual_dom$VirtualDom_History$Stepping, - _p34 - 1, - _elm_lang$core$Tuple$first( - A2(update, msg, _p33))); - } - }); -var _elm_lang$virtual_dom$VirtualDom_History$get = F3( - function (update, index, _p35) { - var _p36 = _p35; - var _p39 = _p36.recent; - var snapshotMax = _p36.numMessages - _p39.numMessages; - if (_elm_lang$core$Native_Utils.cmp(index, snapshotMax) > -1) { - return _elm_lang$virtual_dom$VirtualDom_History$undone( - A3( - _elm_lang$core$List$foldr, - _elm_lang$virtual_dom$VirtualDom_History$getHelp(update), - A2(_elm_lang$virtual_dom$VirtualDom_History$Stepping, index - snapshotMax, _p39.model), - _p39.messages)); - } else { - var _p37 = A2(_elm_lang$core$Array$get, (index / _elm_lang$virtual_dom$VirtualDom_History$maxSnapshotSize) | 0, _p36.snapshots); - if (_p37.ctor === 'Nothing') { - return _elm_lang$core$Native_Utils.crashCase( - 'VirtualDom.History', - { - start: {line: 165, column: 7}, - end: {line: 171, column: 95} - }, - _p37)('UI should only let you ask for real indexes!'); - } else { - return _elm_lang$virtual_dom$VirtualDom_History$undone( - A3( - _elm_lang$core$Array$foldr, - _elm_lang$virtual_dom$VirtualDom_History$getHelp(update), - A2( - _elm_lang$virtual_dom$VirtualDom_History$Stepping, - A2(_elm_lang$core$Basics$rem, index, _elm_lang$virtual_dom$VirtualDom_History$maxSnapshotSize), - _p37._0.model), - _p37._0.messages)); - } - } - }); - -var _elm_lang$virtual_dom$VirtualDom_Overlay$styles = A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'style', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('\n\n.elm-overlay {\n position: fixed;\n top: 0;\n left: 0;\n width: 100%;\n height: 100%;\n color: white;\n pointer-events: none;\n font-family: \'Trebuchet MS\', \'Lucida Grande\', \'Bitstream Vera Sans\', \'Helvetica Neue\', sans-serif;\n}\n\n.elm-overlay-resume {\n width: 100%;\n height: 100%;\n cursor: pointer;\n text-align: center;\n pointer-events: auto;\n background-color: rgba(200, 200, 200, 0.7);\n}\n\n.elm-overlay-resume-words {\n position: absolute;\n top: calc(50% - 40px);\n font-size: 80px;\n line-height: 80px;\n height: 80px;\n width: 100%;\n}\n\n.elm-mini-controls {\n position: fixed;\n bottom: 0;\n right: 6px;\n border-radius: 4px;\n background-color: rgb(61, 61, 61);\n font-family: monospace;\n pointer-events: auto;\n}\n\n.elm-mini-controls-button {\n padding: 6px;\n cursor: pointer;\n text-align: center;\n min-width: 24ch;\n}\n\n.elm-mini-controls-import-export {\n padding: 4px 0;\n font-size: 0.8em;\n text-align: center;\n background-color: rgb(50, 50, 50);\n}\n\n.elm-overlay-message {\n position: absolute;\n width: 600px;\n height: 100%;\n padding-left: calc(50% - 300px);\n padding-right: calc(50% - 300px);\n background-color: rgba(200, 200, 200, 0.7);\n pointer-events: auto;\n}\n\n.elm-overlay-message-title {\n font-size: 36px;\n height: 80px;\n background-color: rgb(50, 50, 50);\n padding-left: 22px;\n vertical-align: middle;\n line-height: 80px;\n}\n\n.elm-overlay-message-details {\n padding: 8px 20px;\n overflow-y: auto;\n max-height: calc(100% - 156px);\n background-color: rgb(61, 61, 61);\n}\n\n.elm-overlay-message-details-type {\n font-size: 1.5em;\n}\n\n.elm-overlay-message-details ul {\n list-style-type: none;\n padding-left: 20px;\n}\n\n.elm-overlay-message-details ul ul {\n list-style-type: disc;\n padding-left: 2em;\n}\n\n.elm-overlay-message-details li {\n margin: 8px 0;\n}\n\n.elm-overlay-message-buttons {\n height: 60px;\n line-height: 60px;\n text-align: right;\n background-color: rgb(50, 50, 50);\n}\n\n.elm-overlay-message-buttons button {\n margin-right: 20px;\n}\n\n'), - _1: {ctor: '[]'} - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$button = F2( - function (msg, label) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(msg), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'cursor', _1: 'pointer'}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(label), - _1: {ctor: '[]'} - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewImportExport = F3( - function (props, importMsg, exportMsg) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - props, - { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Overlay$button, importMsg, 'Import'), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' / '), - _1: { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Overlay$button, exportMsg, 'Export'), - _1: {ctor: '[]'} - } - } - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewMiniControls = F2( - function (config, numMsgs) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-mini-controls'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(config.open), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-mini-controls-button'), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text( - A2( - _elm_lang$core$Basics_ops['++'], - 'Explore History (', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$core$Basics$toString(numMsgs), - ')'))), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Overlay$viewImportExport, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-mini-controls-import-export'), - _1: {ctor: '[]'} - }, - config.importHistory, - config.exportHistory), - _1: {ctor: '[]'} - } - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$addCommas = function (items) { - var _p0 = items; - if (_p0.ctor === '[]') { - return ''; - } else { - if (_p0._1.ctor === '[]') { - return _p0._0; - } else { - if (_p0._1._1.ctor === '[]') { - return A2( - _elm_lang$core$Basics_ops['++'], - _p0._0, - A2(_elm_lang$core$Basics_ops['++'], ' and ', _p0._1._0)); - } else { - return A2( - _elm_lang$core$String$join, - ', ', - A2( - _elm_lang$core$Basics_ops['++'], - _p0._1, - { - ctor: '::', - _0: A2(_elm_lang$core$Basics_ops['++'], ' and ', _p0._0), - _1: {ctor: '[]'} - })); - } - } - } -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$problemToString = function (problem) { - var _p1 = problem; - switch (_p1.ctor) { - case 'Function': - return 'functions'; - case 'Decoder': - return 'JSON decoders'; - case 'Task': - return 'tasks'; - case 'Process': - return 'processes'; - case 'Socket': - return 'web sockets'; - case 'Request': - return 'HTTP requests'; - case 'Program': - return 'programs'; - default: - return 'virtual DOM values'; - } -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$goodNews2 = '\nfunction can pattern match on that data and call whatever functions, JSON\ndecoders, etc. you need. This makes the code much more explicit and easy to\nfollow for other readers (or you in a few months!)\n'; -var _elm_lang$virtual_dom$VirtualDom_Overlay$goodNews1 = '\nThe good news is that having values like this in your message type is not\nso great in the long run. You are better off using simpler data, like\n'; -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode = function (name) { - return A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'code', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(name), - _1: {ctor: '[]'} - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewMention = F2( - function (tags, verbed) { - var _p2 = A2( - _elm_lang$core$List$map, - _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode, - _elm_lang$core$List$reverse(tags)); - if (_p2.ctor === '[]') { - return _elm_lang$virtual_dom$VirtualDom_Helpers$text(''); - } else { - if (_p2._1.ctor === '[]') { - return A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'li', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(verbed), - _1: { - ctor: '::', - _0: _p2._0, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('.'), - _1: {ctor: '[]'} - } - } - }); - } else { - if (_p2._1._1.ctor === '[]') { - return A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'li', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(verbed), - _1: { - ctor: '::', - _0: _p2._1._0, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' and '), - _1: { - ctor: '::', - _0: _p2._0, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('.'), - _1: {ctor: '[]'} - } - } - } - } - }); - } else { - return A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'li', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(verbed), - _1: A2( - _elm_lang$core$Basics_ops['++'], - A2( - _elm_lang$core$List$intersperse, - _elm_lang$virtual_dom$VirtualDom_Helpers$text(', '), - _elm_lang$core$List$reverse(_p2._1)), - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(', and '), - _1: { - ctor: '::', - _0: _p2._0, - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('.'), - _1: {ctor: '[]'} - } - } - }) - }); - } - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewChange = function (change) { - return A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'li', - {ctor: '[]'}, - function () { - var _p3 = change; - if (_p3.ctor === 'AliasChange') { - return { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay-message-details-type'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode(_p3._0), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }; - } else { - return { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay-message-details-type'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode(_p3._0), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'ul', - {ctor: '[]'}, - { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Overlay$viewMention, _p3._1.removed, 'Removed '), - _1: { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Overlay$viewMention, _p3._1.changed, 'Changed '), - _1: { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Overlay$viewMention, _p3._1.added, 'Added '), - _1: {ctor: '[]'} - } - } - }), - _1: { - ctor: '::', - _0: _p3._1.argsMatch ? _elm_lang$virtual_dom$VirtualDom_Helpers$text('') : _elm_lang$virtual_dom$VirtualDom_Helpers$text('This may be due to the fact that the type variable names changed.'), - _1: {ctor: '[]'} - } - } - }; - } - }()); -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewProblemType = function (_p4) { - var _p5 = _p4; - return A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'li', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode(_p5.name), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text( - A2( - _elm_lang$core$Basics_ops['++'], - ' can contain ', - A2( - _elm_lang$core$Basics_ops['++'], - _elm_lang$virtual_dom$VirtualDom_Overlay$addCommas( - A2(_elm_lang$core$List$map, _elm_lang$virtual_dom$VirtualDom_Overlay$problemToString, _p5.problems)), - '.'))), - _1: {ctor: '[]'} - } - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewBadMetadata = function (_p6) { - var _p7 = _p6; - return { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'p', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('The '), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode(_p7.message), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' type of your program cannot be reliably serialized for history files.'), - _1: {ctor: '[]'} - } - } - }), - _1: { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'p', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('Functions cannot be serialized, nor can values that contain functions. This is a problem in these places:'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'ul', - {ctor: '[]'}, - A2(_elm_lang$core$List$map, _elm_lang$virtual_dom$VirtualDom_Overlay$viewProblemType, _p7.problems)), - _1: { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'p', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_elm_lang$virtual_dom$VirtualDom_Overlay$goodNews1), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$a, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$href('https://guide.elm-lang.org/types/union_types.html'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('union types'), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(', in your messages. From there, your '), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode('update'), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_elm_lang$virtual_dom$VirtualDom_Overlay$goodNews2), - _1: {ctor: '[]'} - } - } - } - } - }), - _1: {ctor: '[]'} - } - } - } - }; -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$explanationRisky = '\nThis history seems old. It will work with this program, but some\nmessages have been added since the history was created:\n'; -var _elm_lang$virtual_dom$VirtualDom_Overlay$explanationBad = '\nThe messages in this history do not match the messages handled by your\nprogram. I noticed changes in the following types:\n'; -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewReport = F2( - function (isBad, report) { - var _p8 = report; - switch (_p8.ctor) { - case 'CorruptHistory': - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('Looks like this history file is corrupt. I cannot understand it.'), - _1: {ctor: '[]'} - }; - case 'VersionChanged': - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text( - A2( - _elm_lang$core$Basics_ops['++'], - 'This history was created with Elm ', - A2( - _elm_lang$core$Basics_ops['++'], - _p8._0, - A2( - _elm_lang$core$Basics_ops['++'], - ', but you are using Elm ', - A2(_elm_lang$core$Basics_ops['++'], _p8._1, ' right now.'))))), - _1: {ctor: '[]'} - }; - case 'MessageChanged': - return { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text( - A2(_elm_lang$core$Basics_ops['++'], 'To import some other history, the overall message type must', ' be the same. The old history has ')), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode(_p8._0), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' messages, but the new program works with '), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$viewCode(_p8._1), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' messages.'), - _1: {ctor: '[]'} - } - } - } - } - }; - default: - return { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'p', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text( - isBad ? _elm_lang$virtual_dom$VirtualDom_Overlay$explanationBad : _elm_lang$virtual_dom$VirtualDom_Overlay$explanationRisky), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'ul', - {ctor: '[]'}, - A2(_elm_lang$core$List$map, _elm_lang$virtual_dom$VirtualDom_Overlay$viewChange, _p8._0)), - _1: {ctor: '[]'} - } - }; - } - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewResume = function (config) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay-resume'), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(config.resume), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay-resume-words'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('Click to Resume'), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$uploadDecoder = A3( - _elm_lang$core$Json_Decode$map2, - F2( - function (v0, v1) { - return {ctor: '_Tuple2', _0: v0, _1: v1}; - }), - A2(_elm_lang$core$Json_Decode$field, 'metadata', _elm_lang$virtual_dom$VirtualDom_Metadata$decoder), - A2(_elm_lang$core$Json_Decode$field, 'history', _elm_lang$core$Json_Decode$value)); -var _elm_lang$virtual_dom$VirtualDom_Overlay$close = F2( - function (msg, state) { - var _p9 = state; - switch (_p9.ctor) { - case 'None': - return _elm_lang$core$Maybe$Nothing; - case 'BadMetadata': - return _elm_lang$core$Maybe$Nothing; - case 'BadImport': - return _elm_lang$core$Maybe$Nothing; - default: - var _p10 = msg; - if (_p10.ctor === 'Cancel') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Maybe$Just(_p9._1); - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$isBlocking = function (state) { - var _p11 = state; - if (_p11.ctor === 'None') { - return false; - } else { - return true; - } -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$Config = F5( - function (a, b, c, d, e) { - return {resume: a, open: b, importHistory: c, exportHistory: d, wrap: e}; - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$RiskyImport = F2( - function (a, b) { - return {ctor: 'RiskyImport', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$BadImport = function (a) { - return {ctor: 'BadImport', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$corruptImport = _elm_lang$virtual_dom$VirtualDom_Overlay$BadImport(_elm_lang$virtual_dom$VirtualDom_Report$CorruptHistory); -var _elm_lang$virtual_dom$VirtualDom_Overlay$assessImport = F2( - function (metadata, jsonString) { - var _p12 = A2(_elm_lang$core$Json_Decode$decodeString, _elm_lang$virtual_dom$VirtualDom_Overlay$uploadDecoder, jsonString); - if (_p12.ctor === 'Err') { - return _elm_lang$core$Result$Err(_elm_lang$virtual_dom$VirtualDom_Overlay$corruptImport); - } else { - var _p14 = _p12._0._1; - var report = A2(_elm_lang$virtual_dom$VirtualDom_Metadata$check, _p12._0._0, metadata); - var _p13 = _elm_lang$virtual_dom$VirtualDom_Report$evaluate(report); - switch (_p13.ctor) { - case 'Impossible': - return _elm_lang$core$Result$Err( - _elm_lang$virtual_dom$VirtualDom_Overlay$BadImport(report)); - case 'Risky': - return _elm_lang$core$Result$Err( - A2(_elm_lang$virtual_dom$VirtualDom_Overlay$RiskyImport, report, _p14)); - default: - return _elm_lang$core$Result$Ok(_p14); - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$BadMetadata = function (a) { - return {ctor: 'BadMetadata', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$badMetadata = _elm_lang$virtual_dom$VirtualDom_Overlay$BadMetadata; -var _elm_lang$virtual_dom$VirtualDom_Overlay$None = {ctor: 'None'}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$none = _elm_lang$virtual_dom$VirtualDom_Overlay$None; -var _elm_lang$virtual_dom$VirtualDom_Overlay$Proceed = {ctor: 'Proceed'}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$Cancel = {ctor: 'Cancel'}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewButtons = function (buttons) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay-message-buttons'), - _1: {ctor: '[]'} - }, - function () { - var _p15 = buttons; - if (_p15.ctor === 'Accept') { - return { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'button', - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(_elm_lang$virtual_dom$VirtualDom_Overlay$Proceed), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p15._0), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - }; - } else { - return { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'button', - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(_elm_lang$virtual_dom$VirtualDom_Overlay$Cancel), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p15._0), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'button', - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(_elm_lang$virtual_dom$VirtualDom_Overlay$Proceed), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(_p15._1), - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }; - } - }()); -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$Message = {ctor: 'Message'}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewMessage = F4( - function (config, title, details, buttons) { - return { - ctor: '_Tuple2', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$Message, - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay-message'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay-message-title'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(title), - _1: {ctor: '[]'} - }), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay-message-details'), - _1: {ctor: '[]'} - }, - details), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - config.wrap, - _elm_lang$virtual_dom$VirtualDom_Overlay$viewButtons(buttons)), - _1: {ctor: '[]'} - } - } - }), - _1: {ctor: '[]'} - } - }; - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$Pause = {ctor: 'Pause'}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$Normal = {ctor: 'Normal'}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$Choose = F2( - function (a, b) { - return {ctor: 'Choose', _0: a, _1: b}; - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$Accept = function (a) { - return {ctor: 'Accept', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Overlay$viewHelp = F5( - function (config, isPaused, isOpen, numMsgs, state) { - var _p16 = state; - switch (_p16.ctor) { - case 'None': - var miniControls = isOpen ? {ctor: '[]'} : { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Overlay$viewMiniControls, config, numMsgs), - _1: {ctor: '[]'} - }; - return { - ctor: '_Tuple2', - _0: isPaused ? _elm_lang$virtual_dom$VirtualDom_Overlay$Pause : _elm_lang$virtual_dom$VirtualDom_Overlay$Normal, - _1: (isPaused && (!isOpen)) ? { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Overlay$viewResume(config), - _1: miniControls - } : miniControls - }; - case 'BadMetadata': - return A4( - _elm_lang$virtual_dom$VirtualDom_Overlay$viewMessage, - config, - 'Cannot use Import or Export', - _elm_lang$virtual_dom$VirtualDom_Overlay$viewBadMetadata(_p16._0), - _elm_lang$virtual_dom$VirtualDom_Overlay$Accept('Ok')); - case 'BadImport': - return A4( - _elm_lang$virtual_dom$VirtualDom_Overlay$viewMessage, - config, - 'Cannot Import History', - A2(_elm_lang$virtual_dom$VirtualDom_Overlay$viewReport, true, _p16._0), - _elm_lang$virtual_dom$VirtualDom_Overlay$Accept('Ok')); - default: - return A4( - _elm_lang$virtual_dom$VirtualDom_Overlay$viewMessage, - config, - 'Warning', - A2(_elm_lang$virtual_dom$VirtualDom_Overlay$viewReport, false, _p16._0), - A2(_elm_lang$virtual_dom$VirtualDom_Overlay$Choose, 'Cancel', 'Import Anyway')); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Overlay$view = F5( - function (config, isPaused, isOpen, numMsgs, state) { - var _p17 = A5(_elm_lang$virtual_dom$VirtualDom_Overlay$viewHelp, config, isPaused, isOpen, numMsgs, state); - var block = _p17._0; - var nodes = _p17._1; - return { - ctor: '_Tuple2', - _0: block, - _1: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('elm-overlay'), - _1: {ctor: '[]'} - }, - {ctor: '::', _0: _elm_lang$virtual_dom$VirtualDom_Overlay$styles, _1: nodes}) - }; - }); - -var _elm_lang$virtual_dom$VirtualDom_Debug$styles = A3( - _elm_lang$virtual_dom$VirtualDom_Helpers$node, - 'style', - {ctor: '[]'}, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('\n\nhtml {\n overflow: hidden;\n height: 100%;\n}\n\nbody {\n height: 100%;\n overflow: auto;\n}\n\n#debugger {\n width: 100%\n height: 100%;\n font-family: monospace;\n}\n\n#values {\n display: block;\n float: left;\n height: 100%;\n width: calc(100% - 30ch);\n margin: 0;\n overflow: auto;\n cursor: default;\n}\n\n.debugger-sidebar {\n display: block;\n float: left;\n width: 30ch;\n height: 100%;\n color: white;\n background-color: rgb(61, 61, 61);\n}\n\n.debugger-sidebar-controls {\n width: 100%;\n text-align: center;\n background-color: rgb(50, 50, 50);\n}\n\n.debugger-sidebar-controls-import-export {\n width: 100%;\n height: 24px;\n line-height: 24px;\n font-size: 12px;\n}\n\n.debugger-sidebar-controls-resume {\n width: 100%;\n height: 30px;\n line-height: 30px;\n cursor: pointer;\n}\n\n.debugger-sidebar-controls-resume:hover {\n background-color: rgb(41, 41, 41);\n}\n\n.debugger-sidebar-messages {\n width: 100%;\n overflow-y: auto;\n height: calc(100% - 24px);\n}\n\n.debugger-sidebar-messages-paused {\n width: 100%;\n overflow-y: auto;\n height: calc(100% - 54px);\n}\n\n.messages-entry {\n cursor: pointer;\n width: 100%;\n}\n\n.messages-entry:hover {\n background-color: rgb(41, 41, 41);\n}\n\n.messages-entry-selected, .messages-entry-selected:hover {\n background-color: rgb(10, 10, 10);\n}\n\n.messages-entry-content {\n width: calc(100% - 7ch);\n padding-top: 4px;\n padding-bottom: 4px;\n padding-left: 1ch;\n text-overflow: ellipsis;\n white-space: nowrap;\n overflow: hidden;\n display: inline-block;\n}\n\n.messages-entry-index {\n color: #666;\n width: 5ch;\n padding-top: 4px;\n padding-bottom: 4px;\n padding-right: 1ch;\n text-align: right;\n display: block;\n float: right;\n}\n\n'), - _1: {ctor: '[]'} - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$button = F2( - function (msg, label) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$span, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(msg), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$style( - { - ctor: '::', - _0: {ctor: '_Tuple2', _0: 'cursor', _1: 'pointer'}, - _1: {ctor: '[]'} - }), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(label), - _1: {ctor: '[]'} - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$getLatestModel = function (state) { - var _p0 = state; - if (_p0.ctor === 'Running') { - return _p0._0; - } else { - return _p0._2; - } -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$withGoodMetadata = F2( - function (model, func) { - var _p1 = model.metadata; - if (_p1.ctor === 'Ok') { - return func(_p1._0); - } else { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - { - overlay: _elm_lang$virtual_dom$VirtualDom_Overlay$badMetadata(_p1._0) - }), - {ctor: '[]'}); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$Model = F6( - function (a, b, c, d, e, f) { - return {history: a, state: b, expando: c, metadata: d, overlay: e, isDebuggerOpen: f}; - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$Paused = F3( - function (a, b, c) { - return {ctor: 'Paused', _0: a, _1: b, _2: c}; - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$Running = function (a) { - return {ctor: 'Running', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$loadNewHistory = F3( - function (rawHistory, userUpdate, model) { - var pureUserUpdate = F2( - function (msg, userModel) { - return _elm_lang$core$Tuple$first( - A2(userUpdate, msg, userModel)); - }); - var initialUserModel = _elm_lang$virtual_dom$VirtualDom_History$initialModel(model.history); - var decoder = A2(_elm_lang$virtual_dom$VirtualDom_History$decoder, initialUserModel, pureUserUpdate); - var _p2 = A2(_elm_lang$core$Json_Decode$decodeValue, decoder, rawHistory); - if (_p2.ctor === 'Err') { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - {overlay: _elm_lang$virtual_dom$VirtualDom_Overlay$corruptImport}), - {ctor: '[]'}); - } else { - var _p3 = _p2._0._0; - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - { - history: _p2._0._1, - state: _elm_lang$virtual_dom$VirtualDom_Debug$Running(_p3), - expando: _elm_lang$virtual_dom$VirtualDom_Expando$init(_p3), - overlay: _elm_lang$virtual_dom$VirtualDom_Overlay$none - }), - {ctor: '[]'}); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$OverlayMsg = function (a) { - return {ctor: 'OverlayMsg', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$Upload = function (a) { - return {ctor: 'Upload', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$upload = A2(_elm_lang$core$Task$perform, _elm_lang$virtual_dom$VirtualDom_Debug$Upload, _elm_lang$virtual_dom$Native_Debug.upload); -var _elm_lang$virtual_dom$VirtualDom_Debug$Export = {ctor: 'Export'}; -var _elm_lang$virtual_dom$VirtualDom_Debug$Import = {ctor: 'Import'}; -var _elm_lang$virtual_dom$VirtualDom_Debug$Down = {ctor: 'Down'}; -var _elm_lang$virtual_dom$VirtualDom_Debug$Up = {ctor: 'Up'}; -var _elm_lang$virtual_dom$VirtualDom_Debug$Close = {ctor: 'Close'}; -var _elm_lang$virtual_dom$VirtualDom_Debug$Open = {ctor: 'Open'}; -var _elm_lang$virtual_dom$VirtualDom_Debug$Jump = function (a) { - return {ctor: 'Jump', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$Resume = {ctor: 'Resume'}; -var _elm_lang$virtual_dom$VirtualDom_Debug$overlayConfig = {resume: _elm_lang$virtual_dom$VirtualDom_Debug$Resume, open: _elm_lang$virtual_dom$VirtualDom_Debug$Open, importHistory: _elm_lang$virtual_dom$VirtualDom_Debug$Import, exportHistory: _elm_lang$virtual_dom$VirtualDom_Debug$Export, wrap: _elm_lang$virtual_dom$VirtualDom_Debug$OverlayMsg}; -var _elm_lang$virtual_dom$VirtualDom_Debug$viewIn = function (_p4) { - var _p5 = _p4; - var isPaused = function () { - var _p6 = _p5.state; - if (_p6.ctor === 'Running') { - return false; - } else { - return true; - } - }(); - return A5( - _elm_lang$virtual_dom$VirtualDom_Overlay$view, - _elm_lang$virtual_dom$VirtualDom_Debug$overlayConfig, - isPaused, - _p5.isDebuggerOpen, - _elm_lang$virtual_dom$VirtualDom_History$size(_p5.history), - _p5.overlay); -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$resumeButton = A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$onClick(_elm_lang$virtual_dom$VirtualDom_Debug$Resume), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('debugger-sidebar-controls-resume'), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text('Resume'), - _1: {ctor: '[]'} - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$viewResumeButton = function (maybeIndex) { - var _p7 = maybeIndex; - if (_p7.ctor === 'Nothing') { - return _elm_lang$virtual_dom$VirtualDom_Helpers$text(''); - } else { - return _elm_lang$virtual_dom$VirtualDom_Debug$resumeButton; - } -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$playButton = function (maybeIndex) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('debugger-sidebar-controls'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Debug$viewResumeButton(maybeIndex), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('debugger-sidebar-controls-import-export'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Debug$button, _elm_lang$virtual_dom$VirtualDom_Debug$Import, 'Import'), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$text(' / '), - _1: { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Debug$button, _elm_lang$virtual_dom$VirtualDom_Debug$Export, 'Export'), - _1: {ctor: '[]'} - } - } - }), - _1: {ctor: '[]'} - } - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$viewSidebar = F2( - function (state, history) { - var maybeIndex = function () { - var _p8 = state; - if (_p8.ctor === 'Running') { - return _elm_lang$core$Maybe$Nothing; - } else { - return _elm_lang$core$Maybe$Just(_p8._0); - } - }(); - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$class('debugger-sidebar'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - _elm_lang$virtual_dom$VirtualDom_Debug$Jump, - A2(_elm_lang$virtual_dom$VirtualDom_History$view, maybeIndex, history)), - _1: { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Debug$playButton(maybeIndex), - _1: {ctor: '[]'} - } - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$ExpandoMsg = function (a) { - return {ctor: 'ExpandoMsg', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$viewOut = function (_p9) { - var _p10 = _p9; - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$id('debugger'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Debug$styles, - _1: { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Debug$viewSidebar, _p10.state, _p10.history), - _1: { - ctor: '::', - _0: A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - _elm_lang$virtual_dom$VirtualDom_Debug$ExpandoMsg, - A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$div, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Helpers$id('values'), - _1: {ctor: '[]'} - }, - { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Expando$view, _elm_lang$core$Maybe$Nothing, _p10.expando), - _1: {ctor: '[]'} - })), - _1: {ctor: '[]'} - } - } - }); -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$UserMsg = function (a) { - return {ctor: 'UserMsg', _0: a}; -}; -var _elm_lang$virtual_dom$VirtualDom_Debug$wrapInit = F2( - function (metadata, _p11) { - var _p12 = _p11; - var _p13 = _p12._0; - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - { - history: _elm_lang$virtual_dom$VirtualDom_History$empty(_p13), - state: _elm_lang$virtual_dom$VirtualDom_Debug$Running(_p13), - expando: _elm_lang$virtual_dom$VirtualDom_Expando$init(_p13), - metadata: _elm_lang$virtual_dom$VirtualDom_Metadata$decode(metadata), - overlay: _elm_lang$virtual_dom$VirtualDom_Overlay$none, - isDebuggerOpen: false - }, - { - ctor: '::', - _0: A2(_elm_lang$core$Platform_Cmd$map, _elm_lang$virtual_dom$VirtualDom_Debug$UserMsg, _p12._1), - _1: {ctor: '[]'} - }); - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$wrapSubs = F2( - function (userSubscriptions, _p14) { - var _p15 = _p14; - return A2( - _elm_lang$core$Platform_Sub$map, - _elm_lang$virtual_dom$VirtualDom_Debug$UserMsg, - userSubscriptions( - _elm_lang$virtual_dom$VirtualDom_Debug$getLatestModel(_p15.state))); - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$wrapView = F2( - function (userView, _p16) { - var _p17 = _p16; - var currentModel = function () { - var _p18 = _p17.state; - if (_p18.ctor === 'Running') { - return _p18._0; - } else { - return _p18._1; - } - }(); - return A2( - _elm_lang$virtual_dom$VirtualDom_Helpers$map, - _elm_lang$virtual_dom$VirtualDom_Debug$UserMsg, - userView(currentModel)); - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$NoOp = {ctor: 'NoOp'}; -var _elm_lang$virtual_dom$VirtualDom_Debug$download = F2( - function (metadata, history) { - var json = _elm_lang$core$Json_Encode$object( - { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'metadata', - _1: _elm_lang$virtual_dom$VirtualDom_Metadata$encode(metadata) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'history', - _1: _elm_lang$virtual_dom$VirtualDom_History$encode(history) - }, - _1: {ctor: '[]'} - } - }); - var historyLength = _elm_lang$virtual_dom$VirtualDom_History$size(history); - return A2( - _elm_lang$core$Task$perform, - function (_p19) { - return _elm_lang$virtual_dom$VirtualDom_Debug$NoOp; - }, - A2(_elm_lang$virtual_dom$Native_Debug.download, historyLength, json)); - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$runIf = F2( - function (bool, task) { - return bool ? A2( - _elm_lang$core$Task$perform, - _elm_lang$core$Basics$always(_elm_lang$virtual_dom$VirtualDom_Debug$NoOp), - task) : _elm_lang$core$Platform_Cmd$none; - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$updateUserMsg = F4( - function (userUpdate, scrollTask, userMsg, _p20) { - var _p21 = _p20; - var _p25 = _p21.state; - var _p24 = _p21; - var userModel = _elm_lang$virtual_dom$VirtualDom_Debug$getLatestModel(_p25); - var newHistory = A3(_elm_lang$virtual_dom$VirtualDom_History$add, userMsg, userModel, _p21.history); - var _p22 = A2(userUpdate, userMsg, userModel); - var newUserModel = _p22._0; - var userCmds = _p22._1; - var commands = A2(_elm_lang$core$Platform_Cmd$map, _elm_lang$virtual_dom$VirtualDom_Debug$UserMsg, userCmds); - var _p23 = _p25; - if (_p23.ctor === 'Running') { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - _p24, - { - history: newHistory, - state: _elm_lang$virtual_dom$VirtualDom_Debug$Running(newUserModel), - expando: A2(_elm_lang$virtual_dom$VirtualDom_Expando$merge, newUserModel, _p21.expando) - }), - { - ctor: '::', - _0: commands, - _1: { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Debug$runIf, _p24.isDebuggerOpen, scrollTask), - _1: {ctor: '[]'} - } - }); - } else { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - _p24, - { - history: newHistory, - state: A3(_elm_lang$virtual_dom$VirtualDom_Debug$Paused, _p23._0, _p23._1, newUserModel) - }), - { - ctor: '::', - _0: commands, - _1: {ctor: '[]'} - }); - } - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$wrapUpdate = F4( - function (userUpdate, scrollTask, msg, model) { - wrapUpdate: - while (true) { - var _p26 = msg; - switch (_p26.ctor) { - case 'NoOp': - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - model, - {ctor: '[]'}); - case 'UserMsg': - return A4(_elm_lang$virtual_dom$VirtualDom_Debug$updateUserMsg, userUpdate, scrollTask, _p26._0, model); - case 'ExpandoMsg': - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - { - expando: A2(_elm_lang$virtual_dom$VirtualDom_Expando$update, _p26._0, model.expando) - }), - {ctor: '[]'}); - case 'Resume': - var _p27 = model.state; - if (_p27.ctor === 'Running') { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - model, - {ctor: '[]'}); - } else { - var _p28 = _p27._2; - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - { - state: _elm_lang$virtual_dom$VirtualDom_Debug$Running(_p28), - expando: A2(_elm_lang$virtual_dom$VirtualDom_Expando$merge, _p28, model.expando) - }), - { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Debug$runIf, model.isDebuggerOpen, scrollTask), - _1: {ctor: '[]'} - }); - } - case 'Jump': - var _p30 = _p26._0; - var _p29 = A3(_elm_lang$virtual_dom$VirtualDom_History$get, userUpdate, _p30, model.history); - var indexModel = _p29._0; - var indexMsg = _p29._1; - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - { - state: A3( - _elm_lang$virtual_dom$VirtualDom_Debug$Paused, - _p30, - indexModel, - _elm_lang$virtual_dom$VirtualDom_Debug$getLatestModel(model.state)), - expando: A2(_elm_lang$virtual_dom$VirtualDom_Expando$merge, indexModel, model.expando) - }), - {ctor: '[]'}); - case 'Open': - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - {isDebuggerOpen: true}), - {ctor: '[]'}); - case 'Close': - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - {isDebuggerOpen: false}), - {ctor: '[]'}); - case 'Up': - var index = function () { - var _p31 = model.state; - if (_p31.ctor === 'Paused') { - return _p31._0; - } else { - return _elm_lang$virtual_dom$VirtualDom_History$size(model.history); - } - }(); - if (_elm_lang$core$Native_Utils.cmp(index, 0) > 0) { - var _v17 = userUpdate, - _v18 = scrollTask, - _v19 = _elm_lang$virtual_dom$VirtualDom_Debug$Jump(index - 1), - _v20 = model; - userUpdate = _v17; - scrollTask = _v18; - msg = _v19; - model = _v20; - continue wrapUpdate; - } else { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - model, - {ctor: '[]'}); - } - case 'Down': - var _p32 = model.state; - if (_p32.ctor === 'Running') { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - model, - {ctor: '[]'}); - } else { - var _p33 = _p32._0; - if (_elm_lang$core$Native_Utils.eq( - _p33, - _elm_lang$virtual_dom$VirtualDom_History$size(model.history) - 1)) { - var _v22 = userUpdate, - _v23 = scrollTask, - _v24 = _elm_lang$virtual_dom$VirtualDom_Debug$Resume, - _v25 = model; - userUpdate = _v22; - scrollTask = _v23; - msg = _v24; - model = _v25; - continue wrapUpdate; - } else { - var _v26 = userUpdate, - _v27 = scrollTask, - _v28 = _elm_lang$virtual_dom$VirtualDom_Debug$Jump(_p33 + 1), - _v29 = model; - userUpdate = _v26; - scrollTask = _v27; - msg = _v28; - model = _v29; - continue wrapUpdate; - } - } - case 'Import': - return A2( - _elm_lang$virtual_dom$VirtualDom_Debug$withGoodMetadata, - model, - function (_p34) { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - model, - { - ctor: '::', - _0: _elm_lang$virtual_dom$VirtualDom_Debug$upload, - _1: {ctor: '[]'} - }); - }); - case 'Export': - return A2( - _elm_lang$virtual_dom$VirtualDom_Debug$withGoodMetadata, - model, - function (metadata) { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - model, - { - ctor: '::', - _0: A2(_elm_lang$virtual_dom$VirtualDom_Debug$download, metadata, model.history), - _1: {ctor: '[]'} - }); - }); - case 'Upload': - return A2( - _elm_lang$virtual_dom$VirtualDom_Debug$withGoodMetadata, - model, - function (metadata) { - var _p35 = A2(_elm_lang$virtual_dom$VirtualDom_Overlay$assessImport, metadata, _p26._0); - if (_p35.ctor === 'Err') { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - {overlay: _p35._0}), - {ctor: '[]'}); - } else { - return A3(_elm_lang$virtual_dom$VirtualDom_Debug$loadNewHistory, _p35._0, userUpdate, model); - } - }); - default: - var _p36 = A2(_elm_lang$virtual_dom$VirtualDom_Overlay$close, _p26._0, model.overlay); - if (_p36.ctor === 'Nothing') { - return A2( - _elm_lang$core$Platform_Cmd_ops['!'], - _elm_lang$core$Native_Utils.update( - model, - {overlay: _elm_lang$virtual_dom$VirtualDom_Overlay$none}), - {ctor: '[]'}); - } else { - return A3(_elm_lang$virtual_dom$VirtualDom_Debug$loadNewHistory, _p36._0, userUpdate, model); - } - } - } - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$wrap = F2( - function (metadata, _p37) { - var _p38 = _p37; - return { - init: A2(_elm_lang$virtual_dom$VirtualDom_Debug$wrapInit, metadata, _p38.init), - view: _elm_lang$virtual_dom$VirtualDom_Debug$wrapView(_p38.view), - update: _elm_lang$virtual_dom$VirtualDom_Debug$wrapUpdate(_p38.update), - viewIn: _elm_lang$virtual_dom$VirtualDom_Debug$viewIn, - viewOut: _elm_lang$virtual_dom$VirtualDom_Debug$viewOut, - subscriptions: _elm_lang$virtual_dom$VirtualDom_Debug$wrapSubs(_p38.subscriptions) - }; - }); -var _elm_lang$virtual_dom$VirtualDom_Debug$wrapWithFlags = F2( - function (metadata, _p39) { - var _p40 = _p39; - return { - init: function (flags) { - return A2( - _elm_lang$virtual_dom$VirtualDom_Debug$wrapInit, - metadata, - _p40.init(flags)); - }, - view: _elm_lang$virtual_dom$VirtualDom_Debug$wrapView(_p40.view), - update: _elm_lang$virtual_dom$VirtualDom_Debug$wrapUpdate(_p40.update), - viewIn: _elm_lang$virtual_dom$VirtualDom_Debug$viewIn, - viewOut: _elm_lang$virtual_dom$VirtualDom_Debug$viewOut, - subscriptions: _elm_lang$virtual_dom$VirtualDom_Debug$wrapSubs(_p40.subscriptions) - }; - }); - -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 baseScatter = A3( - _seatgeek$wrecker_ui$Graph$Scatter, - 'Concurrency', - 'Resp. Time (s)', - function (_p22) { - return _elm_lang$core$Basics$toFloat( - function (_) { - return _.concurrency; - }( - function (_) { - return _.run; - }(_p22))); - }); - return { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Mean Time / Concurrency', - _1: baseScatter( - function (_p23) { - return function (_) { - return _.meanTime; - }( - function (_) { - return _.stats; - }(_p23)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Percentile 95 / Concurrency', - _1: baseScatter( - function (_p24) { - return function (_) { - return _.quantile95; - }( - function (_) { - return _.stats; - }(_p24)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Fastest Time / Concurrency', - _1: baseScatter( - function (_p25) { - return function (_) { - return _.minTime; - }( - function (_) { - return _.stats; - }(_p25)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Slowest Time / Concurrency', - _1: baseScatter( - function (_p26) { - return function (_) { - return _.maxTime; - }( - function (_) { - return _.stats; - }(_p26)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Aggregated Time / Concurrency', - _1: baseScatter( - function (_p27) { - return function (_) { - return _.totalTime; - }( - function (_) { - return _.stats; - }(_p27)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Variance / Concurrency', - _1: baseScatter( - function (_p28) { - return function (_) { - return _.variance; - }( - function (_) { - return _.stats; - }(_p28)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Mean Time Comparison', - _1: A2( - _seatgeek$wrecker_ui$Graph$Timeline, - 'Resp. Time (s)', - function (_p29) { - return function (_) { - return _.meanTime; - }( - function (_) { - return _.stats; - }(_p29)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Percentile 95 Comparison', - _1: A2( - _seatgeek$wrecker_ui$Graph$Timeline, - 'Resp. Time (s)', - function (_p30) { - return function (_) { - return _.quantile95; - }( - function (_) { - return _.stats; - }(_p30)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Slowest Time Comparison', - _1: A2( - _seatgeek$wrecker_ui$Graph$Timeline, - 'Resp. Time (s)', - function (_p31) { - return function (_) { - return _.maxTime; - }( - function (_) { - return _.stats; - }(_p31)); - }) - }, - _1: { - ctor: '::', - _0: { - ctor: '_Tuple2', - _0: 'Variance Comparison', - _1: A2( - _seatgeek$wrecker_ui$Graph$Timeline, - 'Resp. Time (s)', - function (_p32) { - return function (_) { - return _.variance; - }( - function (_) { - return _.stats; - }(_p32)); - }) - }, - _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 (_p33) { - return function (_) { - return _.concurrency; - }( - function (_) { - return _.run; - }(_p33)); - }, - runs)); - }; - var graphType = _elm_lang$core$List$head( - A2( - _elm_lang$core$List$filter, - function (_p34) { - var _p35 = _p34; - return _elm_lang$core$Native_Utils.eq(_p35._0, name); - }, - _seatgeek$wrecker_ui$Graph$validGraphs)); - var _p36 = graphType; - if (_p36.ctor === 'Nothing') { - return {ctor: '_Tuple2', _0: _elm_lang$core$Maybe$Nothing, _1: _elm_lang$core$Maybe$Nothing}; - } else { - if (_p36._0._1.ctor === 'Timeline') { - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(_p36._0._0), - _1: appropriateConcurrency(runs) - }; - } else { - return { - ctor: '_Tuple2', - _0: _elm_lang$core$Maybe$Just(_p36._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 (_p37) { - var _p38 = _p37; - return _elm_lang$core$Native_Utils.eq(title, _p38._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('5'), - _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, _p39) { - var _p40 = _p39; - var _p41 = _p40._1; - var y = yGetter(_p41); - var x = xGetter(_p41); - return { - view: _elm_lang$core$Maybe$Just( - A3(_seatgeek$wrecker_ui$Graph$circle, _p40._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 (_p42) { - return A2( - _myrho$elm_round$Round$roundNum, - 3, - function (_) { - return _.y; - }(_p42)); - }), - interpolation: _terezka$elm_plot$Plot$None, - toDataPoints: function (_p43) { - return A2( - _elm_lang$core$List$map, - A3(_seatgeek$wrecker_ui$Graph$rangeFrameHintDot, xGetter, yGetter, hinting), - A2( - _elm_lang$core$List$sortBy, - function (_p44) { - return _elm_lang$core$Date$toTime( - function (_) { - return _.created; - }( - function (_) { - return _.run; - }( - _elm_lang$core$Tuple$second(_p44)))); - }, - _p43)); - } - }; - }); -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 (_p45, graph, allGroups, runs, filteredGroups, concurrencyComparison, pageStats) { - var _p46 = _p45; - var _p50 = _p46.hovered; - var selectRunData = function (graphData) { - return A2(_seatgeek$wrecker_ui$Graph$assembleRunData, pageStats, graphData); - }; - var _p47 = _seatgeek$wrecker_ui$Graph$graphDefinition(graph); - if (_p47.ctor === 'Just') { - if (_p47._0.ctor === 'Scatter') { - return A5( - _seatgeek$wrecker_ui$Graph$basicSeries, - _p50, - _p47._0._0, - _p47._0._1, - { - ctor: '::', - _0: A3(_seatgeek$wrecker_ui$Graph$scatterPlot, _p47._0._2, _p47._0._3, _p50), - _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 (_p48) { - return _elm_lang$core$Date$toTime( - function (_) { - return _.created; - }( - function (_) { - return _.run; - }(_p48))); - }, - 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, - _p50, - '', - _p47._0._0, - { - ctor: '::', - _0: A3(_seatgeek$wrecker_ui$Graph$linePlot, dateGetter, _p47._0._1, _p50), - _1: {ctor: '[]'} - }, - selectRunData( - A2(_seatgeek$wrecker_ui$Graph$assignColors, allGroups, runData))); - } - } else { - return _elm_lang$core$Native_Utils.crashCase( - 'Graph', - { - start: {line: 286, column: 9}, - end: {line: 323, column: 67} - }, - _p47)( - 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$natSort = F2( - function (a, b) { - var _p0 = { - 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 (((_p0.ctor === '_Tuple2') && (_p0._0.ctor === 'Ok')) && (_p0._1.ctor === 'Ok')) { - return A2(_elm_lang$core$Basics$compare, _p0._0._0, _p0._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)) - }); - default: - return _elm_lang$core$Native_Utils.update( - opts, - { - runTime: A2( - _elm_lang$core$Result$withDefault, - opts.runTime, - _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$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: '[]'}, - 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$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$Main$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$Main$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$Main$extractSelectedPage = function (selection) { - return A2( - _elm_lang$core$Maybe$withDefault, - '', - A2( - _elm_lang$core$Maybe$map, - function (_p1) { - var _p2 = _p1; - return _p2._0; - }, - selection)); -}; -var _seatgeek$wrecker_ui$Main$graphTypeOption = F2( - function (current, _p3) { - var _p4 = _p3; - var _p5 = _p4._0; - return A2( - _elm_lang$html$Html$option, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value(_p5), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$selected( - _elm_lang$core$Native_Utils.eq(current, _p5)), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(_p5), - _1: {ctor: '[]'} - }); - }); -var _seatgeek$wrecker_ui$Main$groupSetOption = F2( - function (selectedGroupSet, _p6) { - var _p7 = _p6; - var _p8 = _p7.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, _p8); - }, - selectedGroupSet)); - return A2( - _elm_lang$html$Html$option, - { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$value( - _elm_community$string_extra$String_Extra$fromInt(_p8)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Attributes$selected(isSelected), - _1: {ctor: '[]'} - } - }, - { - ctor: '::', - _0: _elm_lang$html$Html$text(_p7.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 (_p9) { - return function (_) { - return _.id; - }( - function (_) { - return _.run; - }(_p9)); - }, - runs), - page); - }); -var _seatgeek$wrecker_ui$Main$getManyRuns = F2( - function (match, groupSet) { - var groupSetParam = function () { - var _p10 = groupSet; - if (_p10.ctor === 'Just') { - return A2( - _elm_lang$core$Basics_ops['++'], - '&groupSet=', - _elm_lang$http$Http$encodeUri( - _elm_community$string_extra$String_Extra$fromInt(_p10._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 (_p11) { - var _p12 = _p11; - return _p12._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, _p13) { - var _p14 = _p13; - return _elm_lang$core$Native_Utils.eq(_p14._0, model.graph) ? _elm_lang$core$Maybe$Just( - {ctor: '_Tuple2', _0: index, _1: _p14._1}) : _elm_lang$core$Maybe$Nothing; - }), - _seatgeek$wrecker_ui$Graph$validGraphs))); - var _p15 = model.displayTestResults; - if (_p15.ctor === 'Nothing') { - return _seatgeek$wrecker_ui$Router$Home; - } else { - var _p16 = graphIndex; - if (_p16.ctor === 'Nothing') { - return _seatgeek$wrecker_ui$Router$Home; - } else { - if (_p16._0._1.ctor === 'Scatter') { - return A4( - _seatgeek$wrecker_ui$Router$SimplePlot, - _p16._0._0, - model.displayTestResults, - page, - A2( - _elm_lang$core$Maybe$map, - function (_) { - return _.id; - }, - model.selectedGroupSet)); - } else { - return A5( - _seatgeek$wrecker_ui$Router$ComparisonPlot, - _p16._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 _p17 = screen; - if (_p17.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 (_p18) { - var _p19 = _p18; - var _p22 = _p19; - var _p20 = maybePageName; - if (_p20.ctor === 'Nothing') { - return _elm_lang$core$Task$succeed( - _elm_lang$core$Result$Ok( - {ctor: '_Tuple4', _0: _p22, _1: '', _2: _elm_lang$core$Maybe$Nothing, _3: maybeGroupSet})); - } else { - var _p21 = _p20._0; - return A2( - _elm_lang$core$Task$andThen, - function (stats) { - return _elm_lang$core$Task$succeed( - _elm_lang$core$Result$Ok( - { - ctor: '_Tuple4', - _0: _p22, - _1: _p21, - _2: _elm_lang$core$Maybe$Just(stats), - _3: maybeGroupSet - })); - }, - _elm_lang$http$Http$toTask( - A2(_seatgeek$wrecker_ui$Main$getPageByRuns, _p19.runs, _p21))); - } - }, - _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 _p23 = 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 (_p24) { - var _p25 = _p24; - return _p25._1._0; - }, - _elm_lang$core$List$head( - A2( - _elm_lang$core$List$filter, - function (_p26) { - var _p27 = _p26; - return _elm_lang$core$Native_Utils.eq(_p27._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 _p28 = A2(_elm_lang$core$Debug$log, 'selected dog', selectedSet); - var _p29 = A2(_elm_lang$core$Debug$log, 'crazy dog', sets); - return A2( - _elm_lang$html$Html$select, - { - ctor: '::', - _0: _seatgeek$wrecker_ui$Main$onChange( - function (_p30) { - return _seatgeek$wrecker_ui$Main$ChangeGroupSet( - A2( - _elm_lang$core$Result$withDefault, - -1, - _elm_lang$core$String$toInt(_p30))); - }), - _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 _p31 = model.displayTestResults; - if (_p31.ctor === 'Nothing') { - return _elm_lang$core$Platform_Sub$none; - } else { - return A2( - _elm_lang$core$Time$every, - 30 * _elm_lang$core$Time$second, - function (_p32) { - return _seatgeek$wrecker_ui$Main$PollForResults(_p31._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 _p33 = screen; - if (_p33.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 _p34 = current; - if (_p34.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(_p34._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 (_p35) { - return function (_) { - return _.concurrency; - }( - function (_) { - return _.run; - }(_p35)); - }, - runs))); - return A2( - _elm_lang$html$Html$select, - { - ctor: '::', - _0: _seatgeek$wrecker_ui$Main$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, _p36) { - var _p37 = _p36; - var _p39 = _p37._1; - var isFiltered = function () { - var _p38 = filtered; - if (_p38.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); - })(_p39), - 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(_p39.id)), - _1: { - ctor: '::', - _0: _elm_lang$html$Html_Events$onDoubleClick( - _seatgeek$wrecker_ui$Main$ShowOnlyGroup(_p39.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: _p37._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(_p39.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$Main$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: A2(_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, - 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 (_p50) { - var _p51 = _p50; - return _p51._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 _p52 = model.currentScreen; - if (_p52.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 _p53 = maybeRoute; - if (_p53.ctor === 'Nothing') { - return {ctor: '_Tuple2', _0: model, _1: _elm_lang$core$Platform_Cmd$none}; - } else { - switch (_p53._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 _p54 = _p53._0._1; - return A2( - _Fresheyeball$elm_return$Return$command, - A4(_seatgeek$wrecker_ui$Main$loadRunThenPage, _seatgeek$wrecker_ui$Main$LoadFromLocation, _p54, _p53._0._3, _p53._0._2), - _seatgeek$wrecker_ui$Util$return( - A2( - _seatgeek$wrecker_ui$Main$setGraphByIndex, - _p53._0._0, - _elm_lang$core$Native_Utils.update( - model, - {displayTestResults: _p54})))); - default: - var _p55 = _p53._0._2; - return A2( - _Fresheyeball$elm_return$Return$command, - A4(_seatgeek$wrecker_ui$Main$loadRunThenPage, _seatgeek$wrecker_ui$Main$LoadFromLocation, _p55, _p53._0._4, _p53._0._3), - _seatgeek$wrecker_ui$Util$return( - A2( - _seatgeek$wrecker_ui$Main$setGraphByIndex, - _p53._0._0, - _elm_lang$core$Native_Utils.update( - model, - { - concurrencyComparison: _elm_lang$core$Maybe$Just(_p53._0._1), - displayTestResults: _p55 - })))); - } - } - }); -var _seatgeek$wrecker_ui$Main$init = function (location) { - var _p56 = _seatgeek$wrecker_ui$ServerState$init; - var serverState = _p56._0; - var serverStateInit = _p56._1; - var _p57 = _seatgeek$wrecker_ui$Scheduler$init; - var schedulerModel = _p57._0; - var scheduleInit = _p57._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 _p58 = msg; - switch (_p58.ctor) { - case 'SetRoute': - return A2(_seatgeek$wrecker_ui$Main$setRoute, _p58._0, model); - case 'ChangeScreen': - var _p59 = _p58._0; - return A2( - _Fresheyeball$elm_return$Return$command, - _seatgeek$wrecker_ui$Router$modifyUrl( - A2(_seatgeek$wrecker_ui$Main$screenToRoute, _p59, model)), - A2(_seatgeek$wrecker_ui$Main$changeScreen, _p59, model)); - case 'RunTitleClicked': - return A3( - _seatgeek$wrecker_ui$Main$loadRunsData, - _p58._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, _p58._0); - }, - model.availableGroupSets)); - return A3(_seatgeek$wrecker_ui$Main$loadRunsData, testName, selectedSet, model); - case 'LoadRunStats': - if (_p58._0.ctor === 'Err') { - return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadRunStats', _p58._0._0); - } else { - return _seatgeek$wrecker_ui$Util$return( - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p58._0._0.pages, - A4( - _seatgeek$wrecker_ui$Main$setRuns, - _p58._0._0.runs, - _p58._0._0.runGroups, - _p58._0._0.availableGroupSets, - _elm_lang$core$Native_Utils.update( - model, - {selectedPage: _elm_lang$core$Maybe$Nothing})))); - } - case 'LoadPageStats': - if (_p58._0.ctor === 'Err') { - return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadPageStats', _p58._0._0); - } else { - var _p60 = model.selectedPage; - if (_p60.ctor === 'Nothing') { - return _seatgeek$wrecker_ui$Util$return(model); - } else { - return _seatgeek$wrecker_ui$Util$return( - A3(_seatgeek$wrecker_ui$Main$setPageSelection, _p60._0._0, _p58._0._0, model)); - } - } - case 'LoadFromLocation': - if (_p58._0.ctor === 'Err') { - return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'LoadFromLocation', _p58._0._0); - } else { - if (_p58._0._0._2.ctor === 'Just') { - var _p61 = _p58._0._0._0.availableGroupSets; - return _seatgeek$wrecker_ui$Util$return( - A3( - _seatgeek$wrecker_ui$Main$setGroupSetSelection, - _p58._0._0._3, - _p61, - A3( - _seatgeek$wrecker_ui$Main$setPageSelection, - _p58._0._0._1, - _p58._0._0._2._0, - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p58._0._0._0.pages, - A4(_seatgeek$wrecker_ui$Main$setRuns, _p58._0._0._0.runs, _p58._0._0._0.runGroups, _p61, model))))); - } else { - var _p62 = _p58._0._0._0.availableGroupSets; - return _seatgeek$wrecker_ui$Util$return( - A3( - _seatgeek$wrecker_ui$Main$setGroupSetSelection, - _p58._0._0._3, - _p62, - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p58._0._0._0.pages, - A4( - _seatgeek$wrecker_ui$Main$setRuns, - _p58._0._0._0.runs, - _p58._0._0._0.runGroups, - _p62, - _elm_lang$core$Native_Utils.update( - model, - {selectedPage: _elm_lang$core$Maybe$Nothing}))))); - } - } - case 'RefreshRunStats': - if (_p58._0.ctor === 'Err') { - return A3(_seatgeek$wrecker_ui$Main$debugError, model, 'RefreshRunStats', _p58._0._0); - } else { - if (_p58._0._0._2.ctor === 'Just') { - var _p63 = _p58._0._0._0.availableGroupSets; - return _seatgeek$wrecker_ui$Util$return( - A3( - _seatgeek$wrecker_ui$Main$setGroupSetSelection, - _p58._0._0._3, - _p63, - A3( - _seatgeek$wrecker_ui$Main$setPageSelection, - _p58._0._0._1, - _p58._0._0._2._0, - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p58._0._0._0.pages, - _elm_lang$core$Native_Utils.update( - model, - {runs: _p58._0._0._0.runs, availableGroupSets: _p63, currentRunGroups: _p58._0._0._0.runGroups}))))); - } else { - var _p64 = _p58._0._0._0.availableGroupSets; - return _seatgeek$wrecker_ui$Util$return( - A3( - _seatgeek$wrecker_ui$Main$setGroupSetSelection, - _p58._0._0._3, - _p64, - A2( - _seatgeek$wrecker_ui$Main$setPageMap, - _p58._0._0._0.pages, - _elm_lang$core$Native_Utils.update( - model, - {runs: _p58._0._0._0.runs, availableGroupSets: _p64, currentRunGroups: _p58._0._0._0.runGroups})))); - } - } - case 'GraphMsg': - var _p65 = A2(_seatgeek$wrecker_ui$Graph$update, _p58._0, model.graphState); - var m = _p65._0; - var c = _p65._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 _p66 = A2(_seatgeek$wrecker_ui$Graph$chooseGraphType, _p58._0, model.runs); - var newType = _p66._0; - var newConcurrency = _p66._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 _p67 = _p58._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, _p67); - }, - model.filteredGroups), - {ctor: '[]'})) ? A2( - _elm_lang$core$List$filter, - function (g) { - return !_elm_lang$core$Native_Utils.eq(g.id, _p67); - }, - 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, _p67); - }, - 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, _p58._0); - }, - model.currentRunGroups) - })); - case 'PageNameClicked': - var _p69 = _p58._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, _p69)), - _seatgeek$wrecker_ui$Util$return( - _elm_lang$core$Native_Utils.update( - model, - { - selectedPage: _elm_lang$core$Maybe$Just( - A2(_seatgeek$wrecker_ui$Main$PageSelection, _p69, _elm_lang$core$Dict$empty)) - })))); - var _p68 = model.selectedPage; - if (_p68.ctor === 'Nothing') { - return result; - } else { - return _elm_lang$core$Native_Utils.eq(_p69, _p68._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(_p58._0) - }))); - case 'SchedulerMsg': - var _p70 = A3(_seatgeek$wrecker_ui$Scheduler$update, model.serverState.groupSets, _p58._0, model.schedulerState); - var m = _p70._0; - var c = _p70._1; - var reloadServerState = _p70._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 _p71 = A2(_seatgeek$wrecker_ui$ServerState$update, _p58._0, model.serverState); - var m = _p71._0; - var c = _p71._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, _p58._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(_p58._0), - A2( - _elm_lang$core$Maybe$map, - function (_) { - return _.id; - }, - model.selectedGroupSet), - A2( - _elm_lang$core$Maybe$map, - function (_p72) { - var _p73 = _p72; - return _p73._0; - }, - model.selectedPage)), - _seatgeek$wrecker_ui$Util$return(model))); - } - }); -var _seatgeek$wrecker_ui$Main$SetRoute = function (a) { - return {ctor: 'SetRoute', _0: a}; -}; -var _seatgeek$wrecker_ui$Main$main = A2( - _elm_lang$navigation$Navigation$program, - function (_p74) { - return _seatgeek$wrecker_ui$Main$SetRoute( - _seatgeek$wrecker_ui$Router$fromLocation(_p74)); - }, - {init: _seatgeek$wrecker_ui$Main$init, view: _seatgeek$wrecker_ui$Main$view, update: _seatgeek$wrecker_ui$Main$update, subscriptions: _seatgeek$wrecker_ui$Main$subscriptions})(); - -var Elm = {}; -Elm['Main'] = Elm['Main'] || {}; -if (typeof _seatgeek$wrecker_ui$Main$main !== 'undefined') { - _seatgeek$wrecker_ui$Main$main(Elm['Main'], 'Main', {"types":{"unions":{"Dict.LeafColor":{"args":[],"tags":{"LBBlack":[],"LBlack":[]}},"RunGroupPanel.Msg":{"args":[],"tags":{"Expand":["Int"],"Collapse":["Int"]}},"Json.Encode.Value":{"args":[],"tags":{"Value":[]}},"ServerState.TestList":{"args":[],"tags":{"TestList":["Dict.Dict String ServerState.RunStatus"]}},"Dict.Dict":{"args":["k","v"],"tags":{"RBNode_elm_builtin":["Dict.NColor","k","v","Dict.Dict k v","Dict.Dict k v"],"RBEmpty_elm_builtin":["Dict.LeafColor"]}},"Date.Date":{"args":[],"tags":{"Date":[]}},"Maybe.Maybe":{"args":["a"],"tags":{"Just":["a"],"Nothing":[]}},"Main.Screen":{"args":[],"tags":{"ScheduleRunScreen":[],"PlotScreen":[]}},"Router.Route":{"args":[],"tags":{"Home":[],"ComparisonPlot":["Router.PlotType","Router.ConcurrencyLevel","Router.TestName","Router.PageName","Router.GroupSetId"],"SimplePlot":["Router.PlotType","Router.TestName","Router.PageName","Router.GroupSetId"],"ScheduleTest":[]}},"Scheduler.SchedulerField":{"args":[],"tags":{"RunTime":[],"AnnotationTitle":[],"ConcurrencyStart":[],"StepSize":[],"ConcurrencyEnd":[],"Notes":[]}},"Main.Msg":{"args":[],"tags":{"LoadPageStats":["Result.Result Http.Error (List Data.Page)"],"ChangeGraphType":["String"],"ChangeConcurrencyComparison":["Int"],"LoadFromLocation":["Result.Result Http.Error ( Data.Results , String , Maybe.Maybe (List Data.Page) , Maybe.Maybe Int )"],"GraphMsg":["Graph.Msg"],"ShowOnlyGroup":["Int"],"SetRoute":["Maybe.Maybe Router.Route"],"ServerStateMsg":["ServerState.Msg"],"ChangeGroupSet":["Int"],"PageNameClicked":["String"],"SchedulerMsg":["Scheduler.Msg"],"PollForResults":["String"],"ChangeScreen":["Main.Screen"],"RefreshRunStats":["Result.Result Http.Error ( Data.Results , String , Maybe.Maybe (List Data.Page) , Maybe.Maybe Int )"],"ToggleFilterGroup":["Int"],"LoadRunStats":["Result.Result Http.Error Data.Results"],"RunTitleClicked":["String"],"RunGroupPanelMsg":["RunGroupPanel.Msg"]}},"Dict.NColor":{"args":[],"tags":{"BBlack":[],"Red":[],"NBlack":[],"Black":[]}},"ServerState.Msg":{"args":[],"tags":{"LoadTestSchedule":["Result.Result Http.Error ServerState.TestList"],"LoadGroupSets":["Result.Result Http.Error (List Data.GroupSet)"]}},"Scheduler.Msg":{"args":[],"tags":{"GroupSetButtonClicked":[],"ScheduleTestSent":["Result.Result Http.Error Json.Decode.Value"],"SchedulerFieldChanged":["Scheduler.SchedulerField","String"],"GroupSetNameChanged":["String"],"GroupSetSent":["Result.Result Http.Error Json.Decode.Value"],"ScheduleTestClicked":[],"SchedulerGroupSetIdSet":["Int"],"GroupSetSaveClicked":[],"TestTitleClicked":["String"],"GroupSetDescriptionChanged":["String"]}},"Graph.Msg":{"args":[],"tags":{"Hover":["Maybe.Maybe Plot.Point"]}},"Http.Error":{"args":[],"tags":{"BadUrl":["String"],"NetworkError":[],"Timeout":[],"BadStatus":["Http.Response String"],"BadPayload":["String","Http.Response String"]}},"Result.Result":{"args":["error","value"],"tags":{"Ok":["value"],"Err":["error"]}},"ServerState.RunStatus":{"args":[],"tags":{"Done":[],"Scheduled":[],"Running":[],"NotYet":[]}}},"aliases":{"Router.TestName":{"args":[],"type":"Maybe.Maybe String"},"Router.PlotType":{"args":[],"type":"Int"},"Http.Response":{"args":["body"],"type":"{ url : String , status : { code : Int, message : String } , headers : Dict.Dict String String , body : body }"},"Router.GroupSetId":{"args":[],"type":"Maybe.Maybe Int"},"Data.RunGroup":{"args":[],"type":"{ id : Int , groupSetId : Int , title : String , notes : String , concurrencyStart : Int , concurrencyTarget : Int , rampupStep : Int , runKeepTime : Int , created : Date.Date }"},"Data.GroupSet":{"args":[],"type":"{ id : Int , name : String , description : String , created : Date.Date }"},"Data.Results":{"args":[],"type":"{ runs : List Data.Run , pages : Dict.Dict String (List Int) , runGroups : List Data.RunGroup , availableGroupSets : List Data.GroupSet }"},"Data.Run":{"args":[],"type":"{ stats : Data.Stats, run : Data.RunInfo }"},"Json.Decode.Value":{"args":[],"type":"Json.Encode.Value"},"Data.Stats":{"args":[],"type":"{ meanTime : Float , successHits : Int , serverErrorHits : Int , maxTime : Float , minTime : Float , userErrorHits : Int , totalTime : Float , failedHits : Int , variance : Float , hits : Int , quantile95 : Float }"},"Data.Page":{"args":[],"type":"{ url : String, runId : Int, stats : Data.Stats }"},"Plot.Point":{"args":[],"type":"Internal.Draw.Point"},"Internal.Draw.Point":{"args":[],"type":"{ x : Float, y : Float }"},"Router.ConcurrencyLevel":{"args":[],"type":"Int"},"Data.RunInfo":{"args":[],"type":"{ created : Date.Date , concurrency : Int , runGroupId : Int , id : Int , match : String }"},"Router.PageName":{"args":[],"type":"Maybe.Maybe String"}},"message":"Main.Msg"},"versions":{"elm":"0.18.0"}}); +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), + A2( + _elm_lang$core$Maybe$map, + function (_) { + return _.id; + }, + model.selectedGroupSet), + A2( + _elm_lang$core$Maybe$map, + function (_p71) { + var _p72 = _p71; + return _p72._0; + }, + model.selectedPage)), + _seatgeek$wrecker_ui$Util$return(model))); + } + }); +var _seatgeek$wrecker_ui$Main$SetRoute = function (a) { + return {ctor: 'SetRoute', _0: a}; +}; +var _seatgeek$wrecker_ui$Main$main = A2( + _elm_lang$navigation$Navigation$program, + function (_p73) { + return _seatgeek$wrecker_ui$Main$SetRoute( + _seatgeek$wrecker_ui$Router$fromLocation(_p73)); + }, + {init: _seatgeek$wrecker_ui$Main$init, view: _seatgeek$wrecker_ui$Main$view, update: _seatgeek$wrecker_ui$Main$update, subscriptions: _seatgeek$wrecker_ui$Main$subscriptions})(); + +var Elm = {}; +Elm['Main'] = Elm['Main'] || {}; +if (typeof _seatgeek$wrecker_ui$Main$main !== 'undefined') { + _seatgeek$wrecker_ui$Main$main(Elm['Main'], 'Main', undefined); } if (typeof define === "function" && define['amd']) diff --git a/assets/schema.sql b/assets/schema.sql deleted file mode 100644 --- a/assets/schema.sql +++ /dev/null @@ -1,40 +0,0 @@ -CREATE TABLE runs ( - id INTEGER PRIMARY KEY AUTOINCREMENT, - concurrency INTEGER NOT NULL, - test_match TEXT, - group_name TEXT, - created DATETIME -); - -CREATE TABLE rollups ( - id INTEGER PRIMARY KEY AUTOINCREMENT, - run_id INTEGER NOT NULL, - hits INTEGER, - max_time REAL, - mean_time REAL, - min_time REAL, - total_time REAL, - var_time REAL, - hits_2xx INTEGER, - hits_4xx INTEGER, - hits_5xx INTEGER, - failed INTEGER, - quantile_95 REAL -); - -CREATE TABLE pages ( - id INTEGER PRIMARY KEY AUTOINCREMENT, - run_id INTEGER NOT NULL, - page_url TEXT, - hits INTEGER, - max_time REAL, - mean_time REAL, - min_time REAL, - total_time REAL, - var_time REAL, - hits_2xx INTEGER, - hits_4xx INTEGER, - hits_5xx INTEGER, - failed INTEGER, - quantile_95 REAL -); diff --git a/src/Recorder.hs b/src/Recorder.hs --- a/src/Recorder.hs +++ b/src/Recorder.hs @@ -4,7 +4,7 @@ import Data.Either (lefts, rights) import Data.Text (Text) -import Data.Time.Clock (UTCTime, getCurrentTime) +import Data.Time.Clock (getCurrentTime) import Database.Persist (insert) import Invoker (Command(..), Concurrency(..)) import Model diff --git a/src/Scheduler.hs b/src/Scheduler.hs --- a/src/Scheduler.hs +++ b/src/Scheduler.hs @@ -22,10 +22,7 @@ import Data.Map (Map) import qualified Data.Maybe as Maybe import Data.Maybe (fromMaybe) -import Data.Monoid ((<>)) import Data.Text (Text, pack) -import Data.Time.Clock (getCurrentTime) -import Data.Time.ISO8601 (formatISO8601) import qualified Invoker as Wrecker import Model (Database, Key, RunGroup, WreckerRun) import Prelude hiding ((!!)) @@ -152,7 +149,7 @@ -- | Checks wheter or not it is possible to executing the give run right now and -- if possible, it executes it immediately. tryRunningNow :: Config -> Text -> ScheduleOptions -> IO () -tryRunningNow config@Config {..} name opts@ScheduleOptions {..} = do +tryRunningNow config@Config {..} name ScheduleOptions {..} = do let secs = Wrecker.Seconds (fromMaybe 10 time) -- Run for 10 seconds if no preference was given canRun <- STM.atomically (markAsRunning testsList name) guard canRun diff --git a/wrecker-ui.cabal b/wrecker-ui.cabal --- a/wrecker-ui.cabal +++ b/wrecker-ui.cabal @@ -1,68 +1,79 @@ -name: wrecker-ui -version: 3.0.0.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. -cabal-version: >= 1.10 -build-type: Simple -license: BSD3 -license-file: LICENSE -category: Web -author: José Lorenzo Rodríguez -maintainer: lorenzo@seatgeek.com -data-dir: assets -data-files: app.js - , index.html - , main.css - , schema.sql +-- This file has been generated from package.yaml by hpack version 0.20.0. +-- +-- see: https://github.com/sol/hpack +-- +-- hash: dea0db90c415ddb4073e55a6a59a9a36d1c00891558d254715e483383cf7179a -executable wrecker-ui - default-language: Haskell2010 - hs-source-dirs: src - main-is: Main.hs - other-modules: Model - , Invoker - , Scheduler - , Recorder - ghc-options: -Wall -threaded -O2 -rtsopts -with-rtsopts=-N - default-extensions: OverloadedStrings - build-depends: base >= 4 && < 5 - , scotty - , text - , time - , aeson - , containers - , http-types - , wai-cors - , directory - , persistent - , persistent-template - , persistent-sqlite - , persistent-postgresql - , esqueleto - , monad-control - , monad-logger - , resourcet - , transformers - , resource-pool - , postgresql-simple-url - , postgresql-simple - , process - , temporary - , bytestring - , iso8601-time - , stm - , async - , distributed-process - , network-transport - , network-transport-tcp - , distributed-process-simplelocalnet - , distributed-process-async - , distributed-static - , binary - , mtl - , HostAndPort +name: wrecker-ui +version: 3.1.0.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 +homepage: https://github.com/seatgeek/wrecker-ui#readme +bug-reports: https://github.com/seatgeek/wrecker-ui/issues +author: José Lorenzo Rodríguez +maintainer: lorenzo@seatgeek.com +license: BSD3 +license-file: LICENSE +build-type: Simple +cabal-version: >= 1.10 +data-files: + assets/app.js + assets/index.html + assets/main.css + source-repository head - type: git - location: https://github.com/seatgeek/wrecker-ui + type: git + location: https://github.com/seatgeek/wrecker-ui + +executable wrecker-ui + main-is: Main.hs + hs-source-dirs: + src + default-extensions: OverloadedStrings + ghc-options: -Wall -threaded -O2 -rtsopts "-with-rtsopts=-N" + build-depends: + HostAndPort + , aeson + , async + , base >=4 && <5 + , binary + , bytestring + , containers + , directory + , distributed-process >=0.7.3 + , distributed-process-async >=0.2.4.2 + , distributed-process-simplelocalnet >=0.2.4 + , distributed-static + , esqueleto + , http-types + , iso8601-time + , monad-control + , monad-logger + , mtl + , network-transport >=0.5.2 + , network-transport-tcp + , persistent + , persistent-postgresql + , persistent-sqlite + , persistent-template + , postgresql-simple + , postgresql-simple-url + , process + , resource-pool + , resourcet + , scotty + , stm + , temporary + , text + , time + , transformers + , wai-cors + other-modules: + Invoker + Model + Recorder + Scheduler + Paths_wrecker_ui + default-language: Haskell2010