From c6d09e3bdfb1a5b22d6b4739dc4fe91b33b8dd2e Mon Sep 17 00:00:00 2001 From: Dillon Kearns Date: Wed, 14 Apr 2021 07:47:36 -0700 Subject: [PATCH] Remove generated files. --- examples/slides/.gitignore | 8 + examples/slides/browser-elm.js | 31150 ------------------ examples/slides/gen/Pages.elm | 8 - examples/slides/gen/Route.elm | 29 - examples/slides/gen/Template.elm | 206 - examples/slides/gen/TemplateModulesBeta.elm | 337 - 6 files changed, 8 insertions(+), 31730 deletions(-) create mode 100644 examples/slides/.gitignore delete mode 100644 examples/slides/browser-elm.js delete mode 100644 examples/slides/gen/Pages.elm delete mode 100644 examples/slides/gen/Route.elm delete mode 100644 examples/slides/gen/Template.elm delete mode 100644 examples/slides/gen/TemplateModulesBeta.elm diff --git a/examples/slides/.gitignore b/examples/slides/.gitignore new file mode 100644 index 00000000..8038d29f --- /dev/null +++ b/examples/slides/.gitignore @@ -0,0 +1,8 @@ +node_modules/ +elm-stuff/ +dist/ +.cache/ +gen/ +functions/render/elm-pages-cli.js +browser-elm.js + diff --git a/examples/slides/browser-elm.js b/examples/slides/browser-elm.js deleted file mode 100644 index 93878e09..00000000 --- a/examples/slides/browser-elm.js +++ /dev/null @@ -1,31150 +0,0 @@ -(function(scope){ -'use strict'; - -function F(arity, fun, wrapper) { - wrapper.a = arity; - wrapper.f = fun; - return wrapper; -} - -function F2(fun) { - return F(2, fun, function(a) { return function(b) { return fun(a,b); }; }) -} -function F3(fun) { - return F(3, fun, function(a) { - return function(b) { return function(c) { return fun(a, b, c); }; }; - }); -} -function F4(fun) { - return F(4, fun, function(a) { return function(b) { return function(c) { - return function(d) { return fun(a, b, c, d); }; }; }; - }); -} -function F5(fun) { - return F(5, fun, function(a) { return function(b) { return function(c) { - return function(d) { return function(e) { return fun(a, b, c, d, e); }; }; }; }; - }); -} -function F6(fun) { - return F(6, fun, function(a) { return function(b) { return function(c) { - return function(d) { return function(e) { return function(f) { - return fun(a, b, c, d, e, f); }; }; }; }; }; - }); -} -function F7(fun) { - return F(7, fun, function(a) { return function(b) { return function(c) { - return function(d) { return function(e) { return function(f) { - return function(g) { return fun(a, b, c, d, e, f, g); }; }; }; }; }; }; - }); -} -function F8(fun) { - return F(8, fun, function(a) { return function(b) { return function(c) { - return function(d) { return function(e) { return function(f) { - return function(g) { return function(h) { - return fun(a, b, c, d, e, f, g, h); }; }; }; }; }; }; }; - }); -} -function F9(fun) { - return F(9, fun, 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 fun(a, b, c, d, e, f, g, h, i); }; }; }; }; }; }; }; }; - }); -} - -function A2(fun, a, b) { - return fun.a === 2 ? fun.f(a, b) : fun(a)(b); -} -function A3(fun, a, b, c) { - return fun.a === 3 ? fun.f(a, b, c) : fun(a)(b)(c); -} -function A4(fun, a, b, c, d) { - return fun.a === 4 ? fun.f(a, b, c, d) : fun(a)(b)(c)(d); -} -function A5(fun, a, b, c, d, e) { - return fun.a === 5 ? fun.f(a, b, c, d, e) : fun(a)(b)(c)(d)(e); -} -function A6(fun, a, b, c, d, e, f) { - return fun.a === 6 ? fun.f(a, b, c, d, e, f) : fun(a)(b)(c)(d)(e)(f); -} -function A7(fun, a, b, c, d, e, f, g) { - return fun.a === 7 ? fun.f(a, b, c, d, e, f, g) : fun(a)(b)(c)(d)(e)(f)(g); -} -function A8(fun, a, b, c, d, e, f, g, h) { - return fun.a === 8 ? fun.f(a, b, c, d, e, f, g, h) : fun(a)(b)(c)(d)(e)(f)(g)(h); -} -function A9(fun, a, b, c, d, e, f, g, h, i) { - return fun.a === 9 ? fun.f(a, b, c, d, e, f, g, h, i) : fun(a)(b)(c)(d)(e)(f)(g)(h)(i); -} - -console.warn('Compiled in DEBUG mode. Follow the advice at https://elm-lang.org/0.19.1/optimize for better performance and smaller assets.'); - - -var _JsArray_empty = []; - -function _JsArray_singleton(value) -{ - return [value]; -} - -function _JsArray_length(array) -{ - return array.length; -} - -var _JsArray_initialize = F3(function(size, offset, func) -{ - var result = new Array(size); - - for (var i = 0; i < size; i++) - { - result[i] = func(offset + i); - } - - return result; -}); - -var _JsArray_initializeFromList = F2(function (max, ls) -{ - var result = new Array(max); - - for (var i = 0; i < max && ls.b; i++) - { - result[i] = ls.a; - ls = ls.b; - } - - result.length = i; - return _Utils_Tuple2(result, ls); -}); - -var _JsArray_unsafeGet = F2(function(index, array) -{ - return array[index]; -}); - -var _JsArray_unsafeSet = F3(function(index, value, array) -{ - var length = array.length; - var result = new Array(length); - - for (var i = 0; i < length; i++) - { - result[i] = array[i]; - } - - result[index] = value; - return result; -}); - -var _JsArray_push = F2(function(value, array) -{ - var length = array.length; - var result = new Array(length + 1); - - for (var i = 0; i < length; i++) - { - result[i] = array[i]; - } - - result[length] = value; - return result; -}); - -var _JsArray_foldl = F3(function(func, acc, array) -{ - var length = array.length; - - for (var i = 0; i < length; i++) - { - acc = A2(func, array[i], acc); - } - - return acc; -}); - -var _JsArray_foldr = F3(function(func, acc, array) -{ - for (var i = array.length - 1; i >= 0; i--) - { - acc = A2(func, array[i], acc); - } - - return acc; -}); - -var _JsArray_map = F2(function(func, array) -{ - var length = array.length; - var result = new Array(length); - - for (var i = 0; i < length; i++) - { - result[i] = func(array[i]); - } - - return result; -}); - -var _JsArray_indexedMap = F3(function(func, offset, array) -{ - var length = array.length; - var result = new Array(length); - - for (var i = 0; i < length; i++) - { - result[i] = A2(func, offset + i, array[i]); - } - - return result; -}); - -var _JsArray_slice = F3(function(from, to, array) -{ - return array.slice(from, to); -}); - -var _JsArray_appendN = F3(function(n, dest, source) -{ - var destLen = dest.length; - var itemsToCopy = n - destLen; - - if (itemsToCopy > source.length) - { - itemsToCopy = source.length; - } - - var size = destLen + itemsToCopy; - var result = new Array(size); - - for (var i = 0; i < destLen; i++) - { - result[i] = dest[i]; - } - - for (var i = 0; i < itemsToCopy; i++) - { - result[i + destLen] = source[i]; - } - - return result; -}); - - - -// LOG - -var _Debug_log_UNUSED = F2(function(tag, value) -{ - return value; -}); - -var _Debug_log = F2(function(tag, value) -{ - console.log(tag + ': ' + _Debug_toString(value)); - return value; -}); - - -// TODOS - -function _Debug_todo(moduleName, region) -{ - return function(message) { - _Debug_crash(8, moduleName, region, message); - }; -} - -function _Debug_todoCase(moduleName, region, value) -{ - return function(message) { - _Debug_crash(9, moduleName, region, value, message); - }; -} - - -// TO STRING - -function _Debug_toString_UNUSED(value) -{ - return ''; -} - -function _Debug_toString(value) -{ - return _Debug_toAnsiString(false, value); -} - -function _Debug_toAnsiString(ansi, value) -{ - if (typeof value === 'function') - { - return _Debug_internalColor(ansi, ''); - } - - if (typeof value === 'boolean') - { - return _Debug_ctorColor(ansi, value ? 'True' : 'False'); - } - - if (typeof value === 'number') - { - return _Debug_numberColor(ansi, value + ''); - } - - if (value instanceof String) - { - return _Debug_charColor(ansi, "'" + _Debug_addSlashes(value, true) + "'"); - } - - if (typeof value === 'string') - { - return _Debug_stringColor(ansi, '"' + _Debug_addSlashes(value, false) + '"'); - } - - if (typeof value === 'object' && '$' in value) - { - var tag = value.$; - - if (typeof tag === 'number') - { - return _Debug_internalColor(ansi, ''); - } - - if (tag[0] === '#') - { - var output = []; - for (var k in value) - { - if (k === '$') continue; - output.push(_Debug_toAnsiString(ansi, value[k])); - } - return '(' + output.join(',') + ')'; - } - - if (tag === 'Set_elm_builtin') - { - return _Debug_ctorColor(ansi, 'Set') - + _Debug_fadeColor(ansi, '.fromList') + ' ' - + _Debug_toAnsiString(ansi, $elm$core$Set$toList(value)); - } - - if (tag === 'RBNode_elm_builtin' || tag === 'RBEmpty_elm_builtin') - { - return _Debug_ctorColor(ansi, 'Dict') - + _Debug_fadeColor(ansi, '.fromList') + ' ' - + _Debug_toAnsiString(ansi, $elm$core$Dict$toList(value)); - } - - if (tag === 'Array_elm_builtin') - { - return _Debug_ctorColor(ansi, 'Array') - + _Debug_fadeColor(ansi, '.fromList') + ' ' - + _Debug_toAnsiString(ansi, $elm$core$Array$toList(value)); - } - - if (tag === '::' || tag === '[]') - { - var output = '['; - - value.b && (output += _Debug_toAnsiString(ansi, value.a), value = value.b) - - for (; value.b; value = value.b) // WHILE_CONS - { - output += ',' + _Debug_toAnsiString(ansi, value.a); - } - return output + ']'; - } - - var output = ''; - for (var i in value) - { - if (i === '$') continue; - var str = _Debug_toAnsiString(ansi, value[i]); - var c0 = str[0]; - var parenless = c0 === '{' || c0 === '(' || c0 === '[' || c0 === '<' || c0 === '"' || str.indexOf(' ') < 0; - output += ' ' + (parenless ? str : '(' + str + ')'); - } - return _Debug_ctorColor(ansi, tag) + output; - } - - if (typeof DataView === 'function' && value instanceof DataView) - { - return _Debug_stringColor(ansi, '<' + value.byteLength + ' bytes>'); - } - - if (typeof File !== 'undefined' && value instanceof File) - { - return _Debug_internalColor(ansi, '<' + value.name + '>'); - } - - if (typeof value === 'object') - { - var output = []; - for (var key in value) - { - var field = key[0] === '_' ? key.slice(1) : key; - output.push(_Debug_fadeColor(ansi, field) + ' = ' + _Debug_toAnsiString(ansi, value[key])); - } - if (output.length === 0) - { - return '{}'; - } - return '{ ' + output.join(', ') + ' }'; - } - - return _Debug_internalColor(ansi, ''); -} - -function _Debug_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, '\\"'); - } -} - -function _Debug_ctorColor(ansi, string) -{ - return ansi ? '\x1b[96m' + string + '\x1b[0m' : string; -} - -function _Debug_numberColor(ansi, string) -{ - return ansi ? '\x1b[95m' + string + '\x1b[0m' : string; -} - -function _Debug_stringColor(ansi, string) -{ - return ansi ? '\x1b[93m' + string + '\x1b[0m' : string; -} - -function _Debug_charColor(ansi, string) -{ - return ansi ? '\x1b[92m' + string + '\x1b[0m' : string; -} - -function _Debug_fadeColor(ansi, string) -{ - return ansi ? '\x1b[37m' + string + '\x1b[0m' : string; -} - -function _Debug_internalColor(ansi, string) -{ - return ansi ? '\x1b[36m' + string + '\x1b[0m' : string; -} - -function _Debug_toHexDigit(n) -{ - return String.fromCharCode(n < 10 ? 48 + n : 55 + n); -} - - -// CRASH - - -function _Debug_crash_UNUSED(identifier) -{ - throw new Error('https://github.com/elm/core/blob/1.0.0/hints/' + identifier + '.md'); -} - - -function _Debug_crash(identifier, fact1, fact2, fact3, fact4) -{ - switch(identifier) - { - case 0: - throw new Error('What node should I take over? In JavaScript I need something like:\n\n Elm.Main.init({\n node: document.getElementById("elm-node")\n })\n\nYou need to do this with any Browser.sandbox or Browser.element program.'); - - case 1: - throw new Error('Browser.application programs cannot handle URLs like this:\n\n ' + document.location.href + '\n\nWhat is the root? The root of your file system? Try looking at this program with `elm reactor` or some other server.'); - - case 2: - var jsonErrorString = fact1; - throw new Error('Problem with the flags given to your Elm program on initialization.\n\n' + jsonErrorString); - - case 3: - var portName = fact1; - throw new Error('There can only be one port named `' + portName + '`, but your program has multiple.'); - - case 4: - var portName = fact1; - var problem = fact2; - throw new Error('Trying to send an unexpected type of value through port `' + portName + '`:\n' + problem); - - case 5: - throw new Error('Trying to use `(==)` on functions.\nThere is no way to know if functions are "the same" in the Elm sense.\nRead more about this at https://package.elm-lang.org/packages/elm/core/latest/Basics#== which describes why it is this way and what the better version will look like.'); - - case 6: - var moduleName = fact1; - throw new Error('Your page is loading multiple Elm scripts with a module named ' + moduleName + '. Maybe a duplicate script is getting loaded accidentally? If not, rename one of them so I know which is which!'); - - case 8: - var moduleName = fact1; - var region = fact2; - var message = fact3; - throw new Error('TODO in module `' + moduleName + '` ' + _Debug_regionToString(region) + '\n\n' + message); - - case 9: - var moduleName = fact1; - var region = fact2; - var value = fact3; - var message = fact4; - throw new Error( - 'TODO in module `' + moduleName + '` from the `case` expression ' - + _Debug_regionToString(region) + '\n\nIt received the following value:\n\n ' - + _Debug_toString(value).replace('\n', '\n ') - + '\n\nBut the branch that handles it says:\n\n ' + message.replace('\n', '\n ') - ); - - case 10: - throw new Error('Bug in https://github.com/elm/virtual-dom/issues'); - - case 11: - throw new Error('Cannot perform mod 0. Division by zero error.'); - } -} - -function _Debug_regionToString(region) -{ - if (region.start.line === region.end.line) - { - return 'on line ' + region.start.line; - } - return 'on lines ' + region.start.line + ' through ' + region.end.line; -} - - - -// EQUALITY - -function _Utils_eq(x, y) -{ - for ( - var pair, stack = [], isEqual = _Utils_eqHelp(x, y, 0, stack); - isEqual && (pair = stack.pop()); - isEqual = _Utils_eqHelp(pair.a, pair.b, 0, stack) - ) - {} - - return isEqual; -} - -function _Utils_eqHelp(x, y, depth, stack) -{ - if (x === y) - { - return true; - } - - if (typeof x !== 'object' || x === null || y === null) - { - typeof x === 'function' && _Debug_crash(5); - return false; - } - - if (depth > 100) - { - stack.push(_Utils_Tuple2(x,y)); - return true; - } - - /**/ - if (x.$ === 'Set_elm_builtin') - { - x = $elm$core$Set$toList(x); - y = $elm$core$Set$toList(y); - } - if (x.$ === 'RBNode_elm_builtin' || x.$ === 'RBEmpty_elm_builtin') - { - x = $elm$core$Dict$toList(x); - y = $elm$core$Dict$toList(y); - } - //*/ - - /**_UNUSED/ - if (x.$ < 0) - { - x = $elm$core$Dict$toList(x); - y = $elm$core$Dict$toList(y); - } - //*/ - - for (var key in x) - { - if (!_Utils_eqHelp(x[key], y[key], depth + 1, stack)) - { - return false; - } - } - return true; -} - -var _Utils_equal = F2(_Utils_eq); -var _Utils_notEqual = F2(function(a, b) { return !_Utils_eq(a,b); }); - - - -// COMPARISONS - -// Code in Generate/JavaScript.hs, Basics.js, and List.js depends on -// the particular integer values assigned to LT, EQ, and GT. - -function _Utils_cmp(x, y, ord) -{ - if (typeof x !== 'object') - { - return x === y ? /*EQ*/ 0 : x < y ? /*LT*/ -1 : /*GT*/ 1; - } - - /**/ - if (x instanceof String) - { - var a = x.valueOf(); - var b = y.valueOf(); - return a === b ? 0 : a < b ? -1 : 1; - } - //*/ - - /**_UNUSED/ - if (typeof x.$ === 'undefined') - //*/ - /**/ - if (x.$[0] === '#') - //*/ - { - return (ord = _Utils_cmp(x.a, y.a)) - ? ord - : (ord = _Utils_cmp(x.b, y.b)) - ? ord - : _Utils_cmp(x.c, y.c); - } - - // traverse conses until end of a list or a mismatch - for (; x.b && y.b && !(ord = _Utils_cmp(x.a, y.a)); x = x.b, y = y.b) {} // WHILE_CONSES - return ord || (x.b ? /*GT*/ 1 : y.b ? /*LT*/ -1 : /*EQ*/ 0); -} - -var _Utils_lt = F2(function(a, b) { return _Utils_cmp(a, b) < 0; }); -var _Utils_le = F2(function(a, b) { return _Utils_cmp(a, b) < 1; }); -var _Utils_gt = F2(function(a, b) { return _Utils_cmp(a, b) > 0; }); -var _Utils_ge = F2(function(a, b) { return _Utils_cmp(a, b) >= 0; }); - -var _Utils_compare = F2(function(x, y) -{ - var n = _Utils_cmp(x, y); - return n < 0 ? $elm$core$Basics$LT : n ? $elm$core$Basics$GT : $elm$core$Basics$EQ; -}); - - -// COMMON VALUES - -var _Utils_Tuple0_UNUSED = 0; -var _Utils_Tuple0 = { $: '#0' }; - -function _Utils_Tuple2_UNUSED(a, b) { return { a: a, b: b }; } -function _Utils_Tuple2(a, b) { return { $: '#2', a: a, b: b }; } - -function _Utils_Tuple3_UNUSED(a, b, c) { return { a: a, b: b, c: c }; } -function _Utils_Tuple3(a, b, c) { return { $: '#3', a: a, b: b, c: c }; } - -function _Utils_chr_UNUSED(c) { return c; } -function _Utils_chr(c) { return new String(c); } - - -// RECORDS - -function _Utils_update(oldRecord, updatedFields) -{ - var newRecord = {}; - - for (var key in oldRecord) - { - newRecord[key] = oldRecord[key]; - } - - for (var key in updatedFields) - { - newRecord[key] = updatedFields[key]; - } - - return newRecord; -} - - -// APPEND - -var _Utils_append = F2(_Utils_ap); - -function _Utils_ap(xs, ys) -{ - // append Strings - if (typeof xs === 'string') - { - return xs + ys; - } - - // append Lists - if (!xs.b) - { - return ys; - } - var root = _List_Cons(xs.a, ys); - xs = xs.b - for (var curr = root; xs.b; xs = xs.b) // WHILE_CONS - { - curr = curr.b = _List_Cons(xs.a, ys); - } - return root; -} - - - -var _List_Nil_UNUSED = { $: 0 }; -var _List_Nil = { $: '[]' }; - -function _List_Cons_UNUSED(hd, tl) { return { $: 1, a: hd, b: tl }; } -function _List_Cons(hd, tl) { return { $: '::', a: hd, b: tl }; } - - -var _List_cons = F2(_List_Cons); - -function _List_fromArray(arr) -{ - var out = _List_Nil; - for (var i = arr.length; i--; ) - { - out = _List_Cons(arr[i], out); - } - return out; -} - -function _List_toArray(xs) -{ - for (var out = []; xs.b; xs = xs.b) // WHILE_CONS - { - out.push(xs.a); - } - return out; -} - -var _List_map2 = F3(function(f, xs, ys) -{ - for (var arr = []; xs.b && ys.b; xs = xs.b, ys = ys.b) // WHILE_CONSES - { - arr.push(A2(f, xs.a, ys.a)); - } - return _List_fromArray(arr); -}); - -var _List_map3 = F4(function(f, xs, ys, zs) -{ - for (var arr = []; xs.b && ys.b && zs.b; xs = xs.b, ys = ys.b, zs = zs.b) // WHILE_CONSES - { - arr.push(A3(f, xs.a, ys.a, zs.a)); - } - return _List_fromArray(arr); -}); - -var _List_map4 = F5(function(f, ws, xs, ys, zs) -{ - for (var arr = []; ws.b && xs.b && ys.b && zs.b; ws = ws.b, xs = xs.b, ys = ys.b, zs = zs.b) // WHILE_CONSES - { - arr.push(A4(f, ws.a, xs.a, ys.a, zs.a)); - } - return _List_fromArray(arr); -}); - -var _List_map5 = F6(function(f, vs, ws, xs, ys, zs) -{ - for (var arr = []; vs.b && ws.b && xs.b && ys.b && zs.b; vs = vs.b, ws = ws.b, xs = xs.b, ys = ys.b, zs = zs.b) // WHILE_CONSES - { - arr.push(A5(f, vs.a, ws.a, xs.a, ys.a, zs.a)); - } - return _List_fromArray(arr); -}); - -var _List_sortBy = F2(function(f, xs) -{ - return _List_fromArray(_List_toArray(xs).sort(function(a, b) { - return _Utils_cmp(f(a), f(b)); - })); -}); - -var _List_sortWith = F2(function(f, xs) -{ - return _List_fromArray(_List_toArray(xs).sort(function(a, b) { - var ord = A2(f, a, b); - return ord === $elm$core$Basics$EQ ? 0 : ord === $elm$core$Basics$LT ? -1 : 1; - })); -}); - - - -// MATH - -var _Basics_add = F2(function(a, b) { return a + b; }); -var _Basics_sub = F2(function(a, b) { return a - b; }); -var _Basics_mul = F2(function(a, b) { return a * b; }); -var _Basics_fdiv = F2(function(a, b) { return a / b; }); -var _Basics_idiv = F2(function(a, b) { return (a / b) | 0; }); -var _Basics_pow = F2(Math.pow); - -var _Basics_remainderBy = F2(function(b, a) { return a % b; }); - -// https://www.microsoft.com/en-us/research/wp-content/uploads/2016/02/divmodnote-letter.pdf -var _Basics_modBy = F2(function(modulus, x) -{ - var answer = x % modulus; - return modulus === 0 - ? _Debug_crash(11) - : - ((answer > 0 && modulus < 0) || (answer < 0 && modulus > 0)) - ? answer + modulus - : answer; -}); - - -// TRIGONOMETRY - -var _Basics_pi = Math.PI; -var _Basics_e = Math.E; -var _Basics_cos = Math.cos; -var _Basics_sin = Math.sin; -var _Basics_tan = Math.tan; -var _Basics_acos = Math.acos; -var _Basics_asin = Math.asin; -var _Basics_atan = Math.atan; -var _Basics_atan2 = F2(Math.atan2); - - -// MORE MATH - -function _Basics_toFloat(x) { return x; } -function _Basics_truncate(n) { return n | 0; } -function _Basics_isInfinite(n) { return n === Infinity || n === -Infinity; } - -var _Basics_ceiling = Math.ceil; -var _Basics_floor = Math.floor; -var _Basics_round = Math.round; -var _Basics_sqrt = Math.sqrt; -var _Basics_log = Math.log; -var _Basics_isNaN = isNaN; - - -// BOOLEANS - -function _Basics_not(bool) { return !bool; } -var _Basics_and = F2(function(a, b) { return a && b; }); -var _Basics_or = F2(function(a, b) { return a || b; }); -var _Basics_xor = F2(function(a, b) { return a !== b; }); - - - -var _String_cons = F2(function(chr, str) -{ - return chr + str; -}); - -function _String_uncons(string) -{ - var word = string.charCodeAt(0); - return !isNaN(word) - ? $elm$core$Maybe$Just( - 0xD800 <= word && word <= 0xDBFF - ? _Utils_Tuple2(_Utils_chr(string[0] + string[1]), string.slice(2)) - : _Utils_Tuple2(_Utils_chr(string[0]), string.slice(1)) - ) - : $elm$core$Maybe$Nothing; -} - -var _String_append = F2(function(a, b) -{ - return a + b; -}); - -function _String_length(str) -{ - return str.length; -} - -var _String_map = F2(function(func, string) -{ - var len = string.length; - var array = new Array(len); - var i = 0; - while (i < len) - { - var word = string.charCodeAt(i); - if (0xD800 <= word && word <= 0xDBFF) - { - array[i] = func(_Utils_chr(string[i] + string[i+1])); - i += 2; - continue; - } - array[i] = func(_Utils_chr(string[i])); - i++; - } - return array.join(''); -}); - -var _String_filter = F2(function(isGood, str) -{ - var arr = []; - var len = str.length; - var i = 0; - while (i < len) - { - var char = str[i]; - var word = str.charCodeAt(i); - i++; - if (0xD800 <= word && word <= 0xDBFF) - { - char += str[i]; - i++; - } - - if (isGood(_Utils_chr(char))) - { - arr.push(char); - } - } - return arr.join(''); -}); - -function _String_reverse(str) -{ - var len = str.length; - var arr = new Array(len); - var i = 0; - while (i < len) - { - var word = str.charCodeAt(i); - if (0xD800 <= word && word <= 0xDBFF) - { - arr[len - i] = str[i + 1]; - i++; - arr[len - i] = str[i - 1]; - i++; - } - else - { - arr[len - i] = str[i]; - i++; - } - } - return arr.join(''); -} - -var _String_foldl = F3(function(func, state, string) -{ - var len = string.length; - var i = 0; - while (i < len) - { - var char = string[i]; - var word = string.charCodeAt(i); - i++; - if (0xD800 <= word && word <= 0xDBFF) - { - char += string[i]; - i++; - } - state = A2(func, _Utils_chr(char), state); - } - return state; -}); - -var _String_foldr = F3(function(func, state, string) -{ - var i = string.length; - while (i--) - { - var char = string[i]; - var word = string.charCodeAt(i); - if (0xDC00 <= word && word <= 0xDFFF) - { - i--; - char = string[i] + char; - } - state = A2(func, _Utils_chr(char), state); - } - return state; -}); - -var _String_split = F2(function(sep, str) -{ - return str.split(sep); -}); - -var _String_join = F2(function(sep, strs) -{ - return strs.join(sep); -}); - -var _String_slice = F3(function(start, end, str) { - return str.slice(start, end); -}); - -function _String_trim(str) -{ - return str.trim(); -} - -function _String_trimLeft(str) -{ - return str.replace(/^\s+/, ''); -} - -function _String_trimRight(str) -{ - return str.replace(/\s+$/, ''); -} - -function _String_words(str) -{ - return _List_fromArray(str.trim().split(/\s+/g)); -} - -function _String_lines(str) -{ - return _List_fromArray(str.split(/\r\n|\r|\n/g)); -} - -function _String_toUpper(str) -{ - return str.toUpperCase(); -} - -function _String_toLower(str) -{ - return str.toLowerCase(); -} - -var _String_any = F2(function(isGood, string) -{ - var i = string.length; - while (i--) - { - var char = string[i]; - var word = string.charCodeAt(i); - if (0xDC00 <= word && word <= 0xDFFF) - { - i--; - char = string[i] + char; - } - if (isGood(_Utils_chr(char))) - { - return true; - } - } - return false; -}); - -var _String_all = F2(function(isGood, string) -{ - var i = string.length; - while (i--) - { - var char = string[i]; - var word = string.charCodeAt(i); - if (0xDC00 <= word && word <= 0xDFFF) - { - i--; - char = string[i] + char; - } - if (!isGood(_Utils_chr(char))) - { - return false; - } - } - return true; -}); - -var _String_contains = F2(function(sub, str) -{ - return str.indexOf(sub) > -1; -}); - -var _String_startsWith = F2(function(sub, str) -{ - return str.indexOf(sub) === 0; -}); - -var _String_endsWith = F2(function(sub, str) -{ - return str.length >= sub.length && - str.lastIndexOf(sub) === str.length - sub.length; -}); - -var _String_indexes = F2(function(sub, str) -{ - var subLen = sub.length; - - if (subLen < 1) - { - return _List_Nil; - } - - var i = 0; - var is = []; - - while ((i = str.indexOf(sub, i)) > -1) - { - is.push(i); - i = i + subLen; - } - - return _List_fromArray(is); -}); - - -// TO STRING - -function _String_fromNumber(number) -{ - return number + ''; -} - - -// INT CONVERSIONS - -function _String_toInt(str) -{ - var total = 0; - var code0 = str.charCodeAt(0); - var start = code0 == 0x2B /* + */ || code0 == 0x2D /* - */ ? 1 : 0; - - for (var i = start; i < str.length; ++i) - { - var code = str.charCodeAt(i); - if (code < 0x30 || 0x39 < code) - { - return $elm$core$Maybe$Nothing; - } - total = 10 * total + code - 0x30; - } - - return i == start - ? $elm$core$Maybe$Nothing - : $elm$core$Maybe$Just(code0 == 0x2D ? -total : total); -} - - -// FLOAT CONVERSIONS - -function _String_toFloat(s) -{ - // check if it is a hex, octal, or binary number - if (s.length === 0 || /[\sxbo]/.test(s)) - { - return $elm$core$Maybe$Nothing; - } - var n = +s; - // faster isNaN check - return n === n ? $elm$core$Maybe$Just(n) : $elm$core$Maybe$Nothing; -} - -function _String_fromList(chars) -{ - return _List_toArray(chars).join(''); -} - - - - -function _Char_toCode(char) -{ - var code = char.charCodeAt(0); - if (0xD800 <= code && code <= 0xDBFF) - { - return (code - 0xD800) * 0x400 + char.charCodeAt(1) - 0xDC00 + 0x10000 - } - return code; -} - -function _Char_fromCode(code) -{ - return _Utils_chr( - (code < 0 || 0x10FFFF < code) - ? '\uFFFD' - : - (code <= 0xFFFF) - ? String.fromCharCode(code) - : - (code -= 0x10000, - String.fromCharCode(Math.floor(code / 0x400) + 0xD800, code % 0x400 + 0xDC00) - ) - ); -} - -function _Char_toUpper(char) -{ - return _Utils_chr(char.toUpperCase()); -} - -function _Char_toLower(char) -{ - return _Utils_chr(char.toLowerCase()); -} - -function _Char_toLocaleUpper(char) -{ - return _Utils_chr(char.toLocaleUpperCase()); -} - -function _Char_toLocaleLower(char) -{ - return _Utils_chr(char.toLocaleLowerCase()); -} - - - -/**/ -function _Json_errorToString(error) -{ - return $elm$json$Json$Decode$errorToString(error); -} -//*/ - - -// CORE DECODERS - -function _Json_succeed(msg) -{ - return { - $: 0, - a: msg - }; -} - -function _Json_fail(msg) -{ - return { - $: 1, - a: msg - }; -} - -function _Json_decodePrim(decoder) -{ - return { $: 2, b: decoder }; -} - -var _Json_decodeInt = _Json_decodePrim(function(value) { - return (typeof value !== 'number') - ? _Json_expecting('an INT', value) - : - (-2147483647 < value && value < 2147483647 && (value | 0) === value) - ? $elm$core$Result$Ok(value) - : - (isFinite(value) && !(value % 1)) - ? $elm$core$Result$Ok(value) - : _Json_expecting('an INT', value); -}); - -var _Json_decodeBool = _Json_decodePrim(function(value) { - return (typeof value === 'boolean') - ? $elm$core$Result$Ok(value) - : _Json_expecting('a BOOL', value); -}); - -var _Json_decodeFloat = _Json_decodePrim(function(value) { - return (typeof value === 'number') - ? $elm$core$Result$Ok(value) - : _Json_expecting('a FLOAT', value); -}); - -var _Json_decodeValue = _Json_decodePrim(function(value) { - return $elm$core$Result$Ok(_Json_wrap(value)); -}); - -var _Json_decodeString = _Json_decodePrim(function(value) { - return (typeof value === 'string') - ? $elm$core$Result$Ok(value) - : (value instanceof String) - ? $elm$core$Result$Ok(value + '') - : _Json_expecting('a STRING', value); -}); - -function _Json_decodeList(decoder) { return { $: 3, b: decoder }; } -function _Json_decodeArray(decoder) { return { $: 4, b: decoder }; } - -function _Json_decodeNull(value) { return { $: 5, c: value }; } - -var _Json_decodeField = F2(function(field, decoder) -{ - return { - $: 6, - d: field, - b: decoder - }; -}); - -var _Json_decodeIndex = F2(function(index, decoder) -{ - return { - $: 7, - e: index, - b: decoder - }; -}); - -function _Json_decodeKeyValuePairs(decoder) -{ - return { - $: 8, - b: decoder - }; -} - -function _Json_mapMany(f, decoders) -{ - return { - $: 9, - f: f, - g: decoders - }; -} - -var _Json_andThen = F2(function(callback, decoder) -{ - return { - $: 10, - b: decoder, - h: callback - }; -}); - -function _Json_oneOf(decoders) -{ - return { - $: 11, - g: decoders - }; -} - - -// DECODING OBJECTS - -var _Json_map1 = F2(function(f, d1) -{ - return _Json_mapMany(f, [d1]); -}); - -var _Json_map2 = F3(function(f, d1, d2) -{ - return _Json_mapMany(f, [d1, d2]); -}); - -var _Json_map3 = F4(function(f, d1, d2, d3) -{ - return _Json_mapMany(f, [d1, d2, d3]); -}); - -var _Json_map4 = F5(function(f, d1, d2, d3, d4) -{ - return _Json_mapMany(f, [d1, d2, d3, d4]); -}); - -var _Json_map5 = F6(function(f, d1, d2, d3, d4, d5) -{ - return _Json_mapMany(f, [d1, d2, d3, d4, d5]); -}); - -var _Json_map6 = F7(function(f, d1, d2, d3, d4, d5, d6) -{ - return _Json_mapMany(f, [d1, d2, d3, d4, d5, d6]); -}); - -var _Json_map7 = F8(function(f, d1, d2, d3, d4, d5, d6, d7) -{ - return _Json_mapMany(f, [d1, d2, d3, d4, d5, d6, d7]); -}); - -var _Json_map8 = F9(function(f, d1, d2, d3, d4, d5, d6, d7, d8) -{ - return _Json_mapMany(f, [d1, d2, d3, d4, d5, d6, d7, d8]); -}); - - -// DECODE - -var _Json_runOnString = F2(function(decoder, string) -{ - try - { - var value = JSON.parse(string); - return _Json_runHelp(decoder, value); - } - catch (e) - { - return $elm$core$Result$Err(A2($elm$json$Json$Decode$Failure, 'This is not valid JSON! ' + e.message, _Json_wrap(string))); - } -}); - -var _Json_run = F2(function(decoder, value) -{ - return _Json_runHelp(decoder, _Json_unwrap(value)); -}); - -function _Json_runHelp(decoder, value) -{ - switch (decoder.$) - { - case 2: - return decoder.b(value); - - case 5: - return (value === null) - ? $elm$core$Result$Ok(decoder.c) - : _Json_expecting('null', value); - - case 3: - if (!_Json_isArray(value)) - { - return _Json_expecting('a LIST', value); - } - return _Json_runArrayDecoder(decoder.b, value, _List_fromArray); - - case 4: - if (!_Json_isArray(value)) - { - return _Json_expecting('an ARRAY', value); - } - return _Json_runArrayDecoder(decoder.b, value, _Json_toElmArray); - - case 6: - var field = decoder.d; - if (typeof value !== 'object' || value === null || !(field in value)) - { - return _Json_expecting('an OBJECT with a field named `' + field + '`', value); - } - var result = _Json_runHelp(decoder.b, value[field]); - return ($elm$core$Result$isOk(result)) ? result : $elm$core$Result$Err(A2($elm$json$Json$Decode$Field, field, result.a)); - - case 7: - var index = decoder.e; - if (!_Json_isArray(value)) - { - return _Json_expecting('an ARRAY', value); - } - if (index >= value.length) - { - return _Json_expecting('a LONGER array. Need index ' + index + ' but only see ' + value.length + ' entries', value); - } - var result = _Json_runHelp(decoder.b, value[index]); - return ($elm$core$Result$isOk(result)) ? result : $elm$core$Result$Err(A2($elm$json$Json$Decode$Index, index, result.a)); - - case 8: - if (typeof value !== 'object' || value === null || _Json_isArray(value)) - { - return _Json_expecting('an OBJECT', value); - } - - var keyValuePairs = _List_Nil; - // TODO test perf of Object.keys and switch when support is good enough - for (var key in value) - { - if (value.hasOwnProperty(key)) - { - var result = _Json_runHelp(decoder.b, value[key]); - if (!$elm$core$Result$isOk(result)) - { - return $elm$core$Result$Err(A2($elm$json$Json$Decode$Field, key, result.a)); - } - keyValuePairs = _List_Cons(_Utils_Tuple2(key, result.a), keyValuePairs); - } - } - return $elm$core$Result$Ok($elm$core$List$reverse(keyValuePairs)); - - case 9: - var answer = decoder.f; - var decoders = decoder.g; - for (var i = 0; i < decoders.length; i++) - { - var result = _Json_runHelp(decoders[i], value); - if (!$elm$core$Result$isOk(result)) - { - return result; - } - answer = answer(result.a); - } - return $elm$core$Result$Ok(answer); - - case 10: - var result = _Json_runHelp(decoder.b, value); - return (!$elm$core$Result$isOk(result)) - ? result - : _Json_runHelp(decoder.h(result.a), value); - - case 11: - var errors = _List_Nil; - for (var temp = decoder.g; temp.b; temp = temp.b) // WHILE_CONS - { - var result = _Json_runHelp(temp.a, value); - if ($elm$core$Result$isOk(result)) - { - return result; - } - errors = _List_Cons(result.a, errors); - } - return $elm$core$Result$Err($elm$json$Json$Decode$OneOf($elm$core$List$reverse(errors))); - - case 1: - return $elm$core$Result$Err(A2($elm$json$Json$Decode$Failure, decoder.a, _Json_wrap(value))); - - case 0: - return $elm$core$Result$Ok(decoder.a); - } -} - -function _Json_runArrayDecoder(decoder, value, toElmValue) -{ - var len = value.length; - var array = new Array(len); - for (var i = 0; i < len; i++) - { - var result = _Json_runHelp(decoder, value[i]); - if (!$elm$core$Result$isOk(result)) - { - return $elm$core$Result$Err(A2($elm$json$Json$Decode$Index, i, result.a)); - } - array[i] = result.a; - } - return $elm$core$Result$Ok(toElmValue(array)); -} - -function _Json_isArray(value) -{ - return Array.isArray(value) || (typeof FileList !== 'undefined' && value instanceof FileList); -} - -function _Json_toElmArray(array) -{ - return A2($elm$core$Array$initialize, array.length, function(i) { return array[i]; }); -} - -function _Json_expecting(type, value) -{ - return $elm$core$Result$Err(A2($elm$json$Json$Decode$Failure, 'Expecting ' + type, _Json_wrap(value))); -} - - -// EQUALITY - -function _Json_equality(x, y) -{ - if (x === y) - { - return true; - } - - if (x.$ !== y.$) - { - return false; - } - - switch (x.$) - { - case 0: - case 1: - return x.a === y.a; - - case 2: - return x.b === y.b; - - case 5: - return x.c === y.c; - - case 3: - case 4: - case 8: - return _Json_equality(x.b, y.b); - - case 6: - return x.d === y.d && _Json_equality(x.b, y.b); - - case 7: - return x.e === y.e && _Json_equality(x.b, y.b); - - case 9: - return x.f === y.f && _Json_listEquality(x.g, y.g); - - case 10: - return x.h === y.h && _Json_equality(x.b, y.b); - - case 11: - return _Json_listEquality(x.g, y.g); - } -} - -function _Json_listEquality(aDecoders, bDecoders) -{ - var len = aDecoders.length; - if (len !== bDecoders.length) - { - return false; - } - for (var i = 0; i < len; i++) - { - if (!_Json_equality(aDecoders[i], bDecoders[i])) - { - return false; - } - } - return true; -} - - -// ENCODE - -var _Json_encode = F2(function(indentLevel, value) -{ - return JSON.stringify(_Json_unwrap(value), null, indentLevel) + ''; -}); - -function _Json_wrap(value) { return { $: 0, a: value }; } -function _Json_unwrap(value) { return value.a; } - -function _Json_wrap_UNUSED(value) { return value; } -function _Json_unwrap_UNUSED(value) { return value; } - -function _Json_emptyArray() { return []; } -function _Json_emptyObject() { return {}; } - -var _Json_addField = F3(function(key, value, object) -{ - object[key] = _Json_unwrap(value); - return object; -}); - -function _Json_addEntry(func) -{ - return F2(function(entry, array) - { - array.push(_Json_unwrap(func(entry))); - return array; - }); -} - -var _Json_encodeNull = _Json_wrap(null); - - - -// TASKS - -function _Scheduler_succeed(value) -{ - return { - $: 0, - a: value - }; -} - -function _Scheduler_fail(error) -{ - return { - $: 1, - a: error - }; -} - -function _Scheduler_binding(callback) -{ - return { - $: 2, - b: callback, - c: null - }; -} - -var _Scheduler_andThen = F2(function(callback, task) -{ - return { - $: 3, - b: callback, - d: task - }; -}); - -var _Scheduler_onError = F2(function(callback, task) -{ - return { - $: 4, - b: callback, - d: task - }; -}); - -function _Scheduler_receive(callback) -{ - return { - $: 5, - b: callback - }; -} - - -// PROCESSES - -var _Scheduler_guid = 0; - -function _Scheduler_rawSpawn(task) -{ - var proc = { - $: 0, - e: _Scheduler_guid++, - f: task, - g: null, - h: [] - }; - - _Scheduler_enqueue(proc); - - return proc; -} - -function _Scheduler_spawn(task) -{ - return _Scheduler_binding(function(callback) { - callback(_Scheduler_succeed(_Scheduler_rawSpawn(task))); - }); -} - -function _Scheduler_rawSend(proc, msg) -{ - proc.h.push(msg); - _Scheduler_enqueue(proc); -} - -var _Scheduler_send = F2(function(proc, msg) -{ - return _Scheduler_binding(function(callback) { - _Scheduler_rawSend(proc, msg); - callback(_Scheduler_succeed(_Utils_Tuple0)); - }); -}); - -function _Scheduler_kill(proc) -{ - return _Scheduler_binding(function(callback) { - var task = proc.f; - if (task.$ === 2 && task.c) - { - task.c(); - } - - proc.f = null; - - callback(_Scheduler_succeed(_Utils_Tuple0)); - }); -} - - -/* STEP PROCESSES - -type alias Process = - { $ : tag - , id : unique_id - , root : Task - , stack : null | { $: SUCCEED | FAIL, a: callback, b: stack } - , mailbox : [msg] - } - -*/ - - -var _Scheduler_working = false; -var _Scheduler_queue = []; - - -function _Scheduler_enqueue(proc) -{ - _Scheduler_queue.push(proc); - if (_Scheduler_working) - { - return; - } - _Scheduler_working = true; - while (proc = _Scheduler_queue.shift()) - { - _Scheduler_step(proc); - } - _Scheduler_working = false; -} - - -function _Scheduler_step(proc) -{ - while (proc.f) - { - var rootTag = proc.f.$; - if (rootTag === 0 || rootTag === 1) - { - while (proc.g && proc.g.$ !== rootTag) - { - proc.g = proc.g.i; - } - if (!proc.g) - { - return; - } - proc.f = proc.g.b(proc.f.a); - proc.g = proc.g.i; - } - else if (rootTag === 2) - { - proc.f.c = proc.f.b(function(newRoot) { - proc.f = newRoot; - _Scheduler_enqueue(proc); - }); - return; - } - else if (rootTag === 5) - { - if (proc.h.length === 0) - { - return; - } - proc.f = proc.f.b(proc.h.shift()); - } - else // if (rootTag === 3 || rootTag === 4) - { - proc.g = { - $: rootTag === 3 ? 0 : 1, - b: proc.f.b, - i: proc.g - }; - proc.f = proc.f.d; - } - } -} - - - -function _Process_sleep(time) -{ - return _Scheduler_binding(function(callback) { - var id = setTimeout(function() { - callback(_Scheduler_succeed(_Utils_Tuple0)); - }, time); - - return function() { clearTimeout(id); }; - }); -} - - - - -// PROGRAMS - - -var _Platform_worker = F4(function(impl, flagDecoder, debugMetadata, args) -{ - return _Platform_initialize( - flagDecoder, - args, - impl.init, - impl.update, - impl.subscriptions, - function() { return function() {} } - ); -}); - - - -// INITIALIZE A PROGRAM - - -function _Platform_initialize(flagDecoder, args, init, update, subscriptions, stepperBuilder) -{ - var result = A2(_Json_run, flagDecoder, _Json_wrap(args ? args['flags'] : undefined)); - $elm$core$Result$isOk(result) || _Debug_crash(2 /**/, _Json_errorToString(result.a) /**/); - var managers = {}; - var initPair = init(result.a); - var model = initPair.a; - var stepper = stepperBuilder(sendToApp, model); - var ports = _Platform_setupEffects(managers, sendToApp); - - function sendToApp(msg, viewMetadata) - { - var pair = A2(update, msg, model); - stepper(model = pair.a, viewMetadata); - _Platform_enqueueEffects(managers, pair.b, subscriptions(model)); - } - - _Platform_enqueueEffects(managers, initPair.b, subscriptions(model)); - - return ports ? { ports: ports } : {}; -} - - - -// TRACK PRELOADS -// -// This is used by code in elm/browser and elm/http -// to register any HTTP requests that are triggered by init. -// - - -var _Platform_preload; - - -function _Platform_registerPreload(url) -{ - _Platform_preload.add(url); -} - - - -// EFFECT MANAGERS - - -var _Platform_effectManagers = {}; - - -function _Platform_setupEffects(managers, sendToApp) -{ - var ports; - - // setup all necessary effect managers - for (var key in _Platform_effectManagers) - { - var manager = _Platform_effectManagers[key]; - - if (manager.a) - { - ports = ports || {}; - ports[key] = manager.a(key, sendToApp); - } - - managers[key] = _Platform_instantiateManager(manager, sendToApp); - } - - return ports; -} - - -function _Platform_createManager(init, onEffects, onSelfMsg, cmdMap, subMap) -{ - return { - b: init, - c: onEffects, - d: onSelfMsg, - e: cmdMap, - f: subMap - }; -} - - -function _Platform_instantiateManager(info, sendToApp) -{ - var router = { - g: sendToApp, - h: undefined - }; - - var onEffects = info.c; - var onSelfMsg = info.d; - var cmdMap = info.e; - var subMap = info.f; - - function loop(state) - { - return A2(_Scheduler_andThen, loop, _Scheduler_receive(function(msg) - { - var value = msg.a; - - if (msg.$ === 0) - { - return A3(onSelfMsg, router, value, state); - } - - return cmdMap && subMap - ? A4(onEffects, router, value.i, value.j, state) - : A3(onEffects, router, cmdMap ? value.i : value.j, state); - })); - } - - return router.h = _Scheduler_rawSpawn(A2(_Scheduler_andThen, loop, info.b)); -} - - - -// ROUTING - - -var _Platform_sendToApp = F2(function(router, msg) -{ - return _Scheduler_binding(function(callback) - { - router.g(msg); - callback(_Scheduler_succeed(_Utils_Tuple0)); - }); -}); - - -var _Platform_sendToSelf = F2(function(router, msg) -{ - return A2(_Scheduler_send, router.h, { - $: 0, - a: msg - }); -}); - - - -// BAGS - - -function _Platform_leaf(home) -{ - return function(value) - { - return { - $: 1, - k: home, - l: value - }; - }; -} - - -function _Platform_batch(list) -{ - return { - $: 2, - m: list - }; -} - - -var _Platform_map = F2(function(tagger, bag) -{ - return { - $: 3, - n: tagger, - o: bag - } -}); - - - -// PIPE BAGS INTO EFFECT MANAGERS -// -// Effects must be queued! -// -// Say your init contains a synchronous command, like Time.now or Time.here -// -// - This will produce a batch of effects (FX_1) -// - The synchronous task triggers the subsequent `update` call -// - This will produce a batch of effects (FX_2) -// -// If we just start dispatching FX_2, subscriptions from FX_2 can be processed -// before subscriptions from FX_1. No good! Earlier versions of this code had -// this problem, leading to these reports: -// -// https://github.com/elm/core/issues/980 -// https://github.com/elm/core/pull/981 -// https://github.com/elm/compiler/issues/1776 -// -// The queue is necessary to avoid ordering issues for synchronous commands. - - -// Why use true/false here? Why not just check the length of the queue? -// The goal is to detect "are we currently dispatching effects?" If we -// are, we need to bail and let the ongoing while loop handle things. -// -// Now say the queue has 1 element. When we dequeue the final element, -// the queue will be empty, but we are still actively dispatching effects. -// So you could get queue jumping in a really tricky category of cases. -// -var _Platform_effectsQueue = []; -var _Platform_effectsActive = false; - - -function _Platform_enqueueEffects(managers, cmdBag, subBag) -{ - _Platform_effectsQueue.push({ p: managers, q: cmdBag, r: subBag }); - - if (_Platform_effectsActive) return; - - _Platform_effectsActive = true; - for (var fx; fx = _Platform_effectsQueue.shift(); ) - { - _Platform_dispatchEffects(fx.p, fx.q, fx.r); - } - _Platform_effectsActive = false; -} - - -function _Platform_dispatchEffects(managers, cmdBag, subBag) -{ - var effectsDict = {}; - _Platform_gatherEffects(true, cmdBag, effectsDict, null); - _Platform_gatherEffects(false, subBag, effectsDict, null); - - for (var home in managers) - { - _Scheduler_rawSend(managers[home], { - $: 'fx', - a: effectsDict[home] || { i: _List_Nil, j: _List_Nil } - }); - } -} - - -function _Platform_gatherEffects(isCmd, bag, effectsDict, taggers) -{ - switch (bag.$) - { - case 1: - var home = bag.k; - var effect = _Platform_toEffect(isCmd, home, taggers, bag.l); - effectsDict[home] = _Platform_insert(isCmd, effect, effectsDict[home]); - return; - - case 2: - for (var list = bag.m; list.b; list = list.b) // WHILE_CONS - { - _Platform_gatherEffects(isCmd, list.a, effectsDict, taggers); - } - return; - - case 3: - _Platform_gatherEffects(isCmd, bag.o, effectsDict, { - s: bag.n, - t: taggers - }); - return; - } -} - - -function _Platform_toEffect(isCmd, home, taggers, value) -{ - function applyTaggers(x) - { - for (var temp = taggers; temp; temp = temp.t) - { - x = temp.s(x); - } - return x; - } - - var map = isCmd - ? _Platform_effectManagers[home].e - : _Platform_effectManagers[home].f; - - return A2(map, applyTaggers, value) -} - - -function _Platform_insert(isCmd, newEffect, effects) -{ - effects = effects || { i: _List_Nil, j: _List_Nil }; - - isCmd - ? (effects.i = _List_Cons(newEffect, effects.i)) - : (effects.j = _List_Cons(newEffect, effects.j)); - - return effects; -} - - - -// PORTS - - -function _Platform_checkPortName(name) -{ - if (_Platform_effectManagers[name]) - { - _Debug_crash(3, name) - } -} - - - -// OUTGOING PORTS - - -function _Platform_outgoingPort(name, converter) -{ - _Platform_checkPortName(name); - _Platform_effectManagers[name] = { - e: _Platform_outgoingPortMap, - u: converter, - a: _Platform_setupOutgoingPort - }; - return _Platform_leaf(name); -} - - -var _Platform_outgoingPortMap = F2(function(tagger, value) { return value; }); - - -function _Platform_setupOutgoingPort(name) -{ - var subs = []; - var converter = _Platform_effectManagers[name].u; - - // CREATE MANAGER - - var init = _Process_sleep(0); - - _Platform_effectManagers[name].b = init; - _Platform_effectManagers[name].c = F3(function(router, cmdList, state) - { - for ( ; cmdList.b; cmdList = cmdList.b) // WHILE_CONS - { - // grab a separate reference to subs in case unsubscribe is called - var currentSubs = subs; - var value = _Json_unwrap(converter(cmdList.a)); - for (var i = 0; i < currentSubs.length; i++) - { - currentSubs[i](value); - } - } - return init; - }); - - // PUBLIC API - - function subscribe(callback) - { - subs.push(callback); - } - - function unsubscribe(callback) - { - // copy subs into a new array in case unsubscribe is called within a - // subscribed callback - subs = subs.slice(); - var index = subs.indexOf(callback); - if (index >= 0) - { - subs.splice(index, 1); - } - } - - return { - subscribe: subscribe, - unsubscribe: unsubscribe - }; -} - - - -// INCOMING PORTS - - -function _Platform_incomingPort(name, converter) -{ - _Platform_checkPortName(name); - _Platform_effectManagers[name] = { - f: _Platform_incomingPortMap, - u: converter, - a: _Platform_setupIncomingPort - }; - return _Platform_leaf(name); -} - - -var _Platform_incomingPortMap = F2(function(tagger, finalTagger) -{ - return function(value) - { - return tagger(finalTagger(value)); - }; -}); - - -function _Platform_setupIncomingPort(name, sendToApp) -{ - var subs = _List_Nil; - var converter = _Platform_effectManagers[name].u; - - // CREATE MANAGER - - var init = _Scheduler_succeed(null); - - _Platform_effectManagers[name].b = init; - _Platform_effectManagers[name].c = F3(function(router, subList, state) - { - subs = subList; - return init; - }); - - // PUBLIC API - - function send(incomingValue) - { - var result = A2(_Json_run, converter, _Json_wrap(incomingValue)); - - $elm$core$Result$isOk(result) || _Debug_crash(4, name, result.a); - - var value = result.a; - for (var temp = subs; temp.b; temp = temp.b) // WHILE_CONS - { - sendToApp(temp.a(value)); - } - } - - return { send: send }; -} - - - -// EXPORT ELM MODULES -// -// Have DEBUG and PROD versions so that we can (1) give nicer errors in -// debug mode and (2) not pay for the bits needed for that in prod mode. -// - - -function _Platform_export_UNUSED(exports) -{ - scope['Elm'] - ? _Platform_mergeExportsProd(scope['Elm'], exports) - : scope['Elm'] = exports; -} - - -function _Platform_mergeExportsProd(obj, exports) -{ - for (var name in exports) - { - (name in obj) - ? (name == 'init') - ? _Debug_crash(6) - : _Platform_mergeExportsProd(obj[name], exports[name]) - : (obj[name] = exports[name]); - } -} - - -function _Platform_export(exports) -{ - scope['Elm'] - ? _Platform_mergeExportsDebug('Elm', scope['Elm'], exports) - : scope['Elm'] = exports; -} - - -function _Platform_mergeExportsDebug(moduleName, obj, exports) -{ - for (var name in exports) - { - (name in obj) - ? (name == 'init') - ? _Debug_crash(6, moduleName) - : _Platform_mergeExportsDebug(moduleName + '.' + name, obj[name], exports[name]) - : (obj[name] = exports[name]); - } -} - - - - -// HELPERS - - -var _VirtualDom_divertHrefToApp; - -var _VirtualDom_doc = typeof document !== 'undefined' ? document : {}; - - -function _VirtualDom_appendChild(parent, child) -{ - parent.appendChild(child); -} - -var _VirtualDom_init = F4(function(virtualNode, flagDecoder, debugMetadata, args) -{ - // NOTE: this function needs _Platform_export available to work - - /**_UNUSED/ - var node = args['node']; - //*/ - /**/ - var node = args && args['node'] ? args['node'] : _Debug_crash(0); - //*/ - - node.parentNode.replaceChild( - _VirtualDom_render(virtualNode, function() {}), - node - ); - - return {}; -}); - - - -// TEXT - - -function _VirtualDom_text(string) -{ - return { - $: 0, - a: string - }; -} - - - -// NODE - - -var _VirtualDom_nodeNS = F2(function(namespace, tag) -{ - return F2(function(factList, kidList) - { - for (var kids = [], descendantsCount = 0; kidList.b; kidList = kidList.b) // WHILE_CONS - { - var kid = kidList.a; - descendantsCount += (kid.b || 0); - kids.push(kid); - } - descendantsCount += kids.length; - - return { - $: 1, - c: tag, - d: _VirtualDom_organizeFacts(factList), - e: kids, - f: namespace, - b: descendantsCount - }; - }); -}); - - -var _VirtualDom_node = _VirtualDom_nodeNS(undefined); - - - -// KEYED NODE - - -var _VirtualDom_keyedNodeNS = F2(function(namespace, tag) -{ - return F2(function(factList, kidList) - { - for (var kids = [], descendantsCount = 0; kidList.b; kidList = kidList.b) // WHILE_CONS - { - var kid = kidList.a; - descendantsCount += (kid.b.b || 0); - kids.push(kid); - } - descendantsCount += kids.length; - - return { - $: 2, - c: tag, - d: _VirtualDom_organizeFacts(factList), - e: kids, - f: namespace, - b: descendantsCount - }; - }); -}); - - -var _VirtualDom_keyedNode = _VirtualDom_keyedNodeNS(undefined); - - - -// CUSTOM - - -function _VirtualDom_custom(factList, model, render, diff) -{ - return { - $: 3, - d: _VirtualDom_organizeFacts(factList), - g: model, - h: render, - i: diff - }; -} - - - -// MAP - - -var _VirtualDom_map = F2(function(tagger, node) -{ - return { - $: 4, - j: tagger, - k: node, - b: 1 + (node.b || 0) - }; -}); - - - -// LAZY - - -function _VirtualDom_thunk(refs, thunk) -{ - return { - $: 5, - l: refs, - m: thunk, - k: undefined - }; -} - -var _VirtualDom_lazy = F2(function(func, a) -{ - return _VirtualDom_thunk([func, a], function() { - return func(a); - }); -}); - -var _VirtualDom_lazy2 = F3(function(func, a, b) -{ - return _VirtualDom_thunk([func, a, b], function() { - return A2(func, a, b); - }); -}); - -var _VirtualDom_lazy3 = F4(function(func, a, b, c) -{ - return _VirtualDom_thunk([func, a, b, c], function() { - return A3(func, a, b, c); - }); -}); - -var _VirtualDom_lazy4 = F5(function(func, a, b, c, d) -{ - return _VirtualDom_thunk([func, a, b, c, d], function() { - return A4(func, a, b, c, d); - }); -}); - -var _VirtualDom_lazy5 = F6(function(func, a, b, c, d, e) -{ - return _VirtualDom_thunk([func, a, b, c, d, e], function() { - return A5(func, a, b, c, d, e); - }); -}); - -var _VirtualDom_lazy6 = F7(function(func, a, b, c, d, e, f) -{ - return _VirtualDom_thunk([func, a, b, c, d, e, f], function() { - return A6(func, a, b, c, d, e, f); - }); -}); - -var _VirtualDom_lazy7 = F8(function(func, a, b, c, d, e, f, g) -{ - return _VirtualDom_thunk([func, a, b, c, d, e, f, g], function() { - return A7(func, a, b, c, d, e, f, g); - }); -}); - -var _VirtualDom_lazy8 = F9(function(func, a, b, c, d, e, f, g, h) -{ - return _VirtualDom_thunk([func, a, b, c, d, e, f, g, h], function() { - return A8(func, a, b, c, d, e, f, g, h); - }); -}); - - - -// FACTS - - -var _VirtualDom_on = F2(function(key, handler) -{ - return { - $: 'a0', - n: key, - o: handler - }; -}); -var _VirtualDom_style = F2(function(key, value) -{ - return { - $: 'a1', - n: key, - o: value - }; -}); -var _VirtualDom_property = F2(function(key, value) -{ - return { - $: 'a2', - n: key, - o: value - }; -}); -var _VirtualDom_attribute = F2(function(key, value) -{ - return { - $: 'a3', - n: key, - o: value - }; -}); -var _VirtualDom_attributeNS = F3(function(namespace, key, value) -{ - return { - $: 'a4', - n: key, - o: { f: namespace, o: value } - }; -}); - - - -// XSS ATTACK VECTOR CHECKS - - -function _VirtualDom_noScript(tag) -{ - return tag == 'script' ? 'p' : tag; -} - -function _VirtualDom_noOnOrFormAction(key) -{ - return /^(on|formAction$)/i.test(key) ? 'data-' + key : key; -} - -function _VirtualDom_noInnerHtmlOrFormAction(key) -{ - return key == 'innerHTML' || key == 'formAction' ? 'data-' + key : key; -} - -function _VirtualDom_noJavaScriptUri_UNUSED(value) -{ - return /^javascript:/i.test(value.replace(/\s/g,'')) ? '' : value; -} - -function _VirtualDom_noJavaScriptUri(value) -{ - return /^javascript:/i.test(value.replace(/\s/g,'')) - ? 'javascript:alert("This is an XSS vector. Please use ports or web components instead.")' - : value; -} - -function _VirtualDom_noJavaScriptOrHtmlUri_UNUSED(value) -{ - return /^\s*(javascript:|data:text\/html)/i.test(value) ? '' : value; -} - -function _VirtualDom_noJavaScriptOrHtmlUri(value) -{ - return /^\s*(javascript:|data:text\/html)/i.test(value) - ? 'javascript:alert("This is an XSS vector. Please use ports or web components instead.")' - : value; -} - - - -// MAP FACTS - - -var _VirtualDom_mapAttribute = F2(function(func, attr) -{ - return (attr.$ === 'a0') - ? A2(_VirtualDom_on, attr.n, _VirtualDom_mapHandler(func, attr.o)) - : attr; -}); - -function _VirtualDom_mapHandler(func, handler) -{ - var tag = $elm$virtual_dom$VirtualDom$toHandlerInt(handler); - - // 0 = Normal - // 1 = MayStopPropagation - // 2 = MayPreventDefault - // 3 = Custom - - return { - $: handler.$, - a: - !tag - ? A2($elm$json$Json$Decode$map, func, handler.a) - : - A3($elm$json$Json$Decode$map2, - tag < 3 - ? _VirtualDom_mapEventTuple - : _VirtualDom_mapEventRecord, - $elm$json$Json$Decode$succeed(func), - handler.a - ) - }; -} - -var _VirtualDom_mapEventTuple = F2(function(func, tuple) -{ - return _Utils_Tuple2(func(tuple.a), tuple.b); -}); - -var _VirtualDom_mapEventRecord = F2(function(func, record) -{ - return { - message: func(record.message), - stopPropagation: record.stopPropagation, - preventDefault: record.preventDefault - } -}); - - - -// ORGANIZE FACTS - - -function _VirtualDom_organizeFacts(factList) -{ - for (var facts = {}; factList.b; factList = factList.b) // WHILE_CONS - { - var entry = factList.a; - - var tag = entry.$; - var key = entry.n; - var value = entry.o; - - if (tag === 'a2') - { - (key === 'className') - ? _VirtualDom_addClass(facts, key, _Json_unwrap(value)) - : facts[key] = _Json_unwrap(value); - - continue; - } - - var subFacts = facts[tag] || (facts[tag] = {}); - (tag === 'a3' && key === 'class') - ? _VirtualDom_addClass(subFacts, key, value) - : subFacts[key] = value; - } - - return facts; -} - -function _VirtualDom_addClass(object, key, newClass) -{ - var classes = object[key]; - object[key] = classes ? classes + ' ' + newClass : newClass; -} - - - -// RENDER - - -function _VirtualDom_render(vNode, eventNode) -{ - var tag = vNode.$; - - if (tag === 5) - { - return _VirtualDom_render(vNode.k || (vNode.k = vNode.m()), eventNode); - } - - if (tag === 0) - { - return _VirtualDom_doc.createTextNode(vNode.a); - } - - if (tag === 4) - { - var subNode = vNode.k; - var tagger = vNode.j; - - while (subNode.$ === 4) - { - typeof tagger !== 'object' - ? tagger = [tagger, subNode.j] - : tagger.push(subNode.j); - - subNode = subNode.k; - } - - var subEventRoot = { j: tagger, p: eventNode }; - var domNode = _VirtualDom_render(subNode, subEventRoot); - domNode.elm_event_node_ref = subEventRoot; - return domNode; - } - - if (tag === 3) - { - var domNode = vNode.h(vNode.g); - _VirtualDom_applyFacts(domNode, eventNode, vNode.d); - return domNode; - } - - // at this point `tag` must be 1 or 2 - - var domNode = vNode.f - ? _VirtualDom_doc.createElementNS(vNode.f, vNode.c) - : _VirtualDom_doc.createElement(vNode.c); - - if (_VirtualDom_divertHrefToApp && vNode.c == 'a') - { - domNode.addEventListener('click', _VirtualDom_divertHrefToApp(domNode)); - } - - _VirtualDom_applyFacts(domNode, eventNode, vNode.d); - - for (var kids = vNode.e, i = 0; i < kids.length; i++) - { - _VirtualDom_appendChild(domNode, _VirtualDom_render(tag === 1 ? kids[i] : kids[i].b, eventNode)); - } - - return domNode; -} - - - -// APPLY FACTS - - -function _VirtualDom_applyFacts(domNode, eventNode, facts) -{ - for (var key in facts) - { - var value = facts[key]; - - key === 'a1' - ? _VirtualDom_applyStyles(domNode, value) - : - key === 'a0' - ? _VirtualDom_applyEvents(domNode, eventNode, value) - : - key === 'a3' - ? _VirtualDom_applyAttrs(domNode, value) - : - key === 'a4' - ? _VirtualDom_applyAttrsNS(domNode, value) - : - ((key !== 'value' && key !== 'checked') || domNode[key] !== value) && (domNode[key] = value); - } -} - - - -// APPLY STYLES - - -function _VirtualDom_applyStyles(domNode, styles) -{ - var domNodeStyle = domNode.style; - - for (var key in styles) - { - domNodeStyle[key] = styles[key]; - } -} - - - -// APPLY ATTRS - - -function _VirtualDom_applyAttrs(domNode, attrs) -{ - for (var key in attrs) - { - var value = attrs[key]; - typeof value !== 'undefined' - ? domNode.setAttribute(key, value) - : domNode.removeAttribute(key); - } -} - - - -// APPLY NAMESPACED ATTRS - - -function _VirtualDom_applyAttrsNS(domNode, nsAttrs) -{ - for (var key in nsAttrs) - { - var pair = nsAttrs[key]; - var namespace = pair.f; - var value = pair.o; - - typeof value !== 'undefined' - ? domNode.setAttributeNS(namespace, key, value) - : domNode.removeAttributeNS(namespace, key); - } -} - - - -// APPLY EVENTS - - -function _VirtualDom_applyEvents(domNode, eventNode, events) -{ - var allCallbacks = domNode.elmFs || (domNode.elmFs = {}); - - for (var key in events) - { - var newHandler = events[key]; - var oldCallback = allCallbacks[key]; - - if (!newHandler) - { - domNode.removeEventListener(key, oldCallback); - allCallbacks[key] = undefined; - continue; - } - - if (oldCallback) - { - var oldHandler = oldCallback.q; - if (oldHandler.$ === newHandler.$) - { - oldCallback.q = newHandler; - continue; - } - domNode.removeEventListener(key, oldCallback); - } - - oldCallback = _VirtualDom_makeCallback(eventNode, newHandler); - domNode.addEventListener(key, oldCallback, - _VirtualDom_passiveSupported - && { passive: $elm$virtual_dom$VirtualDom$toHandlerInt(newHandler) < 2 } - ); - allCallbacks[key] = oldCallback; - } -} - - - -// PASSIVE EVENTS - - -var _VirtualDom_passiveSupported; - -try -{ - window.addEventListener('t', null, Object.defineProperty({}, 'passive', { - get: function() { _VirtualDom_passiveSupported = true; } - })); -} -catch(e) {} - - - -// EVENT HANDLERS - - -function _VirtualDom_makeCallback(eventNode, initialHandler) -{ - function callback(event) - { - var handler = callback.q; - var result = _Json_runHelp(handler.a, event); - - if (!$elm$core$Result$isOk(result)) - { - return; - } - - var tag = $elm$virtual_dom$VirtualDom$toHandlerInt(handler); - - // 0 = Normal - // 1 = MayStopPropagation - // 2 = MayPreventDefault - // 3 = Custom - - var value = result.a; - var message = !tag ? value : tag < 3 ? value.a : value.message; - var stopPropagation = tag == 1 ? value.b : tag == 3 && value.stopPropagation; - var currentEventNode = ( - stopPropagation && event.stopPropagation(), - (tag == 2 ? value.b : tag == 3 && value.preventDefault) && event.preventDefault(), - eventNode - ); - var tagger; - var i; - while (tagger = currentEventNode.j) - { - if (typeof tagger == 'function') - { - message = tagger(message); - } - else - { - for (var i = tagger.length; i--; ) - { - message = tagger[i](message); - } - } - currentEventNode = currentEventNode.p; - } - currentEventNode(message, stopPropagation); // stopPropagation implies isSync - } - - callback.q = initialHandler; - - return callback; -} - -function _VirtualDom_equalEvents(x, y) -{ - return x.$ == y.$ && _Json_equality(x.a, y.a); -} - - - -// DIFF - - -// TODO: Should we do patches like in iOS? -// -// type Patch -// = At Int Patch -// | Batch (List Patch) -// | Change ... -// -// How could it not be better? -// -function _VirtualDom_diff(x, y) -{ - var patches = []; - _VirtualDom_diffHelp(x, y, patches, 0); - return patches; -} - - -function _VirtualDom_pushPatch(patches, type, index, data) -{ - var patch = { - $: type, - r: index, - s: data, - t: undefined, - u: undefined - }; - patches.push(patch); - return patch; -} - - -function _VirtualDom_diffHelp(x, y, patches, index) -{ - if (x === y) - { - return; - } - - var xType = x.$; - var yType = y.$; - - // Bail if you run into different types of nodes. Implies that the - // structure has changed significantly and it's not worth a diff. - if (xType !== yType) - { - if (xType === 1 && yType === 2) - { - y = _VirtualDom_dekey(y); - yType = 1; - } - else - { - _VirtualDom_pushPatch(patches, 0, index, y); - return; - } - } - - // Now we know that both nodes are the same $. - switch (yType) - { - case 5: - var xRefs = x.l; - var yRefs = y.l; - var i = xRefs.length; - var same = i === yRefs.length; - while (same && i--) - { - same = xRefs[i] === yRefs[i]; - } - if (same) - { - y.k = x.k; - return; - } - y.k = y.m(); - var subPatches = []; - _VirtualDom_diffHelp(x.k, y.k, subPatches, 0); - subPatches.length > 0 && _VirtualDom_pushPatch(patches, 1, index, subPatches); - return; - - case 4: - // gather nested taggers - var xTaggers = x.j; - var yTaggers = y.j; - var nesting = false; - - var xSubNode = x.k; - while (xSubNode.$ === 4) - { - nesting = true; - - typeof xTaggers !== 'object' - ? xTaggers = [xTaggers, xSubNode.j] - : xTaggers.push(xSubNode.j); - - xSubNode = xSubNode.k; - } - - var ySubNode = y.k; - while (ySubNode.$ === 4) - { - nesting = true; - - typeof yTaggers !== 'object' - ? yTaggers = [yTaggers, ySubNode.j] - : yTaggers.push(ySubNode.j); - - ySubNode = ySubNode.k; - } - - // Just bail if different numbers of taggers. This implies the - // structure of the virtual DOM has changed. - if (nesting && xTaggers.length !== yTaggers.length) - { - _VirtualDom_pushPatch(patches, 0, index, y); - return; - } - - // check if taggers are "the same" - if (nesting ? !_VirtualDom_pairwiseRefEqual(xTaggers, yTaggers) : xTaggers !== yTaggers) - { - _VirtualDom_pushPatch(patches, 2, index, yTaggers); - } - - // diff everything below the taggers - _VirtualDom_diffHelp(xSubNode, ySubNode, patches, index + 1); - return; - - case 0: - if (x.a !== y.a) - { - _VirtualDom_pushPatch(patches, 3, index, y.a); - } - return; - - case 1: - _VirtualDom_diffNodes(x, y, patches, index, _VirtualDom_diffKids); - return; - - case 2: - _VirtualDom_diffNodes(x, y, patches, index, _VirtualDom_diffKeyedKids); - return; - - case 3: - if (x.h !== y.h) - { - _VirtualDom_pushPatch(patches, 0, index, y); - return; - } - - var factsDiff = _VirtualDom_diffFacts(x.d, y.d); - factsDiff && _VirtualDom_pushPatch(patches, 4, index, factsDiff); - - var patch = y.i(x.g, y.g); - patch && _VirtualDom_pushPatch(patches, 5, index, patch); - - return; - } -} - -// assumes the incoming arrays are the same length -function _VirtualDom_pairwiseRefEqual(as, bs) -{ - for (var i = 0; i < as.length; i++) - { - if (as[i] !== bs[i]) - { - return false; - } - } - - return true; -} - -function _VirtualDom_diffNodes(x, y, patches, index, diffKids) -{ - // Bail if obvious indicators have changed. Implies more serious - // structural changes such that it's not worth it to diff. - if (x.c !== y.c || x.f !== y.f) - { - _VirtualDom_pushPatch(patches, 0, index, y); - return; - } - - var factsDiff = _VirtualDom_diffFacts(x.d, y.d); - factsDiff && _VirtualDom_pushPatch(patches, 4, index, factsDiff); - - diffKids(x, y, patches, index); -} - - - -// DIFF FACTS - - -// TODO Instead of creating a new diff object, it's possible to just test if -// there *is* a diff. During the actual patch, do the diff again and make the -// modifications directly. This way, there's no new allocations. Worth it? -function _VirtualDom_diffFacts(x, y, category) -{ - var diff; - - // look for changes and removals - for (var xKey in x) - { - if (xKey === 'a1' || xKey === 'a0' || xKey === 'a3' || xKey === 'a4') - { - var subDiff = _VirtualDom_diffFacts(x[xKey], y[xKey] || {}, xKey); - if (subDiff) - { - diff = diff || {}; - diff[xKey] = subDiff; - } - continue; - } - - // remove if not in the new facts - if (!(xKey in y)) - { - diff = diff || {}; - diff[xKey] = - !category - ? (typeof x[xKey] === 'string' ? '' : null) - : - (category === 'a1') - ? '' - : - (category === 'a0' || category === 'a3') - ? undefined - : - { f: x[xKey].f, o: undefined }; - - continue; - } - - var xValue = x[xKey]; - var yValue = y[xKey]; - - // reference equal, so don't worry about it - if (xValue === yValue && xKey !== 'value' && xKey !== 'checked' - || category === 'a0' && _VirtualDom_equalEvents(xValue, yValue)) - { - continue; - } - - diff = diff || {}; - diff[xKey] = yValue; - } - - // add new stuff - for (var yKey in y) - { - if (!(yKey in x)) - { - diff = diff || {}; - diff[yKey] = y[yKey]; - } - } - - return diff; -} - - - -// DIFF KIDS - - -function _VirtualDom_diffKids(xParent, yParent, patches, index) -{ - var xKids = xParent.e; - var yKids = yParent.e; - - var xLen = xKids.length; - var yLen = yKids.length; - - // FIGURE OUT IF THERE ARE INSERTS OR REMOVALS - - if (xLen > yLen) - { - _VirtualDom_pushPatch(patches, 6, index, { - v: yLen, - i: xLen - yLen - }); - } - else if (xLen < yLen) - { - _VirtualDom_pushPatch(patches, 7, index, { - v: xLen, - e: yKids - }); - } - - // PAIRWISE DIFF EVERYTHING ELSE - - for (var minLen = xLen < yLen ? xLen : yLen, i = 0; i < minLen; i++) - { - var xKid = xKids[i]; - _VirtualDom_diffHelp(xKid, yKids[i], patches, ++index); - index += xKid.b || 0; - } -} - - - -// KEYED DIFF - - -function _VirtualDom_diffKeyedKids(xParent, yParent, patches, rootIndex) -{ - var localPatches = []; - - var changes = {}; // Dict String Entry - var inserts = []; // Array { index : Int, entry : Entry } - // type Entry = { tag : String, vnode : VNode, index : Int, data : _ } - - var xKids = xParent.e; - var yKids = yParent.e; - var xLen = xKids.length; - var yLen = yKids.length; - var xIndex = 0; - var yIndex = 0; - - var index = rootIndex; - - while (xIndex < xLen && yIndex < yLen) - { - var x = xKids[xIndex]; - var y = yKids[yIndex]; - - var xKey = x.a; - var yKey = y.a; - var xNode = x.b; - var yNode = y.b; - - var newMatch = undefined; - var oldMatch = undefined; - - // check if keys match - - if (xKey === yKey) - { - index++; - _VirtualDom_diffHelp(xNode, yNode, localPatches, index); - index += xNode.b || 0; - - xIndex++; - yIndex++; - continue; - } - - // look ahead 1 to detect insertions and removals. - - var xNext = xKids[xIndex + 1]; - var yNext = yKids[yIndex + 1]; - - if (xNext) - { - var xNextKey = xNext.a; - var xNextNode = xNext.b; - oldMatch = yKey === xNextKey; - } - - if (yNext) - { - var yNextKey = yNext.a; - var yNextNode = yNext.b; - newMatch = xKey === yNextKey; - } - - - // swap x and y - if (newMatch && oldMatch) - { - index++; - _VirtualDom_diffHelp(xNode, yNextNode, localPatches, index); - _VirtualDom_insertNode(changes, localPatches, xKey, yNode, yIndex, inserts); - index += xNode.b || 0; - - index++; - _VirtualDom_removeNode(changes, localPatches, xKey, xNextNode, index); - index += xNextNode.b || 0; - - xIndex += 2; - yIndex += 2; - continue; - } - - // insert y - if (newMatch) - { - index++; - _VirtualDom_insertNode(changes, localPatches, yKey, yNode, yIndex, inserts); - _VirtualDom_diffHelp(xNode, yNextNode, localPatches, index); - index += xNode.b || 0; - - xIndex += 1; - yIndex += 2; - continue; - } - - // remove x - if (oldMatch) - { - index++; - _VirtualDom_removeNode(changes, localPatches, xKey, xNode, index); - index += xNode.b || 0; - - index++; - _VirtualDom_diffHelp(xNextNode, yNode, localPatches, index); - index += xNextNode.b || 0; - - xIndex += 2; - yIndex += 1; - continue; - } - - // remove x, insert y - if (xNext && xNextKey === yNextKey) - { - index++; - _VirtualDom_removeNode(changes, localPatches, xKey, xNode, index); - _VirtualDom_insertNode(changes, localPatches, yKey, yNode, yIndex, inserts); - index += xNode.b || 0; - - index++; - _VirtualDom_diffHelp(xNextNode, yNextNode, localPatches, index); - index += xNextNode.b || 0; - - xIndex += 2; - yIndex += 2; - continue; - } - - break; - } - - // eat up any remaining nodes with removeNode and insertNode - - while (xIndex < xLen) - { - index++; - var x = xKids[xIndex]; - var xNode = x.b; - _VirtualDom_removeNode(changes, localPatches, x.a, xNode, index); - index += xNode.b || 0; - xIndex++; - } - - while (yIndex < yLen) - { - var endInserts = endInserts || []; - var y = yKids[yIndex]; - _VirtualDom_insertNode(changes, localPatches, y.a, y.b, undefined, endInserts); - yIndex++; - } - - if (localPatches.length > 0 || inserts.length > 0 || endInserts) - { - _VirtualDom_pushPatch(patches, 8, rootIndex, { - w: localPatches, - x: inserts, - y: endInserts - }); - } -} - - - -// CHANGES FROM KEYED DIFF - - -var _VirtualDom_POSTFIX = '_elmW6BL'; - - -function _VirtualDom_insertNode(changes, localPatches, key, vnode, yIndex, inserts) -{ - var entry = changes[key]; - - // never seen this key before - if (!entry) - { - entry = { - c: 0, - z: vnode, - r: yIndex, - s: undefined - }; - - inserts.push({ r: yIndex, A: entry }); - changes[key] = entry; - - return; - } - - // this key was removed earlier, a match! - if (entry.c === 1) - { - inserts.push({ r: yIndex, A: entry }); - - entry.c = 2; - var subPatches = []; - _VirtualDom_diffHelp(entry.z, vnode, subPatches, entry.r); - entry.r = yIndex; - entry.s.s = { - w: subPatches, - A: entry - }; - - return; - } - - // this key has already been inserted or moved, a duplicate! - _VirtualDom_insertNode(changes, localPatches, key + _VirtualDom_POSTFIX, vnode, yIndex, inserts); -} - - -function _VirtualDom_removeNode(changes, localPatches, key, vnode, index) -{ - var entry = changes[key]; - - // never seen this key before - if (!entry) - { - var patch = _VirtualDom_pushPatch(localPatches, 9, index, undefined); - - changes[key] = { - c: 1, - z: vnode, - r: index, - s: patch - }; - - return; - } - - // this key was inserted earlier, a match! - if (entry.c === 0) - { - entry.c = 2; - var subPatches = []; - _VirtualDom_diffHelp(vnode, entry.z, subPatches, index); - - _VirtualDom_pushPatch(localPatches, 9, index, { - w: subPatches, - A: entry - }); - - return; - } - - // this key has already been removed or moved, a duplicate! - _VirtualDom_removeNode(changes, localPatches, key + _VirtualDom_POSTFIX, vnode, index); -} - - - -// ADD DOM NODES -// -// Each DOM node has an "index" assigned in order of traversal. It is important -// to minimize our crawl over the actual DOM, so these indexes (along with the -// descendantsCount of virtual nodes) let us skip touching entire subtrees of -// the DOM if we know there are no patches there. - - -function _VirtualDom_addDomNodes(domNode, vNode, patches, eventNode) -{ - _VirtualDom_addDomNodesHelp(domNode, vNode, patches, 0, 0, vNode.b, eventNode); -} - - -// assumes `patches` is non-empty and indexes increase monotonically. -function _VirtualDom_addDomNodesHelp(domNode, vNode, patches, i, low, high, eventNode) -{ - var patch = patches[i]; - var index = patch.r; - - while (index === low) - { - var patchType = patch.$; - - if (patchType === 1) - { - _VirtualDom_addDomNodes(domNode, vNode.k, patch.s, eventNode); - } - else if (patchType === 8) - { - patch.t = domNode; - patch.u = eventNode; - - var subPatches = patch.s.w; - if (subPatches.length > 0) - { - _VirtualDom_addDomNodesHelp(domNode, vNode, subPatches, 0, low, high, eventNode); - } - } - else if (patchType === 9) - { - patch.t = domNode; - patch.u = eventNode; - - var data = patch.s; - if (data) - { - data.A.s = domNode; - var subPatches = data.w; - if (subPatches.length > 0) - { - _VirtualDom_addDomNodesHelp(domNode, vNode, subPatches, 0, low, high, eventNode); - } - } - } - else - { - patch.t = domNode; - patch.u = eventNode; - } - - i++; - - if (!(patch = patches[i]) || (index = patch.r) > high) - { - return i; - } - } - - var tag = vNode.$; - - if (tag === 4) - { - var subNode = vNode.k; - - while (subNode.$ === 4) - { - subNode = subNode.k; - } - - return _VirtualDom_addDomNodesHelp(domNode, subNode, patches, i, low + 1, high, domNode.elm_event_node_ref); - } - - // tag must be 1 or 2 at this point - - var vKids = vNode.e; - var childNodes = domNode.childNodes; - for (var j = 0; j < vKids.length; j++) - { - low++; - var vKid = tag === 1 ? vKids[j] : vKids[j].b; - var nextLow = low + (vKid.b || 0); - if (low <= index && index <= nextLow) - { - i = _VirtualDom_addDomNodesHelp(childNodes[j], vKid, patches, i, low, nextLow, eventNode); - if (!(patch = patches[i]) || (index = patch.r) > high) - { - return i; - } - } - low = nextLow; - } - return i; -} - - - -// APPLY PATCHES - - -function _VirtualDom_applyPatches(rootDomNode, oldVirtualNode, patches, eventNode) -{ - if (patches.length === 0) - { - return rootDomNode; - } - - _VirtualDom_addDomNodes(rootDomNode, oldVirtualNode, patches, eventNode); - return _VirtualDom_applyPatchesHelp(rootDomNode, patches); -} - -function _VirtualDom_applyPatchesHelp(rootDomNode, patches) -{ - for (var i = 0; i < patches.length; i++) - { - var patch = patches[i]; - var localDomNode = patch.t - var newNode = _VirtualDom_applyPatch(localDomNode, patch); - if (localDomNode === rootDomNode) - { - rootDomNode = newNode; - } - } - return rootDomNode; -} - -function _VirtualDom_applyPatch(domNode, patch) -{ - switch (patch.$) - { - case 0: - return _VirtualDom_applyPatchRedraw(domNode, patch.s, patch.u); - - case 4: - _VirtualDom_applyFacts(domNode, patch.u, patch.s); - return domNode; - - case 3: - domNode.replaceData(0, domNode.length, patch.s); - return domNode; - - case 1: - return _VirtualDom_applyPatchesHelp(domNode, patch.s); - - case 2: - if (domNode.elm_event_node_ref) - { - domNode.elm_event_node_ref.j = patch.s; - } - else - { - domNode.elm_event_node_ref = { j: patch.s, p: patch.u }; - } - return domNode; - - case 6: - var data = patch.s; - for (var i = 0; i < data.i; i++) - { - domNode.removeChild(domNode.childNodes[data.v]); - } - return domNode; - - case 7: - var data = patch.s; - var kids = data.e; - var i = data.v; - var theEnd = domNode.childNodes[i]; - for (; i < kids.length; i++) - { - domNode.insertBefore(_VirtualDom_render(kids[i], patch.u), theEnd); - } - return domNode; - - case 9: - var data = patch.s; - if (!data) - { - domNode.parentNode.removeChild(domNode); - return domNode; - } - var entry = data.A; - if (typeof entry.r !== 'undefined') - { - domNode.parentNode.removeChild(domNode); - } - entry.s = _VirtualDom_applyPatchesHelp(domNode, data.w); - return domNode; - - case 8: - return _VirtualDom_applyPatchReorder(domNode, patch); - - case 5: - return patch.s(domNode); - - default: - _Debug_crash(10); // 'Ran into an unknown patch!' - } -} - - -function _VirtualDom_applyPatchRedraw(domNode, vNode, eventNode) -{ - var parentNode = domNode.parentNode; - var newNode = _VirtualDom_render(vNode, eventNode); - - if (!newNode.elm_event_node_ref) - { - newNode.elm_event_node_ref = domNode.elm_event_node_ref; - } - - if (parentNode && newNode !== domNode) - { - parentNode.replaceChild(newNode, domNode); - } - return newNode; -} - - -function _VirtualDom_applyPatchReorder(domNode, patch) -{ - var data = patch.s; - - // remove end inserts - var frag = _VirtualDom_applyPatchReorderEndInsertsHelp(data.y, patch); - - // removals - domNode = _VirtualDom_applyPatchesHelp(domNode, data.w); - - // inserts - var inserts = data.x; - for (var i = 0; i < inserts.length; i++) - { - var insert = inserts[i]; - var entry = insert.A; - var node = entry.c === 2 - ? entry.s - : _VirtualDom_render(entry.z, patch.u); - domNode.insertBefore(node, domNode.childNodes[insert.r]); - } - - // add end inserts - if (frag) - { - _VirtualDom_appendChild(domNode, frag); - } - - return domNode; -} - - -function _VirtualDom_applyPatchReorderEndInsertsHelp(endInserts, patch) -{ - if (!endInserts) - { - return; - } - - var frag = _VirtualDom_doc.createDocumentFragment(); - for (var i = 0; i < endInserts.length; i++) - { - var insert = endInserts[i]; - var entry = insert.A; - _VirtualDom_appendChild(frag, entry.c === 2 - ? entry.s - : _VirtualDom_render(entry.z, patch.u) - ); - } - return frag; -} - - -function _VirtualDom_virtualize(node) -{ - // TEXT NODES - - if (node.nodeType === 3) - { - return _VirtualDom_text(node.textContent); - } - - - // WEIRD NODES - - if (node.nodeType !== 1) - { - return _VirtualDom_text(''); - } - - - // ELEMENT NODES - - var attrList = _List_Nil; - var attrs = node.attributes; - for (var i = attrs.length; i--; ) - { - var attr = attrs[i]; - var name = attr.name; - var value = attr.value; - attrList = _List_Cons( A2(_VirtualDom_attribute, name, value), attrList ); - } - - var tag = node.tagName.toLowerCase(); - var kidList = _List_Nil; - var kids = node.childNodes; - - for (var i = kids.length; i--; ) - { - kidList = _List_Cons(_VirtualDom_virtualize(kids[i]), kidList); - } - return A3(_VirtualDom_node, tag, attrList, kidList); -} - -function _VirtualDom_dekey(keyedNode) -{ - var keyedKids = keyedNode.e; - var len = keyedKids.length; - var kids = new Array(len); - for (var i = 0; i < len; i++) - { - kids[i] = keyedKids[i].b; - } - - return { - $: 1, - c: keyedNode.c, - d: keyedNode.d, - e: kids, - f: keyedNode.f, - b: keyedNode.b - }; -} - - - -var _Bitwise_and = F2(function(a, b) -{ - return a & b; -}); - -var _Bitwise_or = F2(function(a, b) -{ - return a | b; -}); - -var _Bitwise_xor = F2(function(a, b) -{ - return a ^ b; -}); - -function _Bitwise_complement(a) -{ - return ~a; -}; - -var _Bitwise_shiftLeftBy = F2(function(offset, a) -{ - return a << offset; -}); - -var _Bitwise_shiftRightBy = F2(function(offset, a) -{ - return a >> offset; -}); - -var _Bitwise_shiftRightZfBy = F2(function(offset, a) -{ - return a >>> offset; -}); - - - - -// HELPERS - - -function _Debugger_unsafeCoerce(value) -{ - return value; -} - - - -// PROGRAMS - - -var _Debugger_element = F4(function(impl, flagDecoder, debugMetadata, args) -{ - return _Platform_initialize( - flagDecoder, - args, - A3($elm$browser$Debugger$Main$wrapInit, _Json_wrap(debugMetadata), _Debugger_popout(), impl.init), - $elm$browser$Debugger$Main$wrapUpdate(impl.update), - $elm$browser$Debugger$Main$wrapSubs(impl.subscriptions), - function(sendToApp, initialModel) - { - var view = impl.view; - var title = _VirtualDom_doc.title; - var domNode = args && args['node'] ? args['node'] : _Debug_crash(0); - var currNode = _VirtualDom_virtualize(domNode); - var currBlocker = $elm$browser$Debugger$Main$toBlockerType(initialModel); - var currPopout; - - var cornerNode = _VirtualDom_doc.createElement('div'); - domNode.parentNode.insertBefore(cornerNode, domNode.nextSibling); - var cornerCurr = _VirtualDom_virtualize(cornerNode); - - initialModel.popout.a = sendToApp; - - return _Browser_makeAnimator(initialModel, function(model) - { - var nextNode = A2(_VirtualDom_map, $elm$browser$Debugger$Main$UserMsg, view($elm$browser$Debugger$Main$getUserModel(model))); - var patches = _VirtualDom_diff(currNode, nextNode); - domNode = _VirtualDom_applyPatches(domNode, currNode, patches, sendToApp); - currNode = nextNode; - - // update blocker - - var nextBlocker = $elm$browser$Debugger$Main$toBlockerType(model); - _Debugger_updateBlocker(currBlocker, nextBlocker); - currBlocker = nextBlocker; - - // view corner - - var cornerNext = $elm$browser$Debugger$Main$cornerView(model); - var cornerPatches = _VirtualDom_diff(cornerCurr, cornerNext); - cornerNode = _VirtualDom_applyPatches(cornerNode, cornerCurr, cornerPatches, sendToApp); - cornerCurr = cornerNext; - - if (!model.popout.b) - { - currPopout = undefined; - return; - } - - // view popout - - _VirtualDom_doc = model.popout.b; // SWITCH TO POPOUT DOC - currPopout || (currPopout = _VirtualDom_virtualize(model.popout.b)); - var nextPopout = $elm$browser$Debugger$Main$popoutView(model); - var popoutPatches = _VirtualDom_diff(currPopout, nextPopout); - _VirtualDom_applyPatches(model.popout.b.body, currPopout, popoutPatches, sendToApp); - currPopout = nextPopout; - _VirtualDom_doc = document; // SWITCH BACK TO NORMAL DOC - }); - } - ); -}); - - -var _Debugger_document = F4(function(impl, flagDecoder, debugMetadata, args) -{ - return _Platform_initialize( - flagDecoder, - args, - A3($elm$browser$Debugger$Main$wrapInit, _Json_wrap(debugMetadata), _Debugger_popout(), impl.init), - $elm$browser$Debugger$Main$wrapUpdate(impl.update), - $elm$browser$Debugger$Main$wrapSubs(impl.subscriptions), - function(sendToApp, initialModel) - { - var divertHrefToApp = impl.setup && impl.setup(function(x) { return sendToApp($elm$browser$Debugger$Main$UserMsg(x)); }); - var view = impl.view; - var title = _VirtualDom_doc.title; - var bodyNode = _VirtualDom_doc.body; - var currNode = _VirtualDom_virtualize(bodyNode); - var currBlocker = $elm$browser$Debugger$Main$toBlockerType(initialModel); - var currPopout; - - initialModel.popout.a = sendToApp; - - return _Browser_makeAnimator(initialModel, function(model) - { - _VirtualDom_divertHrefToApp = divertHrefToApp; - var doc = view($elm$browser$Debugger$Main$getUserModel(model)); - var nextNode = _VirtualDom_node('body')(_List_Nil)( - _Utils_ap( - A2($elm$core$List$map, _VirtualDom_map($elm$browser$Debugger$Main$UserMsg), doc.body), - _List_Cons($elm$browser$Debugger$Main$cornerView(model), _List_Nil) - ) - ); - var patches = _VirtualDom_diff(currNode, nextNode); - bodyNode = _VirtualDom_applyPatches(bodyNode, currNode, patches, sendToApp); - currNode = nextNode; - _VirtualDom_divertHrefToApp = 0; - (title !== doc.title) && (_VirtualDom_doc.title = title = doc.title); - - // update blocker - - var nextBlocker = $elm$browser$Debugger$Main$toBlockerType(model); - _Debugger_updateBlocker(currBlocker, nextBlocker); - currBlocker = nextBlocker; - - // view popout - - if (!model.popout.b) { currPopout = undefined; return; } - - _VirtualDom_doc = model.popout.b; // SWITCH TO POPOUT DOC - currPopout || (currPopout = _VirtualDom_virtualize(model.popout.b)); - var nextPopout = $elm$browser$Debugger$Main$popoutView(model); - var popoutPatches = _VirtualDom_diff(currPopout, nextPopout); - _VirtualDom_applyPatches(model.popout.b.body, currPopout, popoutPatches, sendToApp); - currPopout = nextPopout; - _VirtualDom_doc = document; // SWITCH BACK TO NORMAL DOC - }); - } - ); -}); - - -function _Debugger_popout() -{ - return { - b: undefined, - a: undefined - }; -} - -function _Debugger_isOpen(popout) -{ - return !!popout.b; -} - -function _Debugger_open(popout) -{ - return _Scheduler_binding(function(callback) - { - _Debugger_openWindow(popout); - callback(_Scheduler_succeed(_Utils_Tuple0)); - }); -} - -function _Debugger_openWindow(popout) -{ - var w = $elm$browser$Debugger$Main$initialWindowWidth, - h = $elm$browser$Debugger$Main$initialWindowHeight, - x = screen.width - w, - y = screen.height - h; - - var debuggerWindow = window.open('', '', 'width=' + w + ',height=' + h + ',left=' + x + ',top=' + y); - var doc = debuggerWindow.document; - doc.title = 'Elm Debugger'; - - // handle arrow keys - doc.addEventListener('keydown', function(event) { - event.metaKey && event.which === 82 && window.location.reload(); - event.key === 'ArrowUp' && (popout.a($elm$browser$Debugger$Main$Up ), event.preventDefault()); - event.key === 'ArrowDown' && (popout.a($elm$browser$Debugger$Main$Down), event.preventDefault()); - }); - - // handle window close - window.addEventListener('unload', close); - debuggerWindow.addEventListener('unload', function() { - popout.b = undefined; - popout.a($elm$browser$Debugger$Main$NoOp); - window.removeEventListener('unload', close); - }); - - function close() { - popout.b = undefined; - popout.a($elm$browser$Debugger$Main$NoOp); - debuggerWindow.close(); - } - - // register new window - popout.b = doc; -} - - - -// SCROLL - - -function _Debugger_scroll(popout) -{ - return _Scheduler_binding(function(callback) - { - if (popout.b) - { - var msgs = popout.b.getElementById('elm-debugger-sidebar'); - if (msgs && msgs.scrollTop !== 0) - { - msgs.scrollTop = 0; - } - } - callback(_Scheduler_succeed(_Utils_Tuple0)); - }); -} - - -var _Debugger_scrollTo = F2(function(id, popout) -{ - return _Scheduler_binding(function(callback) - { - if (popout.b) - { - var msg = popout.b.getElementById(id); - if (msg) - { - msg.scrollIntoView(false); - } - } - callback(_Scheduler_succeed(_Utils_Tuple0)); - }); -}); - - - -// UPLOAD - - -function _Debugger_upload(popout) -{ - return _Scheduler_binding(function(callback) - { - var doc = popout.b || document; - var element = doc.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(_Scheduler_succeed(e.target.result)); - }; - fileReader.readAsText(event.target.files[0]); - doc.body.removeChild(element); - }); - doc.body.appendChild(element); - element.click(); - }); -} - - - -// DOWNLOAD - - -var _Debugger_download = F2(function(historyLength, json) -{ - return _Scheduler_binding(function(callback) - { - var fileName = 'history-' + historyLength + '.txt'; - var jsonString = JSON.stringify(json); - var mime = 'text/plain;charset=utf-8'; - var done = _Scheduler_succeed(_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 CONTENT - - -function _Debugger_messageToString(value) -{ - if (typeof value === 'boolean') - { - return value ? 'True' : 'False'; - } - - if (typeof value === 'number') - { - return value + ''; - } - - if (typeof value === 'string') - { - return '"' + _Debugger_addSlashes(value, false) + '"'; - } - - if (value instanceof String) - { - return "'" + _Debugger_addSlashes(value, true) + "'"; - } - - if (typeof value !== 'object' || value === null || !('$' in value)) - { - return '…'; - } - - if (typeof value.$ === 'number') - { - return '…'; - } - - var code = value.$.charCodeAt(0); - if (code === 0x23 /* # */ || /* a */ 0x61 <= code && code <= 0x7A /* z */) - { - return '…'; - } - - if (['Array_elm_builtin', 'Set_elm_builtin', 'RBNode_elm_builtin', 'RBEmpty_elm_builtin'].indexOf(value.$) >= 0) - { - return '…'; - } - - var keys = Object.keys(value); - switch (keys.length) - { - case 1: - return value.$; - case 2: - return value.$ + ' ' + _Debugger_messageToString(value.a); - default: - return value.$ + ' … ' + _Debugger_messageToString(value[keys[keys.length - 1]]); - } -} - - -function _Debugger_init(value) -{ - if (typeof value === 'boolean') - { - return A3($elm$browser$Debugger$Expando$Constructor, $elm$core$Maybe$Just(value ? 'True' : 'False'), true, _List_Nil); - } - - if (typeof value === 'number') - { - return $elm$browser$Debugger$Expando$Primitive(value + ''); - } - - if (typeof value === 'string') - { - return $elm$browser$Debugger$Expando$S('"' + _Debugger_addSlashes(value, false) + '"'); - } - - if (value instanceof String) - { - return $elm$browser$Debugger$Expando$S("'" + _Debugger_addSlashes(value, true) + "'"); - } - - if (typeof value === 'object' && '$' in value) - { - var tag = value.$; - - if (tag === '::' || tag === '[]') - { - return A3($elm$browser$Debugger$Expando$Sequence, $elm$browser$Debugger$Expando$ListSeq, true, - A2($elm$core$List$map, _Debugger_init, value) - ); - } - - if (tag === 'Set_elm_builtin') - { - return A3($elm$browser$Debugger$Expando$Sequence, $elm$browser$Debugger$Expando$SetSeq, true, - A3($elm$core$Set$foldr, _Debugger_initCons, _List_Nil, value) - ); - } - - if (tag === 'RBNode_elm_builtin' || tag == 'RBEmpty_elm_builtin') - { - return A2($elm$browser$Debugger$Expando$Dictionary, true, - A3($elm$core$Dict$foldr, _Debugger_initKeyValueCons, _List_Nil, value) - ); - } - - if (tag === 'Array_elm_builtin') - { - return A3($elm$browser$Debugger$Expando$Sequence, $elm$browser$Debugger$Expando$ArraySeq, true, - A3($elm$core$Array$foldr, _Debugger_initCons, _List_Nil, value) - ); - } - - if (typeof tag === 'number') - { - return $elm$browser$Debugger$Expando$Primitive(''); - } - - var char = tag.charCodeAt(0); - if (char === 35 || 65 <= char && char <= 90) - { - var list = _List_Nil; - for (var i in value) - { - if (i === '$') continue; - list = _List_Cons(_Debugger_init(value[i]), list); - } - return A3($elm$browser$Debugger$Expando$Constructor, char === 35 ? $elm$core$Maybe$Nothing : $elm$core$Maybe$Just(tag), true, $elm$core$List$reverse(list)); - } - - return $elm$browser$Debugger$Expando$Primitive(''); - } - - if (typeof value === 'object') - { - var dict = $elm$core$Dict$empty; - for (var i in value) - { - dict = A3($elm$core$Dict$insert, i, _Debugger_init(value[i]), dict); - } - return A2($elm$browser$Debugger$Expando$Record, true, dict); - } - - return $elm$browser$Debugger$Expando$Primitive(''); -} - -var _Debugger_initCons = F2(function initConsHelp(value, list) -{ - return _List_Cons(_Debugger_init(value), list); -}); - -var _Debugger_initKeyValueCons = F3(function(key, value, list) -{ - return _List_Cons( - _Utils_Tuple2(_Debugger_init(key), _Debugger_init(value)), - list - ); -}); - -function _Debugger_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, '\\"'); - } -} - - - -// BLOCK EVENTS - - -function _Debugger_updateBlocker(oldBlocker, newBlocker) -{ - if (oldBlocker === newBlocker) return; - - var oldEvents = _Debugger_blockerToEvents(oldBlocker); - var newEvents = _Debugger_blockerToEvents(newBlocker); - - // remove old blockers - for (var i = 0; i < oldEvents.length; i++) - { - document.removeEventListener(oldEvents[i], _Debugger_blocker, true); - } - - // add new blockers - for (var i = 0; i < newEvents.length; i++) - { - document.addEventListener(newEvents[i], _Debugger_blocker, true); - } -} - - -function _Debugger_blocker(event) -{ - if (event.type === 'keydown' && event.metaKey && event.which === 82) - { - return; - } - - var isScroll = event.type === 'scroll' || event.type === 'wheel'; - for (var node = event.target; node; node = node.parentNode) - { - if (isScroll ? node.id === 'elm-debugger-details' : node.id === 'elm-debugger-overlay') - { - return; - } - } - - event.stopPropagation(); - event.preventDefault(); -} - -function _Debugger_blockerToEvents(blocker) -{ - return blocker === $elm$browser$Debugger$Overlay$BlockNone - ? [] - : blocker === $elm$browser$Debugger$Overlay$BlockMost - ? _Debugger_mostEvents - : _Debugger_allEvents; -} - -var _Debugger_mostEvents = [ - 'click', 'dblclick', 'mousemove', - 'mouseup', 'mousedown', 'mouseenter', 'mouseleave', - 'touchstart', 'touchend', 'touchcancel', 'touchmove', - 'pointerdown', 'pointerup', 'pointerover', 'pointerout', - 'pointerenter', 'pointerleave', 'pointermove', 'pointercancel', - 'dragstart', 'drag', 'dragend', 'dragenter', 'dragover', 'dragleave', 'drop', - 'keyup', 'keydown', 'keypress', - 'input', 'change', - 'focus', 'blur' -]; - -var _Debugger_allEvents = _Debugger_mostEvents.concat('wheel', 'scroll'); - - - - -// ELEMENT - - -var _Debugger_element; - -var _Browser_element = _Debugger_element || F4(function(impl, flagDecoder, debugMetadata, args) -{ - return _Platform_initialize( - flagDecoder, - args, - impl.init, - impl.update, - impl.subscriptions, - function(sendToApp, initialModel) { - var view = impl.view; - /**_UNUSED/ - var domNode = args['node']; - //*/ - /**/ - var domNode = args && args['node'] ? args['node'] : _Debug_crash(0); - //*/ - var currNode = _VirtualDom_virtualize(domNode); - - return _Browser_makeAnimator(initialModel, function(model) - { - var nextNode = view(model); - var patches = _VirtualDom_diff(currNode, nextNode); - domNode = _VirtualDom_applyPatches(domNode, currNode, patches, sendToApp); - currNode = nextNode; - }); - } - ); -}); - - - -// DOCUMENT - - -var _Debugger_document; - -var _Browser_document = _Debugger_document || F4(function(impl, flagDecoder, debugMetadata, args) -{ - return _Platform_initialize( - flagDecoder, - args, - impl.init, - impl.update, - impl.subscriptions, - function(sendToApp, initialModel) { - var divertHrefToApp = impl.setup && impl.setup(sendToApp) - var view = impl.view; - var title = _VirtualDom_doc.title; - var bodyNode = _VirtualDom_doc.body; - var currNode = _VirtualDom_virtualize(bodyNode); - return _Browser_makeAnimator(initialModel, function(model) - { - _VirtualDom_divertHrefToApp = divertHrefToApp; - var doc = view(model); - var nextNode = _VirtualDom_node('body')(_List_Nil)(doc.body); - var patches = _VirtualDom_diff(currNode, nextNode); - bodyNode = _VirtualDom_applyPatches(bodyNode, currNode, patches, sendToApp); - currNode = nextNode; - _VirtualDom_divertHrefToApp = 0; - (title !== doc.title) && (_VirtualDom_doc.title = title = doc.title); - }); - } - ); -}); - - - -// ANIMATION - - -var _Browser_cancelAnimationFrame = - typeof cancelAnimationFrame !== 'undefined' - ? cancelAnimationFrame - : function(id) { clearTimeout(id); }; - -var _Browser_requestAnimationFrame = - typeof requestAnimationFrame !== 'undefined' - ? requestAnimationFrame - : function(callback) { return setTimeout(callback, 1000 / 60); }; - - -function _Browser_makeAnimator(model, draw) -{ - draw(model); - - var state = 0; - - function updateIfNeeded() - { - state = state === 1 - ? 0 - : ( _Browser_requestAnimationFrame(updateIfNeeded), draw(model), 1 ); - } - - return function(nextModel, isSync) - { - model = nextModel; - - isSync - ? ( draw(model), - state === 2 && (state = 1) - ) - : ( state === 0 && _Browser_requestAnimationFrame(updateIfNeeded), - state = 2 - ); - }; -} - - - -// APPLICATION - - -function _Browser_application(impl) -{ - var onUrlChange = impl.onUrlChange; - var onUrlRequest = impl.onUrlRequest; - var key = function() { key.a(onUrlChange(_Browser_getUrl())); }; - - return _Browser_document({ - setup: function(sendToApp) - { - key.a = sendToApp; - _Browser_window.addEventListener('popstate', key); - _Browser_window.navigator.userAgent.indexOf('Trident') < 0 || _Browser_window.addEventListener('hashchange', key); - - return F2(function(domNode, event) - { - if (!event.ctrlKey && !event.metaKey && !event.shiftKey && event.button < 1 && !domNode.target && !domNode.hasAttribute('download')) - { - event.preventDefault(); - var href = domNode.href; - var curr = _Browser_getUrl(); - var next = $elm$url$Url$fromString(href).a; - sendToApp(onUrlRequest( - (next - && curr.protocol === next.protocol - && curr.host === next.host - && curr.port_.a === next.port_.a - ) - ? $elm$browser$Browser$Internal(next) - : $elm$browser$Browser$External(href) - )); - } - }); - }, - init: function(flags) - { - return A3(impl.init, flags, _Browser_getUrl(), key); - }, - view: impl.view, - update: impl.update, - subscriptions: impl.subscriptions - }); -} - -function _Browser_getUrl() -{ - return $elm$url$Url$fromString(_VirtualDom_doc.location.href).a || _Debug_crash(1); -} - -var _Browser_go = F2(function(key, n) -{ - return A2($elm$core$Task$perform, $elm$core$Basics$never, _Scheduler_binding(function() { - n && history.go(n); - key(); - })); -}); - -var _Browser_pushUrl = F2(function(key, url) -{ - return A2($elm$core$Task$perform, $elm$core$Basics$never, _Scheduler_binding(function() { - history.pushState({}, '', url); - key(); - })); -}); - -var _Browser_replaceUrl = F2(function(key, url) -{ - return A2($elm$core$Task$perform, $elm$core$Basics$never, _Scheduler_binding(function() { - history.replaceState({}, '', url); - key(); - })); -}); - - - -// GLOBAL EVENTS - - -var _Browser_fakeNode = { addEventListener: function() {}, removeEventListener: function() {} }; -var _Browser_doc = typeof document !== 'undefined' ? document : _Browser_fakeNode; -var _Browser_window = typeof window !== 'undefined' ? window : _Browser_fakeNode; - -var _Browser_on = F3(function(node, eventName, sendToSelf) -{ - return _Scheduler_spawn(_Scheduler_binding(function(callback) - { - function handler(event) { _Scheduler_rawSpawn(sendToSelf(event)); } - node.addEventListener(eventName, handler, _VirtualDom_passiveSupported && { passive: true }); - return function() { node.removeEventListener(eventName, handler); }; - })); -}); - -var _Browser_decodeEvent = F2(function(decoder, event) -{ - var result = _Json_runHelp(decoder, event); - return $elm$core$Result$isOk(result) ? $elm$core$Maybe$Just(result.a) : $elm$core$Maybe$Nothing; -}); - - - -// PAGE VISIBILITY - - -function _Browser_visibilityInfo() -{ - return (typeof _VirtualDom_doc.hidden !== 'undefined') - ? { hidden: 'hidden', change: 'visibilitychange' } - : - (typeof _VirtualDom_doc.mozHidden !== 'undefined') - ? { hidden: 'mozHidden', change: 'mozvisibilitychange' } - : - (typeof _VirtualDom_doc.msHidden !== 'undefined') - ? { hidden: 'msHidden', change: 'msvisibilitychange' } - : - (typeof _VirtualDom_doc.webkitHidden !== 'undefined') - ? { hidden: 'webkitHidden', change: 'webkitvisibilitychange' } - : { hidden: 'hidden', change: 'visibilitychange' }; -} - - - -// ANIMATION FRAMES - - -function _Browser_rAF() -{ - return _Scheduler_binding(function(callback) - { - var id = _Browser_requestAnimationFrame(function() { - callback(_Scheduler_succeed(Date.now())); - }); - - return function() { - _Browser_cancelAnimationFrame(id); - }; - }); -} - - -function _Browser_now() -{ - return _Scheduler_binding(function(callback) - { - callback(_Scheduler_succeed(Date.now())); - }); -} - - - -// DOM STUFF - - -function _Browser_withNode(id, doStuff) -{ - return _Scheduler_binding(function(callback) - { - _Browser_requestAnimationFrame(function() { - var node = document.getElementById(id); - callback(node - ? _Scheduler_succeed(doStuff(node)) - : _Scheduler_fail($elm$browser$Browser$Dom$NotFound(id)) - ); - }); - }); -} - - -function _Browser_withWindow(doStuff) -{ - return _Scheduler_binding(function(callback) - { - _Browser_requestAnimationFrame(function() { - callback(_Scheduler_succeed(doStuff())); - }); - }); -} - - -// FOCUS and BLUR - - -var _Browser_call = F2(function(functionName, id) -{ - return _Browser_withNode(id, function(node) { - node[functionName](); - return _Utils_Tuple0; - }); -}); - - - -// WINDOW VIEWPORT - - -function _Browser_getViewport() -{ - return { - scene: _Browser_getScene(), - viewport: { - x: _Browser_window.pageXOffset, - y: _Browser_window.pageYOffset, - width: _Browser_doc.documentElement.clientWidth, - height: _Browser_doc.documentElement.clientHeight - } - }; -} - -function _Browser_getScene() -{ - var body = _Browser_doc.body; - var elem = _Browser_doc.documentElement; - return { - width: Math.max(body.scrollWidth, body.offsetWidth, elem.scrollWidth, elem.offsetWidth, elem.clientWidth), - height: Math.max(body.scrollHeight, body.offsetHeight, elem.scrollHeight, elem.offsetHeight, elem.clientHeight) - }; -} - -var _Browser_setViewport = F2(function(x, y) -{ - return _Browser_withWindow(function() - { - _Browser_window.scroll(x, y); - return _Utils_Tuple0; - }); -}); - - - -// ELEMENT VIEWPORT - - -function _Browser_getViewportOf(id) -{ - return _Browser_withNode(id, function(node) - { - return { - scene: { - width: node.scrollWidth, - height: node.scrollHeight - }, - viewport: { - x: node.scrollLeft, - y: node.scrollTop, - width: node.clientWidth, - height: node.clientHeight - } - }; - }); -} - - -var _Browser_setViewportOf = F3(function(id, x, y) -{ - return _Browser_withNode(id, function(node) - { - node.scrollLeft = x; - node.scrollTop = y; - return _Utils_Tuple0; - }); -}); - - - -// ELEMENT - - -function _Browser_getElement(id) -{ - return _Browser_withNode(id, function(node) - { - var rect = node.getBoundingClientRect(); - var x = _Browser_window.pageXOffset; - var y = _Browser_window.pageYOffset; - return { - scene: _Browser_getScene(), - viewport: { - x: x, - y: y, - width: _Browser_doc.documentElement.clientWidth, - height: _Browser_doc.documentElement.clientHeight - }, - element: { - x: x + rect.left, - y: y + rect.top, - width: rect.width, - height: rect.height - } - }; - }); -} - - - -// LOAD and RELOAD - - -function _Browser_reload(skipCache) -{ - return A2($elm$core$Task$perform, $elm$core$Basics$never, _Scheduler_binding(function(callback) - { - _VirtualDom_doc.location.reload(skipCache); - })); -} - -function _Browser_load(url) -{ - return A2($elm$core$Task$perform, $elm$core$Basics$never, _Scheduler_binding(function(callback) - { - try - { - _Browser_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. - _VirtualDom_doc.location.reload(false); - } - })); -} - - - -// SEND REQUEST - -var _Http_toTask = F3(function(router, toTask, request) -{ - return _Scheduler_binding(function(callback) - { - function done(response) { - callback(toTask(request.expect.a(response))); - } - - var xhr = new XMLHttpRequest(); - xhr.addEventListener('error', function() { done($elm$http$Http$NetworkError_); }); - xhr.addEventListener('timeout', function() { done($elm$http$Http$Timeout_); }); - xhr.addEventListener('load', function() { done(_Http_toResponse(request.expect.b, xhr)); }); - $elm$core$Maybe$isJust(request.tracker) && _Http_track(router, xhr, request.tracker.a); - - try { - xhr.open(request.method, request.url, true); - } catch (e) { - return done($elm$http$Http$BadUrl_(request.url)); - } - - _Http_configureRequest(xhr, request); - - request.body.a && xhr.setRequestHeader('Content-Type', request.body.a); - xhr.send(request.body.b); - - return function() { xhr.c = true; xhr.abort(); }; - }); -}); - - -// CONFIGURE - -function _Http_configureRequest(xhr, request) -{ - for (var headers = request.headers; headers.b; headers = headers.b) // WHILE_CONS - { - xhr.setRequestHeader(headers.a.a, headers.a.b); - } - xhr.timeout = request.timeout.a || 0; - xhr.responseType = request.expect.d; - xhr.withCredentials = request.allowCookiesFromOtherDomains; -} - - -// RESPONSES - -function _Http_toResponse(toBody, xhr) -{ - return A2( - 200 <= xhr.status && xhr.status < 300 ? $elm$http$Http$GoodStatus_ : $elm$http$Http$BadStatus_, - _Http_toMetadata(xhr), - toBody(xhr.response) - ); -} - - -// METADATA - -function _Http_toMetadata(xhr) -{ - return { - url: xhr.responseURL, - statusCode: xhr.status, - statusText: xhr.statusText, - headers: _Http_parseHeaders(xhr.getAllResponseHeaders()) - }; -} - - -// HEADERS - -function _Http_parseHeaders(rawHeaders) -{ - if (!rawHeaders) - { - return $elm$core$Dict$empty; - } - - var headers = $elm$core$Dict$empty; - var headerPairs = rawHeaders.split('\r\n'); - for (var i = headerPairs.length; i--; ) - { - var headerPair = headerPairs[i]; - var index = headerPair.indexOf(': '); - if (index > 0) - { - var key = headerPair.substring(0, index); - var value = headerPair.substring(index + 2); - - headers = A3($elm$core$Dict$update, key, function(oldValue) { - return $elm$core$Maybe$Just($elm$core$Maybe$isJust(oldValue) - ? value + ', ' + oldValue.a - : value - ); - }, headers); - } - } - return headers; -} - - -// EXPECT - -var _Http_expect = F3(function(type, toBody, toValue) -{ - return { - $: 0, - d: type, - b: toBody, - a: toValue - }; -}); - -var _Http_mapExpect = F2(function(func, expect) -{ - return { - $: 0, - d: expect.d, - b: expect.b, - a: function(x) { return func(expect.a(x)); } - }; -}); - -function _Http_toDataView(arrayBuffer) -{ - return new DataView(arrayBuffer); -} - - -// BODY and PARTS - -var _Http_emptyBody = { $: 0 }; -var _Http_pair = F2(function(a, b) { return { $: 0, a: a, b: b }; }); - -function _Http_toFormData(parts) -{ - for (var formData = new FormData(); parts.b; parts = parts.b) // WHILE_CONS - { - var part = parts.a; - formData.append(part.a, part.b); - } - return formData; -} - -var _Http_bytesToBlob = F2(function(mime, bytes) -{ - return new Blob([bytes], { type: mime }); -}); - - -// PROGRESS - -function _Http_track(router, xhr, tracker) -{ - // TODO check out lengthComputable on loadstart event - - xhr.upload.addEventListener('progress', function(event) { - if (xhr.c) { return; } - _Scheduler_rawSpawn(A2($elm$core$Platform$sendToSelf, router, _Utils_Tuple2(tracker, $elm$http$Http$Sending({ - sent: event.loaded, - size: event.total - })))); - }); - xhr.addEventListener('progress', function(event) { - if (xhr.c) { return; } - _Scheduler_rawSpawn(A2($elm$core$Platform$sendToSelf, router, _Utils_Tuple2(tracker, $elm$http$Http$Receiving({ - received: event.loaded, - size: event.lengthComputable ? $elm$core$Maybe$Just(event.total) : $elm$core$Maybe$Nothing - })))); - }); -} - - - -// STRINGS - - -var _Parser_isSubString = F5(function(smallString, offset, row, col, bigString) -{ - var smallLength = smallString.length; - var isGood = offset + smallLength <= bigString.length; - - for (var i = 0; isGood && i < smallLength; ) - { - var code = bigString.charCodeAt(offset); - isGood = - smallString[i++] === bigString[offset++] - && ( - code === 0x000A /* \n */ - ? ( row++, col=1 ) - : ( col++, (code & 0xF800) === 0xD800 ? smallString[i++] === bigString[offset++] : 1 ) - ) - } - - return _Utils_Tuple3(isGood ? offset : -1, row, col); -}); - - - -// CHARS - - -var _Parser_isSubChar = F3(function(predicate, offset, string) -{ - return ( - string.length <= offset - ? -1 - : - (string.charCodeAt(offset) & 0xF800) === 0xD800 - ? (predicate(_Utils_chr(string.substr(offset, 2))) ? offset + 2 : -1) - : - (predicate(_Utils_chr(string[offset])) - ? ((string[offset] === '\n') ? -2 : (offset + 1)) - : -1 - ) - ); -}); - - -var _Parser_isAsciiCode = F3(function(code, offset, string) -{ - return string.charCodeAt(offset) === code; -}); - - - -// NUMBERS - - -var _Parser_chompBase10 = F2(function(offset, string) -{ - for (; offset < string.length; offset++) - { - var code = string.charCodeAt(offset); - if (code < 0x30 || 0x39 < code) - { - return offset; - } - } - return offset; -}); - - -var _Parser_consumeBase = F3(function(base, offset, string) -{ - for (var total = 0; offset < string.length; offset++) - { - var digit = string.charCodeAt(offset) - 0x30; - if (digit < 0 || base <= digit) break; - total = base * total + digit; - } - return _Utils_Tuple2(offset, total); -}); - - -var _Parser_consumeBase16 = F2(function(offset, string) -{ - for (var total = 0; offset < string.length; offset++) - { - var code = string.charCodeAt(offset); - if (0x30 <= code && code <= 0x39) - { - total = 16 * total + code - 0x30; - } - else if (0x41 <= code && code <= 0x46) - { - total = 16 * total + code - 55; - } - else if (0x61 <= code && code <= 0x66) - { - total = 16 * total + code - 87; - } - else - { - break; - } - } - return _Utils_Tuple2(offset, total); -}); - - - -// FIND STRING - - -var _Parser_findSubString = F5(function(smallString, offset, row, col, bigString) -{ - var newOffset = bigString.indexOf(smallString, offset); - var target = newOffset < 0 ? bigString.length : newOffset + smallString.length; - - while (offset < target) - { - var code = bigString.charCodeAt(offset++); - code === 0x000A /* \n */ - ? ( col=1, row++ ) - : ( col++, (code & 0xF800) === 0xD800 && offset++ ) - } - - return _Utils_Tuple3(newOffset, row, col); -}); - - -// CREATE - -var _Regex_never = /.^/; - -var _Regex_fromStringWith = F2(function(options, string) -{ - var flags = 'g'; - if (options.multiline) { flags += 'm'; } - if (options.caseInsensitive) { flags += 'i'; } - - try - { - return $elm$core$Maybe$Just(new RegExp(string, flags)); - } - catch(error) - { - return $elm$core$Maybe$Nothing; - } -}); - - -// USE - -var _Regex_contains = F2(function(re, string) -{ - return string.match(re) !== null; -}); - - -var _Regex_findAtMost = F3(function(n, re, str) -{ - var out = []; - var number = 0; - var string = str; - var lastIndex = re.lastIndex; - var prevLastIndex = -1; - var result; - while (number++ < n && (result = re.exec(string))) - { - if (prevLastIndex == re.lastIndex) break; - var i = result.length - 1; - var subs = new Array(i); - while (i > 0) - { - var submatch = result[i]; - subs[--i] = submatch - ? $elm$core$Maybe$Just(submatch) - : $elm$core$Maybe$Nothing; - } - out.push(A4($elm$regex$Regex$Match, result[0], result.index, number, _List_fromArray(subs))); - prevLastIndex = re.lastIndex; - } - re.lastIndex = lastIndex; - return _List_fromArray(out); -}); - - -var _Regex_replaceAtMost = F4(function(n, re, replacer, string) -{ - var count = 0; - function jsReplacer(match) - { - if (count++ >= n) - { - return match; - } - var i = arguments.length - 3; - var submatches = new Array(i); - while (i > 0) - { - var submatch = arguments[i]; - submatches[--i] = submatch - ? $elm$core$Maybe$Just(submatch) - : $elm$core$Maybe$Nothing; - } - return replacer(A4($elm$regex$Regex$Match, match, arguments[arguments.length - 2], count, _List_fromArray(submatches))); - } - return string.replace(re, jsReplacer); -}); - -var _Regex_splitAtMost = F3(function(n, re, str) -{ - var string = str; - var out = []; - var start = re.lastIndex; - var restoreLastIndex = re.lastIndex; - while (n--) - { - var result = re.exec(string); - if (!result) break; - out.push(string.slice(start, result.index)); - start = re.lastIndex; - } - out.push(string.slice(start)); - re.lastIndex = restoreLastIndex; - return _List_fromArray(out); -}); - -var _Regex_infinity = Infinity; - - -function _Url_percentEncode(string) -{ - return encodeURIComponent(string); -} - -function _Url_percentDecode(string) -{ - try - { - return $elm$core$Maybe$Just(decodeURIComponent(string)); - } - catch (e) - { - return $elm$core$Maybe$Nothing; - } -}var $elm$core$List$cons = _List_cons; -var $elm$core$Elm$JsArray$foldr = _JsArray_foldr; -var $elm$core$Array$foldr = F3( - function (func, baseCase, _v0) { - var tree = _v0.c; - var tail = _v0.d; - var helper = F2( - function (node, acc) { - if (node.$ === 'SubTree') { - var subTree = node.a; - return A3($elm$core$Elm$JsArray$foldr, helper, acc, subTree); - } else { - var values = node.a; - return A3($elm$core$Elm$JsArray$foldr, func, acc, values); - } - }); - return A3( - $elm$core$Elm$JsArray$foldr, - helper, - A3($elm$core$Elm$JsArray$foldr, func, baseCase, tail), - tree); - }); -var $elm$core$Array$toList = function (array) { - return A3($elm$core$Array$foldr, $elm$core$List$cons, _List_Nil, array); -}; -var $elm$core$Dict$foldr = F3( - function (func, acc, t) { - foldr: - while (true) { - if (t.$ === 'RBEmpty_elm_builtin') { - return acc; - } else { - var key = t.b; - var value = t.c; - var left = t.d; - var right = t.e; - var $temp$func = func, - $temp$acc = A3( - func, - key, - value, - A3($elm$core$Dict$foldr, func, acc, right)), - $temp$t = left; - func = $temp$func; - acc = $temp$acc; - t = $temp$t; - continue foldr; - } - } - }); -var $elm$core$Dict$toList = function (dict) { - return A3( - $elm$core$Dict$foldr, - F3( - function (key, value, list) { - return A2( - $elm$core$List$cons, - _Utils_Tuple2(key, value), - list); - }), - _List_Nil, - dict); -}; -var $elm$core$Dict$keys = function (dict) { - return A3( - $elm$core$Dict$foldr, - F3( - function (key, value, keyList) { - return A2($elm$core$List$cons, key, keyList); - }), - _List_Nil, - dict); -}; -var $elm$core$Set$toList = function (_v0) { - var dict = _v0.a; - return $elm$core$Dict$keys(dict); -}; -var $elm$core$Basics$EQ = {$: 'EQ'}; -var $elm$core$Basics$GT = {$: 'GT'}; -var $elm$core$Basics$LT = {$: 'LT'}; -var $elm$core$Maybe$Just = function (a) { - return {$: 'Just', a: a}; -}; -var $author$project$TemplateModulesBeta$MsgGlobal = function (a) { - return {$: 'MsgGlobal', a: a}; -}; -var $elm$core$Maybe$Nothing = {$: 'Nothing'}; -var $author$project$TemplateModulesBeta$OnPageChange = function (a) { - return {$: 'OnPageChange', a: a}; -}; -var $elm$core$Result$Err = function (a) { - return {$: 'Err', a: a}; -}; -var $elm$core$Result$Ok = function (a) { - return {$: 'Ok', a: a}; -}; -var $author$project$Pages$StaticHttpRequest$Request = function (a) { - return {$: 'Request', a: a}; -}; -var $elm$core$Basics$apR = F2( - function (x, f) { - return f(x); - }); -var $elm$core$Dict$RBEmpty_elm_builtin = {$: 'RBEmpty_elm_builtin'}; -var $elm$core$Dict$empty = $elm$core$Dict$RBEmpty_elm_builtin; -var $author$project$Pages$StaticHttpRequest$Done = function (a) { - return {$: 'Done', a: a}; -}; -var $elm$core$Basics$append = _Utils_append; -var $author$project$Pages$StaticHttp$addUrls = F2( - function (urlsToAdd, requestInfo) { - if (requestInfo.$ === 'Request') { - var _v1 = requestInfo.a; - var initialUrls = _v1.a; - var _function = _v1.b; - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - _Utils_ap(initialUrls, urlsToAdd), - _function)); - } else { - var value = requestInfo.a; - return $author$project$Pages$StaticHttpRequest$Done(value); - } - }); -var $elm$core$Result$andThen = F2( - function (callback, result) { - if (result.$ === 'Ok') { - var value = result.a; - return callback(value); - } else { - var msg = result.a; - return $elm$core$Result$Err(msg); - } - }); -var $elm$core$Dict$foldl = F3( - function (func, acc, dict) { - foldl: - while (true) { - if (dict.$ === 'RBEmpty_elm_builtin') { - return acc; - } else { - var key = dict.b; - var value = dict.c; - var left = dict.d; - var right = dict.e; - var $temp$func = func, - $temp$acc = A3( - func, - key, - value, - A3($elm$core$Dict$foldl, func, acc, left)), - $temp$dict = right; - func = $temp$func; - acc = $temp$acc; - dict = $temp$dict; - continue foldl; - } - } - }); -var $elm$core$Dict$Black = {$: 'Black'}; -var $elm$core$Dict$RBNode_elm_builtin = F5( - function (a, b, c, d, e) { - return {$: 'RBNode_elm_builtin', a: a, b: b, c: c, d: d, e: e}; - }); -var $elm$core$Dict$Red = {$: 'Red'}; -var $elm$core$Dict$balance = F5( - function (color, key, value, left, right) { - if ((right.$ === 'RBNode_elm_builtin') && (right.a.$ === 'Red')) { - var _v1 = right.a; - var rK = right.b; - var rV = right.c; - var rLeft = right.d; - var rRight = right.e; - if ((left.$ === 'RBNode_elm_builtin') && (left.a.$ === 'Red')) { - var _v3 = left.a; - var lK = left.b; - var lV = left.c; - var lLeft = left.d; - var lRight = left.e; - return A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Red, - key, - value, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, lK, lV, lLeft, lRight), - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, rK, rV, rLeft, rRight)); - } else { - return A5( - $elm$core$Dict$RBNode_elm_builtin, - color, - rK, - rV, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, key, value, left, rLeft), - rRight); - } - } else { - if ((((left.$ === 'RBNode_elm_builtin') && (left.a.$ === 'Red')) && (left.d.$ === 'RBNode_elm_builtin')) && (left.d.a.$ === 'Red')) { - var _v5 = left.a; - var lK = left.b; - var lV = left.c; - var _v6 = left.d; - var _v7 = _v6.a; - var llK = _v6.b; - var llV = _v6.c; - var llLeft = _v6.d; - var llRight = _v6.e; - var lRight = left.e; - return A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Red, - lK, - lV, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, llK, llV, llLeft, llRight), - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, key, value, lRight, right)); - } else { - return A5($elm$core$Dict$RBNode_elm_builtin, color, key, value, left, right); - } - } - }); -var $elm$core$Basics$compare = _Utils_compare; -var $elm$core$Dict$insertHelp = F3( - function (key, value, dict) { - if (dict.$ === 'RBEmpty_elm_builtin') { - return A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, key, value, $elm$core$Dict$RBEmpty_elm_builtin, $elm$core$Dict$RBEmpty_elm_builtin); - } else { - var nColor = dict.a; - var nKey = dict.b; - var nValue = dict.c; - var nLeft = dict.d; - var nRight = dict.e; - var _v1 = A2($elm$core$Basics$compare, key, nKey); - switch (_v1.$) { - case 'LT': - return A5( - $elm$core$Dict$balance, - nColor, - nKey, - nValue, - A3($elm$core$Dict$insertHelp, key, value, nLeft), - nRight); - case 'EQ': - return A5($elm$core$Dict$RBNode_elm_builtin, nColor, nKey, value, nLeft, nRight); - default: - return A5( - $elm$core$Dict$balance, - nColor, - nKey, - nValue, - nLeft, - A3($elm$core$Dict$insertHelp, key, value, nRight)); - } - } - }); -var $elm$core$Dict$insert = F3( - function (key, value, dict) { - var _v0 = A3($elm$core$Dict$insertHelp, key, value, dict); - if ((_v0.$ === 'RBNode_elm_builtin') && (_v0.a.$ === 'Red')) { - var _v1 = _v0.a; - var k = _v0.b; - var v = _v0.c; - var l = _v0.d; - var r = _v0.e; - return A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, k, v, l, r); - } else { - var x = _v0; - return x; - } - }); -var $elm$core$Dict$union = F2( - function (t1, t2) { - return A3($elm$core$Dict$foldl, $elm$core$Dict$insert, t2, t1); - }); -var $author$project$Pages$StaticHttp$lookupHelp = F4( - function (strippedSoFar, appType, requestInfo, rawResponses) { - if (requestInfo.$ === 'Request') { - var _v1 = requestInfo.a; - var urls = _v1.a; - var lookupFn = _v1.b; - return A2( - $elm$core$Result$andThen, - function (_v2) { - var strippedResponses = _v2.a; - var nextRequest = _v2.b; - return A4( - $author$project$Pages$StaticHttp$lookupHelp, - A2($elm$core$Dict$union, strippedResponses, strippedSoFar), - appType, - A2($author$project$Pages$StaticHttp$addUrls, urls, nextRequest), - rawResponses); - }, - A2(lookupFn, appType, rawResponses)); - } else { - var value = requestInfo.a; - return $elm$core$Result$Ok( - _Utils_Tuple2(strippedSoFar, value)); - } - }); -var $author$project$Pages$StaticHttp$lookup = $author$project$Pages$StaticHttp$lookupHelp($elm$core$Dict$empty); -var $author$project$Pages$StaticHttp$lookupUrls = function (requestInfo) { - if (requestInfo.$ === 'Request') { - var _v1 = requestInfo.a; - var urls = _v1.a; - return urls; - } else { - return _List_Nil; - } -}; -var $author$project$Pages$StaticHttp$andThen = F2( - function (fn, requestInfo) { - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - $author$project$Pages$StaticHttp$lookupUrls(requestInfo), - F2( - function (appType, rawResponses) { - return function (result) { - if (result.$ === 'Err') { - var error = result.a; - return $elm$core$Result$Err(error); - } else { - var _v1 = result.a; - var strippedResponses = _v1.a; - var value = _v1.b; - return $elm$core$Result$Ok( - _Utils_Tuple2( - strippedResponses, - fn(value))); - } - }( - A3($author$project$Pages$StaticHttp$lookup, appType, requestInfo, rawResponses)); - }))); - }); -var $author$project$Pages$Internal$Platform$AppMsg = function (a) { - return {$: 'AppMsg', a: a}; -}; -var $author$project$Pages$Internal$Platform$HotReloadComplete = function (a) { - return {$: 'HotReloadComplete', a: a}; -}; -var $author$project$Pages$Internal$Platform$LinkClicked = function (a) { - return {$: 'LinkClicked', a: a}; -}; -var $author$project$Pages$Internal$Platform$Model = function (a) { - return {$: 'Model', a: a}; -}; -var $author$project$Pages$Internal$Platform$StartingHotReload = {$: 'StartingHotReload'}; -var $author$project$Pages$Internal$Platform$UrlChanged = function (a) { - return {$: 'UrlChanged', a: a}; -}; -var $author$project$Pages$Internal$Platform$UserMsg = function (a) { - return {$: 'UserMsg', a: a}; -}; -var $elm$json$Json$Decode$Failure = F2( - function (a, b) { - return {$: 'Failure', a: a, b: b}; - }); -var $elm$json$Json$Decode$Field = F2( - function (a, b) { - return {$: 'Field', a: a, b: b}; - }); -var $elm$json$Json$Decode$Index = F2( - function (a, b) { - return {$: 'Index', a: a, b: b}; - }); -var $elm$json$Json$Decode$OneOf = function (a) { - return {$: 'OneOf', a: a}; -}; -var $elm$core$Basics$False = {$: 'False'}; -var $elm$core$Basics$add = _Basics_add; -var $elm$core$String$all = _String_all; -var $elm$core$Basics$and = _Basics_and; -var $elm$json$Json$Encode$encode = _Json_encode; -var $elm$core$String$fromInt = _String_fromNumber; -var $elm$core$String$join = F2( - function (sep, chunks) { - return A2( - _String_join, - sep, - _List_toArray(chunks)); - }); -var $elm$core$String$split = F2( - function (sep, string) { - return _List_fromArray( - A2(_String_split, sep, string)); - }); -var $elm$json$Json$Decode$indent = function (str) { - return A2( - $elm$core$String$join, - '\n ', - A2($elm$core$String$split, '\n', str)); -}; -var $elm$core$List$foldl = F3( - function (func, acc, list) { - foldl: - while (true) { - if (!list.b) { - return acc; - } else { - var x = list.a; - var xs = list.b; - var $temp$func = func, - $temp$acc = A2(func, x, acc), - $temp$list = xs; - func = $temp$func; - acc = $temp$acc; - list = $temp$list; - continue foldl; - } - } - }); -var $elm$core$List$length = function (xs) { - return A3( - $elm$core$List$foldl, - F2( - function (_v0, i) { - return i + 1; - }), - 0, - xs); -}; -var $elm$core$List$map2 = _List_map2; -var $elm$core$Basics$le = _Utils_le; -var $elm$core$Basics$sub = _Basics_sub; -var $elm$core$List$rangeHelp = F3( - function (lo, hi, list) { - rangeHelp: - while (true) { - if (_Utils_cmp(lo, hi) < 1) { - var $temp$lo = lo, - $temp$hi = hi - 1, - $temp$list = A2($elm$core$List$cons, hi, list); - lo = $temp$lo; - hi = $temp$hi; - list = $temp$list; - continue rangeHelp; - } else { - return list; - } - } - }); -var $elm$core$List$range = F2( - function (lo, hi) { - return A3($elm$core$List$rangeHelp, lo, hi, _List_Nil); - }); -var $elm$core$List$indexedMap = F2( - function (f, xs) { - return A3( - $elm$core$List$map2, - f, - A2( - $elm$core$List$range, - 0, - $elm$core$List$length(xs) - 1), - xs); - }); -var $elm$core$Char$toCode = _Char_toCode; -var $elm$core$Char$isLower = function (_char) { - var code = $elm$core$Char$toCode(_char); - return (97 <= code) && (code <= 122); -}; -var $elm$core$Char$isUpper = function (_char) { - var code = $elm$core$Char$toCode(_char); - return (code <= 90) && (65 <= code); -}; -var $elm$core$Basics$or = _Basics_or; -var $elm$core$Char$isAlpha = function (_char) { - return $elm$core$Char$isLower(_char) || $elm$core$Char$isUpper(_char); -}; -var $elm$core$Char$isDigit = function (_char) { - var code = $elm$core$Char$toCode(_char); - return (code <= 57) && (48 <= code); -}; -var $elm$core$Char$isAlphaNum = function (_char) { - return $elm$core$Char$isLower(_char) || ($elm$core$Char$isUpper(_char) || $elm$core$Char$isDigit(_char)); -}; -var $elm$core$List$reverse = function (list) { - return A3($elm$core$List$foldl, $elm$core$List$cons, _List_Nil, list); -}; -var $elm$core$String$uncons = _String_uncons; -var $elm$json$Json$Decode$errorOneOf = F2( - function (i, error) { - return '\n\n(' + ($elm$core$String$fromInt(i + 1) + (') ' + $elm$json$Json$Decode$indent( - $elm$json$Json$Decode$errorToString(error)))); - }); -var $elm$json$Json$Decode$errorToString = function (error) { - return A2($elm$json$Json$Decode$errorToStringHelp, error, _List_Nil); -}; -var $elm$json$Json$Decode$errorToStringHelp = F2( - function (error, context) { - errorToStringHelp: - while (true) { - switch (error.$) { - case 'Field': - var f = error.a; - var err = error.b; - var isSimple = function () { - var _v1 = $elm$core$String$uncons(f); - if (_v1.$ === 'Nothing') { - return false; - } else { - var _v2 = _v1.a; - var _char = _v2.a; - var rest = _v2.b; - return $elm$core$Char$isAlpha(_char) && A2($elm$core$String$all, $elm$core$Char$isAlphaNum, rest); - } - }(); - var fieldName = isSimple ? ('.' + f) : ('[\'' + (f + '\']')); - var $temp$error = err, - $temp$context = A2($elm$core$List$cons, fieldName, context); - error = $temp$error; - context = $temp$context; - continue errorToStringHelp; - case 'Index': - var i = error.a; - var err = error.b; - var indexName = '[' + ($elm$core$String$fromInt(i) + ']'); - var $temp$error = err, - $temp$context = A2($elm$core$List$cons, indexName, context); - error = $temp$error; - context = $temp$context; - continue errorToStringHelp; - case 'OneOf': - var errors = error.a; - if (!errors.b) { - return 'Ran into a Json.Decode.oneOf with no possibilities' + function () { - if (!context.b) { - return '!'; - } else { - return ' at json' + A2( - $elm$core$String$join, - '', - $elm$core$List$reverse(context)); - } - }(); - } else { - if (!errors.b.b) { - var err = errors.a; - var $temp$error = err, - $temp$context = context; - error = $temp$error; - context = $temp$context; - continue errorToStringHelp; - } else { - var starter = function () { - if (!context.b) { - return 'Json.Decode.oneOf'; - } else { - return 'The Json.Decode.oneOf at json' + A2( - $elm$core$String$join, - '', - $elm$core$List$reverse(context)); - } - }(); - var introduction = starter + (' failed in the following ' + ($elm$core$String$fromInt( - $elm$core$List$length(errors)) + ' ways:')); - return A2( - $elm$core$String$join, - '\n\n', - A2( - $elm$core$List$cons, - introduction, - A2($elm$core$List$indexedMap, $elm$json$Json$Decode$errorOneOf, errors))); - } - } - default: - var msg = error.a; - var json = error.b; - var introduction = function () { - if (!context.b) { - return 'Problem with the given value:\n\n'; - } else { - return 'Problem with the value at json' + (A2( - $elm$core$String$join, - '', - $elm$core$List$reverse(context)) + ':\n\n '); - } - }(); - return introduction + ($elm$json$Json$Decode$indent( - A2($elm$json$Json$Encode$encode, 4, json)) + ('\n\n' + msg)); - } - } - }); -var $elm$core$Array$branchFactor = 32; -var $elm$core$Array$Array_elm_builtin = F4( - function (a, b, c, d) { - return {$: 'Array_elm_builtin', a: a, b: b, c: c, d: d}; - }); -var $elm$core$Elm$JsArray$empty = _JsArray_empty; -var $elm$core$Basics$ceiling = _Basics_ceiling; -var $elm$core$Basics$fdiv = _Basics_fdiv; -var $elm$core$Basics$logBase = F2( - function (base, number) { - return _Basics_log(number) / _Basics_log(base); - }); -var $elm$core$Basics$toFloat = _Basics_toFloat; -var $elm$core$Array$shiftStep = $elm$core$Basics$ceiling( - A2($elm$core$Basics$logBase, 2, $elm$core$Array$branchFactor)); -var $elm$core$Array$empty = A4($elm$core$Array$Array_elm_builtin, 0, $elm$core$Array$shiftStep, $elm$core$Elm$JsArray$empty, $elm$core$Elm$JsArray$empty); -var $elm$core$Elm$JsArray$initialize = _JsArray_initialize; -var $elm$core$Array$Leaf = function (a) { - return {$: 'Leaf', a: a}; -}; -var $elm$core$Basics$apL = F2( - function (f, x) { - return f(x); - }); -var $elm$core$Basics$eq = _Utils_equal; -var $elm$core$Basics$floor = _Basics_floor; -var $elm$core$Elm$JsArray$length = _JsArray_length; -var $elm$core$Basics$gt = _Utils_gt; -var $elm$core$Basics$max = F2( - function (x, y) { - return (_Utils_cmp(x, y) > 0) ? x : y; - }); -var $elm$core$Basics$mul = _Basics_mul; -var $elm$core$Array$SubTree = function (a) { - return {$: 'SubTree', a: a}; -}; -var $elm$core$Elm$JsArray$initializeFromList = _JsArray_initializeFromList; -var $elm$core$Array$compressNodes = F2( - function (nodes, acc) { - compressNodes: - while (true) { - var _v0 = A2($elm$core$Elm$JsArray$initializeFromList, $elm$core$Array$branchFactor, nodes); - var node = _v0.a; - var remainingNodes = _v0.b; - var newAcc = A2( - $elm$core$List$cons, - $elm$core$Array$SubTree(node), - acc); - if (!remainingNodes.b) { - return $elm$core$List$reverse(newAcc); - } else { - var $temp$nodes = remainingNodes, - $temp$acc = newAcc; - nodes = $temp$nodes; - acc = $temp$acc; - continue compressNodes; - } - } - }); -var $elm$core$Tuple$first = function (_v0) { - var x = _v0.a; - return x; -}; -var $elm$core$Array$treeFromBuilder = F2( - function (nodeList, nodeListSize) { - treeFromBuilder: - while (true) { - var newNodeSize = $elm$core$Basics$ceiling(nodeListSize / $elm$core$Array$branchFactor); - if (newNodeSize === 1) { - return A2($elm$core$Elm$JsArray$initializeFromList, $elm$core$Array$branchFactor, nodeList).a; - } else { - var $temp$nodeList = A2($elm$core$Array$compressNodes, nodeList, _List_Nil), - $temp$nodeListSize = newNodeSize; - nodeList = $temp$nodeList; - nodeListSize = $temp$nodeListSize; - continue treeFromBuilder; - } - } - }); -var $elm$core$Array$builderToArray = F2( - function (reverseNodeList, builder) { - if (!builder.nodeListSize) { - return A4( - $elm$core$Array$Array_elm_builtin, - $elm$core$Elm$JsArray$length(builder.tail), - $elm$core$Array$shiftStep, - $elm$core$Elm$JsArray$empty, - builder.tail); - } else { - var treeLen = builder.nodeListSize * $elm$core$Array$branchFactor; - var depth = $elm$core$Basics$floor( - A2($elm$core$Basics$logBase, $elm$core$Array$branchFactor, treeLen - 1)); - var correctNodeList = reverseNodeList ? $elm$core$List$reverse(builder.nodeList) : builder.nodeList; - var tree = A2($elm$core$Array$treeFromBuilder, correctNodeList, builder.nodeListSize); - return A4( - $elm$core$Array$Array_elm_builtin, - $elm$core$Elm$JsArray$length(builder.tail) + treeLen, - A2($elm$core$Basics$max, 5, depth * $elm$core$Array$shiftStep), - tree, - builder.tail); - } - }); -var $elm$core$Basics$idiv = _Basics_idiv; -var $elm$core$Basics$lt = _Utils_lt; -var $elm$core$Array$initializeHelp = F5( - function (fn, fromIndex, len, nodeList, tail) { - initializeHelp: - while (true) { - if (fromIndex < 0) { - return A2( - $elm$core$Array$builderToArray, - false, - {nodeList: nodeList, nodeListSize: (len / $elm$core$Array$branchFactor) | 0, tail: tail}); - } else { - var leaf = $elm$core$Array$Leaf( - A3($elm$core$Elm$JsArray$initialize, $elm$core$Array$branchFactor, fromIndex, fn)); - var $temp$fn = fn, - $temp$fromIndex = fromIndex - $elm$core$Array$branchFactor, - $temp$len = len, - $temp$nodeList = A2($elm$core$List$cons, leaf, nodeList), - $temp$tail = tail; - fn = $temp$fn; - fromIndex = $temp$fromIndex; - len = $temp$len; - nodeList = $temp$nodeList; - tail = $temp$tail; - continue initializeHelp; - } - } - }); -var $elm$core$Basics$remainderBy = _Basics_remainderBy; -var $elm$core$Array$initialize = F2( - function (len, fn) { - if (len <= 0) { - return $elm$core$Array$empty; - } else { - var tailLen = len % $elm$core$Array$branchFactor; - var tail = A3($elm$core$Elm$JsArray$initialize, tailLen, len - tailLen, fn); - var initialFromIndex = (len - tailLen) - $elm$core$Array$branchFactor; - return A5($elm$core$Array$initializeHelp, fn, initialFromIndex, len, _List_Nil, tail); - } - }); -var $elm$core$Basics$True = {$: 'True'}; -var $elm$core$Result$isOk = function (result) { - if (result.$ === 'Ok') { - return true; - } else { - return false; - } -}; -var $elm$json$Json$Decode$map = _Json_map1; -var $elm$json$Json$Decode$map2 = _Json_map2; -var $elm$json$Json$Decode$succeed = _Json_succeed; -var $elm$virtual_dom$VirtualDom$toHandlerInt = function (handler) { - switch (handler.$) { - case 'Normal': - return 0; - case 'MayStopPropagation': - return 1; - case 'MayPreventDefault': - return 2; - default: - return 3; - } -}; -var $elm$browser$Debugger$Expando$ArraySeq = {$: 'ArraySeq'}; -var $elm$browser$Debugger$Overlay$BlockMost = {$: 'BlockMost'}; -var $elm$browser$Debugger$Overlay$BlockNone = {$: 'BlockNone'}; -var $elm$browser$Debugger$Expando$Constructor = F3( - function (a, b, c) { - return {$: 'Constructor', a: a, b: b, c: c}; - }); -var $elm$browser$Debugger$Expando$Dictionary = F2( - function (a, b) { - return {$: 'Dictionary', a: a, b: b}; - }); -var $elm$browser$Debugger$Main$Down = {$: 'Down'}; -var $elm$browser$Debugger$Expando$ListSeq = {$: 'ListSeq'}; -var $elm$browser$Debugger$Main$NoOp = {$: 'NoOp'}; -var $elm$browser$Debugger$Expando$Primitive = function (a) { - return {$: 'Primitive', a: a}; -}; -var $elm$browser$Debugger$Expando$Record = F2( - function (a, b) { - return {$: 'Record', a: a, b: b}; - }); -var $elm$browser$Debugger$Expando$S = function (a) { - return {$: 'S', a: a}; -}; -var $elm$browser$Debugger$Expando$Sequence = F3( - function (a, b, c) { - return {$: 'Sequence', a: a, b: b, c: c}; - }); -var $elm$browser$Debugger$Expando$SetSeq = {$: 'SetSeq'}; -var $elm$browser$Debugger$Main$Up = {$: 'Up'}; -var $elm$browser$Debugger$Main$UserMsg = function (a) { - return {$: 'UserMsg', a: a}; -}; -var $elm$browser$Debugger$Main$Export = {$: 'Export'}; -var $elm$browser$Debugger$Main$Import = {$: 'Import'}; -var $elm$browser$Debugger$Main$Open = {$: 'Open'}; -var $elm$browser$Debugger$Main$OverlayMsg = function (a) { - return {$: 'OverlayMsg', a: a}; -}; -var $elm$browser$Debugger$Main$Resume = {$: 'Resume'}; -var $elm$browser$Debugger$Main$isPaused = function (state) { - if (state.$ === 'Running') { - return false; - } else { - return true; - } -}; -var $elm$browser$Debugger$History$size = function (history) { - return history.numMessages; -}; -var $elm$browser$Debugger$Overlay$Accept = function (a) { - return {$: 'Accept', a: a}; -}; -var $elm$browser$Debugger$Overlay$Choose = F2( - function (a, b) { - return {$: 'Choose', a: a, b: b}; - }); -var $elm$html$Html$div = _VirtualDom_node('div'); -var $elm$json$Json$Encode$string = _Json_wrap; -var $elm$html$Html$Attributes$stringProperty = F2( - function (key, string) { - return A2( - _VirtualDom_property, - key, - $elm$json$Json$Encode$string(string)); - }); -var $elm$html$Html$Attributes$id = $elm$html$Html$Attributes$stringProperty('id'); -var $elm$virtual_dom$VirtualDom$Normal = function (a) { - return {$: 'Normal', a: a}; -}; -var $elm$virtual_dom$VirtualDom$on = _VirtualDom_on; -var $elm$html$Html$Events$on = F2( - function (event, decoder) { - return A2( - $elm$virtual_dom$VirtualDom$on, - event, - $elm$virtual_dom$VirtualDom$Normal(decoder)); - }); -var $elm$html$Html$Events$onClick = function (msg) { - return A2( - $elm$html$Html$Events$on, - 'click', - $elm$json$Json$Decode$succeed(msg)); -}; -var $elm$html$Html$span = _VirtualDom_node('span'); -var $elm$virtual_dom$VirtualDom$style = _VirtualDom_style; -var $elm$html$Html$Attributes$style = $elm$virtual_dom$VirtualDom$style; -var $elm$virtual_dom$VirtualDom$text = _VirtualDom_text; -var $elm$html$Html$text = $elm$virtual_dom$VirtualDom$text; -var $elm$html$Html$a = _VirtualDom_node('a'); -var $elm$browser$Debugger$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$browser$Debugger$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$html$Html$Attributes$href = function (url) { - return A2( - $elm$html$Html$Attributes$stringProperty, - 'href', - _VirtualDom_noJavaScriptUri(url)); -}; -var $elm$core$List$foldrHelper = F4( - function (fn, acc, ctr, ls) { - if (!ls.b) { - return acc; - } else { - var a = ls.a; - var r1 = ls.b; - if (!r1.b) { - return A2(fn, a, acc); - } else { - var b = r1.a; - var r2 = r1.b; - if (!r2.b) { - return A2( - fn, - a, - A2(fn, b, acc)); - } else { - var c = r2.a; - var r3 = r2.b; - if (!r3.b) { - return A2( - fn, - a, - A2( - fn, - b, - A2(fn, c, acc))); - } else { - var d = r3.a; - var r4 = r3.b; - var res = (ctr > 500) ? A3( - $elm$core$List$foldl, - fn, - acc, - $elm$core$List$reverse(r4)) : A4($elm$core$List$foldrHelper, fn, acc, ctr + 1, r4); - return A2( - fn, - a, - A2( - fn, - b, - A2( - fn, - c, - A2(fn, d, res)))); - } - } - } - } - }); -var $elm$core$List$foldr = F3( - function (fn, acc, ls) { - return A4($elm$core$List$foldrHelper, fn, acc, 0, ls); - }); -var $elm$core$List$map = F2( - function (f, xs) { - return A3( - $elm$core$List$foldr, - F2( - function (x, acc) { - return A2( - $elm$core$List$cons, - f(x), - acc); - }), - _List_Nil, - xs); - }); -var $elm$html$Html$p = _VirtualDom_node('p'); -var $elm$html$Html$ul = _VirtualDom_node('ul'); -var $elm$html$Html$code = _VirtualDom_node('code'); -var $elm$browser$Debugger$Overlay$viewCode = function (name) { - return A2( - $elm$html$Html$code, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text(name) - ])); -}; -var $elm$browser$Debugger$Overlay$addCommas = function (items) { - if (!items.b) { - return ''; - } else { - if (!items.b.b) { - var item = items.a; - return item; - } else { - if (!items.b.b.b) { - var item1 = items.a; - var _v1 = items.b; - var item2 = _v1.a; - return item1 + (' and ' + item2); - } else { - var lastItem = items.a; - var otherItems = items.b; - return A2( - $elm$core$String$join, - ', ', - _Utils_ap( - otherItems, - _List_fromArray( - [' and ' + lastItem]))); - } - } - } -}; -var $elm$html$Html$li = _VirtualDom_node('li'); -var $elm$browser$Debugger$Overlay$problemToString = function (problem) { - switch (problem.$) { - 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$browser$Debugger$Overlay$viewProblemType = function (_v0) { - var name = _v0.name; - var problems = _v0.problems; - return A2( - $elm$html$Html$li, - _List_Nil, - _List_fromArray( - [ - $elm$browser$Debugger$Overlay$viewCode(name), - $elm$html$Html$text( - ' can contain ' + ($elm$browser$Debugger$Overlay$addCommas( - A2($elm$core$List$map, $elm$browser$Debugger$Overlay$problemToString, problems)) + '.')) - ])); -}; -var $elm$browser$Debugger$Overlay$viewBadMetadata = function (_v0) { - var message = _v0.message; - var problems = _v0.problems; - return _List_fromArray( - [ - A2( - $elm$html$Html$p, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text('The '), - $elm$browser$Debugger$Overlay$viewCode(message), - $elm$html$Html$text(' type of your program cannot be reliably serialized for history files.') - ])), - A2( - $elm$html$Html$p, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text('Functions cannot be serialized, nor can values that contain functions. This is a problem in these places:') - ])), - A2( - $elm$html$Html$ul, - _List_Nil, - A2($elm$core$List$map, $elm$browser$Debugger$Overlay$viewProblemType, problems)), - A2( - $elm$html$Html$p, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text($elm$browser$Debugger$Overlay$goodNews1), - A2( - $elm$html$Html$a, - _List_fromArray( - [ - $elm$html$Html$Attributes$href('https://guide.elm-lang.org/types/custom_types.html') - ]), - _List_fromArray( - [ - $elm$html$Html$text('custom types') - ])), - $elm$html$Html$text(', in your messages. From there, your '), - $elm$browser$Debugger$Overlay$viewCode('update'), - $elm$html$Html$text($elm$browser$Debugger$Overlay$goodNews2) - ])) - ]); -}; -var $elm$virtual_dom$VirtualDom$map = _VirtualDom_map; -var $elm$html$Html$map = $elm$virtual_dom$VirtualDom$map; -var $elm$browser$Debugger$Overlay$Cancel = {$: 'Cancel'}; -var $elm$browser$Debugger$Overlay$Proceed = {$: 'Proceed'}; -var $elm$html$Html$button = _VirtualDom_node('button'); -var $elm$browser$Debugger$Overlay$viewButtons = function (buttons) { - var btn = F2( - function (msg, string) { - return A2( - $elm$html$Html$button, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'margin-right', '20px'), - $elm$html$Html$Events$onClick(msg) - ]), - _List_fromArray( - [ - $elm$html$Html$text(string) - ])); - }); - var buttonNodes = function () { - if (buttons.$ === 'Accept') { - var proceed = buttons.a; - return _List_fromArray( - [ - A2(btn, $elm$browser$Debugger$Overlay$Proceed, proceed) - ]); - } else { - var cancel = buttons.a; - var proceed = buttons.b; - return _List_fromArray( - [ - A2(btn, $elm$browser$Debugger$Overlay$Cancel, cancel), - A2(btn, $elm$browser$Debugger$Overlay$Proceed, proceed) - ]); - } - }(); - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'height', '60px'), - A2($elm$html$Html$Attributes$style, 'line-height', '60px'), - A2($elm$html$Html$Attributes$style, 'text-align', 'right'), - A2($elm$html$Html$Attributes$style, 'background-color', 'rgb(50, 50, 50)') - ]), - buttonNodes); -}; -var $elm$browser$Debugger$Overlay$viewMessage = F4( - function (config, title, details, buttons) { - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$id('elm-debugger-overlay'), - A2($elm$html$Html$Attributes$style, 'position', 'fixed'), - A2($elm$html$Html$Attributes$style, 'top', '0'), - A2($elm$html$Html$Attributes$style, 'left', '0'), - A2($elm$html$Html$Attributes$style, 'width', '100vw'), - A2($elm$html$Html$Attributes$style, 'height', '100vh'), - A2($elm$html$Html$Attributes$style, 'color', 'white'), - A2($elm$html$Html$Attributes$style, 'pointer-events', 'none'), - A2($elm$html$Html$Attributes$style, 'font-family', '\'Trebuchet MS\', \'Lucida Grande\', \'Bitstream Vera Sans\', \'Helvetica Neue\', sans-serif'), - A2($elm$html$Html$Attributes$style, 'z-index', '2147483647') - ]), - _List_fromArray( - [ - A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'position', 'absolute'), - A2($elm$html$Html$Attributes$style, 'width', '600px'), - A2($elm$html$Html$Attributes$style, 'height', '100vh'), - A2($elm$html$Html$Attributes$style, 'padding-left', 'calc(50% - 300px)'), - A2($elm$html$Html$Attributes$style, 'padding-right', 'calc(50% - 300px)'), - A2($elm$html$Html$Attributes$style, 'background-color', 'rgba(200, 200, 200, 0.7)'), - A2($elm$html$Html$Attributes$style, 'pointer-events', 'auto') - ]), - _List_fromArray( - [ - A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'font-size', '36px'), - A2($elm$html$Html$Attributes$style, 'height', '80px'), - A2($elm$html$Html$Attributes$style, 'background-color', 'rgb(50, 50, 50)'), - A2($elm$html$Html$Attributes$style, 'padding-left', '22px'), - A2($elm$html$Html$Attributes$style, 'vertical-align', 'middle'), - A2($elm$html$Html$Attributes$style, 'line-height', '80px') - ]), - _List_fromArray( - [ - $elm$html$Html$text(title) - ])), - A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$id('elm-debugger-details'), - A2($elm$html$Html$Attributes$style, 'padding', ' 8px 20px'), - A2($elm$html$Html$Attributes$style, 'overflow-y', 'auto'), - A2($elm$html$Html$Attributes$style, 'max-height', 'calc(100vh - 156px)'), - A2($elm$html$Html$Attributes$style, 'background-color', 'rgb(61, 61, 61)') - ]), - details), - A2( - $elm$html$Html$map, - config.wrap, - $elm$browser$Debugger$Overlay$viewButtons(buttons)) - ])) - ])); - }); -var $elm$virtual_dom$VirtualDom$attribute = F2( - function (key, value) { - return A2( - _VirtualDom_attribute, - _VirtualDom_noOnOrFormAction(key), - _VirtualDom_noJavaScriptOrHtmlUri(value)); - }); -var $elm$core$Basics$negate = function (n) { - return -n; -}; -var $elm$virtual_dom$VirtualDom$nodeNS = function (tag) { - return _VirtualDom_nodeNS( - _VirtualDom_noScript(tag)); -}; -var $elm$core$String$fromFloat = _String_fromNumber; -var $elm$browser$Debugger$Overlay$viewShape = F4( - function (x, y, angle, coordinates) { - return A4( - $elm$virtual_dom$VirtualDom$nodeNS, - 'http://www.w3.org/2000/svg', - 'polygon', - _List_fromArray( - [ - A2($elm$virtual_dom$VirtualDom$attribute, 'points', coordinates), - A2( - $elm$virtual_dom$VirtualDom$attribute, - 'transform', - 'translate(' + ($elm$core$String$fromFloat(x) + (' ' + ($elm$core$String$fromFloat(y) + (') rotate(' + ($elm$core$String$fromFloat(-angle) + ')')))))) - ]), - _List_Nil); - }); -var $elm$browser$Debugger$Overlay$elmLogo = A4( - $elm$virtual_dom$VirtualDom$nodeNS, - 'http://www.w3.org/2000/svg', - 'svg', - _List_fromArray( - [ - A2($elm$virtual_dom$VirtualDom$attribute, 'viewBox', '-300 -300 600 600'), - A2($elm$virtual_dom$VirtualDom$attribute, 'xmlns', 'http://www.w3.org/2000/svg'), - A2($elm$virtual_dom$VirtualDom$attribute, 'fill', 'currentColor'), - A2($elm$virtual_dom$VirtualDom$attribute, 'width', '24px'), - A2($elm$virtual_dom$VirtualDom$attribute, 'height', '24px') - ]), - _List_fromArray( - [ - A4( - $elm$virtual_dom$VirtualDom$nodeNS, - 'http://www.w3.org/2000/svg', - 'g', - _List_fromArray( - [ - A2($elm$virtual_dom$VirtualDom$attribute, 'transform', 'scale(1 -1)') - ]), - _List_fromArray( - [ - A4($elm$browser$Debugger$Overlay$viewShape, 0, -210, 0, '-280,-90 0,190 280,-90'), - A4($elm$browser$Debugger$Overlay$viewShape, -210, 0, 90, '-280,-90 0,190 280,-90'), - A4($elm$browser$Debugger$Overlay$viewShape, 207, 207, 45, '-198,-66 0,132 198,-66'), - A4($elm$browser$Debugger$Overlay$viewShape, 150, 0, 0, '-130,0 0,-130 130,0 0,130'), - A4($elm$browser$Debugger$Overlay$viewShape, -89, 239, 0, '-191,61 69,61 191,-61 -69,-61'), - A4($elm$browser$Debugger$Overlay$viewShape, 0, 106, 180, '-130,-44 0,86 130,-44'), - A4($elm$browser$Debugger$Overlay$viewShape, 256, -150, 270, '-130,-44 0,86 130,-44') - ])) - ])); -var $elm$core$String$length = _String_length; -var $elm$browser$Debugger$Overlay$viewMiniControls = F2( - function (config, numMsgs) { - var string = $elm$core$String$fromInt(numMsgs); - var width = $elm$core$String$fromInt( - 2 + $elm$core$String$length(string)); - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'position', 'fixed'), - A2($elm$html$Html$Attributes$style, 'bottom', '2em'), - A2($elm$html$Html$Attributes$style, 'right', '2em'), - A2($elm$html$Html$Attributes$style, 'width', 'calc(42px + ' + (width + 'ch)')), - A2($elm$html$Html$Attributes$style, 'height', '36px'), - A2($elm$html$Html$Attributes$style, 'background-color', '#1293D8'), - A2($elm$html$Html$Attributes$style, 'color', 'white'), - A2($elm$html$Html$Attributes$style, 'font-family', 'monospace'), - A2($elm$html$Html$Attributes$style, 'pointer-events', 'auto'), - A2($elm$html$Html$Attributes$style, 'z-index', '2147483647'), - A2($elm$html$Html$Attributes$style, 'display', 'flex'), - A2($elm$html$Html$Attributes$style, 'justify-content', 'center'), - A2($elm$html$Html$Attributes$style, 'align-items', 'center'), - A2($elm$html$Html$Attributes$style, 'cursor', 'pointer'), - $elm$html$Html$Events$onClick(config.open) - ]), - _List_fromArray( - [ - $elm$browser$Debugger$Overlay$elmLogo, - A2( - $elm$html$Html$span, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'padding-left', 'calc(1ch + 6px)'), - A2($elm$html$Html$Attributes$style, 'padding-right', '1ch') - ]), - _List_fromArray( - [ - $elm$html$Html$text(string) - ])) - ])); - }); -var $elm$browser$Debugger$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$browser$Debugger$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$core$List$intersperse = F2( - function (sep, xs) { - if (!xs.b) { - return _List_Nil; - } else { - var hd = xs.a; - var tl = xs.b; - var step = F2( - function (x, rest) { - return A2( - $elm$core$List$cons, - sep, - A2($elm$core$List$cons, x, rest)); - }); - var spersed = A3($elm$core$List$foldr, step, _List_Nil, tl); - return A2($elm$core$List$cons, hd, spersed); - } - }); -var $elm$browser$Debugger$Overlay$viewMention = F2( - function (tags, verbed) { - var _v0 = A2( - $elm$core$List$map, - $elm$browser$Debugger$Overlay$viewCode, - $elm$core$List$reverse(tags)); - if (!_v0.b) { - return $elm$html$Html$text(''); - } else { - if (!_v0.b.b) { - var tag = _v0.a; - return A2( - $elm$html$Html$li, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text(verbed), - tag, - $elm$html$Html$text('.') - ])); - } else { - if (!_v0.b.b.b) { - var tag2 = _v0.a; - var _v1 = _v0.b; - var tag1 = _v1.a; - return A2( - $elm$html$Html$li, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text(verbed), - tag1, - $elm$html$Html$text(' and '), - tag2, - $elm$html$Html$text('.') - ])); - } else { - var lastTag = _v0.a; - var otherTags = _v0.b; - return A2( - $elm$html$Html$li, - _List_Nil, - A2( - $elm$core$List$cons, - $elm$html$Html$text(verbed), - _Utils_ap( - A2( - $elm$core$List$intersperse, - $elm$html$Html$text(', '), - $elm$core$List$reverse(otherTags)), - _List_fromArray( - [ - $elm$html$Html$text(', and '), - lastTag, - $elm$html$Html$text('.') - ])))); - } - } - } - }); -var $elm$browser$Debugger$Overlay$viewChange = function (change) { - return A2( - $elm$html$Html$li, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'margin', '8px 0') - ]), - function () { - if (change.$ === 'AliasChange') { - var name = change.a; - return _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'font-size', '1.5em') - ]), - _List_fromArray( - [ - $elm$browser$Debugger$Overlay$viewCode(name) - ])) - ]); - } else { - var name = change.a; - var removed = change.b.removed; - var changed = change.b.changed; - var added = change.b.added; - var argsMatch = change.b.argsMatch; - return _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'font-size', '1.5em') - ]), - _List_fromArray( - [ - $elm$browser$Debugger$Overlay$viewCode(name) - ])), - A2( - $elm$html$Html$ul, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'list-style-type', 'disc'), - A2($elm$html$Html$Attributes$style, 'padding-left', '2em') - ]), - _List_fromArray( - [ - A2($elm$browser$Debugger$Overlay$viewMention, removed, 'Removed '), - A2($elm$browser$Debugger$Overlay$viewMention, changed, 'Changed '), - A2($elm$browser$Debugger$Overlay$viewMention, added, 'Added ') - ])), - argsMatch ? $elm$html$Html$text('') : $elm$html$Html$text('This may be due to the fact that the type variable names changed.') - ]); - } - }()); -}; -var $elm$browser$Debugger$Overlay$viewReport = F2( - function (isBad, report) { - switch (report.$) { - case 'CorruptHistory': - return _List_fromArray( - [ - $elm$html$Html$text('Looks like this history file is corrupt. I cannot understand it.') - ]); - case 'VersionChanged': - var old = report.a; - var _new = report.b; - return _List_fromArray( - [ - $elm$html$Html$text('This history was created with Elm ' + (old + (', but you are using Elm ' + (_new + ' right now.')))) - ]); - case 'MessageChanged': - var old = report.a; - var _new = report.b; - return _List_fromArray( - [ - $elm$html$Html$text('To import some other history, the overall message type must' + ' be the same. The old history has '), - $elm$browser$Debugger$Overlay$viewCode(old), - $elm$html$Html$text(' messages, but the new program works with '), - $elm$browser$Debugger$Overlay$viewCode(_new), - $elm$html$Html$text(' messages.') - ]); - default: - var changes = report.a; - return _List_fromArray( - [ - A2( - $elm$html$Html$p, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text( - isBad ? $elm$browser$Debugger$Overlay$explanationBad : $elm$browser$Debugger$Overlay$explanationRisky) - ])), - A2( - $elm$html$Html$ul, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'list-style-type', 'none'), - A2($elm$html$Html$Attributes$style, 'padding-left', '20px') - ]), - A2($elm$core$List$map, $elm$browser$Debugger$Overlay$viewChange, changes)) - ]); - } - }); -var $elm$browser$Debugger$Overlay$view = F5( - function (config, isPaused, isOpen, numMsgs, state) { - switch (state.$) { - case 'None': - return isOpen ? $elm$html$Html$text('') : (isPaused ? A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$id('elm-debugger-overlay'), - A2($elm$html$Html$Attributes$style, 'position', 'fixed'), - A2($elm$html$Html$Attributes$style, 'top', '0'), - A2($elm$html$Html$Attributes$style, 'left', '0'), - A2($elm$html$Html$Attributes$style, 'width', '100vw'), - A2($elm$html$Html$Attributes$style, 'height', '100vh'), - A2($elm$html$Html$Attributes$style, 'cursor', 'pointer'), - A2($elm$html$Html$Attributes$style, 'display', 'flex'), - A2($elm$html$Html$Attributes$style, 'align-items', 'center'), - A2($elm$html$Html$Attributes$style, 'justify-content', 'center'), - A2($elm$html$Html$Attributes$style, 'pointer-events', 'auto'), - A2($elm$html$Html$Attributes$style, 'background-color', 'rgba(200, 200, 200, 0.7)'), - A2($elm$html$Html$Attributes$style, 'color', 'white'), - A2($elm$html$Html$Attributes$style, 'font-family', '\'Trebuchet MS\', \'Lucida Grande\', \'Bitstream Vera Sans\', \'Helvetica Neue\', sans-serif'), - A2($elm$html$Html$Attributes$style, 'z-index', '2147483646'), - $elm$html$Html$Events$onClick(config.resume) - ]), - _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'font-size', '80px') - ]), - _List_fromArray( - [ - $elm$html$Html$text('Click to Resume') - ])), - A2($elm$browser$Debugger$Overlay$viewMiniControls, config, numMsgs) - ])) : A2($elm$browser$Debugger$Overlay$viewMiniControls, config, numMsgs)); - case 'BadMetadata': - var badMetadata_ = state.a; - return A4( - $elm$browser$Debugger$Overlay$viewMessage, - config, - 'Cannot use Import or Export', - $elm$browser$Debugger$Overlay$viewBadMetadata(badMetadata_), - $elm$browser$Debugger$Overlay$Accept('Ok')); - case 'BadImport': - var report = state.a; - return A4( - $elm$browser$Debugger$Overlay$viewMessage, - config, - 'Cannot Import History', - A2($elm$browser$Debugger$Overlay$viewReport, true, report), - $elm$browser$Debugger$Overlay$Accept('Ok')); - default: - var report = state.a; - return A4( - $elm$browser$Debugger$Overlay$viewMessage, - config, - 'Warning', - A2($elm$browser$Debugger$Overlay$viewReport, false, report), - A2($elm$browser$Debugger$Overlay$Choose, 'Cancel', 'Import Anyway')); - } - }); -var $elm$browser$Debugger$Main$cornerView = function (model) { - return A5( - $elm$browser$Debugger$Overlay$view, - {exportHistory: $elm$browser$Debugger$Main$Export, importHistory: $elm$browser$Debugger$Main$Import, open: $elm$browser$Debugger$Main$Open, resume: $elm$browser$Debugger$Main$Resume, wrap: $elm$browser$Debugger$Main$OverlayMsg}, - $elm$browser$Debugger$Main$isPaused(model.state), - _Debugger_isOpen(model.popout), - $elm$browser$Debugger$History$size(model.history), - model.overlay); -}; -var $elm$core$Set$foldr = F3( - function (func, initialState, _v0) { - var dict = _v0.a; - return A3( - $elm$core$Dict$foldr, - F3( - function (key, _v1, state) { - return A2(func, key, state); - }), - initialState, - dict); - }); -var $elm$browser$Debugger$Main$getCurrentModel = function (state) { - if (state.$ === 'Running') { - var model = state.a; - return model; - } else { - var model = state.b; - return model; - } -}; -var $elm$browser$Debugger$Main$getUserModel = function (model) { - return $elm$browser$Debugger$Main$getCurrentModel(model.state); -}; -var $elm$browser$Debugger$Main$initialWindowHeight = 420; -var $elm$browser$Debugger$Main$initialWindowWidth = 900; -var $elm$browser$Debugger$Main$cachedHistory = function (model) { - var _v0 = model.state; - if (_v0.$ === 'Running') { - return model.history; - } else { - var history = _v0.e; - return history; - } -}; -var $elm$virtual_dom$VirtualDom$node = function (tag) { - return _VirtualDom_node( - _VirtualDom_noScript(tag)); -}; -var $elm$html$Html$node = $elm$virtual_dom$VirtualDom$node; -var $elm$browser$Debugger$Main$DragEnd = {$: 'DragEnd'}; -var $elm$browser$Debugger$Main$getDragStatus = function (layout) { - if (layout.$ === 'Horizontal') { - var status = layout.a; - return status; - } else { - var status = layout.a; - return status; - } -}; -var $elm$browser$Debugger$Main$Drag = function (a) { - return {$: 'Drag', a: a}; -}; -var $elm$browser$Debugger$Main$DragInfo = F5( - function (x, y, down, width, height) { - return {down: down, height: height, width: width, x: x, y: y}; - }); -var $elm$json$Json$Decode$field = _Json_decodeField; -var $elm$json$Json$Decode$at = F2( - function (fields, decoder) { - return A3($elm$core$List$foldr, $elm$json$Json$Decode$field, decoder, fields); - }); -var $elm$json$Json$Decode$float = _Json_decodeFloat; -var $elm$browser$Debugger$Main$decodeDimension = function (field) { - return A2( - $elm$json$Json$Decode$at, - _List_fromArray( - ['currentTarget', 'ownerDocument', 'defaultView', field]), - $elm$json$Json$Decode$float); -}; -var $elm$json$Json$Decode$int = _Json_decodeInt; -var $elm$json$Json$Decode$map5 = _Json_map5; -var $elm$browser$Debugger$Main$onMouseMove = A2( - $elm$html$Html$Events$on, - 'mousemove', - A2( - $elm$json$Json$Decode$map, - $elm$browser$Debugger$Main$Drag, - A6( - $elm$json$Json$Decode$map5, - $elm$browser$Debugger$Main$DragInfo, - A2($elm$json$Json$Decode$field, 'pageX', $elm$json$Json$Decode$float), - A2($elm$json$Json$Decode$field, 'pageY', $elm$json$Json$Decode$float), - A2( - $elm$json$Json$Decode$field, - 'buttons', - A2( - $elm$json$Json$Decode$map, - function (v) { - return v === 1; - }, - $elm$json$Json$Decode$int)), - $elm$browser$Debugger$Main$decodeDimension('innerWidth'), - $elm$browser$Debugger$Main$decodeDimension('innerHeight')))); -var $elm$html$Html$Events$onMouseUp = function (msg) { - return A2( - $elm$html$Html$Events$on, - 'mouseup', - $elm$json$Json$Decode$succeed(msg)); -}; -var $elm$browser$Debugger$Main$toDragListeners = function (layout) { - var _v0 = $elm$browser$Debugger$Main$getDragStatus(layout); - if (_v0.$ === 'Static') { - return _List_Nil; - } else { - return _List_fromArray( - [ - $elm$browser$Debugger$Main$onMouseMove, - $elm$html$Html$Events$onMouseUp($elm$browser$Debugger$Main$DragEnd) - ]); - } -}; -var $elm$browser$Debugger$Main$toFlexDirection = function (layout) { - if (layout.$ === 'Horizontal') { - return 'row'; - } else { - return 'column-reverse'; - } -}; -var $elm$browser$Debugger$Main$DragStart = {$: 'DragStart'}; -var $elm$html$Html$Events$onMouseDown = function (msg) { - return A2( - $elm$html$Html$Events$on, - 'mousedown', - $elm$json$Json$Decode$succeed(msg)); -}; -var $elm$browser$Debugger$Main$toPercent = function (fraction) { - return $elm$core$String$fromFloat(100 * fraction) + '%'; -}; -var $elm$browser$Debugger$Main$viewDragZone = function (layout) { - if (layout.$ === 'Horizontal') { - var x = layout.b; - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'position', 'absolute'), - A2($elm$html$Html$Attributes$style, 'top', '0'), - A2( - $elm$html$Html$Attributes$style, - 'left', - $elm$browser$Debugger$Main$toPercent(x)), - A2($elm$html$Html$Attributes$style, 'margin-left', '-5px'), - A2($elm$html$Html$Attributes$style, 'width', '10px'), - A2($elm$html$Html$Attributes$style, 'height', '100%'), - A2($elm$html$Html$Attributes$style, 'cursor', 'col-resize'), - $elm$html$Html$Events$onMouseDown($elm$browser$Debugger$Main$DragStart) - ]), - _List_Nil); - } else { - var y = layout.c; - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'position', 'absolute'), - A2( - $elm$html$Html$Attributes$style, - 'top', - $elm$browser$Debugger$Main$toPercent(y)), - A2($elm$html$Html$Attributes$style, 'left', '0'), - A2($elm$html$Html$Attributes$style, 'margin-top', '-5px'), - A2($elm$html$Html$Attributes$style, 'width', '100%'), - A2($elm$html$Html$Attributes$style, 'height', '10px'), - A2($elm$html$Html$Attributes$style, 'cursor', 'row-resize'), - $elm$html$Html$Events$onMouseDown($elm$browser$Debugger$Main$DragStart) - ]), - _List_Nil); - } -}; -var $elm$browser$Debugger$Main$TweakExpandoModel = function (a) { - return {$: 'TweakExpandoModel', a: a}; -}; -var $elm$browser$Debugger$Main$TweakExpandoMsg = function (a) { - return {$: 'TweakExpandoMsg', a: a}; -}; -var $elm$browser$Debugger$Main$toExpandoPercents = function (layout) { - if (layout.$ === 'Horizontal') { - var x = layout.b; - return _Utils_Tuple2( - $elm$browser$Debugger$Main$toPercent(1 - x), - '100%'); - } else { - var y = layout.c; - return _Utils_Tuple2( - '100%', - $elm$browser$Debugger$Main$toPercent(y)); - } -}; -var $elm$browser$Debugger$Main$toMouseBlocker = function (layout) { - var _v0 = $elm$browser$Debugger$Main$getDragStatus(layout); - if (_v0.$ === 'Static') { - return 'auto'; - } else { - return 'none'; - } -}; -var $elm$browser$Debugger$Expando$Field = F2( - function (a, b) { - return {$: 'Field', a: a, b: b}; - }); -var $elm$browser$Debugger$Expando$Index = F3( - function (a, b, c) { - return {$: 'Index', a: a, b: b, c: c}; - }); -var $elm$browser$Debugger$Expando$Key = {$: 'Key'}; -var $elm$browser$Debugger$Expando$None = {$: 'None'}; -var $elm$browser$Debugger$Expando$Toggle = {$: 'Toggle'}; -var $elm$browser$Debugger$Expando$Value = {$: 'Value'}; -var $elm$browser$Debugger$Expando$blue = A2($elm$html$Html$Attributes$style, 'color', 'rgb(28, 0, 207)'); -var $elm$core$Basics$composeL = F3( - function (g, f, x) { - return g( - f(x)); - }); -var $elm$browser$Debugger$Expando$leftPad = function (maybeKey) { - if (maybeKey.$ === 'Nothing') { - return _List_Nil; - } else { - return _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'padding-left', '4ch') - ]); - } -}; -var $elm$browser$Debugger$Expando$makeArrow = function (arrow) { - return A2( - $elm$html$Html$span, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'color', '#777'), - A2($elm$html$Html$Attributes$style, 'padding-left', '2ch'), - A2($elm$html$Html$Attributes$style, 'width', '2ch'), - A2($elm$html$Html$Attributes$style, 'display', 'inline-block') - ]), - _List_fromArray( - [ - $elm$html$Html$text(arrow) - ])); -}; -var $elm$browser$Debugger$Expando$purple = A2($elm$html$Html$Attributes$style, 'color', 'rgb(136, 19, 145)'); -var $elm$browser$Debugger$Expando$lineStarter = F3( - function (maybeKey, maybeIsClosed, description) { - var arrow = function () { - if (maybeIsClosed.$ === 'Nothing') { - return $elm$browser$Debugger$Expando$makeArrow(''); - } else { - if (maybeIsClosed.a) { - return $elm$browser$Debugger$Expando$makeArrow('▸'); - } else { - return $elm$browser$Debugger$Expando$makeArrow('▾'); - } - } - }(); - if (maybeKey.$ === 'Nothing') { - return A2($elm$core$List$cons, arrow, description); - } else { - var key = maybeKey.a; - return A2( - $elm$core$List$cons, - arrow, - A2( - $elm$core$List$cons, - A2( - $elm$html$Html$span, - _List_fromArray( - [$elm$browser$Debugger$Expando$purple]), - _List_fromArray( - [ - $elm$html$Html$text(key) - ])), - A2( - $elm$core$List$cons, - $elm$html$Html$text(' = '), - description))); - } - }); -var $elm$browser$Debugger$Expando$red = A2($elm$html$Html$Attributes$style, 'color', 'rgb(196, 26, 22)'); -var $elm$core$Tuple$second = function (_v0) { - var y = _v0.b; - return y; -}; -var $elm$browser$Debugger$Expando$seqTypeToString = F2( - function (n, seqType) { - switch (seqType.$) { - case 'ListSeq': - return 'List(' + ($elm$core$String$fromInt(n) + ')'); - case 'SetSeq': - return 'Set(' + ($elm$core$String$fromInt(n) + ')'); - default: - return 'Array(' + ($elm$core$String$fromInt(n) + ')'); - } - }); -var $elm$core$String$slice = _String_slice; -var $elm$core$String$left = F2( - function (n, string) { - return (n < 1) ? '' : A3($elm$core$String$slice, 0, n, string); - }); -var $elm$core$String$right = F2( - function (n, string) { - return (n < 1) ? '' : A3( - $elm$core$String$slice, - -n, - $elm$core$String$length(string), - string); - }); -var $elm$browser$Debugger$Expando$elideMiddle = function (str) { - return ($elm$core$String$length(str) <= 18) ? str : (A2($elm$core$String$left, 8, str) + ('...' + A2($elm$core$String$right, 8, str))); -}; -var $elm$core$Dict$isEmpty = function (dict) { - if (dict.$ === 'RBEmpty_elm_builtin') { - return true; - } else { - return false; - } -}; -var $elm$browser$Debugger$Expando$viewExtraTinyRecord = F3( - function (length, starter, entries) { - if (!entries.b) { - return _Utils_Tuple2( - length + 1, - _List_fromArray( - [ - $elm$html$Html$text('}') - ])); - } else { - var field = entries.a; - var rest = entries.b; - var nextLength = (length + $elm$core$String$length(field)) + 1; - if (nextLength > 18) { - return _Utils_Tuple2( - length + 2, - _List_fromArray( - [ - $elm$html$Html$text('…}') - ])); - } else { - var _v1 = A3($elm$browser$Debugger$Expando$viewExtraTinyRecord, nextLength, ',', rest); - var finalLength = _v1.a; - var otherHtmls = _v1.b; - return _Utils_Tuple2( - finalLength, - A2( - $elm$core$List$cons, - $elm$html$Html$text(starter), - A2( - $elm$core$List$cons, - A2( - $elm$html$Html$span, - _List_fromArray( - [$elm$browser$Debugger$Expando$purple]), - _List_fromArray( - [ - $elm$html$Html$text(field) - ])), - otherHtmls))); - } - } - }); -var $elm$browser$Debugger$Expando$viewTinyHelp = function (str) { - return _Utils_Tuple2( - $elm$core$String$length(str), - _List_fromArray( - [ - $elm$html$Html$text(str) - ])); -}; -var $elm$core$Maybe$withDefault = F2( - function (_default, maybe) { - if (maybe.$ === 'Just') { - var value = maybe.a; - return value; - } else { - return _default; - } - }); -var $elm$browser$Debugger$Expando$viewExtraTiny = function (value) { - if (value.$ === 'Record') { - var record = value.b; - return A3( - $elm$browser$Debugger$Expando$viewExtraTinyRecord, - 0, - '{', - $elm$core$Dict$keys(record)); - } else { - return $elm$browser$Debugger$Expando$viewTiny(value); - } -}; -var $elm$browser$Debugger$Expando$viewTiny = function (value) { - switch (value.$) { - case 'S': - var stringRep = value.a; - var str = $elm$browser$Debugger$Expando$elideMiddle(stringRep); - return _Utils_Tuple2( - $elm$core$String$length(str), - _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [$elm$browser$Debugger$Expando$red]), - _List_fromArray( - [ - $elm$html$Html$text(str) - ])) - ])); - case 'Primitive': - var stringRep = value.a; - return _Utils_Tuple2( - $elm$core$String$length(stringRep), - _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [$elm$browser$Debugger$Expando$blue]), - _List_fromArray( - [ - $elm$html$Html$text(stringRep) - ])) - ])); - case 'Sequence': - var seqType = value.a; - var valueList = value.c; - return $elm$browser$Debugger$Expando$viewTinyHelp( - A2( - $elm$browser$Debugger$Expando$seqTypeToString, - $elm$core$List$length(valueList), - seqType)); - case 'Dictionary': - var keyValuePairs = value.b; - return $elm$browser$Debugger$Expando$viewTinyHelp( - 'Dict(' + ($elm$core$String$fromInt( - $elm$core$List$length(keyValuePairs)) + ')')); - case 'Record': - var record = value.b; - return $elm$browser$Debugger$Expando$viewTinyRecord(record); - default: - if (!value.c.b) { - var maybeName = value.a; - return $elm$browser$Debugger$Expando$viewTinyHelp( - A2($elm$core$Maybe$withDefault, 'Unit', maybeName)); - } else { - var maybeName = value.a; - var valueList = value.c; - return $elm$browser$Debugger$Expando$viewTinyHelp( - function () { - if (maybeName.$ === 'Nothing') { - return 'Tuple(' + ($elm$core$String$fromInt( - $elm$core$List$length(valueList)) + ')'); - } else { - var name = maybeName.a; - return name + ' …'; - } - }()); - } - } -}; -var $elm$browser$Debugger$Expando$viewTinyRecord = function (record) { - return $elm$core$Dict$isEmpty(record) ? _Utils_Tuple2( - 2, - _List_fromArray( - [ - $elm$html$Html$text('{}') - ])) : A3( - $elm$browser$Debugger$Expando$viewTinyRecordHelp, - 0, - '{ ', - $elm$core$Dict$toList(record)); -}; -var $elm$browser$Debugger$Expando$viewTinyRecordHelp = F3( - function (length, starter, entries) { - if (!entries.b) { - return _Utils_Tuple2( - length + 2, - _List_fromArray( - [ - $elm$html$Html$text(' }') - ])); - } else { - var _v1 = entries.a; - var field = _v1.a; - var value = _v1.b; - var rest = entries.b; - var fieldLen = $elm$core$String$length(field); - var _v2 = $elm$browser$Debugger$Expando$viewExtraTiny(value); - var valueLen = _v2.a; - var valueHtmls = _v2.b; - var newLength = ((length + fieldLen) + valueLen) + 5; - if (newLength > 60) { - return _Utils_Tuple2( - length + 4, - _List_fromArray( - [ - $elm$html$Html$text(', … }') - ])); - } else { - var _v3 = A3($elm$browser$Debugger$Expando$viewTinyRecordHelp, newLength, ', ', rest); - var finalLength = _v3.a; - var otherHtmls = _v3.b; - return _Utils_Tuple2( - finalLength, - A2( - $elm$core$List$cons, - $elm$html$Html$text(starter), - A2( - $elm$core$List$cons, - A2( - $elm$html$Html$span, - _List_fromArray( - [$elm$browser$Debugger$Expando$purple]), - _List_fromArray( - [ - $elm$html$Html$text(field) - ])), - A2( - $elm$core$List$cons, - $elm$html$Html$text(' = '), - A2( - $elm$core$List$cons, - A2($elm$html$Html$span, _List_Nil, valueHtmls), - otherHtmls))))); - } - } - }); -var $elm$browser$Debugger$Expando$view = F2( - function (maybeKey, expando) { - switch (expando.$) { - case 'S': - var stringRep = expando.a; - return A2( - $elm$html$Html$div, - $elm$browser$Debugger$Expando$leftPad(maybeKey), - A3( - $elm$browser$Debugger$Expando$lineStarter, - maybeKey, - $elm$core$Maybe$Nothing, - _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [$elm$browser$Debugger$Expando$red]), - _List_fromArray( - [ - $elm$html$Html$text(stringRep) - ])) - ]))); - case 'Primitive': - var stringRep = expando.a; - return A2( - $elm$html$Html$div, - $elm$browser$Debugger$Expando$leftPad(maybeKey), - A3( - $elm$browser$Debugger$Expando$lineStarter, - maybeKey, - $elm$core$Maybe$Nothing, - _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [$elm$browser$Debugger$Expando$blue]), - _List_fromArray( - [ - $elm$html$Html$text(stringRep) - ])) - ]))); - case 'Sequence': - var seqType = expando.a; - var isClosed = expando.b; - var valueList = expando.c; - return A4($elm$browser$Debugger$Expando$viewSequence, maybeKey, seqType, isClosed, valueList); - case 'Dictionary': - var isClosed = expando.a; - var keyValuePairs = expando.b; - return A3($elm$browser$Debugger$Expando$viewDictionary, maybeKey, isClosed, keyValuePairs); - case 'Record': - var isClosed = expando.a; - var valueDict = expando.b; - return A3($elm$browser$Debugger$Expando$viewRecord, maybeKey, isClosed, valueDict); - default: - var maybeName = expando.a; - var isClosed = expando.b; - var valueList = expando.c; - return A4($elm$browser$Debugger$Expando$viewConstructor, maybeKey, maybeName, isClosed, valueList); - } - }); -var $elm$browser$Debugger$Expando$viewConstructor = F4( - function (maybeKey, maybeName, isClosed, valueList) { - var tinyArgs = A2( - $elm$core$List$map, - A2($elm$core$Basics$composeL, $elm$core$Tuple$second, $elm$browser$Debugger$Expando$viewExtraTiny), - valueList); - var description = function () { - var _v7 = _Utils_Tuple2(maybeName, tinyArgs); - if (_v7.a.$ === 'Nothing') { - if (!_v7.b.b) { - var _v8 = _v7.a; - return _List_fromArray( - [ - $elm$html$Html$text('()') - ]); - } else { - var _v9 = _v7.a; - var _v10 = _v7.b; - var x = _v10.a; - var xs = _v10.b; - return A2( - $elm$core$List$cons, - $elm$html$Html$text('( '), - A2( - $elm$core$List$cons, - A2($elm$html$Html$span, _List_Nil, x), - A3( - $elm$core$List$foldr, - F2( - function (args, rest) { - return A2( - $elm$core$List$cons, - $elm$html$Html$text(', '), - A2( - $elm$core$List$cons, - A2($elm$html$Html$span, _List_Nil, args), - rest)); - }), - _List_fromArray( - [ - $elm$html$Html$text(' )') - ]), - xs))); - } - } else { - if (!_v7.b.b) { - var name = _v7.a.a; - return _List_fromArray( - [ - $elm$html$Html$text(name) - ]); - } else { - var name = _v7.a.a; - var _v11 = _v7.b; - var x = _v11.a; - var xs = _v11.b; - return A2( - $elm$core$List$cons, - $elm$html$Html$text(name + ' '), - A2( - $elm$core$List$cons, - A2($elm$html$Html$span, _List_Nil, x), - A3( - $elm$core$List$foldr, - F2( - function (args, rest) { - return A2( - $elm$core$List$cons, - $elm$html$Html$text(' '), - A2( - $elm$core$List$cons, - A2($elm$html$Html$span, _List_Nil, args), - rest)); - }), - _List_Nil, - xs))); - } - } - }(); - var _v4 = function () { - if (!valueList.b) { - return _Utils_Tuple2( - $elm$core$Maybe$Nothing, - A2($elm$html$Html$div, _List_Nil, _List_Nil)); - } else { - if (!valueList.b.b) { - var entry = valueList.a; - switch (entry.$) { - case 'S': - return _Utils_Tuple2( - $elm$core$Maybe$Nothing, - A2($elm$html$Html$div, _List_Nil, _List_Nil)); - case 'Primitive': - return _Utils_Tuple2( - $elm$core$Maybe$Nothing, - A2($elm$html$Html$div, _List_Nil, _List_Nil)); - case 'Sequence': - var subValueList = entry.c; - return _Utils_Tuple2( - $elm$core$Maybe$Just(isClosed), - isClosed ? A2($elm$html$Html$div, _List_Nil, _List_Nil) : A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$None, 0), - $elm$browser$Debugger$Expando$viewSequenceOpen(subValueList))); - case 'Dictionary': - var keyValuePairs = entry.b; - return _Utils_Tuple2( - $elm$core$Maybe$Just(isClosed), - isClosed ? A2($elm$html$Html$div, _List_Nil, _List_Nil) : A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$None, 0), - $elm$browser$Debugger$Expando$viewDictionaryOpen(keyValuePairs))); - case 'Record': - var record = entry.b; - return _Utils_Tuple2( - $elm$core$Maybe$Just(isClosed), - isClosed ? A2($elm$html$Html$div, _List_Nil, _List_Nil) : A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$None, 0), - $elm$browser$Debugger$Expando$viewRecordOpen(record))); - default: - var subValueList = entry.c; - return _Utils_Tuple2( - $elm$core$Maybe$Just(isClosed), - isClosed ? A2($elm$html$Html$div, _List_Nil, _List_Nil) : A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$None, 0), - $elm$browser$Debugger$Expando$viewConstructorOpen(subValueList))); - } - } else { - return _Utils_Tuple2( - $elm$core$Maybe$Just(isClosed), - isClosed ? A2($elm$html$Html$div, _List_Nil, _List_Nil) : $elm$browser$Debugger$Expando$viewConstructorOpen(valueList)); - } - } - }(); - var maybeIsClosed = _v4.a; - var openHtml = _v4.b; - return A2( - $elm$html$Html$div, - $elm$browser$Debugger$Expando$leftPad(maybeKey), - _List_fromArray( - [ - A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Events$onClick($elm$browser$Debugger$Expando$Toggle) - ]), - A3($elm$browser$Debugger$Expando$lineStarter, maybeKey, maybeIsClosed, description)), - openHtml - ])); - }); -var $elm$browser$Debugger$Expando$viewConstructorEntry = F2( - function (index, value) { - return A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$None, index), - A2( - $elm$browser$Debugger$Expando$view, - $elm$core$Maybe$Just( - $elm$core$String$fromInt(index)), - value)); - }); -var $elm$browser$Debugger$Expando$viewConstructorOpen = function (valueList) { - return A2( - $elm$html$Html$div, - _List_Nil, - A2($elm$core$List$indexedMap, $elm$browser$Debugger$Expando$viewConstructorEntry, valueList)); -}; -var $elm$browser$Debugger$Expando$viewDictionary = F3( - function (maybeKey, isClosed, keyValuePairs) { - var starter = 'Dict(' + ($elm$core$String$fromInt( - $elm$core$List$length(keyValuePairs)) + ')'); - return A2( - $elm$html$Html$div, - $elm$browser$Debugger$Expando$leftPad(maybeKey), - _List_fromArray( - [ - A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Events$onClick($elm$browser$Debugger$Expando$Toggle) - ]), - A3( - $elm$browser$Debugger$Expando$lineStarter, - maybeKey, - $elm$core$Maybe$Just(isClosed), - _List_fromArray( - [ - $elm$html$Html$text(starter) - ]))), - isClosed ? $elm$html$Html$text('') : $elm$browser$Debugger$Expando$viewDictionaryOpen(keyValuePairs) - ])); - }); -var $elm$browser$Debugger$Expando$viewDictionaryEntry = F2( - function (index, _v2) { - var key = _v2.a; - var value = _v2.b; - switch (key.$) { - case 'S': - var stringRep = key.a; - return A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$Value, index), - A2( - $elm$browser$Debugger$Expando$view, - $elm$core$Maybe$Just(stringRep), - value)); - case 'Primitive': - var stringRep = key.a; - return A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$Value, index), - A2( - $elm$browser$Debugger$Expando$view, - $elm$core$Maybe$Just(stringRep), - value)); - default: - return A2( - $elm$html$Html$div, - _List_Nil, - _List_fromArray( - [ - A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$Key, index), - A2( - $elm$browser$Debugger$Expando$view, - $elm$core$Maybe$Just('key'), - key)), - A2( - $elm$html$Html$map, - A2($elm$browser$Debugger$Expando$Index, $elm$browser$Debugger$Expando$Value, index), - A2( - $elm$browser$Debugger$Expando$view, - $elm$core$Maybe$Just('value'), - value)) - ])); - } - }); -var $elm$browser$Debugger$Expando$viewDictionaryOpen = function (keyValuePairs) { - return A2( - $elm$html$Html$div, - _List_Nil, - A2($elm$core$List$indexedMap, $elm$browser$Debugger$Expando$viewDictionaryEntry, keyValuePairs)); -}; -var $elm$browser$Debugger$Expando$viewRecord = F3( - function (maybeKey, isClosed, record) { - var _v1 = isClosed ? _Utils_Tuple3( - $elm$browser$Debugger$Expando$viewTinyRecord(record).b, - $elm$html$Html$text(''), - $elm$html$Html$text('')) : _Utils_Tuple3( - _List_fromArray( - [ - $elm$html$Html$text('{') - ]), - $elm$browser$Debugger$Expando$viewRecordOpen(record), - A2( - $elm$html$Html$div, - $elm$browser$Debugger$Expando$leftPad( - $elm$core$Maybe$Just(_Utils_Tuple0)), - _List_fromArray( - [ - $elm$html$Html$text('}') - ]))); - var start = _v1.a; - var middle = _v1.b; - var end = _v1.c; - return A2( - $elm$html$Html$div, - $elm$browser$Debugger$Expando$leftPad(maybeKey), - _List_fromArray( - [ - A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Events$onClick($elm$browser$Debugger$Expando$Toggle) - ]), - A3( - $elm$browser$Debugger$Expando$lineStarter, - maybeKey, - $elm$core$Maybe$Just(isClosed), - start)), - middle, - end - ])); - }); -var $elm$browser$Debugger$Expando$viewRecordEntry = function (_v0) { - var field = _v0.a; - var value = _v0.b; - return A2( - $elm$html$Html$map, - $elm$browser$Debugger$Expando$Field(field), - A2( - $elm$browser$Debugger$Expando$view, - $elm$core$Maybe$Just(field), - value)); -}; -var $elm$browser$Debugger$Expando$viewRecordOpen = function (record) { - return A2( - $elm$html$Html$div, - _List_Nil, - A2( - $elm$core$List$map, - $elm$browser$Debugger$Expando$viewRecordEntry, - $elm$core$Dict$toList(record))); -}; -var $elm$browser$Debugger$Expando$viewSequence = F4( - function (maybeKey, seqType, isClosed, valueList) { - var starter = A2( - $elm$browser$Debugger$Expando$seqTypeToString, - $elm$core$List$length(valueList), - seqType); - return A2( - $elm$html$Html$div, - $elm$browser$Debugger$Expando$leftPad(maybeKey), - _List_fromArray( - [ - A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Events$onClick($elm$browser$Debugger$Expando$Toggle) - ]), - A3( - $elm$browser$Debugger$Expando$lineStarter, - maybeKey, - $elm$core$Maybe$Just(isClosed), - _List_fromArray( - [ - $elm$html$Html$text(starter) - ]))), - isClosed ? $elm$html$Html$text('') : $elm$browser$Debugger$Expando$viewSequenceOpen(valueList) - ])); - }); -var $elm$browser$Debugger$Expando$viewSequenceOpen = function (values) { - return A2( - $elm$html$Html$div, - _List_Nil, - A2($elm$core$List$indexedMap, $elm$browser$Debugger$Expando$viewConstructorEntry, values)); -}; -var $elm$browser$Debugger$Main$viewExpando = F3( - function (expandoMsg, expandoModel, layout) { - var block = $elm$browser$Debugger$Main$toMouseBlocker(layout); - var _v0 = $elm$browser$Debugger$Main$toExpandoPercents(layout); - var w = _v0.a; - var h = _v0.b; - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'display', 'block'), - A2($elm$html$Html$Attributes$style, 'width', 'calc(' + (w + ' - 4em)')), - A2($elm$html$Html$Attributes$style, 'height', 'calc(' + (h + ' - 4em)')), - A2($elm$html$Html$Attributes$style, 'padding', '2em'), - A2($elm$html$Html$Attributes$style, 'margin', '0'), - A2($elm$html$Html$Attributes$style, 'overflow', 'auto'), - A2($elm$html$Html$Attributes$style, 'pointer-events', block), - A2($elm$html$Html$Attributes$style, '-webkit-user-select', block), - A2($elm$html$Html$Attributes$style, '-moz-user-select', block), - A2($elm$html$Html$Attributes$style, '-ms-user-select', block), - A2($elm$html$Html$Attributes$style, 'user-select', block) - ]), - _List_fromArray( - [ - A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'color', '#ccc'), - A2($elm$html$Html$Attributes$style, 'padding', '0 0 1em 0') - ]), - _List_fromArray( - [ - $elm$html$Html$text('-- MESSAGE') - ])), - A2( - $elm$html$Html$map, - $elm$browser$Debugger$Main$TweakExpandoMsg, - A2($elm$browser$Debugger$Expando$view, $elm$core$Maybe$Nothing, expandoMsg)), - A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'color', '#ccc'), - A2($elm$html$Html$Attributes$style, 'padding', '1em 0') - ]), - _List_fromArray( - [ - $elm$html$Html$text('-- MODEL') - ])), - A2( - $elm$html$Html$map, - $elm$browser$Debugger$Main$TweakExpandoModel, - A2($elm$browser$Debugger$Expando$view, $elm$core$Maybe$Nothing, expandoModel)) - ])); - }); -var $elm$browser$Debugger$Main$Jump = function (a) { - return {$: 'Jump', a: a}; -}; -var $elm$virtual_dom$VirtualDom$lazy = _VirtualDom_lazy; -var $elm$html$Html$Lazy$lazy = $elm$virtual_dom$VirtualDom$lazy; -var $elm$browser$Debugger$Main$toHistoryPercents = function (layout) { - if (layout.$ === 'Horizontal') { - var x = layout.b; - return _Utils_Tuple2( - $elm$browser$Debugger$Main$toPercent(x), - '100%'); - } else { - var y = layout.c; - return _Utils_Tuple2( - '100%', - $elm$browser$Debugger$Main$toPercent(1 - y)); - } -}; -var $elm$virtual_dom$VirtualDom$lazy3 = _VirtualDom_lazy3; -var $elm$html$Html$Lazy$lazy3 = $elm$virtual_dom$VirtualDom$lazy3; -var $elm$html$Html$Attributes$class = $elm$html$Html$Attributes$stringProperty('className'); -var $elm$browser$Debugger$History$idForMessageIndex = function (index) { - return 'msg-' + $elm$core$String$fromInt(index); -}; -var $elm$html$Html$Attributes$title = $elm$html$Html$Attributes$stringProperty('title'); -var $elm$browser$Debugger$History$viewMessage = F3( - function (currentIndex, index, msg) { - var messageName = _Debugger_messageToString(msg); - var className = _Utils_eq(currentIndex, index) ? 'elm-debugger-entry elm-debugger-entry-selected' : 'elm-debugger-entry'; - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$id( - $elm$browser$Debugger$History$idForMessageIndex(index)), - $elm$html$Html$Attributes$class(className), - $elm$html$Html$Events$onClick(index) - ]), - _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [ - $elm$html$Html$Attributes$title(messageName), - $elm$html$Html$Attributes$class('elm-debugger-entry-content') - ]), - _List_fromArray( - [ - $elm$html$Html$text(messageName) - ])), - A2( - $elm$html$Html$span, - _List_fromArray( - [ - $elm$html$Html$Attributes$class('elm-debugger-entry-index') - ]), - _List_fromArray( - [ - $elm$html$Html$text( - $elm$core$String$fromInt(index)) - ])) - ])); - }); -var $elm$browser$Debugger$History$consMsg = F3( - function (currentIndex, msg, _v0) { - var index = _v0.a; - var rest = _v0.b; - return _Utils_Tuple2( - index + 1, - A2( - $elm$core$List$cons, - _Utils_Tuple2( - $elm$core$String$fromInt(index), - A4($elm$html$Html$Lazy$lazy3, $elm$browser$Debugger$History$viewMessage, currentIndex, index, msg)), - rest)); - }); -var $elm$core$Array$length = function (_v0) { - var len = _v0.a; - return len; -}; -var $elm$core$Basics$neq = _Utils_notEqual; -var $elm$virtual_dom$VirtualDom$keyedNode = function (tag) { - return _VirtualDom_keyedNode( - _VirtualDom_noScript(tag)); -}; -var $elm$html$Html$Keyed$node = $elm$virtual_dom$VirtualDom$keyedNode; -var $elm$browser$Debugger$History$maxSnapshotSize = 31; -var $elm$browser$Debugger$History$showMoreButton = function (numMessages) { - var nextIndex = (numMessages - 1) - ($elm$browser$Debugger$History$maxSnapshotSize * 2); - var labelText = 'View more messages'; - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$class('elm-debugger-entry'), - $elm$html$Html$Events$onClick(nextIndex) - ]), - _List_fromArray( - [ - A2( - $elm$html$Html$span, - _List_fromArray( - [ - $elm$html$Html$Attributes$title(labelText), - $elm$html$Html$Attributes$class('elm-debugger-entry-content') - ]), - _List_fromArray( - [ - $elm$html$Html$text(labelText) - ])), - A2( - $elm$html$Html$span, - _List_fromArray( - [ - $elm$html$Html$Attributes$class('elm-debugger-entry-index') - ]), - _List_Nil) - ])); -}; -var $elm$browser$Debugger$History$styles = A3( - $elm$html$Html$node, - 'style', - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text('\n\n.elm-debugger-entry {\n cursor: pointer;\n width: 100%;\n box-sizing: border-box;\n padding: 8px;\n}\n\n.elm-debugger-entry:hover {\n background-color: rgb(41, 41, 41);\n}\n\n.elm-debugger-entry-selected, .elm-debugger-entry-selected:hover {\n background-color: rgb(10, 10, 10);\n}\n\n.elm-debugger-entry-content {\n width: calc(100% - 40px);\n padding: 0 5px;\n box-sizing: border-box;\n text-overflow: ellipsis;\n white-space: nowrap;\n overflow: hidden;\n display: inline-block;\n}\n\n.elm-debugger-entry-index {\n color: #666;\n width: 40px;\n text-align: right;\n display: block;\n float: right;\n}\n\n') - ])); -var $elm$core$Basics$ge = _Utils_ge; -var $elm$browser$Debugger$History$viewSnapshot = F3( - function (selectedIndex, index, _v0) { - var messages = _v0.messages; - return A3( - $elm$html$Html$Keyed$node, - 'div', - _List_Nil, - A3( - $elm$core$Array$foldr, - $elm$browser$Debugger$History$consMsg(selectedIndex), - _Utils_Tuple2(index, _List_Nil), - messages).b); - }); -var $elm$browser$Debugger$History$consSnapshot = F3( - function (selectedIndex, snapshot, _v0) { - var index = _v0.a; - var rest = _v0.b; - var nextIndex = index + $elm$core$Array$length(snapshot.messages); - var selectedIndexHelp = ((_Utils_cmp(nextIndex, selectedIndex) > 0) && (_Utils_cmp(selectedIndex, index) > -1)) ? selectedIndex : (-1); - return _Utils_Tuple2( - nextIndex, - A2( - $elm$core$List$cons, - A4($elm$html$Html$Lazy$lazy3, $elm$browser$Debugger$History$viewSnapshot, selectedIndexHelp, index, snapshot), - rest)); - }); -var $elm$core$Elm$JsArray$foldl = _JsArray_foldl; -var $elm$core$Array$foldl = F3( - function (func, baseCase, _v0) { - var tree = _v0.c; - var tail = _v0.d; - var helper = F2( - function (node, acc) { - if (node.$ === 'SubTree') { - var subTree = node.a; - return A3($elm$core$Elm$JsArray$foldl, helper, acc, subTree); - } else { - var values = node.a; - return A3($elm$core$Elm$JsArray$foldl, func, acc, values); - } - }); - return A3( - $elm$core$Elm$JsArray$foldl, - func, - A3($elm$core$Elm$JsArray$foldl, helper, baseCase, tree), - tail); - }); -var $elm$browser$Debugger$History$viewAllSnapshots = F3( - function (selectedIndex, startIndex, snapshots) { - return A2( - $elm$html$Html$div, - _List_Nil, - A3( - $elm$core$Array$foldl, - $elm$browser$Debugger$History$consSnapshot(selectedIndex), - _Utils_Tuple2(startIndex, _List_Nil), - snapshots).b); - }); -var $elm$core$Array$fromListHelp = F3( - function (list, nodeList, nodeListSize) { - fromListHelp: - while (true) { - var _v0 = A2($elm$core$Elm$JsArray$initializeFromList, $elm$core$Array$branchFactor, list); - var jsArray = _v0.a; - var remainingItems = _v0.b; - if (_Utils_cmp( - $elm$core$Elm$JsArray$length(jsArray), - $elm$core$Array$branchFactor) < 0) { - return A2( - $elm$core$Array$builderToArray, - true, - {nodeList: nodeList, nodeListSize: nodeListSize, tail: jsArray}); - } else { - var $temp$list = remainingItems, - $temp$nodeList = A2( - $elm$core$List$cons, - $elm$core$Array$Leaf(jsArray), - nodeList), - $temp$nodeListSize = nodeListSize + 1; - list = $temp$list; - nodeList = $temp$nodeList; - nodeListSize = $temp$nodeListSize; - continue fromListHelp; - } - } - }); -var $elm$core$Array$fromList = function (list) { - if (!list.b) { - return $elm$core$Array$empty; - } else { - return A3($elm$core$Array$fromListHelp, list, _List_Nil, 0); - } -}; -var $elm$core$Bitwise$and = _Bitwise_and; -var $elm$core$Bitwise$shiftRightZfBy = _Bitwise_shiftRightZfBy; -var $elm$core$Array$bitMask = 4294967295 >>> (32 - $elm$core$Array$shiftStep); -var $elm$core$Elm$JsArray$unsafeGet = _JsArray_unsafeGet; -var $elm$core$Array$getHelp = F3( - function (shift, index, tree) { - getHelp: - while (true) { - var pos = $elm$core$Array$bitMask & (index >>> shift); - var _v0 = A2($elm$core$Elm$JsArray$unsafeGet, pos, tree); - if (_v0.$ === 'SubTree') { - var subTree = _v0.a; - var $temp$shift = shift - $elm$core$Array$shiftStep, - $temp$index = index, - $temp$tree = subTree; - shift = $temp$shift; - index = $temp$index; - tree = $temp$tree; - continue getHelp; - } else { - var values = _v0.a; - return A2($elm$core$Elm$JsArray$unsafeGet, $elm$core$Array$bitMask & index, values); - } - } - }); -var $elm$core$Bitwise$shiftLeftBy = _Bitwise_shiftLeftBy; -var $elm$core$Array$tailIndex = function (len) { - return (len >>> 5) << 5; -}; -var $elm$core$Array$get = F2( - function (index, _v0) { - var len = _v0.a; - var startShift = _v0.b; - var tree = _v0.c; - var tail = _v0.d; - return ((index < 0) || (_Utils_cmp(index, len) > -1)) ? $elm$core$Maybe$Nothing : ((_Utils_cmp( - index, - $elm$core$Array$tailIndex(len)) > -1) ? $elm$core$Maybe$Just( - A2($elm$core$Elm$JsArray$unsafeGet, $elm$core$Array$bitMask & index, tail)) : $elm$core$Maybe$Just( - A3($elm$core$Array$getHelp, startShift, index, tree))); - }); -var $elm$core$Elm$JsArray$appendN = _JsArray_appendN; -var $elm$core$Elm$JsArray$slice = _JsArray_slice; -var $elm$core$Array$appendHelpBuilder = F2( - function (tail, builder) { - var tailLen = $elm$core$Elm$JsArray$length(tail); - var notAppended = ($elm$core$Array$branchFactor - $elm$core$Elm$JsArray$length(builder.tail)) - tailLen; - var appended = A3($elm$core$Elm$JsArray$appendN, $elm$core$Array$branchFactor, builder.tail, tail); - return (notAppended < 0) ? { - nodeList: A2( - $elm$core$List$cons, - $elm$core$Array$Leaf(appended), - builder.nodeList), - nodeListSize: builder.nodeListSize + 1, - tail: A3($elm$core$Elm$JsArray$slice, notAppended, tailLen, tail) - } : ((!notAppended) ? { - nodeList: A2( - $elm$core$List$cons, - $elm$core$Array$Leaf(appended), - builder.nodeList), - nodeListSize: builder.nodeListSize + 1, - tail: $elm$core$Elm$JsArray$empty - } : {nodeList: builder.nodeList, nodeListSize: builder.nodeListSize, tail: appended}); - }); -var $elm$core$List$drop = F2( - function (n, list) { - drop: - while (true) { - if (n <= 0) { - return list; - } else { - if (!list.b) { - return list; - } else { - var x = list.a; - var xs = list.b; - var $temp$n = n - 1, - $temp$list = xs; - n = $temp$n; - list = $temp$list; - continue drop; - } - } - } - }); -var $elm$core$Array$sliceLeft = F2( - function (from, array) { - var len = array.a; - var tree = array.c; - var tail = array.d; - if (!from) { - return array; - } else { - if (_Utils_cmp( - from, - $elm$core$Array$tailIndex(len)) > -1) { - return A4( - $elm$core$Array$Array_elm_builtin, - len - from, - $elm$core$Array$shiftStep, - $elm$core$Elm$JsArray$empty, - A3( - $elm$core$Elm$JsArray$slice, - from - $elm$core$Array$tailIndex(len), - $elm$core$Elm$JsArray$length(tail), - tail)); - } else { - var skipNodes = (from / $elm$core$Array$branchFactor) | 0; - var helper = F2( - function (node, acc) { - if (node.$ === 'SubTree') { - var subTree = node.a; - return A3($elm$core$Elm$JsArray$foldr, helper, acc, subTree); - } else { - var leaf = node.a; - return A2($elm$core$List$cons, leaf, acc); - } - }); - var leafNodes = A3( - $elm$core$Elm$JsArray$foldr, - helper, - _List_fromArray( - [tail]), - tree); - var nodesToInsert = A2($elm$core$List$drop, skipNodes, leafNodes); - if (!nodesToInsert.b) { - return $elm$core$Array$empty; - } else { - var head = nodesToInsert.a; - var rest = nodesToInsert.b; - var firstSlice = from - (skipNodes * $elm$core$Array$branchFactor); - var initialBuilder = { - nodeList: _List_Nil, - nodeListSize: 0, - tail: A3( - $elm$core$Elm$JsArray$slice, - firstSlice, - $elm$core$Elm$JsArray$length(head), - head) - }; - return A2( - $elm$core$Array$builderToArray, - true, - A3($elm$core$List$foldl, $elm$core$Array$appendHelpBuilder, initialBuilder, rest)); - } - } - } - }); -var $elm$core$Array$fetchNewTail = F4( - function (shift, end, treeEnd, tree) { - fetchNewTail: - while (true) { - var pos = $elm$core$Array$bitMask & (treeEnd >>> shift); - var _v0 = A2($elm$core$Elm$JsArray$unsafeGet, pos, tree); - if (_v0.$ === 'SubTree') { - var sub = _v0.a; - var $temp$shift = shift - $elm$core$Array$shiftStep, - $temp$end = end, - $temp$treeEnd = treeEnd, - $temp$tree = sub; - shift = $temp$shift; - end = $temp$end; - treeEnd = $temp$treeEnd; - tree = $temp$tree; - continue fetchNewTail; - } else { - var values = _v0.a; - return A3($elm$core$Elm$JsArray$slice, 0, $elm$core$Array$bitMask & end, values); - } - } - }); -var $elm$core$Array$hoistTree = F3( - function (oldShift, newShift, tree) { - hoistTree: - while (true) { - if ((_Utils_cmp(oldShift, newShift) < 1) || (!$elm$core$Elm$JsArray$length(tree))) { - return tree; - } else { - var _v0 = A2($elm$core$Elm$JsArray$unsafeGet, 0, tree); - if (_v0.$ === 'SubTree') { - var sub = _v0.a; - var $temp$oldShift = oldShift - $elm$core$Array$shiftStep, - $temp$newShift = newShift, - $temp$tree = sub; - oldShift = $temp$oldShift; - newShift = $temp$newShift; - tree = $temp$tree; - continue hoistTree; - } else { - return tree; - } - } - } - }); -var $elm$core$Elm$JsArray$unsafeSet = _JsArray_unsafeSet; -var $elm$core$Array$sliceTree = F3( - function (shift, endIdx, tree) { - var lastPos = $elm$core$Array$bitMask & (endIdx >>> shift); - var _v0 = A2($elm$core$Elm$JsArray$unsafeGet, lastPos, tree); - if (_v0.$ === 'SubTree') { - var sub = _v0.a; - var newSub = A3($elm$core$Array$sliceTree, shift - $elm$core$Array$shiftStep, endIdx, sub); - return (!$elm$core$Elm$JsArray$length(newSub)) ? A3($elm$core$Elm$JsArray$slice, 0, lastPos, tree) : A3( - $elm$core$Elm$JsArray$unsafeSet, - lastPos, - $elm$core$Array$SubTree(newSub), - A3($elm$core$Elm$JsArray$slice, 0, lastPos + 1, tree)); - } else { - return A3($elm$core$Elm$JsArray$slice, 0, lastPos, tree); - } - }); -var $elm$core$Array$sliceRight = F2( - function (end, array) { - var len = array.a; - var startShift = array.b; - var tree = array.c; - var tail = array.d; - if (_Utils_eq(end, len)) { - return array; - } else { - if (_Utils_cmp( - end, - $elm$core$Array$tailIndex(len)) > -1) { - return A4( - $elm$core$Array$Array_elm_builtin, - end, - startShift, - tree, - A3($elm$core$Elm$JsArray$slice, 0, $elm$core$Array$bitMask & end, tail)); - } else { - var endIdx = $elm$core$Array$tailIndex(end); - var depth = $elm$core$Basics$floor( - A2( - $elm$core$Basics$logBase, - $elm$core$Array$branchFactor, - A2($elm$core$Basics$max, 1, endIdx - 1))); - var newShift = A2($elm$core$Basics$max, 5, depth * $elm$core$Array$shiftStep); - return A4( - $elm$core$Array$Array_elm_builtin, - end, - newShift, - A3( - $elm$core$Array$hoistTree, - startShift, - newShift, - A3($elm$core$Array$sliceTree, startShift, endIdx, tree)), - A4($elm$core$Array$fetchNewTail, startShift, end, endIdx, tree)); - } - } - }); -var $elm$core$Array$translateIndex = F2( - function (index, _v0) { - var len = _v0.a; - var posIndex = (index < 0) ? (len + index) : index; - return (posIndex < 0) ? 0 : ((_Utils_cmp(posIndex, len) > 0) ? len : posIndex); - }); -var $elm$core$Array$slice = F3( - function (from, to, array) { - var correctTo = A2($elm$core$Array$translateIndex, to, array); - var correctFrom = A2($elm$core$Array$translateIndex, from, array); - return (_Utils_cmp(correctFrom, correctTo) > 0) ? $elm$core$Array$empty : A2( - $elm$core$Array$sliceLeft, - correctFrom, - A2($elm$core$Array$sliceRight, correctTo, array)); - }); -var $elm$browser$Debugger$History$viewRecentSnapshots = F3( - function (selectedIndex, recentMessagesNum, snapshots) { - var messagesToFill = $elm$browser$Debugger$History$maxSnapshotSize - recentMessagesNum; - var arrayLength = $elm$core$Array$length(snapshots); - var snapshotsToRender = function () { - var _v0 = _Utils_Tuple2( - A2($elm$core$Array$get, arrayLength - 2, snapshots), - A2($elm$core$Array$get, arrayLength - 1, snapshots)); - if ((_v0.a.$ === 'Just') && (_v0.b.$ === 'Just')) { - var fillerSnapshot = _v0.a.a; - var recentSnapshot = _v0.b.a; - return $elm$core$Array$fromList( - _List_fromArray( - [ - { - messages: A3($elm$core$Array$slice, 0, messagesToFill, fillerSnapshot.messages), - model: fillerSnapshot.model - }, - recentSnapshot - ])); - } else { - return snapshots; - } - }(); - var startingIndex = ((arrayLength * $elm$browser$Debugger$History$maxSnapshotSize) - $elm$browser$Debugger$History$maxSnapshotSize) - messagesToFill; - return A3($elm$browser$Debugger$History$viewAllSnapshots, selectedIndex, startingIndex, snapshotsToRender); - }); -var $elm$browser$Debugger$History$view = F2( - function (maybeIndex, _v0) { - var snapshots = _v0.snapshots; - var recent = _v0.recent; - var numMessages = _v0.numMessages; - var recentMessageStartIndex = numMessages - recent.numMessages; - var index = A2($elm$core$Maybe$withDefault, -1, maybeIndex); - var newStuff = A3( - $elm$html$Html$Keyed$node, - 'div', - _List_Nil, - A3( - $elm$core$List$foldr, - $elm$browser$Debugger$History$consMsg(index), - _Utils_Tuple2(recentMessageStartIndex, _List_Nil), - recent.messages).b); - var onlyRenderRecentMessages = (!_Utils_eq(index, -1)) || ($elm$core$Array$length(snapshots) < 2); - var oldStuff = onlyRenderRecentMessages ? A4($elm$html$Html$Lazy$lazy3, $elm$browser$Debugger$History$viewAllSnapshots, index, 0, snapshots) : A4($elm$html$Html$Lazy$lazy3, $elm$browser$Debugger$History$viewRecentSnapshots, index, recent.numMessages, snapshots); - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$id('elm-debugger-sidebar'), - A2($elm$html$Html$Attributes$style, 'width', '100%'), - A2($elm$html$Html$Attributes$style, 'overflow-y', 'auto'), - A2($elm$html$Html$Attributes$style, 'height', 'calc(100% - 72px)') - ]), - A2( - $elm$core$List$cons, - $elm$browser$Debugger$History$styles, - A2( - $elm$core$List$cons, - newStuff, - A2( - $elm$core$List$cons, - oldStuff, - onlyRenderRecentMessages ? _List_Nil : _List_fromArray( - [ - $elm$browser$Debugger$History$showMoreButton(numMessages) - ]))))); - }); -var $elm$browser$Debugger$Main$SwapLayout = {$: 'SwapLayout'}; -var $elm$browser$Debugger$Main$toHistoryIcon = function (layout) { - if (layout.$ === 'Horizontal') { - return 'M13 1a3 3 0 0 1 3 3v8a3 3 0 0 1-3 3h-10a3 3 0 0 1-3-3v-8a3 3 0 0 1 3-3z M13 3h-10a1 1 0 0 0-1 1v5h12v-5a1 1 0 0 0-1-1z M14 10h-12v2a1 1 0 0 0 1 1h10a1 1 0 0 0 1-1z'; - } else { - return 'M0 4a3 3 0 0 1 3-3h10a3 3 0 0 1 3 3v8a3 3 0 0 1-3 3h-10a3 3 0 0 1-3-3z M2 4v8a1 1 0 0 0 1 1h2v-10h-2a1 1 0 0 0-1 1z M6 3v10h7a1 1 0 0 0 1-1v-8a1 1 0 0 0-1-1z'; - } -}; -var $elm$browser$Debugger$Main$icon = function (path) { - return A4( - $elm$virtual_dom$VirtualDom$nodeNS, - 'http://www.w3.org/2000/svg', - 'svg', - _List_fromArray( - [ - A2($elm$virtual_dom$VirtualDom$attribute, 'viewBox', '0 0 16 16'), - A2($elm$virtual_dom$VirtualDom$attribute, 'xmlns', 'http://www.w3.org/2000/svg'), - A2($elm$virtual_dom$VirtualDom$attribute, 'fill', 'currentColor'), - A2($elm$virtual_dom$VirtualDom$attribute, 'width', '16px'), - A2($elm$virtual_dom$VirtualDom$attribute, 'height', '16px') - ]), - _List_fromArray( - [ - A4( - $elm$virtual_dom$VirtualDom$nodeNS, - 'http://www.w3.org/2000/svg', - 'path', - _List_fromArray( - [ - A2($elm$virtual_dom$VirtualDom$attribute, 'd', path) - ]), - _List_Nil) - ])); -}; -var $elm$browser$Debugger$Main$viewHistoryButton = F3( - function (label, msg, path) { - return A2( - $elm$html$Html$button, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'display', 'flex'), - A2($elm$html$Html$Attributes$style, 'flex-direction', 'row'), - A2($elm$html$Html$Attributes$style, 'align-items', 'center'), - A2($elm$html$Html$Attributes$style, 'background', 'none'), - A2($elm$html$Html$Attributes$style, 'border', 'none'), - A2($elm$html$Html$Attributes$style, 'color', 'inherit'), - A2($elm$html$Html$Attributes$style, 'cursor', 'pointer'), - $elm$html$Html$Events$onClick(msg) - ]), - _List_fromArray( - [ - $elm$browser$Debugger$Main$icon(path), - A2( - $elm$html$Html$span, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'padding-left', '6px') - ]), - _List_fromArray( - [ - $elm$html$Html$text(label) - ])) - ])); - }); -var $elm$browser$Debugger$Main$viewHistoryOptions = function (layout) { - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'width', '100%'), - A2($elm$html$Html$Attributes$style, 'height', '36px'), - A2($elm$html$Html$Attributes$style, 'display', 'flex'), - A2($elm$html$Html$Attributes$style, 'flex-direction', 'row'), - A2($elm$html$Html$Attributes$style, 'align-items', 'center'), - A2($elm$html$Html$Attributes$style, 'justify-content', 'space-between'), - A2($elm$html$Html$Attributes$style, 'background-color', 'rgb(50, 50, 50)') - ]), - _List_fromArray( - [ - A3( - $elm$browser$Debugger$Main$viewHistoryButton, - 'Swap Layout', - $elm$browser$Debugger$Main$SwapLayout, - $elm$browser$Debugger$Main$toHistoryIcon(layout)), - A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'display', 'flex'), - A2($elm$html$Html$Attributes$style, 'flex-direction', 'row'), - A2($elm$html$Html$Attributes$style, 'align-items', 'center'), - A2($elm$html$Html$Attributes$style, 'justify-content', 'space-between') - ]), - _List_fromArray( - [ - A3($elm$browser$Debugger$Main$viewHistoryButton, 'Import', $elm$browser$Debugger$Main$Import, 'M5 1a1 1 0 0 1 0 2h-2a1 1 0 0 0-1 1v8a1 1 0 0 0 1 1h10a1 1 0 0 0 1-1a1 1 0 0 1 2 0a3 3 0 0 1-3 3h-10a3 3 0 0 1-3-3v-8a3 3 0 0 1 3-3z M10 2a1 1 0 0 0 -2 0v6a1 1 0 0 0 1 1h6a1 1 0 0 0 0-2h-3.586l4.293-4.293a1 1 0 0 0-1.414-1.414l-4.293 4.293z'), - A3($elm$browser$Debugger$Main$viewHistoryButton, 'Export', $elm$browser$Debugger$Main$Export, 'M5 1a1 1 0 0 1 0 2h-2a1 1 0 0 0-1 1v8a1 1 0 0 0 1 1h10a1 1 0 0 0 1-1 a1 1 0 0 1 2 0a3 3 0 0 1-3 3h-10a3 3 0 0 1-3-3v-8a3 3 0 0 1 3-3z M9 3a1 1 0 1 1 0-2h6a1 1 0 0 1 1 1v6a1 1 0 1 1-2 0v-3.586l-5.293 5.293 a1 1 0 0 1-1.414-1.414l5.293 -5.293z') - ])) - ])); -}; -var $elm$browser$Debugger$Main$SliderJump = function (a) { - return {$: 'SliderJump', a: a}; -}; -var $elm$core$Basics$composeR = F3( - function (f, g, x) { - return g( - f(x)); - }); -var $elm$html$Html$input = _VirtualDom_node('input'); -var $elm$browser$Debugger$Main$isPlaying = function (maybeIndex) { - if (maybeIndex.$ === 'Nothing') { - return true; - } else { - return false; - } -}; -var $elm$html$Html$Attributes$max = $elm$html$Html$Attributes$stringProperty('max'); -var $elm$html$Html$Attributes$min = $elm$html$Html$Attributes$stringProperty('min'); -var $elm$html$Html$Events$alwaysStop = function (x) { - return _Utils_Tuple2(x, true); -}; -var $elm$virtual_dom$VirtualDom$MayStopPropagation = function (a) { - return {$: 'MayStopPropagation', a: a}; -}; -var $elm$html$Html$Events$stopPropagationOn = F2( - function (event, decoder) { - return A2( - $elm$virtual_dom$VirtualDom$on, - event, - $elm$virtual_dom$VirtualDom$MayStopPropagation(decoder)); - }); -var $elm$json$Json$Decode$string = _Json_decodeString; -var $elm$html$Html$Events$targetValue = A2( - $elm$json$Json$Decode$at, - _List_fromArray( - ['target', 'value']), - $elm$json$Json$Decode$string); -var $elm$html$Html$Events$onInput = function (tagger) { - return A2( - $elm$html$Html$Events$stopPropagationOn, - 'input', - A2( - $elm$json$Json$Decode$map, - $elm$html$Html$Events$alwaysStop, - A2($elm$json$Json$Decode$map, tagger, $elm$html$Html$Events$targetValue))); -}; -var $elm$core$String$toInt = _String_toInt; -var $elm$html$Html$Attributes$type_ = $elm$html$Html$Attributes$stringProperty('type'); -var $elm$html$Html$Attributes$value = $elm$html$Html$Attributes$stringProperty('value'); -var $elm$browser$Debugger$Main$viewPlayButton = function (playing) { - return A2( - $elm$html$Html$button, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'background', '#1293D8'), - A2($elm$html$Html$Attributes$style, 'border', 'none'), - A2($elm$html$Html$Attributes$style, 'color', 'white'), - A2($elm$html$Html$Attributes$style, 'cursor', 'pointer'), - A2($elm$html$Html$Attributes$style, 'width', '36px'), - A2($elm$html$Html$Attributes$style, 'height', '36px'), - $elm$html$Html$Events$onClick($elm$browser$Debugger$Main$Resume) - ]), - _List_fromArray( - [ - playing ? $elm$browser$Debugger$Main$icon('M2 2h4v12h-4v-12z M10 2h4v12h-4v-12z') : $elm$browser$Debugger$Main$icon('M2 2l12 7l-12 7z') - ])); -}; -var $elm$browser$Debugger$Main$viewHistorySlider = F2( - function (history, maybeIndex) { - var lastIndex = $elm$browser$Debugger$History$size(history) - 1; - var selectedIndex = A2($elm$core$Maybe$withDefault, lastIndex, maybeIndex); - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'display', 'flex'), - A2($elm$html$Html$Attributes$style, 'flex-direction', 'row'), - A2($elm$html$Html$Attributes$style, 'align-items', 'center'), - A2($elm$html$Html$Attributes$style, 'width', '100%'), - A2($elm$html$Html$Attributes$style, 'height', '36px'), - A2($elm$html$Html$Attributes$style, 'background-color', 'rgb(50, 50, 50)') - ]), - _List_fromArray( - [ - A2( - $elm$html$Html$Lazy$lazy, - $elm$browser$Debugger$Main$viewPlayButton, - $elm$browser$Debugger$Main$isPlaying(maybeIndex)), - A2( - $elm$html$Html$input, - _List_fromArray( - [ - $elm$html$Html$Attributes$type_('range'), - A2($elm$html$Html$Attributes$style, 'width', 'calc(100% - 56px)'), - A2($elm$html$Html$Attributes$style, 'height', '36px'), - A2($elm$html$Html$Attributes$style, 'margin', '0 10px'), - $elm$html$Html$Attributes$min('0'), - $elm$html$Html$Attributes$max( - $elm$core$String$fromInt(lastIndex)), - $elm$html$Html$Attributes$value( - $elm$core$String$fromInt(selectedIndex)), - $elm$html$Html$Events$onInput( - A2( - $elm$core$Basics$composeR, - $elm$core$String$toInt, - A2( - $elm$core$Basics$composeR, - $elm$core$Maybe$withDefault(lastIndex), - $elm$browser$Debugger$Main$SliderJump))) - ]), - _List_Nil) - ])); - }); -var $elm$browser$Debugger$Main$viewHistory = F3( - function (maybeIndex, history, layout) { - var block = $elm$browser$Debugger$Main$toMouseBlocker(layout); - var _v0 = $elm$browser$Debugger$Main$toHistoryPercents(layout); - var w = _v0.a; - var h = _v0.b; - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'width', w), - A2($elm$html$Html$Attributes$style, 'height', h), - A2($elm$html$Html$Attributes$style, 'display', 'flex'), - A2($elm$html$Html$Attributes$style, 'flex-direction', 'column'), - A2($elm$html$Html$Attributes$style, 'color', '#DDDDDD'), - A2($elm$html$Html$Attributes$style, 'background-color', 'rgb(61, 61, 61)'), - A2($elm$html$Html$Attributes$style, 'pointer-events', block), - A2($elm$html$Html$Attributes$style, 'user-select', block) - ]), - _List_fromArray( - [ - A2($elm$browser$Debugger$Main$viewHistorySlider, history, maybeIndex), - A2( - $elm$html$Html$map, - $elm$browser$Debugger$Main$Jump, - A2($elm$browser$Debugger$History$view, maybeIndex, history)), - A2($elm$html$Html$Lazy$lazy, $elm$browser$Debugger$Main$viewHistoryOptions, layout) - ])); - }); -var $elm$browser$Debugger$Main$popoutView = function (model) { - var maybeIndex = function () { - var _v0 = model.state; - if (_v0.$ === 'Running') { - return $elm$core$Maybe$Nothing; - } else { - var index = _v0.a; - return $elm$core$Maybe$Just(index); - } - }(); - var historyToRender = $elm$browser$Debugger$Main$cachedHistory(model); - return A3( - $elm$html$Html$node, - 'body', - _Utils_ap( - $elm$browser$Debugger$Main$toDragListeners(model.layout), - _List_fromArray( - [ - A2($elm$html$Html$Attributes$style, 'margin', '0'), - A2($elm$html$Html$Attributes$style, 'padding', '0'), - A2($elm$html$Html$Attributes$style, 'width', '100%'), - A2($elm$html$Html$Attributes$style, 'height', '100%'), - A2($elm$html$Html$Attributes$style, 'font-family', 'monospace'), - A2($elm$html$Html$Attributes$style, 'display', 'flex'), - A2( - $elm$html$Html$Attributes$style, - 'flex-direction', - $elm$browser$Debugger$Main$toFlexDirection(model.layout)) - ])), - _List_fromArray( - [ - A3($elm$browser$Debugger$Main$viewHistory, maybeIndex, historyToRender, model.layout), - $elm$browser$Debugger$Main$viewDragZone(model.layout), - A3($elm$browser$Debugger$Main$viewExpando, model.expandoMsg, model.expandoModel, model.layout) - ])); -}; -var $elm$browser$Debugger$Overlay$BlockAll = {$: 'BlockAll'}; -var $elm$browser$Debugger$Overlay$toBlockerType = F2( - function (isPaused, state) { - switch (state.$) { - case 'None': - return isPaused ? $elm$browser$Debugger$Overlay$BlockAll : $elm$browser$Debugger$Overlay$BlockNone; - case 'BadMetadata': - return $elm$browser$Debugger$Overlay$BlockMost; - case 'BadImport': - return $elm$browser$Debugger$Overlay$BlockMost; - default: - return $elm$browser$Debugger$Overlay$BlockMost; - } - }); -var $elm$browser$Debugger$Main$toBlockerType = function (model) { - return A2( - $elm$browser$Debugger$Overlay$toBlockerType, - $elm$browser$Debugger$Main$isPaused(model.state), - model.overlay); -}; -var $elm$browser$Debugger$Main$Horizontal = F3( - function (a, b, c) { - return {$: 'Horizontal', a: a, b: b, c: c}; - }); -var $elm$browser$Debugger$Main$Running = function (a) { - return {$: 'Running', a: a}; -}; -var $elm$browser$Debugger$Main$Static = {$: 'Static'}; -var $elm$browser$Debugger$Metadata$Error = F2( - function (message, problems) { - return {message: message, problems: problems}; - }); -var $elm$json$Json$Decode$decodeValue = _Json_run; -var $elm$browser$Debugger$Metadata$Metadata = F2( - function (versions, types) { - return {types: types, versions: versions}; - }); -var $elm$browser$Debugger$Metadata$Types = F3( - function (message, aliases, unions) { - return {aliases: aliases, message: message, unions: unions}; - }); -var $elm$browser$Debugger$Metadata$Alias = F2( - function (args, tipe) { - return {args: args, tipe: tipe}; - }); -var $elm$json$Json$Decode$list = _Json_decodeList; -var $elm$browser$Debugger$Metadata$decodeAlias = A3( - $elm$json$Json$Decode$map2, - $elm$browser$Debugger$Metadata$Alias, - A2( - $elm$json$Json$Decode$field, - 'args', - $elm$json$Json$Decode$list($elm$json$Json$Decode$string)), - A2($elm$json$Json$Decode$field, 'type', $elm$json$Json$Decode$string)); -var $elm$browser$Debugger$Metadata$Union = F2( - function (args, tags) { - return {args: args, tags: tags}; - }); -var $elm$core$Dict$fromList = function (assocs) { - return A3( - $elm$core$List$foldl, - F2( - function (_v0, dict) { - var key = _v0.a; - var value = _v0.b; - return A3($elm$core$Dict$insert, key, value, dict); - }), - $elm$core$Dict$empty, - assocs); -}; -var $elm$json$Json$Decode$keyValuePairs = _Json_decodeKeyValuePairs; -var $elm$json$Json$Decode$dict = function (decoder) { - return A2( - $elm$json$Json$Decode$map, - $elm$core$Dict$fromList, - $elm$json$Json$Decode$keyValuePairs(decoder)); -}; -var $elm$browser$Debugger$Metadata$decodeUnion = A3( - $elm$json$Json$Decode$map2, - $elm$browser$Debugger$Metadata$Union, - A2( - $elm$json$Json$Decode$field, - 'args', - $elm$json$Json$Decode$list($elm$json$Json$Decode$string)), - A2( - $elm$json$Json$Decode$field, - 'tags', - $elm$json$Json$Decode$dict( - $elm$json$Json$Decode$list($elm$json$Json$Decode$string)))); -var $elm$json$Json$Decode$map3 = _Json_map3; -var $elm$browser$Debugger$Metadata$decodeTypes = A4( - $elm$json$Json$Decode$map3, - $elm$browser$Debugger$Metadata$Types, - A2($elm$json$Json$Decode$field, 'message', $elm$json$Json$Decode$string), - A2( - $elm$json$Json$Decode$field, - 'aliases', - $elm$json$Json$Decode$dict($elm$browser$Debugger$Metadata$decodeAlias)), - A2( - $elm$json$Json$Decode$field, - 'unions', - $elm$json$Json$Decode$dict($elm$browser$Debugger$Metadata$decodeUnion))); -var $elm$browser$Debugger$Metadata$Versions = function (elm) { - return {elm: elm}; -}; -var $elm$browser$Debugger$Metadata$decodeVersions = A2( - $elm$json$Json$Decode$map, - $elm$browser$Debugger$Metadata$Versions, - A2($elm$json$Json$Decode$field, 'elm', $elm$json$Json$Decode$string)); -var $elm$browser$Debugger$Metadata$decoder = A3( - $elm$json$Json$Decode$map2, - $elm$browser$Debugger$Metadata$Metadata, - A2($elm$json$Json$Decode$field, 'versions', $elm$browser$Debugger$Metadata$decodeVersions), - A2($elm$json$Json$Decode$field, 'types', $elm$browser$Debugger$Metadata$decodeTypes)); -var $elm$browser$Debugger$Metadata$ProblemType = F2( - function (name, problems) { - return {name: name, problems: problems}; - }); -var $elm$core$List$maybeCons = F3( - function (f, mx, xs) { - var _v0 = f(mx); - if (_v0.$ === 'Just') { - var x = _v0.a; - return A2($elm$core$List$cons, x, xs); - } else { - return xs; - } - }); -var $elm$core$List$filterMap = F2( - function (f, xs) { - return A3( - $elm$core$List$foldr, - $elm$core$List$maybeCons(f), - _List_Nil, - xs); - }); -var $elm$core$String$contains = _String_contains; -var $elm$browser$Debugger$Metadata$hasProblem = F2( - function (tipe, _v0) { - var problem = _v0.a; - var token = _v0.b; - return A2($elm$core$String$contains, token, tipe) ? $elm$core$Maybe$Just(problem) : $elm$core$Maybe$Nothing; - }); -var $elm$browser$Debugger$Metadata$Decoder = {$: 'Decoder'}; -var $elm$browser$Debugger$Metadata$Function = {$: 'Function'}; -var $elm$browser$Debugger$Metadata$Process = {$: 'Process'}; -var $elm$browser$Debugger$Metadata$Program = {$: 'Program'}; -var $elm$browser$Debugger$Metadata$Request = {$: 'Request'}; -var $elm$browser$Debugger$Metadata$Socket = {$: 'Socket'}; -var $elm$browser$Debugger$Metadata$Task = {$: 'Task'}; -var $elm$browser$Debugger$Metadata$VirtualDom = {$: 'VirtualDom'}; -var $elm$browser$Debugger$Metadata$problemTable = _List_fromArray( - [ - _Utils_Tuple2($elm$browser$Debugger$Metadata$Function, '->'), - _Utils_Tuple2($elm$browser$Debugger$Metadata$Decoder, 'Json.Decode.Decoder'), - _Utils_Tuple2($elm$browser$Debugger$Metadata$Task, 'Task.Task'), - _Utils_Tuple2($elm$browser$Debugger$Metadata$Process, 'Process.Id'), - _Utils_Tuple2($elm$browser$Debugger$Metadata$Socket, 'WebSocket.LowLevel.WebSocket'), - _Utils_Tuple2($elm$browser$Debugger$Metadata$Request, 'Http.Request'), - _Utils_Tuple2($elm$browser$Debugger$Metadata$Program, 'Platform.Program'), - _Utils_Tuple2($elm$browser$Debugger$Metadata$VirtualDom, 'VirtualDom.Node'), - _Utils_Tuple2($elm$browser$Debugger$Metadata$VirtualDom, 'VirtualDom.Attribute') - ]); -var $elm$browser$Debugger$Metadata$findProblems = function (tipe) { - return A2( - $elm$core$List$filterMap, - $elm$browser$Debugger$Metadata$hasProblem(tipe), - $elm$browser$Debugger$Metadata$problemTable); -}; -var $elm$browser$Debugger$Metadata$collectBadAliases = F3( - function (name, _v0, list) { - var tipe = _v0.tipe; - var _v1 = $elm$browser$Debugger$Metadata$findProblems(tipe); - if (!_v1.b) { - return list; - } else { - var problems = _v1; - return A2( - $elm$core$List$cons, - A2($elm$browser$Debugger$Metadata$ProblemType, name, problems), - list); - } - }); -var $elm$core$List$append = F2( - function (xs, ys) { - if (!ys.b) { - return xs; - } else { - return A3($elm$core$List$foldr, $elm$core$List$cons, ys, xs); - } - }); -var $elm$core$List$concat = function (lists) { - return A3($elm$core$List$foldr, $elm$core$List$append, _List_Nil, lists); -}; -var $elm$core$List$concatMap = F2( - function (f, list) { - return $elm$core$List$concat( - A2($elm$core$List$map, f, list)); - }); -var $elm$core$Dict$values = function (dict) { - return A3( - $elm$core$Dict$foldr, - F3( - function (key, value, valueList) { - return A2($elm$core$List$cons, value, valueList); - }), - _List_Nil, - dict); -}; -var $elm$browser$Debugger$Metadata$collectBadUnions = F3( - function (name, _v0, list) { - var tags = _v0.tags; - var _v1 = A2( - $elm$core$List$concatMap, - $elm$browser$Debugger$Metadata$findProblems, - $elm$core$List$concat( - $elm$core$Dict$values(tags))); - if (!_v1.b) { - return list; - } else { - var problems = _v1; - return A2( - $elm$core$List$cons, - A2($elm$browser$Debugger$Metadata$ProblemType, name, problems), - list); - } - }); -var $elm$browser$Debugger$Metadata$isPortable = function (_v0) { - var types = _v0.types; - var badAliases = A3($elm$core$Dict$foldl, $elm$browser$Debugger$Metadata$collectBadAliases, _List_Nil, types.aliases); - var _v1 = A3($elm$core$Dict$foldl, $elm$browser$Debugger$Metadata$collectBadUnions, badAliases, types.unions); - if (!_v1.b) { - return $elm$core$Maybe$Nothing; - } else { - var problems = _v1; - return $elm$core$Maybe$Just( - A2($elm$browser$Debugger$Metadata$Error, types.message, problems)); - } -}; -var $elm$browser$Debugger$Metadata$decode = function (value) { - var _v0 = A2($elm$json$Json$Decode$decodeValue, $elm$browser$Debugger$Metadata$decoder, value); - if (_v0.$ === 'Err') { - return $elm$core$Result$Err( - A2($elm$browser$Debugger$Metadata$Error, 'The compiler is generating bad metadata. This is a compiler bug!', _List_Nil)); - } else { - var metadata = _v0.a; - var _v1 = $elm$browser$Debugger$Metadata$isPortable(metadata); - if (_v1.$ === 'Nothing') { - return $elm$core$Result$Ok(metadata); - } else { - var error = _v1.a; - return $elm$core$Result$Err(error); - } - } -}; -var $elm$browser$Debugger$History$History = F3( - function (snapshots, recent, numMessages) { - return {numMessages: numMessages, recent: recent, snapshots: snapshots}; - }); -var $elm$browser$Debugger$History$RecentHistory = F3( - function (model, messages, numMessages) { - return {messages: messages, model: model, numMessages: numMessages}; - }); -var $elm$browser$Debugger$History$empty = function (model) { - return A3( - $elm$browser$Debugger$History$History, - $elm$core$Array$empty, - A3($elm$browser$Debugger$History$RecentHistory, model, _List_Nil, 0), - 0); -}; -var $elm$core$Dict$map = F2( - function (func, dict) { - if (dict.$ === 'RBEmpty_elm_builtin') { - return $elm$core$Dict$RBEmpty_elm_builtin; - } else { - var color = dict.a; - var key = dict.b; - var value = dict.c; - var left = dict.d; - var right = dict.e; - return A5( - $elm$core$Dict$RBNode_elm_builtin, - color, - key, - A2(func, key, value), - A2($elm$core$Dict$map, func, left), - A2($elm$core$Dict$map, func, right)); - } - }); -var $elm$core$Dict$sizeHelp = F2( - function (n, dict) { - sizeHelp: - while (true) { - if (dict.$ === 'RBEmpty_elm_builtin') { - return n; - } else { - var left = dict.d; - var right = dict.e; - var $temp$n = A2($elm$core$Dict$sizeHelp, n + 1, right), - $temp$dict = left; - n = $temp$n; - dict = $temp$dict; - continue sizeHelp; - } - } - }); -var $elm$core$Dict$size = function (dict) { - return A2($elm$core$Dict$sizeHelp, 0, dict); -}; -var $elm$browser$Debugger$Expando$initHelp = F2( - function (isOuter, expando) { - switch (expando.$) { - case 'S': - return expando; - case 'Primitive': - return expando; - case 'Sequence': - var seqType = expando.a; - var isClosed = expando.b; - var items = expando.c; - return isOuter ? A3( - $elm$browser$Debugger$Expando$Sequence, - seqType, - false, - A2( - $elm$core$List$map, - $elm$browser$Debugger$Expando$initHelp(false), - items)) : (($elm$core$List$length(items) <= 8) ? A3($elm$browser$Debugger$Expando$Sequence, seqType, false, items) : expando); - case 'Dictionary': - var isClosed = expando.a; - var keyValuePairs = expando.b; - return isOuter ? A2( - $elm$browser$Debugger$Expando$Dictionary, - false, - A2( - $elm$core$List$map, - function (_v1) { - var k = _v1.a; - var v = _v1.b; - return _Utils_Tuple2( - k, - A2($elm$browser$Debugger$Expando$initHelp, false, v)); - }, - keyValuePairs)) : (($elm$core$List$length(keyValuePairs) <= 8) ? A2($elm$browser$Debugger$Expando$Dictionary, false, keyValuePairs) : expando); - case 'Record': - var isClosed = expando.a; - var entries = expando.b; - return isOuter ? A2( - $elm$browser$Debugger$Expando$Record, - false, - A2( - $elm$core$Dict$map, - F2( - function (_v2, v) { - return A2($elm$browser$Debugger$Expando$initHelp, false, v); - }), - entries)) : (($elm$core$Dict$size(entries) <= 4) ? A2($elm$browser$Debugger$Expando$Record, false, entries) : expando); - default: - var maybeName = expando.a; - var isClosed = expando.b; - var args = expando.c; - return isOuter ? A3( - $elm$browser$Debugger$Expando$Constructor, - maybeName, - false, - A2( - $elm$core$List$map, - $elm$browser$Debugger$Expando$initHelp(false), - args)) : (($elm$core$List$length(args) <= 4) ? A3($elm$browser$Debugger$Expando$Constructor, maybeName, false, args) : expando); - } - }); -var $elm$browser$Debugger$Expando$init = function (value) { - return A2( - $elm$browser$Debugger$Expando$initHelp, - true, - _Debugger_init(value)); -}; -var $elm$core$Platform$Cmd$map = _Platform_map; -var $elm$browser$Debugger$Overlay$None = {$: 'None'}; -var $elm$browser$Debugger$Overlay$none = $elm$browser$Debugger$Overlay$None; -var $elm$browser$Debugger$Main$wrapInit = F4( - function (metadata, popout, init, flags) { - var _v0 = init(flags); - var userModel = _v0.a; - var userCommands = _v0.b; - return _Utils_Tuple2( - { - expandoModel: $elm$browser$Debugger$Expando$init(userModel), - expandoMsg: $elm$browser$Debugger$Expando$init(_Utils_Tuple0), - history: $elm$browser$Debugger$History$empty(userModel), - layout: A3($elm$browser$Debugger$Main$Horizontal, $elm$browser$Debugger$Main$Static, 0.3, 0.5), - metadata: $elm$browser$Debugger$Metadata$decode(metadata), - overlay: $elm$browser$Debugger$Overlay$none, - popout: popout, - state: $elm$browser$Debugger$Main$Running(userModel) - }, - A2($elm$core$Platform$Cmd$map, $elm$browser$Debugger$Main$UserMsg, userCommands)); - }); -var $elm$browser$Debugger$Main$getLatestModel = function (state) { - if (state.$ === 'Running') { - var model = state.a; - return model; - } else { - var model = state.c; - return model; - } -}; -var $elm$core$Platform$Sub$map = _Platform_map; -var $elm$browser$Debugger$Main$wrapSubs = F2( - function (subscriptions, model) { - return A2( - $elm$core$Platform$Sub$map, - $elm$browser$Debugger$Main$UserMsg, - subscriptions( - $elm$browser$Debugger$Main$getLatestModel(model.state))); - }); -var $elm$browser$Debugger$Main$Moving = {$: 'Moving'}; -var $elm$browser$Debugger$Main$Paused = F5( - function (a, b, c, d, e) { - return {$: 'Paused', a: a, b: b, c: c, d: d, e: e}; - }); -var $elm$browser$Debugger$History$Snapshot = F2( - function (model, messages) { - return {messages: messages, model: model}; - }); -var $elm$browser$Debugger$History$addRecent = F3( - function (msg, newModel, _v0) { - var model = _v0.model; - var messages = _v0.messages; - var numMessages = _v0.numMessages; - return _Utils_eq(numMessages, $elm$browser$Debugger$History$maxSnapshotSize) ? _Utils_Tuple2( - $elm$core$Maybe$Just( - A2( - $elm$browser$Debugger$History$Snapshot, - model, - $elm$core$Array$fromList(messages))), - A3( - $elm$browser$Debugger$History$RecentHistory, - newModel, - _List_fromArray( - [msg]), - 1)) : _Utils_Tuple2( - $elm$core$Maybe$Nothing, - A3( - $elm$browser$Debugger$History$RecentHistory, - model, - A2($elm$core$List$cons, msg, messages), - numMessages + 1)); - }); -var $elm$core$Elm$JsArray$push = _JsArray_push; -var $elm$core$Elm$JsArray$singleton = _JsArray_singleton; -var $elm$core$Array$insertTailInTree = F4( - function (shift, index, tail, tree) { - var pos = $elm$core$Array$bitMask & (index >>> shift); - if (_Utils_cmp( - pos, - $elm$core$Elm$JsArray$length(tree)) > -1) { - if (shift === 5) { - return A2( - $elm$core$Elm$JsArray$push, - $elm$core$Array$Leaf(tail), - tree); - } else { - var newSub = $elm$core$Array$SubTree( - A4($elm$core$Array$insertTailInTree, shift - $elm$core$Array$shiftStep, index, tail, $elm$core$Elm$JsArray$empty)); - return A2($elm$core$Elm$JsArray$push, newSub, tree); - } - } else { - var value = A2($elm$core$Elm$JsArray$unsafeGet, pos, tree); - if (value.$ === 'SubTree') { - var subTree = value.a; - var newSub = $elm$core$Array$SubTree( - A4($elm$core$Array$insertTailInTree, shift - $elm$core$Array$shiftStep, index, tail, subTree)); - return A3($elm$core$Elm$JsArray$unsafeSet, pos, newSub, tree); - } else { - var newSub = $elm$core$Array$SubTree( - A4( - $elm$core$Array$insertTailInTree, - shift - $elm$core$Array$shiftStep, - index, - tail, - $elm$core$Elm$JsArray$singleton(value))); - return A3($elm$core$Elm$JsArray$unsafeSet, pos, newSub, tree); - } - } - }); -var $elm$core$Array$unsafeReplaceTail = F2( - function (newTail, _v0) { - var len = _v0.a; - var startShift = _v0.b; - var tree = _v0.c; - var tail = _v0.d; - var originalTailLen = $elm$core$Elm$JsArray$length(tail); - var newTailLen = $elm$core$Elm$JsArray$length(newTail); - var newArrayLen = len + (newTailLen - originalTailLen); - if (_Utils_eq(newTailLen, $elm$core$Array$branchFactor)) { - var overflow = _Utils_cmp(newArrayLen >>> $elm$core$Array$shiftStep, 1 << startShift) > 0; - if (overflow) { - var newShift = startShift + $elm$core$Array$shiftStep; - var newTree = A4( - $elm$core$Array$insertTailInTree, - newShift, - len, - newTail, - $elm$core$Elm$JsArray$singleton( - $elm$core$Array$SubTree(tree))); - return A4($elm$core$Array$Array_elm_builtin, newArrayLen, newShift, newTree, $elm$core$Elm$JsArray$empty); - } else { - return A4( - $elm$core$Array$Array_elm_builtin, - newArrayLen, - startShift, - A4($elm$core$Array$insertTailInTree, startShift, len, newTail, tree), - $elm$core$Elm$JsArray$empty); - } - } else { - return A4($elm$core$Array$Array_elm_builtin, newArrayLen, startShift, tree, newTail); - } - }); -var $elm$core$Array$push = F2( - function (a, array) { - var tail = array.d; - return A2( - $elm$core$Array$unsafeReplaceTail, - A2($elm$core$Elm$JsArray$push, a, tail), - array); - }); -var $elm$browser$Debugger$History$add = F3( - function (msg, model, _v0) { - var snapshots = _v0.snapshots; - var recent = _v0.recent; - var numMessages = _v0.numMessages; - var _v1 = A3($elm$browser$Debugger$History$addRecent, msg, model, recent); - if (_v1.a.$ === 'Just') { - var snapshot = _v1.a.a; - var newRecent = _v1.b; - return A3( - $elm$browser$Debugger$History$History, - A2($elm$core$Array$push, snapshot, snapshots), - newRecent, - numMessages + 1); - } else { - var _v2 = _v1.a; - var newRecent = _v1.b; - return A3($elm$browser$Debugger$History$History, snapshots, newRecent, numMessages + 1); - } - }); -var $elm$core$Basics$always = F2( - function (a, _v0) { - return a; - }); -var $elm$browser$Debugger$Overlay$BadImport = function (a) { - return {$: 'BadImport', a: a}; -}; -var $elm$browser$Debugger$Overlay$RiskyImport = F2( - function (a, b) { - return {$: 'RiskyImport', a: a, b: b}; - }); -var $elm$browser$Debugger$Report$VersionChanged = F2( - function (a, b) { - return {$: 'VersionChanged', a: a, b: b}; - }); -var $elm$browser$Debugger$Report$MessageChanged = F2( - function (a, b) { - return {$: 'MessageChanged', a: a, b: b}; - }); -var $elm$browser$Debugger$Report$SomethingChanged = function (a) { - return {$: 'SomethingChanged', a: a}; -}; -var $elm$browser$Debugger$Report$AliasChange = function (a) { - return {$: 'AliasChange', a: a}; -}; -var $elm$browser$Debugger$Metadata$checkAlias = F4( - function (name, old, _new, changes) { - return (_Utils_eq(old.tipe, _new.tipe) && _Utils_eq(old.args, _new.args)) ? changes : A2( - $elm$core$List$cons, - $elm$browser$Debugger$Report$AliasChange(name), - changes); - }); -var $elm$browser$Debugger$Report$UnionChange = F2( - function (a, b) { - return {$: 'UnionChange', a: a, b: b}; - }); -var $elm$browser$Debugger$Metadata$addTag = F3( - function (tag, _v0, changes) { - return _Utils_update( - changes, - { - added: A2($elm$core$List$cons, tag, changes.added) - }); - }); -var $elm$browser$Debugger$Metadata$checkTag = F4( - function (tag, old, _new, changes) { - return _Utils_eq(old, _new) ? changes : _Utils_update( - changes, - { - changed: A2($elm$core$List$cons, tag, changes.changed) - }); - }); -var $elm$browser$Debugger$Report$TagChanges = F4( - function (removed, changed, added, argsMatch) { - return {added: added, argsMatch: argsMatch, changed: changed, removed: removed}; - }); -var $elm$browser$Debugger$Report$emptyTagChanges = function (argsMatch) { - return A4($elm$browser$Debugger$Report$TagChanges, _List_Nil, _List_Nil, _List_Nil, argsMatch); -}; -var $elm$browser$Debugger$Report$hasTagChanges = function (tagChanges) { - return _Utils_eq( - tagChanges, - A4($elm$browser$Debugger$Report$TagChanges, _List_Nil, _List_Nil, _List_Nil, true)); -}; -var $elm$core$Dict$merge = F6( - function (leftStep, bothStep, rightStep, leftDict, rightDict, initialResult) { - var stepState = F3( - function (rKey, rValue, _v0) { - stepState: - while (true) { - var list = _v0.a; - var result = _v0.b; - if (!list.b) { - return _Utils_Tuple2( - list, - A3(rightStep, rKey, rValue, result)); - } else { - var _v2 = list.a; - var lKey = _v2.a; - var lValue = _v2.b; - var rest = list.b; - if (_Utils_cmp(lKey, rKey) < 0) { - var $temp$rKey = rKey, - $temp$rValue = rValue, - $temp$_v0 = _Utils_Tuple2( - rest, - A3(leftStep, lKey, lValue, result)); - rKey = $temp$rKey; - rValue = $temp$rValue; - _v0 = $temp$_v0; - continue stepState; - } else { - if (_Utils_cmp(lKey, rKey) > 0) { - return _Utils_Tuple2( - list, - A3(rightStep, rKey, rValue, result)); - } else { - return _Utils_Tuple2( - rest, - A4(bothStep, lKey, lValue, rValue, result)); - } - } - } - } - }); - var _v3 = A3( - $elm$core$Dict$foldl, - stepState, - _Utils_Tuple2( - $elm$core$Dict$toList(leftDict), - initialResult), - rightDict); - var leftovers = _v3.a; - var intermediateResult = _v3.b; - return A3( - $elm$core$List$foldl, - F2( - function (_v4, result) { - var k = _v4.a; - var v = _v4.b; - return A3(leftStep, k, v, result); - }), - intermediateResult, - leftovers); - }); -var $elm$browser$Debugger$Metadata$removeTag = F3( - function (tag, _v0, changes) { - return _Utils_update( - changes, - { - removed: A2($elm$core$List$cons, tag, changes.removed) - }); - }); -var $elm$browser$Debugger$Metadata$checkUnion = F4( - function (name, old, _new, changes) { - var tagChanges = A6( - $elm$core$Dict$merge, - $elm$browser$Debugger$Metadata$removeTag, - $elm$browser$Debugger$Metadata$checkTag, - $elm$browser$Debugger$Metadata$addTag, - old.tags, - _new.tags, - $elm$browser$Debugger$Report$emptyTagChanges( - _Utils_eq(old.args, _new.args))); - return $elm$browser$Debugger$Report$hasTagChanges(tagChanges) ? changes : A2( - $elm$core$List$cons, - A2($elm$browser$Debugger$Report$UnionChange, name, tagChanges), - changes); - }); -var $elm$browser$Debugger$Metadata$ignore = F3( - function (key, value, report) { - return report; - }); -var $elm$browser$Debugger$Metadata$checkTypes = F2( - function (old, _new) { - return (!_Utils_eq(old.message, _new.message)) ? A2($elm$browser$Debugger$Report$MessageChanged, old.message, _new.message) : $elm$browser$Debugger$Report$SomethingChanged( - A6( - $elm$core$Dict$merge, - $elm$browser$Debugger$Metadata$ignore, - $elm$browser$Debugger$Metadata$checkUnion, - $elm$browser$Debugger$Metadata$ignore, - old.unions, - _new.unions, - A6($elm$core$Dict$merge, $elm$browser$Debugger$Metadata$ignore, $elm$browser$Debugger$Metadata$checkAlias, $elm$browser$Debugger$Metadata$ignore, old.aliases, _new.aliases, _List_Nil))); - }); -var $elm$browser$Debugger$Metadata$check = F2( - function (old, _new) { - return (!_Utils_eq(old.versions.elm, _new.versions.elm)) ? A2($elm$browser$Debugger$Report$VersionChanged, old.versions.elm, _new.versions.elm) : A2($elm$browser$Debugger$Metadata$checkTypes, old.types, _new.types); - }); -var $elm$browser$Debugger$Report$CorruptHistory = {$: 'CorruptHistory'}; -var $elm$browser$Debugger$Overlay$corruptImport = $elm$browser$Debugger$Overlay$BadImport($elm$browser$Debugger$Report$CorruptHistory); -var $elm$json$Json$Decode$decodeString = _Json_runOnString; -var $elm$browser$Debugger$Report$Fine = {$: 'Fine'}; -var $elm$browser$Debugger$Report$Impossible = {$: 'Impossible'}; -var $elm$browser$Debugger$Report$Risky = {$: 'Risky'}; -var $elm$core$Basics$not = _Basics_not; -var $elm$core$List$isEmpty = function (xs) { - if (!xs.b) { - return true; - } else { - return false; - } -}; -var $elm$browser$Debugger$Report$some = function (list) { - return !$elm$core$List$isEmpty(list); -}; -var $elm$browser$Debugger$Report$evaluateChange = function (change) { - if (change.$ === 'AliasChange') { - return $elm$browser$Debugger$Report$Impossible; - } else { - var removed = change.b.removed; - var changed = change.b.changed; - var added = change.b.added; - var argsMatch = change.b.argsMatch; - return ((!argsMatch) || ($elm$browser$Debugger$Report$some(changed) || $elm$browser$Debugger$Report$some(removed))) ? $elm$browser$Debugger$Report$Impossible : ($elm$browser$Debugger$Report$some(added) ? $elm$browser$Debugger$Report$Risky : $elm$browser$Debugger$Report$Fine); - } -}; -var $elm$browser$Debugger$Report$worstCase = F2( - function (status, statusList) { - worstCase: - while (true) { - if (!statusList.b) { - return status; - } else { - switch (statusList.a.$) { - case 'Impossible': - var _v1 = statusList.a; - return $elm$browser$Debugger$Report$Impossible; - case 'Risky': - var _v2 = statusList.a; - var rest = statusList.b; - var $temp$status = $elm$browser$Debugger$Report$Risky, - $temp$statusList = rest; - status = $temp$status; - statusList = $temp$statusList; - continue worstCase; - default: - var _v3 = statusList.a; - var rest = statusList.b; - var $temp$status = status, - $temp$statusList = rest; - status = $temp$status; - statusList = $temp$statusList; - continue worstCase; - } - } - } - }); -var $elm$browser$Debugger$Report$evaluate = function (report) { - switch (report.$) { - case 'CorruptHistory': - return $elm$browser$Debugger$Report$Impossible; - case 'VersionChanged': - return $elm$browser$Debugger$Report$Impossible; - case 'MessageChanged': - return $elm$browser$Debugger$Report$Impossible; - default: - var changes = report.a; - return A2( - $elm$browser$Debugger$Report$worstCase, - $elm$browser$Debugger$Report$Fine, - A2($elm$core$List$map, $elm$browser$Debugger$Report$evaluateChange, changes)); - } -}; -var $elm$json$Json$Decode$value = _Json_decodeValue; -var $elm$browser$Debugger$Overlay$uploadDecoder = A3( - $elm$json$Json$Decode$map2, - F2( - function (x, y) { - return _Utils_Tuple2(x, y); - }), - A2($elm$json$Json$Decode$field, 'metadata', $elm$browser$Debugger$Metadata$decoder), - A2($elm$json$Json$Decode$field, 'history', $elm$json$Json$Decode$value)); -var $elm$browser$Debugger$Overlay$assessImport = F2( - function (metadata, jsonString) { - var _v0 = A2($elm$json$Json$Decode$decodeString, $elm$browser$Debugger$Overlay$uploadDecoder, jsonString); - if (_v0.$ === 'Err') { - return $elm$core$Result$Err($elm$browser$Debugger$Overlay$corruptImport); - } else { - var _v1 = _v0.a; - var foreignMetadata = _v1.a; - var rawHistory = _v1.b; - var report = A2($elm$browser$Debugger$Metadata$check, foreignMetadata, metadata); - var _v2 = $elm$browser$Debugger$Report$evaluate(report); - switch (_v2.$) { - case 'Impossible': - return $elm$core$Result$Err( - $elm$browser$Debugger$Overlay$BadImport(report)); - case 'Risky': - return $elm$core$Result$Err( - A2($elm$browser$Debugger$Overlay$RiskyImport, report, rawHistory)); - default: - return $elm$core$Result$Ok(rawHistory); - } - } - }); -var $elm$core$Platform$Cmd$batch = _Platform_batch; -var $elm$browser$Debugger$Overlay$close = F2( - function (msg, state) { - switch (state.$) { - case 'None': - return $elm$core$Maybe$Nothing; - case 'BadMetadata': - return $elm$core$Maybe$Nothing; - case 'BadImport': - return $elm$core$Maybe$Nothing; - default: - var rawHistory = state.b; - if (msg.$ === 'Cancel') { - return $elm$core$Maybe$Nothing; - } else { - return $elm$core$Maybe$Just(rawHistory); - } - } - }); -var $elm$browser$Debugger$History$elmToJs = A2($elm$core$Basics$composeR, _Json_wrap, _Debugger_unsafeCoerce); -var $elm$browser$Debugger$History$encodeHelp = F2( - function (snapshot, allMessages) { - return A3($elm$core$Array$foldl, $elm$core$List$cons, allMessages, snapshot.messages); - }); -var $elm$json$Json$Encode$list = F2( - function (func, entries) { - return _Json_wrap( - A3( - $elm$core$List$foldl, - _Json_addEntry(func), - _Json_emptyArray(_Utils_Tuple0), - entries)); - }); -var $elm$browser$Debugger$History$encode = function (_v0) { - var snapshots = _v0.snapshots; - var recent = _v0.recent; - return A2( - $elm$json$Json$Encode$list, - $elm$browser$Debugger$History$elmToJs, - A3( - $elm$core$Array$foldr, - $elm$browser$Debugger$History$encodeHelp, - $elm$core$List$reverse(recent.messages), - snapshots)); -}; -var $elm$json$Json$Encode$object = function (pairs) { - return _Json_wrap( - A3( - $elm$core$List$foldl, - F2( - function (_v0, obj) { - var k = _v0.a; - var v = _v0.b; - return A3(_Json_addField, k, v, obj); - }), - _Json_emptyObject(_Utils_Tuple0), - pairs)); -}; -var $elm$browser$Debugger$Metadata$encodeAlias = function (_v0) { - var args = _v0.args; - var tipe = _v0.tipe; - return $elm$json$Json$Encode$object( - _List_fromArray( - [ - _Utils_Tuple2( - 'args', - A2($elm$json$Json$Encode$list, $elm$json$Json$Encode$string, args)), - _Utils_Tuple2( - 'type', - $elm$json$Json$Encode$string(tipe)) - ])); -}; -var $elm$browser$Debugger$Metadata$encodeDict = F2( - function (f, dict) { - return $elm$json$Json$Encode$object( - $elm$core$Dict$toList( - A2( - $elm$core$Dict$map, - F2( - function (key, value) { - return f(value); - }), - dict))); - }); -var $elm$browser$Debugger$Metadata$encodeUnion = function (_v0) { - var args = _v0.args; - var tags = _v0.tags; - return $elm$json$Json$Encode$object( - _List_fromArray( - [ - _Utils_Tuple2( - 'args', - A2($elm$json$Json$Encode$list, $elm$json$Json$Encode$string, args)), - _Utils_Tuple2( - 'tags', - A2( - $elm$browser$Debugger$Metadata$encodeDict, - $elm$json$Json$Encode$list($elm$json$Json$Encode$string), - tags)) - ])); -}; -var $elm$browser$Debugger$Metadata$encodeTypes = function (_v0) { - var message = _v0.message; - var unions = _v0.unions; - var aliases = _v0.aliases; - return $elm$json$Json$Encode$object( - _List_fromArray( - [ - _Utils_Tuple2( - 'message', - $elm$json$Json$Encode$string(message)), - _Utils_Tuple2( - 'aliases', - A2($elm$browser$Debugger$Metadata$encodeDict, $elm$browser$Debugger$Metadata$encodeAlias, aliases)), - _Utils_Tuple2( - 'unions', - A2($elm$browser$Debugger$Metadata$encodeDict, $elm$browser$Debugger$Metadata$encodeUnion, unions)) - ])); -}; -var $elm$browser$Debugger$Metadata$encodeVersions = function (_v0) { - var elm = _v0.elm; - return $elm$json$Json$Encode$object( - _List_fromArray( - [ - _Utils_Tuple2( - 'elm', - $elm$json$Json$Encode$string(elm)) - ])); -}; -var $elm$browser$Debugger$Metadata$encode = function (_v0) { - var versions = _v0.versions; - var types = _v0.types; - return $elm$json$Json$Encode$object( - _List_fromArray( - [ - _Utils_Tuple2( - 'versions', - $elm$browser$Debugger$Metadata$encodeVersions(versions)), - _Utils_Tuple2( - 'types', - $elm$browser$Debugger$Metadata$encodeTypes(types)) - ])); -}; -var $elm$core$Basics$identity = function (x) { - return x; -}; -var $elm$core$Task$Perform = function (a) { - return {$: 'Perform', a: a}; -}; -var $elm$core$Task$succeed = _Scheduler_succeed; -var $elm$core$Task$init = $elm$core$Task$succeed(_Utils_Tuple0); -var $elm$core$Task$andThen = _Scheduler_andThen; -var $elm$core$Task$map = F2( - function (func, taskA) { - return A2( - $elm$core$Task$andThen, - function (a) { - return $elm$core$Task$succeed( - func(a)); - }, - taskA); - }); -var $elm$core$Task$map2 = F3( - function (func, taskA, taskB) { - return A2( - $elm$core$Task$andThen, - function (a) { - return A2( - $elm$core$Task$andThen, - function (b) { - return $elm$core$Task$succeed( - A2(func, a, b)); - }, - taskB); - }, - taskA); - }); -var $elm$core$Task$sequence = function (tasks) { - return A3( - $elm$core$List$foldr, - $elm$core$Task$map2($elm$core$List$cons), - $elm$core$Task$succeed(_List_Nil), - tasks); -}; -var $elm$core$Platform$sendToApp = _Platform_sendToApp; -var $elm$core$Task$spawnCmd = F2( - function (router, _v0) { - var task = _v0.a; - return _Scheduler_spawn( - A2( - $elm$core$Task$andThen, - $elm$core$Platform$sendToApp(router), - task)); - }); -var $elm$core$Task$onEffects = F3( - function (router, commands, state) { - return A2( - $elm$core$Task$map, - function (_v0) { - return _Utils_Tuple0; - }, - $elm$core$Task$sequence( - A2( - $elm$core$List$map, - $elm$core$Task$spawnCmd(router), - commands))); - }); -var $elm$core$Task$onSelfMsg = F3( - function (_v0, _v1, _v2) { - return $elm$core$Task$succeed(_Utils_Tuple0); - }); -var $elm$core$Task$cmdMap = F2( - function (tagger, _v0) { - var task = _v0.a; - return $elm$core$Task$Perform( - A2($elm$core$Task$map, tagger, task)); - }); -_Platform_effectManagers['Task'] = _Platform_createManager($elm$core$Task$init, $elm$core$Task$onEffects, $elm$core$Task$onSelfMsg, $elm$core$Task$cmdMap); -var $elm$core$Task$command = _Platform_leaf('Task'); -var $elm$core$Task$perform = F2( - function (toMessage, task) { - return $elm$core$Task$command( - $elm$core$Task$Perform( - A2($elm$core$Task$map, toMessage, task))); - }); -var $elm$browser$Debugger$Main$download = F2( - function (metadata, history) { - var historyLength = $elm$browser$Debugger$History$size(history); - return A2( - $elm$core$Task$perform, - function (_v0) { - return $elm$browser$Debugger$Main$NoOp; - }, - A2( - _Debugger_download, - historyLength, - _Json_unwrap( - $elm$json$Json$Encode$object( - _List_fromArray( - [ - _Utils_Tuple2( - 'metadata', - $elm$browser$Debugger$Metadata$encode(metadata)), - _Utils_Tuple2( - 'history', - $elm$browser$Debugger$History$encode(history)) - ]))))); - }); -var $elm$browser$Debugger$Main$Vertical = F3( - function (a, b, c) { - return {$: 'Vertical', a: a, b: b, c: c}; - }); -var $elm$browser$Debugger$Main$drag = F2( - function (info, layout) { - if (layout.$ === 'Horizontal') { - var status = layout.a; - var y = layout.c; - return A3($elm$browser$Debugger$Main$Horizontal, status, info.x / info.width, y); - } else { - var status = layout.a; - var x = layout.b; - return A3($elm$browser$Debugger$Main$Vertical, status, x, info.y / info.height); - } - }); -var $elm$browser$Debugger$History$Stepping = F2( - function (a, b) { - return {$: 'Stepping', a: a, b: b}; - }); -var $elm$browser$Debugger$History$Done = F2( - function (a, b) { - return {$: 'Done', a: a, b: b}; - }); -var $elm$browser$Debugger$History$getHelp = F3( - function (update, msg, getResult) { - if (getResult.$ === 'Done') { - return getResult; - } else { - var n = getResult.a; - var model = getResult.b; - return (!n) ? A2( - $elm$browser$Debugger$History$Done, - msg, - A2(update, msg, model).a) : A2( - $elm$browser$Debugger$History$Stepping, - n - 1, - A2(update, msg, model).a); - } - }); -var $elm$browser$Debugger$History$undone = function (getResult) { - undone: - while (true) { - if (getResult.$ === 'Done') { - var msg = getResult.a; - var model = getResult.b; - return _Utils_Tuple2(model, msg); - } else { - var $temp$getResult = getResult; - getResult = $temp$getResult; - continue undone; - } - } -}; -var $elm$browser$Debugger$History$get = F3( - function (update, index, history) { - get: - while (true) { - var recent = history.recent; - var snapshotMax = history.numMessages - recent.numMessages; - if (_Utils_cmp(index, snapshotMax) > -1) { - return $elm$browser$Debugger$History$undone( - A3( - $elm$core$List$foldr, - $elm$browser$Debugger$History$getHelp(update), - A2($elm$browser$Debugger$History$Stepping, index - snapshotMax, recent.model), - recent.messages)); - } else { - var _v0 = A2($elm$core$Array$get, (index / $elm$browser$Debugger$History$maxSnapshotSize) | 0, history.snapshots); - if (_v0.$ === 'Nothing') { - var $temp$update = update, - $temp$index = index, - $temp$history = history; - update = $temp$update; - index = $temp$index; - history = $temp$history; - continue get; - } else { - var model = _v0.a.model; - var messages = _v0.a.messages; - return $elm$browser$Debugger$History$undone( - A3( - $elm$core$Array$foldr, - $elm$browser$Debugger$History$getHelp(update), - A2($elm$browser$Debugger$History$Stepping, index % $elm$browser$Debugger$History$maxSnapshotSize, model), - messages)); - } - } - } - }); -var $elm$browser$Debugger$History$getRecentMsg = function (history) { - getRecentMsg: - while (true) { - var _v0 = history.recent.messages; - if (!_v0.b) { - var $temp$history = history; - history = $temp$history; - continue getRecentMsg; - } else { - var first = _v0.a; - return first; - } - } -}; -var $elm$core$Dict$get = F2( - function (targetKey, dict) { - get: - while (true) { - if (dict.$ === 'RBEmpty_elm_builtin') { - return $elm$core$Maybe$Nothing; - } else { - var key = dict.b; - var value = dict.c; - var left = dict.d; - var right = dict.e; - var _v1 = A2($elm$core$Basics$compare, targetKey, key); - switch (_v1.$) { - case 'LT': - var $temp$targetKey = targetKey, - $temp$dict = left; - targetKey = $temp$targetKey; - dict = $temp$dict; - continue get; - case 'EQ': - return $elm$core$Maybe$Just(value); - default: - var $temp$targetKey = targetKey, - $temp$dict = right; - targetKey = $temp$targetKey; - dict = $temp$dict; - continue get; - } - } - } - }); -var $elm$browser$Debugger$Expando$mergeDictHelp = F3( - function (oldDict, key, value) { - var _v12 = A2($elm$core$Dict$get, key, oldDict); - if (_v12.$ === 'Nothing') { - return value; - } else { - var oldValue = _v12.a; - return A2($elm$browser$Debugger$Expando$mergeHelp, oldValue, value); - } - }); -var $elm$browser$Debugger$Expando$mergeHelp = F2( - function (old, _new) { - var _v3 = _Utils_Tuple2(old, _new); - _v3$6: - while (true) { - switch (_v3.b.$) { - case 'S': - return _new; - case 'Primitive': - return _new; - case 'Sequence': - if (_v3.a.$ === 'Sequence') { - var _v4 = _v3.a; - var isClosed = _v4.b; - var oldValues = _v4.c; - var _v5 = _v3.b; - var seqType = _v5.a; - var newValues = _v5.c; - return A3( - $elm$browser$Debugger$Expando$Sequence, - seqType, - isClosed, - A2($elm$browser$Debugger$Expando$mergeListHelp, oldValues, newValues)); - } else { - break _v3$6; - } - case 'Dictionary': - if (_v3.a.$ === 'Dictionary') { - var _v6 = _v3.a; - var isClosed = _v6.a; - var _v7 = _v3.b; - var keyValuePairs = _v7.b; - return A2($elm$browser$Debugger$Expando$Dictionary, isClosed, keyValuePairs); - } else { - break _v3$6; - } - case 'Record': - if (_v3.a.$ === 'Record') { - var _v8 = _v3.a; - var isClosed = _v8.a; - var oldDict = _v8.b; - var _v9 = _v3.b; - var newDict = _v9.b; - return A2( - $elm$browser$Debugger$Expando$Record, - isClosed, - A2( - $elm$core$Dict$map, - $elm$browser$Debugger$Expando$mergeDictHelp(oldDict), - newDict)); - } else { - break _v3$6; - } - default: - if (_v3.a.$ === 'Constructor') { - var _v10 = _v3.a; - var isClosed = _v10.b; - var oldValues = _v10.c; - var _v11 = _v3.b; - var maybeName = _v11.a; - var newValues = _v11.c; - return A3( - $elm$browser$Debugger$Expando$Constructor, - maybeName, - isClosed, - A2($elm$browser$Debugger$Expando$mergeListHelp, oldValues, newValues)); - } else { - break _v3$6; - } - } - } - return _new; - }); -var $elm$browser$Debugger$Expando$mergeListHelp = F2( - function (olds, news) { - var _v0 = _Utils_Tuple2(olds, news); - if (!_v0.a.b) { - return news; - } else { - if (!_v0.b.b) { - return news; - } else { - var _v1 = _v0.a; - var x = _v1.a; - var xs = _v1.b; - var _v2 = _v0.b; - var y = _v2.a; - var ys = _v2.b; - return A2( - $elm$core$List$cons, - A2($elm$browser$Debugger$Expando$mergeHelp, x, y), - A2($elm$browser$Debugger$Expando$mergeListHelp, xs, ys)); - } - } - }); -var $elm$browser$Debugger$Expando$merge = F2( - function (value, expando) { - return A2( - $elm$browser$Debugger$Expando$mergeHelp, - expando, - _Debugger_init(value)); - }); -var $elm$browser$Debugger$Main$jumpUpdate = F3( - function (update, index, model) { - var history = $elm$browser$Debugger$Main$cachedHistory(model); - var currentMsg = $elm$browser$Debugger$History$getRecentMsg(history); - var currentModel = $elm$browser$Debugger$Main$getLatestModel(model.state); - var _v0 = A3($elm$browser$Debugger$History$get, update, index, history); - var indexModel = _v0.a; - var indexMsg = _v0.b; - return _Utils_update( - model, - { - expandoModel: A2($elm$browser$Debugger$Expando$merge, indexModel, model.expandoModel), - expandoMsg: A2($elm$browser$Debugger$Expando$merge, indexMsg, model.expandoMsg), - state: A5($elm$browser$Debugger$Main$Paused, index, indexModel, currentModel, currentMsg, history) - }); - }); -var $elm$browser$Debugger$History$jsToElm = A2($elm$core$Basics$composeR, _Json_unwrap, _Debugger_unsafeCoerce); -var $elm$browser$Debugger$History$decoder = F2( - function (initialModel, update) { - var addMessage = F2( - function (rawMsg, _v0) { - var model = _v0.a; - var history = _v0.b; - var msg = $elm$browser$Debugger$History$jsToElm(rawMsg); - return _Utils_Tuple2( - A2(update, msg, model), - A3($elm$browser$Debugger$History$add, msg, model, history)); - }); - var updateModel = function (rawMsgs) { - return A3( - $elm$core$List$foldl, - addMessage, - _Utils_Tuple2( - initialModel, - $elm$browser$Debugger$History$empty(initialModel)), - rawMsgs); - }; - return A2( - $elm$json$Json$Decode$map, - updateModel, - $elm$json$Json$Decode$list($elm$json$Json$Decode$value)); - }); -var $elm$browser$Debugger$History$getInitialModel = function (_v0) { - var snapshots = _v0.snapshots; - var recent = _v0.recent; - var _v1 = A2($elm$core$Array$get, 0, snapshots); - if (_v1.$ === 'Just') { - var model = _v1.a.model; - return model; - } else { - return recent.model; - } -}; -var $elm$core$Platform$Cmd$none = $elm$core$Platform$Cmd$batch(_List_Nil); -var $elm$browser$Debugger$Main$loadNewHistory = F3( - function (rawHistory, update, model) { - var pureUserUpdate = F2( - function (msg, userModel) { - return A2(update, msg, userModel).a; - }); - var initialUserModel = $elm$browser$Debugger$History$getInitialModel(model.history); - var decoder = A2($elm$browser$Debugger$History$decoder, initialUserModel, pureUserUpdate); - var _v0 = A2($elm$json$Json$Decode$decodeValue, decoder, rawHistory); - if (_v0.$ === 'Err') { - return _Utils_Tuple2( - _Utils_update( - model, - {overlay: $elm$browser$Debugger$Overlay$corruptImport}), - $elm$core$Platform$Cmd$none); - } else { - var _v1 = _v0.a; - var latestUserModel = _v1.a; - var newHistory = _v1.b; - return _Utils_Tuple2( - _Utils_update( - model, - { - expandoModel: $elm$browser$Debugger$Expando$init(latestUserModel), - expandoMsg: $elm$browser$Debugger$Expando$init( - $elm$browser$Debugger$History$getRecentMsg(newHistory)), - history: newHistory, - overlay: $elm$browser$Debugger$Overlay$none, - state: $elm$browser$Debugger$Main$Running(latestUserModel) - }), - $elm$core$Platform$Cmd$none); - } - }); -var $elm$browser$Debugger$Main$scroll = function (popout) { - return A2( - $elm$core$Task$perform, - $elm$core$Basics$always($elm$browser$Debugger$Main$NoOp), - _Debugger_scroll(popout)); -}; -var $elm$browser$Debugger$Main$scrollTo = F2( - function (id, popout) { - return A2( - $elm$core$Task$perform, - $elm$core$Basics$always($elm$browser$Debugger$Main$NoOp), - A2(_Debugger_scrollTo, id, popout)); - }); -var $elm$browser$Debugger$Main$setDragStatus = F2( - function (status, layout) { - if (layout.$ === 'Horizontal') { - var x = layout.b; - var y = layout.c; - return A3($elm$browser$Debugger$Main$Horizontal, status, x, y); - } else { - var x = layout.b; - var y = layout.c; - return A3($elm$browser$Debugger$Main$Vertical, status, x, y); - } - }); -var $elm$browser$Debugger$Main$swapLayout = function (layout) { - if (layout.$ === 'Horizontal') { - var s = layout.a; - var x = layout.b; - var y = layout.c; - return A3($elm$browser$Debugger$Main$Vertical, s, x, y); - } else { - var s = layout.a; - var x = layout.b; - var y = layout.c; - return A3($elm$browser$Debugger$Main$Horizontal, s, x, y); - } -}; -var $elm$core$Dict$getMin = function (dict) { - getMin: - while (true) { - if ((dict.$ === 'RBNode_elm_builtin') && (dict.d.$ === 'RBNode_elm_builtin')) { - var left = dict.d; - var $temp$dict = left; - dict = $temp$dict; - continue getMin; - } else { - return dict; - } - } -}; -var $elm$core$Dict$moveRedLeft = function (dict) { - if (((dict.$ === 'RBNode_elm_builtin') && (dict.d.$ === 'RBNode_elm_builtin')) && (dict.e.$ === 'RBNode_elm_builtin')) { - if ((dict.e.d.$ === 'RBNode_elm_builtin') && (dict.e.d.a.$ === 'Red')) { - var clr = dict.a; - var k = dict.b; - var v = dict.c; - var _v1 = dict.d; - var lClr = _v1.a; - var lK = _v1.b; - var lV = _v1.c; - var lLeft = _v1.d; - var lRight = _v1.e; - var _v2 = dict.e; - var rClr = _v2.a; - var rK = _v2.b; - var rV = _v2.c; - var rLeft = _v2.d; - var _v3 = rLeft.a; - var rlK = rLeft.b; - var rlV = rLeft.c; - var rlL = rLeft.d; - var rlR = rLeft.e; - var rRight = _v2.e; - return A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Red, - rlK, - rlV, - A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Black, - k, - v, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, lK, lV, lLeft, lRight), - rlL), - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, rK, rV, rlR, rRight)); - } else { - var clr = dict.a; - var k = dict.b; - var v = dict.c; - var _v4 = dict.d; - var lClr = _v4.a; - var lK = _v4.b; - var lV = _v4.c; - var lLeft = _v4.d; - var lRight = _v4.e; - var _v5 = dict.e; - var rClr = _v5.a; - var rK = _v5.b; - var rV = _v5.c; - var rLeft = _v5.d; - var rRight = _v5.e; - if (clr.$ === 'Black') { - return A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Black, - k, - v, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, lK, lV, lLeft, lRight), - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, rK, rV, rLeft, rRight)); - } else { - return A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Black, - k, - v, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, lK, lV, lLeft, lRight), - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, rK, rV, rLeft, rRight)); - } - } - } else { - return dict; - } -}; -var $elm$core$Dict$moveRedRight = function (dict) { - if (((dict.$ === 'RBNode_elm_builtin') && (dict.d.$ === 'RBNode_elm_builtin')) && (dict.e.$ === 'RBNode_elm_builtin')) { - if ((dict.d.d.$ === 'RBNode_elm_builtin') && (dict.d.d.a.$ === 'Red')) { - var clr = dict.a; - var k = dict.b; - var v = dict.c; - var _v1 = dict.d; - var lClr = _v1.a; - var lK = _v1.b; - var lV = _v1.c; - var _v2 = _v1.d; - var _v3 = _v2.a; - var llK = _v2.b; - var llV = _v2.c; - var llLeft = _v2.d; - var llRight = _v2.e; - var lRight = _v1.e; - var _v4 = dict.e; - var rClr = _v4.a; - var rK = _v4.b; - var rV = _v4.c; - var rLeft = _v4.d; - var rRight = _v4.e; - return A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Red, - lK, - lV, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, llK, llV, llLeft, llRight), - A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Black, - k, - v, - lRight, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, rK, rV, rLeft, rRight))); - } else { - var clr = dict.a; - var k = dict.b; - var v = dict.c; - var _v5 = dict.d; - var lClr = _v5.a; - var lK = _v5.b; - var lV = _v5.c; - var lLeft = _v5.d; - var lRight = _v5.e; - var _v6 = dict.e; - var rClr = _v6.a; - var rK = _v6.b; - var rV = _v6.c; - var rLeft = _v6.d; - var rRight = _v6.e; - if (clr.$ === 'Black') { - return A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Black, - k, - v, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, lK, lV, lLeft, lRight), - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, rK, rV, rLeft, rRight)); - } else { - return A5( - $elm$core$Dict$RBNode_elm_builtin, - $elm$core$Dict$Black, - k, - v, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, lK, lV, lLeft, lRight), - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, rK, rV, rLeft, rRight)); - } - } - } else { - return dict; - } -}; -var $elm$core$Dict$removeHelpPrepEQGT = F7( - function (targetKey, dict, color, key, value, left, right) { - if ((left.$ === 'RBNode_elm_builtin') && (left.a.$ === 'Red')) { - var _v1 = left.a; - var lK = left.b; - var lV = left.c; - var lLeft = left.d; - var lRight = left.e; - return A5( - $elm$core$Dict$RBNode_elm_builtin, - color, - lK, - lV, - lLeft, - A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Red, key, value, lRight, right)); - } else { - _v2$2: - while (true) { - if ((right.$ === 'RBNode_elm_builtin') && (right.a.$ === 'Black')) { - if (right.d.$ === 'RBNode_elm_builtin') { - if (right.d.a.$ === 'Black') { - var _v3 = right.a; - var _v4 = right.d; - var _v5 = _v4.a; - return $elm$core$Dict$moveRedRight(dict); - } else { - break _v2$2; - } - } else { - var _v6 = right.a; - var _v7 = right.d; - return $elm$core$Dict$moveRedRight(dict); - } - } else { - break _v2$2; - } - } - return dict; - } - }); -var $elm$core$Dict$removeMin = function (dict) { - if ((dict.$ === 'RBNode_elm_builtin') && (dict.d.$ === 'RBNode_elm_builtin')) { - var color = dict.a; - var key = dict.b; - var value = dict.c; - var left = dict.d; - var lColor = left.a; - var lLeft = left.d; - var right = dict.e; - if (lColor.$ === 'Black') { - if ((lLeft.$ === 'RBNode_elm_builtin') && (lLeft.a.$ === 'Red')) { - var _v3 = lLeft.a; - return A5( - $elm$core$Dict$RBNode_elm_builtin, - color, - key, - value, - $elm$core$Dict$removeMin(left), - right); - } else { - var _v4 = $elm$core$Dict$moveRedLeft(dict); - if (_v4.$ === 'RBNode_elm_builtin') { - var nColor = _v4.a; - var nKey = _v4.b; - var nValue = _v4.c; - var nLeft = _v4.d; - var nRight = _v4.e; - return A5( - $elm$core$Dict$balance, - nColor, - nKey, - nValue, - $elm$core$Dict$removeMin(nLeft), - nRight); - } else { - return $elm$core$Dict$RBEmpty_elm_builtin; - } - } - } else { - return A5( - $elm$core$Dict$RBNode_elm_builtin, - color, - key, - value, - $elm$core$Dict$removeMin(left), - right); - } - } else { - return $elm$core$Dict$RBEmpty_elm_builtin; - } -}; -var $elm$core$Dict$removeHelp = F2( - function (targetKey, dict) { - if (dict.$ === 'RBEmpty_elm_builtin') { - return $elm$core$Dict$RBEmpty_elm_builtin; - } else { - var color = dict.a; - var key = dict.b; - var value = dict.c; - var left = dict.d; - var right = dict.e; - if (_Utils_cmp(targetKey, key) < 0) { - if ((left.$ === 'RBNode_elm_builtin') && (left.a.$ === 'Black')) { - var _v4 = left.a; - var lLeft = left.d; - if ((lLeft.$ === 'RBNode_elm_builtin') && (lLeft.a.$ === 'Red')) { - var _v6 = lLeft.a; - return A5( - $elm$core$Dict$RBNode_elm_builtin, - color, - key, - value, - A2($elm$core$Dict$removeHelp, targetKey, left), - right); - } else { - var _v7 = $elm$core$Dict$moveRedLeft(dict); - if (_v7.$ === 'RBNode_elm_builtin') { - var nColor = _v7.a; - var nKey = _v7.b; - var nValue = _v7.c; - var nLeft = _v7.d; - var nRight = _v7.e; - return A5( - $elm$core$Dict$balance, - nColor, - nKey, - nValue, - A2($elm$core$Dict$removeHelp, targetKey, nLeft), - nRight); - } else { - return $elm$core$Dict$RBEmpty_elm_builtin; - } - } - } else { - return A5( - $elm$core$Dict$RBNode_elm_builtin, - color, - key, - value, - A2($elm$core$Dict$removeHelp, targetKey, left), - right); - } - } else { - return A2( - $elm$core$Dict$removeHelpEQGT, - targetKey, - A7($elm$core$Dict$removeHelpPrepEQGT, targetKey, dict, color, key, value, left, right)); - } - } - }); -var $elm$core$Dict$removeHelpEQGT = F2( - function (targetKey, dict) { - if (dict.$ === 'RBNode_elm_builtin') { - var color = dict.a; - var key = dict.b; - var value = dict.c; - var left = dict.d; - var right = dict.e; - if (_Utils_eq(targetKey, key)) { - var _v1 = $elm$core$Dict$getMin(right); - if (_v1.$ === 'RBNode_elm_builtin') { - var minKey = _v1.b; - var minValue = _v1.c; - return A5( - $elm$core$Dict$balance, - color, - minKey, - minValue, - left, - $elm$core$Dict$removeMin(right)); - } else { - return $elm$core$Dict$RBEmpty_elm_builtin; - } - } else { - return A5( - $elm$core$Dict$balance, - color, - key, - value, - left, - A2($elm$core$Dict$removeHelp, targetKey, right)); - } - } else { - return $elm$core$Dict$RBEmpty_elm_builtin; - } - }); -var $elm$core$Dict$remove = F2( - function (key, dict) { - var _v0 = A2($elm$core$Dict$removeHelp, key, dict); - if ((_v0.$ === 'RBNode_elm_builtin') && (_v0.a.$ === 'Red')) { - var _v1 = _v0.a; - var k = _v0.b; - var v = _v0.c; - var l = _v0.d; - var r = _v0.e; - return A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, k, v, l, r); - } else { - var x = _v0; - return x; - } - }); -var $elm$core$Dict$update = F3( - function (targetKey, alter, dictionary) { - var _v0 = alter( - A2($elm$core$Dict$get, targetKey, dictionary)); - if (_v0.$ === 'Just') { - var value = _v0.a; - return A3($elm$core$Dict$insert, targetKey, value, dictionary); - } else { - return A2($elm$core$Dict$remove, targetKey, dictionary); - } - }); -var $elm$browser$Debugger$Expando$updateIndex = F3( - function (n, func, list) { - if (!list.b) { - return _List_Nil; - } else { - var x = list.a; - var xs = list.b; - return (n <= 0) ? A2( - $elm$core$List$cons, - func(x), - xs) : A2( - $elm$core$List$cons, - x, - A3($elm$browser$Debugger$Expando$updateIndex, n - 1, func, xs)); - } - }); -var $elm$browser$Debugger$Expando$update = F2( - function (msg, value) { - switch (value.$) { - case 'S': - return value; - case 'Primitive': - return value; - case 'Sequence': - var seqType = value.a; - var isClosed = value.b; - var valueList = value.c; - switch (msg.$) { - case 'Toggle': - return A3($elm$browser$Debugger$Expando$Sequence, seqType, !isClosed, valueList); - case 'Index': - if (msg.a.$ === 'None') { - var _v3 = msg.a; - var index = msg.b; - var subMsg = msg.c; - return A3( - $elm$browser$Debugger$Expando$Sequence, - seqType, - isClosed, - A3( - $elm$browser$Debugger$Expando$updateIndex, - index, - $elm$browser$Debugger$Expando$update(subMsg), - valueList)); - } else { - return value; - } - default: - return value; - } - case 'Dictionary': - var isClosed = value.a; - var keyValuePairs = value.b; - switch (msg.$) { - case 'Toggle': - return A2($elm$browser$Debugger$Expando$Dictionary, !isClosed, keyValuePairs); - case 'Index': - var redirect = msg.a; - var index = msg.b; - var subMsg = msg.c; - switch (redirect.$) { - case 'None': - return value; - case 'Key': - return A2( - $elm$browser$Debugger$Expando$Dictionary, - isClosed, - A3( - $elm$browser$Debugger$Expando$updateIndex, - index, - function (_v6) { - var k = _v6.a; - var v = _v6.b; - return _Utils_Tuple2( - A2($elm$browser$Debugger$Expando$update, subMsg, k), - v); - }, - keyValuePairs)); - default: - return A2( - $elm$browser$Debugger$Expando$Dictionary, - isClosed, - A3( - $elm$browser$Debugger$Expando$updateIndex, - index, - function (_v7) { - var k = _v7.a; - var v = _v7.b; - return _Utils_Tuple2( - k, - A2($elm$browser$Debugger$Expando$update, subMsg, v)); - }, - keyValuePairs)); - } - default: - return value; - } - case 'Record': - var isClosed = value.a; - var valueDict = value.b; - switch (msg.$) { - case 'Toggle': - return A2($elm$browser$Debugger$Expando$Record, !isClosed, valueDict); - case 'Index': - return value; - default: - var field = msg.a; - var subMsg = msg.b; - return A2( - $elm$browser$Debugger$Expando$Record, - isClosed, - A3( - $elm$core$Dict$update, - field, - $elm$browser$Debugger$Expando$updateField(subMsg), - valueDict)); - } - default: - var maybeName = value.a; - var isClosed = value.b; - var valueList = value.c; - switch (msg.$) { - case 'Toggle': - return A3($elm$browser$Debugger$Expando$Constructor, maybeName, !isClosed, valueList); - case 'Index': - if (msg.a.$ === 'None') { - var _v10 = msg.a; - var index = msg.b; - var subMsg = msg.c; - return A3( - $elm$browser$Debugger$Expando$Constructor, - maybeName, - isClosed, - A3( - $elm$browser$Debugger$Expando$updateIndex, - index, - $elm$browser$Debugger$Expando$update(subMsg), - valueList)); - } else { - return value; - } - default: - return value; - } - } - }); -var $elm$browser$Debugger$Expando$updateField = F2( - function (msg, maybeExpando) { - if (maybeExpando.$ === 'Nothing') { - return maybeExpando; - } else { - var expando = maybeExpando.a; - return $elm$core$Maybe$Just( - A2($elm$browser$Debugger$Expando$update, msg, expando)); - } - }); -var $elm$browser$Debugger$Main$Upload = function (a) { - return {$: 'Upload', a: a}; -}; -var $elm$browser$Debugger$Main$upload = function (popout) { - return A2( - $elm$core$Task$perform, - $elm$browser$Debugger$Main$Upload, - _Debugger_upload(popout)); -}; -var $elm$browser$Debugger$Overlay$BadMetadata = function (a) { - return {$: 'BadMetadata', a: a}; -}; -var $elm$browser$Debugger$Overlay$badMetadata = $elm$browser$Debugger$Overlay$BadMetadata; -var $elm$browser$Debugger$Main$withGoodMetadata = F2( - function (model, func) { - var _v0 = model.metadata; - if (_v0.$ === 'Ok') { - var metadata = _v0.a; - return func(metadata); - } else { - var error = _v0.a; - return _Utils_Tuple2( - _Utils_update( - model, - { - overlay: $elm$browser$Debugger$Overlay$badMetadata(error) - }), - $elm$core$Platform$Cmd$none); - } - }); -var $elm$browser$Debugger$Main$wrapUpdate = F3( - function (update, msg, model) { - wrapUpdate: - while (true) { - switch (msg.$) { - case 'NoOp': - return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none); - case 'UserMsg': - var userMsg = msg.a; - var userModel = $elm$browser$Debugger$Main$getLatestModel(model.state); - var newHistory = A3($elm$browser$Debugger$History$add, userMsg, userModel, model.history); - var _v1 = A2(update, userMsg, userModel); - var newUserModel = _v1.a; - var userCmds = _v1.b; - var commands = A2($elm$core$Platform$Cmd$map, $elm$browser$Debugger$Main$UserMsg, userCmds); - var _v2 = model.state; - if (_v2.$ === 'Running') { - return _Utils_Tuple2( - _Utils_update( - model, - { - expandoModel: A2($elm$browser$Debugger$Expando$merge, newUserModel, model.expandoModel), - expandoMsg: A2($elm$browser$Debugger$Expando$merge, userMsg, model.expandoMsg), - history: newHistory, - state: $elm$browser$Debugger$Main$Running(newUserModel) - }), - $elm$core$Platform$Cmd$batch( - _List_fromArray( - [ - commands, - $elm$browser$Debugger$Main$scroll(model.popout) - ]))); - } else { - var index = _v2.a; - var indexModel = _v2.b; - var history = _v2.e; - return _Utils_Tuple2( - _Utils_update( - model, - { - history: newHistory, - state: A5($elm$browser$Debugger$Main$Paused, index, indexModel, newUserModel, userMsg, history) - }), - commands); - } - case 'TweakExpandoMsg': - var eMsg = msg.a; - return _Utils_Tuple2( - _Utils_update( - model, - { - expandoMsg: A2($elm$browser$Debugger$Expando$update, eMsg, model.expandoMsg) - }), - $elm$core$Platform$Cmd$none); - case 'TweakExpandoModel': - var eMsg = msg.a; - return _Utils_Tuple2( - _Utils_update( - model, - { - expandoModel: A2($elm$browser$Debugger$Expando$update, eMsg, model.expandoModel) - }), - $elm$core$Platform$Cmd$none); - case 'Resume': - var _v3 = model.state; - if (_v3.$ === 'Running') { - return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none); - } else { - var userModel = _v3.c; - var userMsg = _v3.d; - return _Utils_Tuple2( - _Utils_update( - model, - { - expandoModel: A2($elm$browser$Debugger$Expando$merge, userModel, model.expandoModel), - expandoMsg: A2($elm$browser$Debugger$Expando$merge, userMsg, model.expandoMsg), - state: $elm$browser$Debugger$Main$Running(userModel) - }), - $elm$browser$Debugger$Main$scroll(model.popout)); - } - case 'Jump': - var index = msg.a; - return _Utils_Tuple2( - A3($elm$browser$Debugger$Main$jumpUpdate, update, index, model), - $elm$core$Platform$Cmd$none); - case 'SliderJump': - var index = msg.a; - return _Utils_Tuple2( - A3($elm$browser$Debugger$Main$jumpUpdate, update, index, model), - A2( - $elm$browser$Debugger$Main$scrollTo, - $elm$browser$Debugger$History$idForMessageIndex(index), - model.popout)); - case 'Open': - return _Utils_Tuple2( - model, - A2( - $elm$core$Task$perform, - $elm$core$Basics$always($elm$browser$Debugger$Main$NoOp), - _Debugger_open(model.popout))); - case 'Up': - var _v4 = model.state; - if (_v4.$ === 'Running') { - return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none); - } else { - var i = _v4.a; - var history = _v4.e; - var targetIndex = i + 1; - if (_Utils_cmp( - targetIndex, - $elm$browser$Debugger$History$size(history)) < 0) { - var $temp$update = update, - $temp$msg = $elm$browser$Debugger$Main$SliderJump(targetIndex), - $temp$model = model; - update = $temp$update; - msg = $temp$msg; - model = $temp$model; - continue wrapUpdate; - } else { - var $temp$update = update, - $temp$msg = $elm$browser$Debugger$Main$Resume, - $temp$model = model; - update = $temp$update; - msg = $temp$msg; - model = $temp$model; - continue wrapUpdate; - } - } - case 'Down': - var _v5 = model.state; - if (_v5.$ === 'Running') { - var $temp$update = update, - $temp$msg = $elm$browser$Debugger$Main$Jump( - $elm$browser$Debugger$History$size(model.history) - 1), - $temp$model = model; - update = $temp$update; - msg = $temp$msg; - model = $temp$model; - continue wrapUpdate; - } else { - var index = _v5.a; - if (index > 0) { - var $temp$update = update, - $temp$msg = $elm$browser$Debugger$Main$SliderJump(index - 1), - $temp$model = model; - update = $temp$update; - msg = $temp$msg; - model = $temp$model; - continue wrapUpdate; - } else { - return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none); - } - } - case 'Import': - return A2( - $elm$browser$Debugger$Main$withGoodMetadata, - model, - function (_v6) { - return _Utils_Tuple2( - model, - $elm$browser$Debugger$Main$upload(model.popout)); - }); - case 'Export': - return A2( - $elm$browser$Debugger$Main$withGoodMetadata, - model, - function (metadata) { - return _Utils_Tuple2( - model, - A2($elm$browser$Debugger$Main$download, metadata, model.history)); - }); - case 'Upload': - var jsonString = msg.a; - return A2( - $elm$browser$Debugger$Main$withGoodMetadata, - model, - function (metadata) { - var _v7 = A2($elm$browser$Debugger$Overlay$assessImport, metadata, jsonString); - if (_v7.$ === 'Err') { - var newOverlay = _v7.a; - return _Utils_Tuple2( - _Utils_update( - model, - {overlay: newOverlay}), - $elm$core$Platform$Cmd$none); - } else { - var rawHistory = _v7.a; - return A3($elm$browser$Debugger$Main$loadNewHistory, rawHistory, update, model); - } - }); - case 'OverlayMsg': - var overlayMsg = msg.a; - var _v8 = A2($elm$browser$Debugger$Overlay$close, overlayMsg, model.overlay); - if (_v8.$ === 'Nothing') { - return _Utils_Tuple2( - _Utils_update( - model, - {overlay: $elm$browser$Debugger$Overlay$none}), - $elm$core$Platform$Cmd$none); - } else { - var rawHistory = _v8.a; - return A3($elm$browser$Debugger$Main$loadNewHistory, rawHistory, update, model); - } - case 'SwapLayout': - return _Utils_Tuple2( - _Utils_update( - model, - { - layout: $elm$browser$Debugger$Main$swapLayout(model.layout) - }), - $elm$core$Platform$Cmd$none); - case 'DragStart': - return _Utils_Tuple2( - _Utils_update( - model, - { - layout: A2($elm$browser$Debugger$Main$setDragStatus, $elm$browser$Debugger$Main$Moving, model.layout) - }), - $elm$core$Platform$Cmd$none); - case 'Drag': - var info = msg.a; - return _Utils_Tuple2( - _Utils_update( - model, - { - layout: A2($elm$browser$Debugger$Main$drag, info, model.layout) - }), - $elm$core$Platform$Cmd$none); - default: - return _Utils_Tuple2( - _Utils_update( - model, - { - layout: A2($elm$browser$Debugger$Main$setDragStatus, $elm$browser$Debugger$Main$Static, model.layout) - }), - $elm$core$Platform$Cmd$none); - } - } - }); -var $elm$browser$Browser$External = function (a) { - return {$: 'External', a: a}; -}; -var $elm$browser$Browser$Internal = function (a) { - return {$: 'Internal', a: a}; -}; -var $elm$browser$Browser$Dom$NotFound = function (a) { - return {$: 'NotFound', a: a}; -}; -var $elm$url$Url$Http = {$: 'Http'}; -var $elm$url$Url$Https = {$: 'Https'}; -var $elm$url$Url$Url = F6( - function (protocol, host, port_, path, query, fragment) { - return {fragment: fragment, host: host, path: path, port_: port_, protocol: protocol, query: query}; - }); -var $elm$core$String$dropLeft = F2( - function (n, string) { - return (n < 1) ? string : A3( - $elm$core$String$slice, - n, - $elm$core$String$length(string), - string); - }); -var $elm$core$String$indexes = _String_indexes; -var $elm$core$String$isEmpty = function (string) { - return string === ''; -}; -var $elm$url$Url$chompBeforePath = F5( - function (protocol, path, params, frag, str) { - if ($elm$core$String$isEmpty(str) || A2($elm$core$String$contains, '@', str)) { - return $elm$core$Maybe$Nothing; - } else { - var _v0 = A2($elm$core$String$indexes, ':', str); - if (!_v0.b) { - return $elm$core$Maybe$Just( - A6($elm$url$Url$Url, protocol, str, $elm$core$Maybe$Nothing, path, params, frag)); - } else { - if (!_v0.b.b) { - var i = _v0.a; - var _v1 = $elm$core$String$toInt( - A2($elm$core$String$dropLeft, i + 1, str)); - if (_v1.$ === 'Nothing') { - return $elm$core$Maybe$Nothing; - } else { - var port_ = _v1; - return $elm$core$Maybe$Just( - A6( - $elm$url$Url$Url, - protocol, - A2($elm$core$String$left, i, str), - port_, - path, - params, - frag)); - } - } else { - return $elm$core$Maybe$Nothing; - } - } - } - }); -var $elm$url$Url$chompBeforeQuery = F4( - function (protocol, params, frag, str) { - if ($elm$core$String$isEmpty(str)) { - return $elm$core$Maybe$Nothing; - } else { - var _v0 = A2($elm$core$String$indexes, '/', str); - if (!_v0.b) { - return A5($elm$url$Url$chompBeforePath, protocol, '/', params, frag, str); - } else { - var i = _v0.a; - return A5( - $elm$url$Url$chompBeforePath, - protocol, - A2($elm$core$String$dropLeft, i, str), - params, - frag, - A2($elm$core$String$left, i, str)); - } - } - }); -var $elm$url$Url$chompBeforeFragment = F3( - function (protocol, frag, str) { - if ($elm$core$String$isEmpty(str)) { - return $elm$core$Maybe$Nothing; - } else { - var _v0 = A2($elm$core$String$indexes, '?', str); - if (!_v0.b) { - return A4($elm$url$Url$chompBeforeQuery, protocol, $elm$core$Maybe$Nothing, frag, str); - } else { - var i = _v0.a; - return A4( - $elm$url$Url$chompBeforeQuery, - protocol, - $elm$core$Maybe$Just( - A2($elm$core$String$dropLeft, i + 1, str)), - frag, - A2($elm$core$String$left, i, str)); - } - } - }); -var $elm$url$Url$chompAfterProtocol = F2( - function (protocol, str) { - if ($elm$core$String$isEmpty(str)) { - return $elm$core$Maybe$Nothing; - } else { - var _v0 = A2($elm$core$String$indexes, '#', str); - if (!_v0.b) { - return A3($elm$url$Url$chompBeforeFragment, protocol, $elm$core$Maybe$Nothing, str); - } else { - var i = _v0.a; - return A3( - $elm$url$Url$chompBeforeFragment, - protocol, - $elm$core$Maybe$Just( - A2($elm$core$String$dropLeft, i + 1, str)), - A2($elm$core$String$left, i, str)); - } - } - }); -var $elm$core$String$startsWith = _String_startsWith; -var $elm$url$Url$fromString = function (str) { - return A2($elm$core$String$startsWith, 'http://', str) ? A2( - $elm$url$Url$chompAfterProtocol, - $elm$url$Url$Http, - A2($elm$core$String$dropLeft, 7, str)) : (A2($elm$core$String$startsWith, 'https://', str) ? A2( - $elm$url$Url$chompAfterProtocol, - $elm$url$Url$Https, - A2($elm$core$String$dropLeft, 8, str)) : $elm$core$Maybe$Nothing); -}; -var $elm$core$Basics$never = function (_v0) { - never: - while (true) { - var nvr = _v0.a; - var $temp$_v0 = nvr; - _v0 = $temp$_v0; - continue never; - } -}; -var $elm$browser$Browser$application = _Browser_application; -var $elm$core$Platform$Sub$batch = _Platform_batch; -var $author$project$Pages$Internal$Platform$ContentJson = function (staticData) { - return {staticData: staticData}; -}; -var $author$project$RequestsAndPending$decoder = $elm$json$Json$Decode$dict( - A2($elm$json$Json$Decode$map, $elm$core$Maybe$Just, $elm$json$Json$Decode$string)); -var $author$project$Pages$Internal$Platform$contentJsonDecoder = A2( - $elm$json$Json$Decode$map, - $author$project$Pages$Internal$Platform$ContentJson, - A2($elm$json$Json$Decode$field, 'staticData', $author$project$RequestsAndPending$decoder)); -var $author$project$Pages$Internal$Platform$DevClient = function (a) { - return {$: 'DevClient', a: a}; -}; -var $author$project$Pages$Internal$Platform$Prerender = {$: 'Prerender'}; -var $author$project$Pages$Internal$Platform$ProdClient = {$: 'ProdClient'}; -var $author$project$Pages$Internal$Platform$UpdateCache = function (a) { - return {$: 'UpdateCache', a: a}; -}; -var $elm$core$Maybe$andThen = F2( - function (callback, maybeValue) { - if (maybeValue.$ === 'Just') { - var value = maybeValue.a; - return callback(value); - } else { - return $elm$core$Maybe$Nothing; - } - }); -var $elm$core$Task$onError = _Scheduler_onError; -var $elm$core$Task$attempt = F2( - function (resultToMessage, task) { - return $elm$core$Task$command( - $elm$core$Task$Perform( - A2( - $elm$core$Task$onError, - A2( - $elm$core$Basics$composeL, - A2($elm$core$Basics$composeL, $elm$core$Task$succeed, resultToMessage), - $elm$core$Result$Err), - A2( - $elm$core$Task$andThen, - A2( - $elm$core$Basics$composeL, - A2($elm$core$Basics$composeL, $elm$core$Task$succeed, resultToMessage), - $elm$core$Result$Ok), - task)))); - }); -var $elm$json$Json$Decode$bool = _Json_decodeBool; -var $author$project$Pages$ContentCache$Parsed = function (a) { - return {$: 'Parsed', a: a}; -}; -var $elm$core$String$dropRight = F2( - function (n, string) { - return (n < 1) ? string : A3($elm$core$String$slice, 0, -n, string); - }); -var $elm$core$String$endsWith = _String_endsWith; -var $author$project$Pages$Internal$String$chopEnd = F2( - function (needle, string) { - return A2($elm$core$String$endsWith, needle, string) ? A2( - $author$project$Pages$Internal$String$chopEnd, - needle, - A2( - $elm$core$String$dropRight, - $elm$core$String$length(needle), - string)) : string; - }); -var $author$project$Pages$Internal$String$chopStart = F2( - function (needle, string) { - return A2($elm$core$String$startsWith, needle, string) ? A2( - $author$project$Pages$Internal$String$chopStart, - needle, - A2( - $elm$core$String$dropLeft, - $elm$core$String$length(needle), - string)) : string; - }); -var $author$project$Pages$Internal$String$chopForwardSlashes = A2( - $elm$core$Basics$composeR, - $author$project$Pages$Internal$String$chopStart('/'), - $author$project$Pages$Internal$String$chopEnd('/')); -var $elm$core$List$filter = F2( - function (isGood, list) { - return A3( - $elm$core$List$foldr, - F2( - function (x, xs) { - return isGood(x) ? A2($elm$core$List$cons, x, xs) : xs; - }), - _List_Nil, - list); - }); -var $author$project$Pages$ContentCache$pathForUrl = function (_v0) { - var currentUrl = _v0.currentUrl; - var baseUrl = _v0.baseUrl; - return A2( - $elm$core$List$filter, - $elm$core$Basics$neq(''), - A2( - $elm$core$String$split, - '/', - $author$project$Pages$Internal$String$chopForwardSlashes( - A2( - $elm$core$String$dropLeft, - $elm$core$String$length(baseUrl.path), - currentUrl.path)))); -}; -var $author$project$Pages$ContentCache$init = function (maybeInitialPageContent) { - return $elm$core$Result$Ok( - function (dict) { - if (maybeInitialPageContent.$ === 'Nothing') { - return dict; - } else { - var _v1 = maybeInitialPageContent.a; - var urls = _v1.a; - var contentJson = _v1.b; - return A3( - $elm$core$Dict$insert, - $author$project$Pages$ContentCache$pathForUrl(urls), - $author$project$Pages$ContentCache$Parsed(contentJson), - dict); - } - }( - $elm$core$Dict$fromList(_List_Nil))); -}; -var $elm$http$Http$BadBody = function (a) { - return {$: 'BadBody', a: a}; -}; -var $elm$http$Http$BadStatus = function (a) { - return {$: 'BadStatus', a: a}; -}; -var $elm$http$Http$BadUrl = function (a) { - return {$: 'BadUrl', a: a}; -}; -var $elm$http$Http$NetworkError = {$: 'NetworkError'}; -var $elm$http$Http$Timeout = {$: 'Timeout'}; -var $elm$core$String$append = _String_append; -var $author$project$Pages$ContentCache$ContentJson = function (staticData) { - return {staticData: staticData}; -}; -var $author$project$Pages$ContentCache$contentJsonDecoder = A2( - $elm$json$Json$Decode$map, - $author$project$Pages$ContentCache$ContentJson, - A2($elm$json$Json$Decode$field, 'staticData', $author$project$RequestsAndPending$decoder)); -var $elm$http$Http$BadStatus_ = F2( - function (a, b) { - return {$: 'BadStatus_', a: a, b: b}; - }); -var $elm$http$Http$BadUrl_ = function (a) { - return {$: 'BadUrl_', a: a}; -}; -var $elm$http$Http$GoodStatus_ = F2( - function (a, b) { - return {$: 'GoodStatus_', a: a, b: b}; - }); -var $elm$http$Http$NetworkError_ = {$: 'NetworkError_'}; -var $elm$http$Http$Receiving = function (a) { - return {$: 'Receiving', a: a}; -}; -var $elm$http$Http$Sending = function (a) { - return {$: 'Sending', a: a}; -}; -var $elm$http$Http$Timeout_ = {$: 'Timeout_'}; -var $elm$core$Maybe$isJust = function (maybe) { - if (maybe.$ === 'Just') { - return true; - } else { - return false; - } -}; -var $elm$core$Platform$sendToSelf = _Platform_sendToSelf; -var $elm$http$Http$emptyBody = _Http_emptyBody; -var $elm$core$Result$mapError = F2( - function (f, result) { - if (result.$ === 'Ok') { - var v = result.a; - return $elm$core$Result$Ok(v); - } else { - var e = result.a; - return $elm$core$Result$Err( - f(e)); - } - }); -var $elm$http$Http$stringResolver = A2(_Http_expect, '', $elm$core$Basics$identity); -var $elm$core$Task$fail = _Scheduler_fail; -var $elm$http$Http$resultToTask = function (result) { - if (result.$ === 'Ok') { - var a = result.a; - return $elm$core$Task$succeed(a); - } else { - var x = result.a; - return $elm$core$Task$fail(x); - } -}; -var $elm$http$Http$task = function (r) { - return A3( - _Http_toTask, - _Utils_Tuple0, - $elm$http$Http$resultToTask, - {allowCookiesFromOtherDomains: false, body: r.body, expect: r.resolver, headers: r.headers, method: r.method, timeout: r.timeout, tracker: $elm$core$Maybe$Nothing, url: r.url}); -}; -var $author$project$Pages$ContentCache$httpTask = function (url) { - return $elm$http$Http$task( - { - body: $elm$http$Http$emptyBody, - headers: _List_Nil, - method: 'GET', - resolver: $elm$http$Http$stringResolver( - function (response) { - switch (response.$) { - case 'BadUrl_': - var url_ = response.a; - return $elm$core$Result$Err( - $elm$http$Http$BadUrl(url_)); - case 'Timeout_': - return $elm$core$Result$Err($elm$http$Http$Timeout); - case 'NetworkError_': - return $elm$core$Result$Err($elm$http$Http$NetworkError); - case 'BadStatus_': - var metadata = response.a; - return $elm$core$Result$Err( - $elm$http$Http$BadStatus(metadata.statusCode)); - default: - var body = response.b; - return A2( - $elm$core$Result$mapError, - function (err) { - return $elm$http$Http$BadBody( - $elm$json$Json$Decode$errorToString(err)); - }, - A2($elm$json$Json$Decode$decodeString, $author$project$Pages$ContentCache$contentJsonDecoder, body)); - } - }), - timeout: $elm$core$Maybe$Nothing, - url: A2( - $elm$core$String$append, - '/', - A2( - $elm$core$String$join, - '/', - function (l) { - return _Utils_ap( - l, - _List_fromArray( - ['content.json'])); - }( - A2( - $elm$core$List$filter, - $elm$core$Basics$neq(''), - A2( - $elm$core$String$split, - '/', - $author$project$Pages$Internal$String$chopForwardSlashes(url.path)))))) - }); -}; -var $author$project$Pages$ContentCache$update = F3( - function (cacheResult, urls, rawContent) { - if (cacheResult.$ === 'Ok') { - var cache = cacheResult.a; - return $elm$core$Result$Ok( - A3( - $elm$core$Dict$update, - $author$project$Pages$ContentCache$pathForUrl(urls), - function (entry) { - if (entry.$ === 'Just') { - if (entry.a.$ === 'Parsed') { - return entry; - } else { - var _v2 = entry.a; - return $elm$core$Maybe$Just( - $author$project$Pages$ContentCache$Parsed( - {staticData: rawContent.staticData})); - } - } else { - return $elm$core$Maybe$Just( - $author$project$Pages$ContentCache$Parsed( - {staticData: rawContent.staticData})); - } - }, - cache)); - } else { - var error = cacheResult.a; - return $elm$core$Result$Err(error); - } - }); -var $author$project$Pages$ContentCache$lazyLoad = F2( - function (urls, cacheResult) { - if (cacheResult.$ === 'Err') { - return $elm$core$Task$succeed(cacheResult); - } else { - var cache = cacheResult.a; - var _v1 = A2( - $elm$core$Dict$get, - $author$project$Pages$ContentCache$pathForUrl(urls), - cache); - if (_v1.$ === 'Just') { - var entry = _v1.a; - if (entry.$ === 'NeedContent') { - return A2( - $elm$core$Task$map, - function (downloadedContent) { - return A3($author$project$Pages$ContentCache$update, cacheResult, urls, downloadedContent); - }, - $author$project$Pages$ContentCache$httpTask(urls.currentUrl)); - } else { - return $elm$core$Task$succeed(cacheResult); - } - } else { - return A2( - $elm$core$Task$map, - function (downloadedContent) { - return A3($author$project$Pages$ContentCache$update, cacheResult, urls, downloadedContent); - }, - $author$project$Pages$ContentCache$httpTask(urls.currentUrl)); - } - } - }); -var $author$project$Pages$PagePath$Internal = function (a) { - return {$: 'Internal', a: a}; -}; -var $author$project$Pages$PagePath$build = function (path) { - return $author$project$Pages$PagePath$Internal(path); -}; -var $elm$core$Maybe$map = F2( - function (f, maybe) { - if (maybe.$ === 'Just') { - var value = maybe.a; - return $elm$core$Maybe$Just( - f(value)); - } else { - return $elm$core$Maybe$Nothing; - } - }); -var $author$project$Pages$ContentCache$lookup = F2( - function (content, urls) { - if (content.$ === 'Ok') { - var dict = content.a; - var path = $author$project$Pages$ContentCache$pathForUrl(urls); - return A2( - $elm$core$Maybe$map, - function (entry) { - return _Utils_Tuple2( - $author$project$Pages$PagePath$build(path), - entry); - }, - A2($elm$core$Dict$get, path, dict)); - } else { - return $elm$core$Maybe$Nothing; - } - }); -var $author$project$Pages$ContentCache$lookupMetadata = F2( - function (content, urls) { - return A2( - $elm$core$Maybe$map, - function (_v0) { - var pagePath = _v0.a; - var entry = _v0.b; - if (entry.$ === 'NeedContent') { - return pagePath; - } else { - return pagePath; - } - }, - A2($author$project$Pages$ContentCache$lookup, content, urls)); - }); -var $elm$core$Result$toMaybe = function (result) { - if (result.$ === 'Ok') { - var v = result.a; - return $elm$core$Maybe$Just(v); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $author$project$Pages$Internal$Platform$init = F5( - function (urlToRoute, initUserModel, flags, url, key) { - var contentJson = $elm$core$Result$toMaybe( - A2( - $elm$json$Json$Decode$decodeValue, - A2($elm$json$Json$Decode$field, 'contentJson', $author$project$Pages$Internal$Platform$contentJsonDecoder), - flags)); - var baseUrl = A2( - $elm$core$Maybe$withDefault, - url, - A2( - $elm$core$Maybe$andThen, - $elm$url$Url$fromString, - $elm$core$Result$toMaybe( - A2( - $elm$json$Json$Decode$decodeValue, - A2($elm$json$Json$Decode$field, 'baseUrl', $elm$json$Json$Decode$string), - flags)))); - var urls = {baseUrl: baseUrl, currentUrl: url}; - var contentCache = $author$project$Pages$ContentCache$init( - A2( - $elm$core$Maybe$map, - function (cj) { - return _Utils_Tuple2(urls, cj); - }, - contentJson)); - if (contentCache.$ === 'Ok') { - var okCache = contentCache.a; - var phase = function () { - var _v3 = A2( - $elm$json$Json$Decode$decodeValue, - A4( - $elm$json$Json$Decode$map3, - F3( - function (a, b, c) { - return _Utils_Tuple3(a, b, c); - }), - A2($elm$json$Json$Decode$field, 'isPrerendering', $elm$json$Json$Decode$bool), - A2($elm$json$Json$Decode$field, 'isDevServer', $elm$json$Json$Decode$bool), - A2($elm$json$Json$Decode$field, 'isElmDebugMode', $elm$json$Json$Decode$bool)), - flags); - if (_v3.$ === 'Ok') { - if (_v3.a.a) { - var _v4 = _v3.a; - return $author$project$Pages$Internal$Platform$Prerender; - } else { - if (_v3.a.b) { - var _v5 = _v3.a; - var isElmDebugMode = _v5.c; - return $author$project$Pages$Internal$Platform$DevClient(isElmDebugMode); - } else { - var _v6 = _v3.a; - return $author$project$Pages$Internal$Platform$ProdClient; - } - } - } else { - return $author$project$Pages$Internal$Platform$DevClient(false); - } - }(); - var maybePagePath = function () { - var _v2 = A2( - $author$project$Pages$ContentCache$lookupMetadata, - $elm$core$Result$Ok(okCache), - urls); - if (_v2.$ === 'Just') { - var pagePath = _v2.a; - return $elm$core$Maybe$Just(pagePath); - } else { - return $elm$core$Maybe$Nothing; - } - }(); - var _v1 = initUserModel( - A2( - $elm$core$Maybe$map, - function (pagePath) { - return { - metadata: urlToRoute(url), - path: {fragment: url.fragment, path: pagePath, query: url.query} - }; - }, - maybePagePath)); - var userModel = _v1.a; - var userCmd = _v1.b; - var cmd = $elm$core$Platform$Cmd$batch( - A2( - $elm$core$List$filterMap, - $elm$core$Basics$identity, - _List_fromArray( - [ - $elm$core$Maybe$Just( - A2($elm$core$Platform$Cmd$map, $author$project$Pages$Internal$Platform$UserMsg, userCmd)), - $elm$core$Maybe$Just( - A2( - $elm$core$Task$attempt, - $author$project$Pages$Internal$Platform$UpdateCache, - A2($author$project$Pages$ContentCache$lazyLoad, urls, contentCache))) - ]))); - return _Utils_Tuple2( - {baseUrl: baseUrl, contentCache: contentCache, key: key, phase: phase, url: url, userModel: userModel}, - cmd); - } else { - var _v7 = initUserModel($elm$core$Maybe$Nothing); - var userModel = _v7.a; - var userCmd = _v7.b; - return _Utils_Tuple2( - { - baseUrl: baseUrl, - contentCache: contentCache, - key: key, - phase: $author$project$Pages$Internal$Platform$DevClient(false), - url: url, - userModel: userModel - }, - $elm$core$Platform$Cmd$batch( - _List_fromArray( - [ - A2($elm$core$Platform$Cmd$map, $author$project$Pages$Internal$Platform$UserMsg, userCmd) - ]))); - } - }); -var $elm$core$Tuple$mapFirst = F2( - function (func, _v0) { - var x = _v0.a; - var y = _v0.b; - return _Utils_Tuple2( - func(x), - y); - }); -var $elm$core$Tuple$mapSecond = F2( - function (func, _v0) { - var x = _v0.a; - var y = _v0.b; - return _Utils_Tuple2( - x, - func(y)); - }); -var $elm$core$Platform$Sub$none = $elm$core$Platform$Sub$batch(_List_Nil); -var $author$project$Pages$Internal$Platform$PageScrollComplete = {$: 'PageScrollComplete'}; -var $author$project$Pages$Internal$Platform$UpdateCacheAndUrl = F2( - function (a, b) { - return {$: 'UpdateCacheAndUrl', a: a, b: b}; - }); -var $elm$browser$Browser$Navigation$load = _Browser_load; -var $elm$browser$Browser$Navigation$pushUrl = _Browser_pushUrl; -var $elm$browser$Browser$Dom$setViewport = _Browser_setViewport; -var $elm$url$Url$addPort = F2( - function (maybePort, starter) { - if (maybePort.$ === 'Nothing') { - return starter; - } else { - var port_ = maybePort.a; - return starter + (':' + $elm$core$String$fromInt(port_)); - } - }); -var $elm$url$Url$addPrefixed = F3( - function (prefix, maybeSegment, starter) { - if (maybeSegment.$ === 'Nothing') { - return starter; - } else { - var segment = maybeSegment.a; - return _Utils_ap( - starter, - _Utils_ap(prefix, segment)); - } - }); -var $elm$url$Url$toString = function (url) { - var http = function () { - var _v0 = url.protocol; - if (_v0.$ === 'Http') { - return 'http://'; - } else { - return 'https://'; - } - }(); - return A3( - $elm$url$Url$addPrefixed, - '#', - url.fragment, - A3( - $elm$url$Url$addPrefixed, - '?', - url.query, - _Utils_ap( - A2( - $elm$url$Url$addPort, - url.port_, - _Utils_ap(http, url.host)), - url.path))); -}; -var $author$project$Pages$Internal$Platform$urlToPagePath = F2( - function (url, baseUrl) { - return $author$project$Pages$PagePath$build( - A2( - $elm$core$List$filter, - $elm$core$Basics$neq(''), - A2( - $elm$core$String$split, - '/', - $author$project$Pages$Internal$String$chopForwardSlashes( - A2( - $elm$core$String$dropLeft, - $elm$core$String$length(baseUrl.path), - url.path))))); - }); -var $author$project$Pages$Internal$Platform$update = F9( - function (urlToRoute, allRoutes, canonicalSiteUrl, viewFunction, maybeOnPageChangeMsg, toJsPort, userUpdate, msg, model) { - if (msg.$ === 'AppMsg') { - var appMsg = msg.a; - switch (appMsg.$) { - case 'LinkClicked': - var urlRequest = appMsg.a; - if (urlRequest.$ === 'Internal') { - var url = urlRequest.a; - var navigatingToSamePage = _Utils_eq(url.path, model.url.path) && (!_Utils_eq(url, model.url)); - return navigatingToSamePage ? _Utils_Tuple2( - model, - $elm$browser$Browser$Navigation$load( - $elm$url$Url$toString(url))) : _Utils_Tuple2( - model, - A2( - $elm$browser$Browser$Navigation$pushUrl, - model.key, - $elm$url$Url$toString(url))); - } else { - var href = urlRequest.a; - return _Utils_Tuple2( - model, - $elm$browser$Browser$Navigation$load(href)); - } - case 'UrlChanged': - var url = appMsg.a; - var urls = {baseUrl: model.baseUrl, currentUrl: url}; - var navigatingToSamePage = _Utils_eq(url.path, model.url.path) && (!_Utils_eq(url, model.url)); - return _Utils_Tuple2( - model, - navigatingToSamePage ? $elm$core$Platform$Cmd$none : A2( - $elm$core$Task$attempt, - $author$project$Pages$Internal$Platform$UpdateCacheAndUrl(url), - A2($author$project$Pages$ContentCache$lazyLoad, urls, model.contentCache))); - case 'UserMsg': - var userMsg = appMsg.a; - var _v3 = A2(userUpdate, userMsg, model.userModel); - var userModel = _v3.a; - var userCmd = _v3.b; - return _Utils_Tuple2( - _Utils_update( - model, - {userModel: userModel}), - A2($elm$core$Platform$Cmd$map, $author$project$Pages$Internal$Platform$UserMsg, userCmd)); - case 'UpdateCache': - var cacheUpdateResult = appMsg.a; - if (cacheUpdateResult.$ === 'Ok') { - var updatedCache = cacheUpdateResult.a; - return _Utils_Tuple2( - _Utils_update( - model, - {contentCache: updatedCache}), - $elm$core$Platform$Cmd$none); - } else { - return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none); - } - case 'UpdateCacheAndUrl': - var url = appMsg.a; - var cacheUpdateResult = appMsg.b; - if (cacheUpdateResult.$ === 'Ok') { - var updatedCache = cacheUpdateResult.a; - var _v6 = function () { - if (maybeOnPageChangeMsg.$ === 'Just') { - var onPageChangeMsg = maybeOnPageChangeMsg.a; - return A2( - userUpdate, - onPageChangeMsg( - { - fragment: url.fragment, - metadata: urlToRoute(url), - path: A2($author$project$Pages$Internal$Platform$urlToPagePath, url, model.baseUrl), - query: url.query - }), - model.userModel); - } else { - return _Utils_Tuple2(model.userModel, $elm$core$Platform$Cmd$none); - } - }(); - var userModel = _v6.a; - var userCmd = _v6.b; - return _Utils_Tuple2( - _Utils_update( - model, - {contentCache: updatedCache, url: url, userModel: userModel}), - $elm$core$Platform$Cmd$batch( - _List_fromArray( - [ - A2($elm$core$Platform$Cmd$map, $author$project$Pages$Internal$Platform$UserMsg, userCmd), - A2( - $elm$core$Task$perform, - function (_v8) { - return $author$project$Pages$Internal$Platform$PageScrollComplete; - }, - A2($elm$browser$Browser$Dom$setViewport, 0, 0)) - ]))); - } else { - return _Utils_Tuple2( - _Utils_update( - model, - {url: url}), - $elm$core$Platform$Cmd$none); - } - case 'PageScrollComplete': - return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none); - case 'HotReloadComplete': - var contentJson = appMsg.a; - var urls = {baseUrl: model.baseUrl, currentUrl: model.url}; - return _Utils_Tuple2( - _Utils_update( - model, - { - contentCache: $author$project$Pages$ContentCache$init( - $elm$core$Maybe$Just( - _Utils_Tuple2(urls, contentJson))) - }), - $elm$core$Platform$Cmd$none); - default: - return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none); - } - } else { - return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none); - } - }); -var $author$project$Pages$Internal$ApplicationType$Browser = {$: 'Browser'}; -var $elm$html$Html$pre = _VirtualDom_node('pre'); -var $author$project$Pages$StaticHttpRequest$resolve = F3( - function (appType, request, rawResponses) { - resolve: - while (true) { - if (request.$ === 'Request') { - var _v1 = request.a; - var lookupFn = _v1.b; - var _v2 = A2(lookupFn, appType, rawResponses); - if (_v2.$ === 'Ok') { - var _v3 = _v2.a; - var nextRequest = _v3.b; - var $temp$appType = appType, - $temp$request = nextRequest, - $temp$rawResponses = rawResponses; - appType = $temp$appType; - request = $temp$request; - rawResponses = $temp$rawResponses; - continue resolve; - } else { - var error = _v2.a; - return $elm$core$Result$Err(error); - } - } else { - var value = request.a; - return $elm$core$Result$Ok(value); - } - } - }); -var $author$project$Pages$Internal$Platform$mainView = F3( - function (urlToRoute, viewFn, model) { - var urls = {baseUrl: model.baseUrl, currentUrl: model.url}; - var _v0 = A2($author$project$Pages$ContentCache$lookup, model.contentCache, urls); - if (_v0.$ === 'Just') { - var _v1 = _v0.a; - var pagePath = _v1.a; - var entry = _v1.b; - if (entry.$ === 'Parsed') { - var viewResult = entry.a; - var viewFnResult = function (request) { - return A3($author$project$Pages$StaticHttpRequest$resolve, $author$project$Pages$Internal$ApplicationType$Browser, request, viewResult.staticData); - }( - viewFn( - { - frontmatter: urlToRoute(model.url), - path: pagePath - })); - if (viewFnResult.$ === 'Ok') { - var okViewFn = viewFnResult.a; - return okViewFn.view(model.userModel); - } else { - var error = viewFnResult.a; - return { - body: function () { - switch (error.$) { - case 'DecoderError': - var decoderError = error.a; - return A2( - $elm$html$Html$div, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text('Could not parse static data. I encountered this decoder problem.'), - A2( - $elm$html$Html$pre, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text(decoderError) - ])) - ])); - case 'MissingHttpResponse': - var missingKey = error.a; - return A2( - $elm$html$Html$div, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text('I\'m missing some StaticHttp data for this page:'), - A2( - $elm$html$Html$pre, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text(missingKey) - ])) - ])); - default: - var message = error.a; - return A2( - $elm$html$Html$div, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text('I ran into a call to `Pages.StaticHttp.fail` with message:'), - A2( - $elm$html$Html$pre, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text(message) - ])) - ])); - } - }(), - title: 'Parsing error' - }; - } - } else { - return { - body: $elm$html$Html$text('Missing content'), - title: 'elm-pages error' - }; - } - } else { - return { - body: A2( - $elm$html$Html$div, - _List_Nil, - _List_fromArray( - [ - $elm$html$Html$text('Page not found.') - ])), - title: 'Page not found' - }; - } - }); -var $elm$html$Html$Attributes$attribute = $elm$virtual_dom$VirtualDom$attribute; -var $author$project$Pages$Internal$Platform$onViewChangeElement = function (currentUrl) { - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - A2( - $elm$html$Html$Attributes$attribute, - 'data-url', - $elm$url$Url$toString(currentUrl)), - A2($elm$html$Html$Attributes$attribute, 'display', 'none') - ]), - _List_Nil); -}; -var $author$project$Pages$Internal$Platform$view = F3( - function (urlToRoute, viewFn, model) { - var _v0 = A3($author$project$Pages$Internal$Platform$mainView, urlToRoute, viewFn, model); - var title = _v0.title; - var body = _v0.body; - return { - body: _List_fromArray( - [ - $author$project$Pages$Internal$Platform$onViewChangeElement(model.url), - A2( - $elm$html$Html$map, - $author$project$Pages$Internal$Platform$AppMsg, - A2($elm$html$Html$map, $author$project$Pages$Internal$Platform$UserMsg, body)) - ]), - title: title - }; - }); -var $author$project$Pages$Internal$Platform$application = function (config) { - return $elm$browser$Browser$application( - { - init: F3( - function (flags, url, key) { - return A2( - $elm$core$Tuple$mapSecond, - $elm$core$Platform$Cmd$map($author$project$Pages$Internal$Platform$AppMsg), - A2( - $elm$core$Tuple$mapFirst, - $author$project$Pages$Internal$Platform$Model, - A5($author$project$Pages$Internal$Platform$init, config.urlToRoute, config.init, flags, url, key))); - }), - onUrlChange: A2($elm$core$Basics$composeR, $author$project$Pages$Internal$Platform$UrlChanged, $author$project$Pages$Internal$Platform$AppMsg), - onUrlRequest: A2($elm$core$Basics$composeR, $author$project$Pages$Internal$Platform$LinkClicked, $author$project$Pages$Internal$Platform$AppMsg), - subscriptions: function (outerModel) { - if (outerModel.$ === 'Model') { - var model = outerModel.a; - var urls = {baseUrl: model.baseUrl, currentUrl: model.url}; - var maybePagePath = function () { - var _v3 = A2($author$project$Pages$ContentCache$lookupMetadata, model.contentCache, urls); - if (_v3.$ === 'Just') { - var pagePath = _v3.a; - return $elm$core$Maybe$Just(pagePath); - } else { - return $elm$core$Maybe$Nothing; - } - }(); - var userSub = A2( - $elm$core$Maybe$withDefault, - $elm$core$Platform$Sub$none, - A2( - $elm$core$Maybe$map, - function (path) { - return A2( - $elm$core$Platform$Sub$map, - $author$project$Pages$Internal$Platform$AppMsg, - A2( - $elm$core$Platform$Sub$map, - $author$project$Pages$Internal$Platform$UserMsg, - A2(config.subscriptions, path, model.userModel))); - }, - maybePagePath)); - return $elm$core$Platform$Sub$batch( - _List_fromArray( - [ - userSub, - A2( - $elm$core$Platform$Sub$map, - function (decodeValue) { - var _v1 = A2( - $elm$json$Json$Decode$decodeValue, - A2($elm$json$Json$Decode$field, 'action', $elm$json$Json$Decode$string), - decodeValue); - if ((_v1.$ === 'Ok') && (_v1.a === 'hmr-check')) { - return $author$project$Pages$Internal$Platform$AppMsg($author$project$Pages$Internal$Platform$StartingHotReload); - } else { - var _v2 = A2( - $elm$json$Json$Decode$decodeValue, - A2($elm$json$Json$Decode$field, 'contentJson', $author$project$Pages$Internal$Platform$contentJsonDecoder), - decodeValue); - if (_v2.$ === 'Ok') { - var contentJson = _v2.a; - return $author$project$Pages$Internal$Platform$AppMsg( - $author$project$Pages$Internal$Platform$HotReloadComplete(contentJson)); - } else { - return $author$project$Pages$Internal$Platform$AppMsg($author$project$Pages$Internal$Platform$StartingHotReload); - } - } - }, - config.fromJsPort) - ])); - } else { - return $elm$core$Platform$Sub$none; - } - }, - update: F2( - function (msg, outerModel) { - if (outerModel.$ === 'Model') { - var model = outerModel.a; - var noOpUpdate = F2( - function (_v6, userModel) { - return _Utils_Tuple2(userModel, $elm$core$Platform$Cmd$none); - }); - var userUpdate = function () { - var _v5 = model.phase; - if (_v5.$ === 'Prerender') { - return noOpUpdate; - } else { - return config.update; - } - }(); - var allRoutes = A2( - $elm$core$List$map, - $elm$core$String$join('/'), - A2($elm$core$List$map, $elm$core$Tuple$first, _List_Nil)); - return A2( - $elm$core$Tuple$mapSecond, - $elm$core$Platform$Cmd$map($author$project$Pages$Internal$Platform$AppMsg), - A2( - $elm$core$Tuple$mapFirst, - $author$project$Pages$Internal$Platform$Model, - A9($author$project$Pages$Internal$Platform$update, config.urlToRoute, allRoutes, config.canonicalSiteUrl, config.view, config.onPageChange, config.toJsPort, userUpdate, msg, model))); - } else { - return _Utils_Tuple2(outerModel, $elm$core$Platform$Cmd$none); - } - }), - view: function (outerModel) { - if (outerModel.$ === 'Model') { - var model = outerModel.a; - return A3($author$project$Pages$Internal$Platform$view, config.urlToRoute, config.view, model); - } else { - return { - body: _List_fromArray( - [ - $elm$html$Html$text('Unexpected state') - ]), - title: 'Error' - }; - } - } - }); -}; -var $author$project$Site$canonicalUrl = 'https://elm-pages.com'; -var $billstclair$elm_xml_eeue56$Xml$Encode$boolToString = function (b) { - return b ? 'true' : 'false'; -}; -var $billstclair$elm_xml_eeue56$Xml$Encode$needsIndent = function (nextValue) { - switch (nextValue.$) { - case 'Object': - if (!nextValue.a.b) { - return false; - } else { - return true; - } - case 'Tag': - return true; - default: - return false; - } -}; -var $billstclair$elm_xml_eeue56$Xml$Encode$propToString = function (value) { - switch (value.$) { - case 'StrNode': - var str = value.a; - return str; - case 'IntNode': - var n = value.a; - return $elm$core$String$fromInt(n); - case 'BoolNode': - var b = value.a; - return $billstclair$elm_xml_eeue56$Xml$Encode$boolToString(b); - case 'FloatNode': - var f = value.a; - return $elm$core$String$fromFloat(f); - default: - return ''; - } -}; -var $billstclair$elm_xml_eeue56$Xml$Encode$propsToString = function (props) { - return function (x) { - return ($elm$core$String$length(x) > 0) ? (' ' + x) : ''; - }( - A2( - $elm$core$String$join, - ' ', - A2( - $elm$core$List$map, - function (_v0) { - var key = _v0.a; - var value = _v0.b; - return key + ('=\"' + ($billstclair$elm_xml_eeue56$Xml$Encode$propToString(value) + '\"')); - }, - $elm$core$Dict$toList(props)))); -}; -var $elm$core$Bitwise$shiftRightBy = _Bitwise_shiftRightBy; -var $elm$core$String$repeatHelp = F3( - function (n, chunk, result) { - return (n <= 0) ? result : A3( - $elm$core$String$repeatHelp, - n >> 1, - _Utils_ap(chunk, chunk), - (!(n & 1)) ? result : _Utils_ap(result, chunk)); - }); -var $elm$core$String$repeat = F2( - function (n, chunk) { - return A3($elm$core$String$repeatHelp, n, chunk, ''); - }); -var $billstclair$elm_xml_eeue56$Xml$Encode$valueToString = F3( - function (level, indent, value) { - switch (value.$) { - case 'Tag': - var name = value.a; - var props = value.b; - var nextValue = value.c; - var indentString = $billstclair$elm_xml_eeue56$Xml$Encode$needsIndent(nextValue) ? '\n' : ''; - return '<' + (name + ($billstclair$elm_xml_eeue56$Xml$Encode$propsToString(props) + ('>' + (indentString + (A3($billstclair$elm_xml_eeue56$Xml$Encode$valueToString, level + 1, indent, nextValue) + (indentString + ('')))))))); - case 'StrNode': - var str = value.a; - return str; - case 'IntNode': - var n = value.a; - return $elm$core$String$fromInt(n); - case 'FloatNode': - var n = value.a; - return $elm$core$String$fromFloat(n); - case 'BoolNode': - var b = value.a; - return $billstclair$elm_xml_eeue56$Xml$Encode$boolToString(b); - case 'Object': - var xs = value.a; - return A2( - $elm$core$String$join, - '\n', - A2( - $elm$core$List$map, - $elm$core$Basics$append( - A2($elm$core$String$repeat, level * indent, ' ')), - A2( - $elm$core$List$map, - A2($billstclair$elm_xml_eeue56$Xml$Encode$valueToString, level + 1, indent), - xs))); - default: - var name = value.a; - var props = value.b; - return '')); - } - }); -var $billstclair$elm_xml_eeue56$Xml$Encode$encode = F2( - function (indent, value) { - return A3($billstclair$elm_xml_eeue56$Xml$Encode$valueToString, -1, indent, value); - }); -var $billstclair$elm_xml_eeue56$Xml$Object = function (a) { - return {$: 'Object', a: a}; -}; -var $billstclair$elm_xml_eeue56$Xml$Encode$list = function (values) { - return $billstclair$elm_xml_eeue56$Xml$Object(values); -}; -var $billstclair$elm_xml_eeue56$Xml$Tag = F3( - function (a, b, c) { - return {$: 'Tag', a: a, b: b, c: c}; - }); -var $billstclair$elm_xml_eeue56$Xml$Encode$object = function (values) { - return $billstclair$elm_xml_eeue56$Xml$Object( - A2( - $elm$core$List$map, - function (_v0) { - var name = _v0.a; - var props = _v0.b; - var value = _v0.c; - return A3($billstclair$elm_xml_eeue56$Xml$Tag, name, props, value); - }, - values)); -}; -var $billstclair$elm_xml_eeue56$Xml$StrNode = function (a) { - return {$: 'StrNode', a: a}; -}; -var $billstclair$elm_xml_eeue56$Xml$Encode$string = function (str) { - return $billstclair$elm_xml_eeue56$Xml$StrNode(str); -}; -var $dillonkearns$elm_sitemap$Path$dropLeading = function (url) { - return A2($elm$core$String$startsWith, '/', url) ? A2($elm$core$String$dropLeft, 1, url) : url; -}; -var $dillonkearns$elm_sitemap$Path$dropTrailing = function (url) { - return A2($elm$core$String$endsWith, '/', url) ? A2($elm$core$String$dropRight, 1, url) : url; -}; -var $dillonkearns$elm_sitemap$Path$dropBoth = function (url) { - return $dillonkearns$elm_sitemap$Path$dropTrailing( - $dillonkearns$elm_sitemap$Path$dropLeading(url)); -}; -var $dillonkearns$elm_sitemap$Path$join = function (urls) { - return A2( - $elm$core$String$join, - '/', - A2($elm$core$List$map, $dillonkearns$elm_sitemap$Path$dropBoth, urls)); -}; -var $dillonkearns$elm_sitemap$Sitemap$keyValue = F2( - function (key, value) { - return $billstclair$elm_xml_eeue56$Xml$Encode$object( - _List_fromArray( - [ - _Utils_Tuple3(key, $elm$core$Dict$empty, value) - ])); - }); -var $dillonkearns$elm_sitemap$Sitemap$urlXml = F2( - function (siteUrl, entry) { - return $billstclair$elm_xml_eeue56$Xml$Encode$object( - _List_fromArray( - [ - _Utils_Tuple3( - 'url', - $elm$core$Dict$empty, - $billstclair$elm_xml_eeue56$Xml$Encode$list( - A2( - $elm$core$List$filterMap, - $elm$core$Basics$identity, - _List_fromArray( - [ - $elm$core$Maybe$Just( - A2( - $dillonkearns$elm_sitemap$Sitemap$keyValue, - 'loc', - $billstclair$elm_xml_eeue56$Xml$Encode$string( - $dillonkearns$elm_sitemap$Path$join( - _List_fromArray( - [siteUrl, entry.path]))))), - A2( - $elm$core$Maybe$map, - $dillonkearns$elm_sitemap$Sitemap$keyValue('lastmod'), - A2($elm$core$Maybe$map, $billstclair$elm_xml_eeue56$Xml$Encode$string, entry.lastMod)) - ])))) - ])); - }); -var $dillonkearns$elm_sitemap$Sitemap$build = F2( - function (_v0, urls) { - var siteUrl = _v0.siteUrl; - return A2( - $billstclair$elm_xml_eeue56$Xml$Encode$encode, - 0, - $billstclair$elm_xml_eeue56$Xml$Encode$object( - _List_fromArray( - [ - _Utils_Tuple3( - 'urlset', - $elm$core$Dict$fromList( - _List_fromArray( - [ - _Utils_Tuple2( - 'xmlns', - $billstclair$elm_xml_eeue56$Xml$Encode$string('http://www.sitemaps.org/schemas/sitemap/0.9')) - ])), - $billstclair$elm_xml_eeue56$Xml$Encode$list( - A2( - $elm$core$List$map, - $dillonkearns$elm_sitemap$Sitemap$urlXml(siteUrl), - urls))) - ]))); - }); -var $author$project$Route$routeToPath = function (maybeRoute) { - if (maybeRoute.$ === 'Nothing') { - return _List_Nil; - } else { - var params = maybeRoute.a.a; - return _List_fromArray( - ['slide', params.number]); - } -}; -var $author$project$Site$siteMap = function (allRoutes) { - return function (sitemapXmlString) { - return { - content: sitemapXmlString, - path: _List_fromArray( - ['sitemap.xml']) - }; - }( - A2( - $dillonkearns$elm_sitemap$Sitemap$build, - {siteUrl: 'https://elm-pages.com'}, - A2( - $elm$core$List$map, - function (route) { - return { - lastMod: $elm$core$Maybe$Nothing, - path: A2( - $elm$core$String$join, - '/', - $author$project$Route$routeToPath( - $elm$core$Maybe$Just(route))) - }; - }, - A2($elm$core$List$filterMap, $elm$core$Basics$identity, allRoutes)))); -}; -var $author$project$Pages$StaticHttp$succeed = function (value) { - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - _List_Nil, - F2( - function (_v0, _v1) { - return $elm$core$Result$Ok( - _Utils_Tuple2( - $elm$core$Dict$empty, - $author$project$Pages$StaticHttpRequest$Done(value))); - }))); -}; -var $author$project$Site$generateFiles = function (allRoutes) { - return $author$project$Pages$StaticHttp$succeed( - _List_fromArray( - [ - $elm$core$Result$Ok( - $author$project$Site$siteMap(allRoutes)) - ])); -}; -var $danyx23$elm_mimetype$MimeType$Png = {$: 'Png'}; -var $author$project$Head$filterMaybeValues = function (list) { - return A2( - $elm$core$List$filterMap, - function (_v0) { - var key = _v0.a; - var maybeValue = _v0.b; - if (maybeValue.$ === 'Just') { - var value = maybeValue.a; - return $elm$core$Maybe$Just( - _Utils_Tuple2(key, value)); - } else { - return $elm$core$Maybe$Nothing; - } - }, - list); -}; -var $author$project$Head$FullImageUrl = function (a) { - return {$: 'FullImageUrl', a: a}; -}; -var $author$project$Head$fullImageUrl = function (value) { - return $author$project$Head$FullImageUrl(value); -}; -var $author$project$Head$Tag = function (a) { - return {$: 'Tag', a: a}; -}; -var $author$project$Head$node = F2( - function (name, attributes) { - return $author$project$Head$Tag( - {attributes: attributes, name: name}); - }); -var $author$project$Head$Raw = function (a) { - return {$: 'Raw', a: a}; -}; -var $author$project$Head$raw = function (value) { - return $author$project$Head$Raw(value); -}; -var $author$project$Head$sizesToString = function (sizes) { - return A2( - $elm$core$String$join, - ' ', - A2( - $elm$core$List$map, - function (_v0) { - var x = _v0.a; - var y = _v0.b; - return $elm$core$String$fromInt(x) + ('x' + $elm$core$String$fromInt(y)); - }, - sizes)); -}; -var $author$project$Head$appleTouchIcon = F2( - function (maybeSize, image) { - return A2( - $author$project$Head$node, - 'link', - $author$project$Head$filterMaybeValues( - _List_fromArray( - [ - _Utils_Tuple2( - 'rel', - $elm$core$Maybe$Just( - $author$project$Head$raw('apple-touch-icon'))), - _Utils_Tuple2( - 'sizes', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2( - $elm$core$Maybe$map, - function (size) { - return $author$project$Head$sizesToString( - _List_fromArray( - [ - _Utils_Tuple2(size, size) - ])); - }, - maybeSize))), - _Utils_Tuple2( - 'href', - $elm$core$Maybe$Just( - $author$project$Head$fullImageUrl(image))) - ]))); - }); -var $author$project$Pages$ImagePath$External = function (a) { - return {$: 'External', a: a}; -}; -var $author$project$Pages$ImagePath$external = function (url) { - return $author$project$Pages$ImagePath$External(url); -}; -var $author$project$Cloudinary$urlSquare = F3( - function (asset, format, width) { - var fetch_format = function () { - _v0$2: - while (true) { - if (format.$ === 'Just') { - switch (format.a.$) { - case 'Png': - var _v1 = format.a; - return 'png'; - case 'OtherImage': - if (format.a.a === 'webp') { - return 'webp'; - } else { - break _v0$2; - } - default: - break _v0$2; - } - } else { - return 'auto'; - } - } - return 'auto'; - }(); - var transforms = A2( - $elm$core$String$join, - ',', - _List_fromArray( - [ - 'c_pad', - 'w_' + $elm$core$String$fromInt(width), - 'h_' + $elm$core$String$fromInt(width), - 'q_auto', - 'f_' + fetch_format - ])); - var base = 'https://res.cloudinary.com/dillonkearns/image/upload'; - return $author$project$Pages$ImagePath$external(base + ('/' + (transforms + ('/' + asset)))); - }); -var $author$project$Site$cloudinaryIcon = F2( - function (mimeType, width) { - return A3( - $author$project$Cloudinary$urlSquare, - 'v1603234028/elm-pages/elm-pages-icon', - $elm$core$Maybe$Just(mimeType), - width); - }); -var $danyx23$elm_mimetype$MimeType$Image = function (a) { - return {$: 'Image', a: a}; -}; -var $author$project$Head$nonEmptyList = function (list) { - return $elm$core$List$isEmpty(list) ? $elm$core$Maybe$Nothing : $elm$core$Maybe$Just(list); -}; -var $danyx23$elm_mimetype$MimeType$toString = function (mimeType) { - switch (mimeType.$) { - case 'Image': - var img = mimeType.a; - switch (img.$) { - case 'Jpeg': - return 'image/jpeg'; - case 'Png': - return 'image/png'; - case 'Gif': - return 'image/gif'; - default: - var type_ = img.a; - return 'image/' + type_; - } - case 'Audio': - var audio = mimeType.a; - switch (audio.$) { - case 'Mp3': - return 'audio/mp3'; - case 'Wav': - return 'audio/wav'; - case 'Ogg': - return 'audio/ogg'; - default: - var type_ = audio.a; - return 'audio/' + type_; - } - case 'Video': - var video = mimeType.a; - switch (video.$) { - case 'Mp4': - return 'video/mp4'; - case 'Mpeg': - return 'video/mpeg'; - case 'Quicktime': - return 'video/quicktime'; - case 'Avi': - return 'video/avi'; - case 'Webm': - return 'video/webm'; - default: - var type_ = video.a; - return 'video/' + type_; - } - case 'Text': - var text = mimeType.a; - switch (text.$) { - case 'PlainText': - return 'text/plain'; - case 'Html': - return 'text/html'; - case 'Css': - return 'text/css'; - case 'Xml': - return 'text/xml'; - case 'Json': - return 'application/json'; - default: - var type_ = text.a; - return 'text/' + type_; - } - case 'App': - var app = mimeType.a; - switch (app.$) { - case 'Word': - return 'application/msword'; - case 'WordXml': - return 'application/vnd.openxmlformats-officedocument.wordprocessingml.document'; - case 'Excel': - return 'application/vnd.ms-excel'; - case 'ExcelXml': - return 'application/vnd.openxmlformats-officedocument.spreadsheetml.sheet'; - case 'PowerPoint': - return 'application/vnd.ms-powerpoint'; - case 'PowerPointXml': - return 'application/vnd.openxmlformats-officedocument.presentationml.presentation'; - case 'Pdf': - return 'application/pdf'; - default: - var type_ = app.a; - return 'application/' + type_; - } - default: - var type_ = mimeType.a; - return type_; - } -}; -var $author$project$Head$icon = F3( - function (sizes, imageMimeType, image) { - return A2( - $author$project$Head$node, - 'link', - $author$project$Head$filterMaybeValues( - _List_fromArray( - [ - _Utils_Tuple2( - 'rel', - $elm$core$Maybe$Just( - $author$project$Head$raw('icon'))), - _Utils_Tuple2( - 'sizes', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2( - $elm$core$Maybe$map, - $author$project$Head$sizesToString, - $author$project$Head$nonEmptyList(sizes)))), - _Utils_Tuple2( - 'type', - $elm$core$Maybe$Just( - $author$project$Head$raw( - $danyx23$elm_mimetype$MimeType$toString( - $danyx23$elm_mimetype$MimeType$Image(imageMimeType))))), - _Utils_Tuple2( - 'href', - $elm$core$Maybe$Just( - $author$project$Head$fullImageUrl(image))) - ]))); - }); -var $author$project$Head$sitemapLink = function (url) { - return A2( - $author$project$Head$node, - 'link', - _List_fromArray( - [ - _Utils_Tuple2( - 'rel', - $author$project$Head$raw('sitemap')), - _Utils_Tuple2( - 'type', - $author$project$Head$raw('application/xml')), - _Utils_Tuple2( - 'href', - $author$project$Head$raw(url)) - ])); -}; -var $author$project$Site$head = function (_static) { - return _List_fromArray( - [ - A3( - $author$project$Head$icon, - _List_fromArray( - [ - _Utils_Tuple2(32, 32) - ]), - $danyx23$elm_mimetype$MimeType$Png, - A2($author$project$Site$cloudinaryIcon, $danyx23$elm_mimetype$MimeType$Png, 32)), - A3( - $author$project$Head$icon, - _List_fromArray( - [ - _Utils_Tuple2(16, 16) - ]), - $danyx23$elm_mimetype$MimeType$Png, - A2($author$project$Site$cloudinaryIcon, $danyx23$elm_mimetype$MimeType$Png, 16)), - A2( - $author$project$Head$appleTouchIcon, - $elm$core$Maybe$Just(180), - A2($author$project$Site$cloudinaryIcon, $danyx23$elm_mimetype$MimeType$Png, 180)), - A2( - $author$project$Head$appleTouchIcon, - $elm$core$Maybe$Just(192), - A2($author$project$Site$cloudinaryIcon, $danyx23$elm_mimetype$MimeType$Png, 192)), - $author$project$Head$sitemapLink('/sitemap.xml') - ]); -}; -var $author$project$Pages$Manifest$Portrait = {$: 'Portrait'}; -var $author$project$Pages$Manifest$Standalone = {$: 'Standalone'}; -var $author$project$Pages$ImagePath$Internal = function (a) { - return {$: 'Internal', a: a}; -}; -var $author$project$Pages$ImagePath$build = function (path) { - return $author$project$Pages$ImagePath$Internal(path); -}; -var $author$project$Pages$Manifest$Category$Category = function (a) { - return {$: 'Category', a: a}; -}; -var $author$project$Pages$Manifest$Category$education = $author$project$Pages$Manifest$Category$Category('education'); -var $author$project$Pages$Manifest$IconPurposeAny = {$: 'IconPurposeAny'}; -var $author$project$Pages$Manifest$IconPurposeMaskable = {$: 'IconPurposeMaskable'}; -var $author$project$Site$icon = F2( - function (format, width) { - return { - mimeType: $elm$core$Maybe$Just(format), - purposes: _List_fromArray( - [$author$project$Pages$Manifest$IconPurposeAny, $author$project$Pages$Manifest$IconPurposeMaskable]), - sizes: _List_fromArray( - [ - _Utils_Tuple2(width, width) - ]), - src: A2($author$project$Site$cloudinaryIcon, format, width) - }; - }); -var $author$project$Site$tagline = 'A statically typed site generator'; -var $danyx23$elm_mimetype$MimeType$OtherImage = function (a) { - return {$: 'OtherImage', a: a}; -}; -var $author$project$Site$webp = $danyx23$elm_mimetype$MimeType$OtherImage('webp'); -var $avh4$elm_color$Color$RgbaSpace = F4( - function (a, b, c, d) { - return {$: 'RgbaSpace', a: a, b: b, c: c, d: d}; - }); -var $avh4$elm_color$Color$white = A4($avh4$elm_color$Color$RgbaSpace, 255 / 255, 255 / 255, 255 / 255, 1.0); -var $author$project$Site$manifest = function (_static) { - return { - backgroundColor: $elm$core$Maybe$Just($avh4$elm_color$Color$white), - categories: _List_fromArray( - [$author$project$Pages$Manifest$Category$education]), - description: 'elm-pages - ' + $author$project$Site$tagline, - displayMode: $author$project$Pages$Manifest$Standalone, - iarcRatingId: $elm$core$Maybe$Nothing, - icons: _List_fromArray( - [ - A2($author$project$Site$icon, $author$project$Site$webp, 192), - A2($author$project$Site$icon, $author$project$Site$webp, 512), - A2($author$project$Site$icon, $danyx23$elm_mimetype$MimeType$Png, 192), - A2($author$project$Site$icon, $danyx23$elm_mimetype$MimeType$Png, 512) - ]), - name: _static.siteName, - orientation: $author$project$Pages$Manifest$Portrait, - shortName: $elm$core$Maybe$Just('elm-pages'), - sourceIcon: $author$project$Pages$ImagePath$build( - _List_fromArray( - ['images', 'icon-png.png'])), - startUrl: $author$project$Pages$PagePath$build(_List_Nil), - themeColor: $elm$core$Maybe$Just($avh4$elm_color$Color$white) - }; -}; -var $author$project$Site$StaticData = function (siteName) { - return {siteName: siteName}; -}; -var $elm$core$Result$map = F2( - function (func, ra) { - if (ra.$ === 'Ok') { - var a = ra.a; - return $elm$core$Result$Ok( - func(a)); - } else { - var e = ra.a; - return $elm$core$Result$Err(e); - } - }); -var $author$project$Pages$StaticHttp$map = F2( - function (fn, requestInfo) { - if (requestInfo.$ === 'Request') { - var _v1 = requestInfo.a; - var urls = _v1.a; - var lookupFn = _v1.b; - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - urls, - F2( - function (appType, rawResponses) { - return A2( - $elm$core$Result$map, - function (_v2) { - var partiallyStripped = _v2.a; - var nextRequest = _v2.b; - return _Utils_Tuple2( - partiallyStripped, - A2($author$project$Pages$StaticHttp$map, fn, nextRequest)); - }, - A2(lookupFn, appType, rawResponses)); - }))); - } else { - var value = requestInfo.a; - return $author$project$Pages$StaticHttpRequest$Done( - fn(value)); - } - }); -var $author$project$Site$staticData = A2( - $author$project$Pages$StaticHttp$map, - $author$project$Site$StaticData, - $author$project$Pages$StaticHttp$succeed('site-name')); -var $author$project$Site$config = function (routes) { - return { - canonicalUrl: function (_v0) { - return $author$project$Site$canonicalUrl; - }, - generateFiles: $author$project$Site$generateFiles(routes), - head: $author$project$Site$head, - manifest: $author$project$Site$manifest, - staticData: $author$project$Site$staticData - }; -}; -var $author$project$TemplateModulesBeta$fromJsPort = _Platform_incomingPort('fromJsPort', $elm$json$Json$Decode$value); -var $author$project$Route$Slide__Number_ = function (a) { - return {$: 'Slide__Number_', a: a}; -}; -var $elm_community$dict_extra$Dict$Extra$insertDedupe = F4( - function (combine, key, value, dict) { - var _with = function (mbValue) { - if (mbValue.$ === 'Just') { - var oldValue = mbValue.a; - return $elm$core$Maybe$Just( - A2(combine, oldValue, value)); - } else { - return $elm$core$Maybe$Just(value); - } - }; - return A3($elm$core$Dict$update, key, _with, dict); - }); -var $elm_community$dict_extra$Dict$Extra$fromListDedupe = F2( - function (combine, xs) { - return A3( - $elm$core$List$foldl, - F2( - function (_v0, acc) { - var key = _v0.a; - var value = _v0.b; - return A4($elm_community$dict_extra$Dict$Extra$insertDedupe, combine, key, value, acc); - }), - $elm$core$Dict$empty, - xs); - }); -var $author$project$Pages$StaticHttp$combineReducedDicts = F2( - function (dict1, dict2) { - return A2( - $elm_community$dict_extra$Dict$Extra$fromListDedupe, - F2( - function (response1, response2) { - return (_Utils_cmp( - $elm$core$String$length(response1), - $elm$core$String$length(response2)) < 0) ? response1 : response2; - }), - _Utils_ap( - $elm$core$Dict$toList(dict1), - $elm$core$Dict$toList(dict2))); - }); -var $author$project$Pages$StaticHttp$map2 = F3( - function (fn, request1, request2) { - var _v0 = _Utils_Tuple2(request1, request2); - if (_v0.a.$ === 'Request') { - if (_v0.b.$ === 'Request') { - var _v1 = _v0.a.a; - var urls1 = _v1.a; - var lookupFn1 = _v1.b; - var _v2 = _v0.b.a; - var urls2 = _v2.a; - var lookupFn2 = _v2.b; - var value = F2( - function (appType, rawResponses) { - var _v3 = _Utils_Tuple2( - A2(lookupFn1, appType, rawResponses), - A2(lookupFn2, appType, rawResponses)); - if (_v3.a.$ === 'Ok') { - if (_v3.b.$ === 'Ok') { - var _v4 = _v3.a.a; - var newDict1 = _v4.a; - var newValue1 = _v4.b; - var _v5 = _v3.b.a; - var newDict2 = _v5.a; - var newValue2 = _v5.b; - return $elm$core$Result$Ok( - _Utils_Tuple2( - A2($author$project$Pages$StaticHttp$combineReducedDicts, newDict1, newDict2), - A3($author$project$Pages$StaticHttp$map2, fn, newValue1, newValue2))); - } else { - var error = _v3.b.a; - return $elm$core$Result$Err(error); - } - } else { - var error = _v3.a.a; - return $elm$core$Result$Err(error); - } - }); - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - _Utils_ap(urls1, urls2), - value)); - } else { - var _v6 = _v0.a.a; - var urls1 = _v6.a; - var lookupFn1 = _v6.b; - var value2 = _v0.b.a; - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - urls1, - F2( - function (appType, rawResponses) { - return A2( - $elm$core$Result$map, - function (_v7) { - var dict1 = _v7.a; - var value1 = _v7.b; - return _Utils_Tuple2( - dict1, - A3( - $author$project$Pages$StaticHttp$map2, - fn, - value1, - $author$project$Pages$StaticHttpRequest$Done(value2))); - }, - A2(lookupFn1, appType, rawResponses)); - }))); - } - } else { - if (_v0.b.$ === 'Request') { - var value2 = _v0.a.a; - var _v8 = _v0.b.a; - var urls1 = _v8.a; - var lookupFn1 = _v8.b; - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - urls1, - F2( - function (appType, rawResponses) { - return A2( - $elm$core$Result$map, - function (_v9) { - var dict1 = _v9.a; - var value1 = _v9.b; - return _Utils_Tuple2( - dict1, - A3( - $author$project$Pages$StaticHttp$map2, - fn, - $author$project$Pages$StaticHttpRequest$Done(value2), - value1)); - }, - A2(lookupFn1, appType, rawResponses)); - }))); - } else { - var value1 = _v0.a.a; - var value2 = _v0.b.a; - return $author$project$Pages$StaticHttpRequest$Done( - A2(fn, value1, value2)); - } - } - }); -var $author$project$Pages$StaticHttp$combine = A2( - $elm$core$List$foldl, - $author$project$Pages$StaticHttp$map2($elm$core$List$cons), - $author$project$Pages$StaticHttp$succeed(_List_Nil)); -var $author$project$Template$buildNoState = F2( - function (_v0, builderState) { - var view = _v0.view; - var record = builderState.a; - return { - head: record.head, - init: function (_v2) { - return _Utils_Tuple2(_Utils_Tuple0, $elm$core$Platform$Cmd$none); - }, - staticData: record.staticData, - staticRoutes: record.staticRoutes, - subscriptions: F4( - function (_v3, _v4, _v5, _v6) { - return $elm$core$Platform$Sub$none; - }), - update: F4( - function (_v7, _v8, _v9, _v10) { - return _Utils_Tuple3(_Utils_Tuple0, $elm$core$Platform$Cmd$none, $elm$core$Maybe$Nothing); - }), - view: F2( - function (_v11, _v12) { - return view; - }) - }; - }); -var $author$project$Head$Twitter$Regular = {$: 'Regular'}; -var $author$project$Head$Twitter$Summary = function (a) { - return {$: 'Summary', a: a}; -}; -var $author$project$Head$Seo$buildSummary = F2( - function (_v0, summarySize) { - var title = _v0.title; - var image = _v0.image; - var canonicalUrlOverride = _v0.canonicalUrlOverride; - var description = _v0.description; - var siteName = _v0.siteName; - var locale = _v0.locale; - return { - alternateLocales: _List_Nil, - audio: $elm$core$Maybe$Nothing, - canonicalUrlOverride: canonicalUrlOverride, - description: description, - image: image, - locale: locale, - siteName: siteName, - title: title, - twitterCard: $author$project$Head$Twitter$Summary( - { - description: $elm$core$Maybe$Just(description), - image: $elm$core$Maybe$Just( - {alt: image.alt, url: image.url}), - siteUser: $elm$core$Maybe$Nothing, - size: summarySize, - title: title - }), - video: $elm$core$Maybe$Nothing - }; - }); -var $author$project$Head$Seo$summary = function (config) { - return A2($author$project$Head$Seo$buildSummary, config, $author$project$Head$Twitter$Regular); -}; -var $author$project$Head$Seo$Content = F2( - function (a, b) { - return {$: 'Content', a: a, b: b}; - }); -var $author$project$Head$Seo$Website = {$: 'Website'}; -var $author$project$Head$FullUrlToCurrentPage = {$: 'FullUrlToCurrentPage'}; -var $author$project$Head$currentPageFullUrl = $author$project$Head$FullUrlToCurrentPage; -var $author$project$Head$FullUrl = function (a) { - return {$: 'FullUrl', a: a}; -}; -var $author$project$Pages$PagePath$toString = function (path) { - if (path.$ === 'Internal') { - var rawPath = path.a; - return A2($elm$core$String$join, '/', rawPath); - } else { - var url = path.a; - return url; - } -}; -var $author$project$Head$fullPageUrl = function (value) { - return $author$project$Head$FullUrl( - $author$project$Pages$PagePath$toString(value)); -}; -var $author$project$Head$canonicalLink = function (maybePath) { - return A2( - $author$project$Head$node, - 'link', - _List_fromArray( - [ - _Utils_Tuple2( - 'rel', - $author$project$Head$raw('canonical')), - _Utils_Tuple2( - 'href', - A2( - $elm$core$Maybe$withDefault, - $author$project$Head$currentPageFullUrl, - A2($elm$core$Maybe$map, $author$project$Head$fullPageUrl, maybePath))) - ])); -}; -var $author$project$Head$metaName = F2( - function (name, content) { - return A2( - $author$project$Head$node, - 'meta', - _List_fromArray( - [ - _Utils_Tuple2( - 'name', - $author$project$Head$Raw(name)), - _Utils_Tuple2('content', content) - ])); - }); -var $author$project$Head$metaProperty = F2( - function (property, content) { - return A2( - $author$project$Head$node, - 'meta', - _List_fromArray( - [ - _Utils_Tuple2( - 'property', - $author$project$Head$raw(property)), - _Utils_Tuple2('content', content) - ])); - }); -var $author$project$Head$Twitter$cardValue = function (card) { - switch (card.$) { - case 'Summary': - var details = card.a; - var _v1 = details.size; - if (_v1.$ === 'Regular') { - return 'summary'; - } else { - return 'summary_large_image'; - } - case 'App': - return 'app'; - default: - return 'player'; - } -}; -var $author$project$Head$Twitter$rawTags = function (card) { - return A2( - $elm$core$List$cons, - _Utils_Tuple2( - 'twitter:card', - $elm$core$Maybe$Just( - $author$project$Head$raw( - $author$project$Head$Twitter$cardValue(card)))), - function () { - switch (card.$) { - case 'Summary': - var details = card.a; - return _List_fromArray( - [ - _Utils_Tuple2( - 'twitter:title', - $elm$core$Maybe$Just( - $author$project$Head$raw(details.title))), - _Utils_Tuple2( - 'twitter:site', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.siteUser)), - _Utils_Tuple2( - 'twitter:description', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.description)), - _Utils_Tuple2( - 'twitter:image', - A2( - $elm$core$Maybe$map, - $author$project$Head$fullImageUrl, - A2( - $elm$core$Maybe$map, - function ($) { - return $.url; - }, - details.image))), - _Utils_Tuple2( - 'twitter:image:alt', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2( - $elm$core$Maybe$map, - function ($) { - return $.alt; - }, - details.image))) - ]); - case 'App': - var details = card.a; - return _List_fromArray( - [ - _Utils_Tuple2( - 'twitter:title', - $elm$core$Maybe$Just( - $author$project$Head$raw(details.title))), - _Utils_Tuple2( - 'twitter:site', - $elm$core$Maybe$Just( - $author$project$Head$raw(details.siteUser))), - _Utils_Tuple2( - 'twitter:description', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.description)), - _Utils_Tuple2( - 'twitter:image', - A2( - $elm$core$Maybe$map, - $author$project$Head$fullImageUrl, - A2( - $elm$core$Maybe$map, - function ($) { - return $.url; - }, - details.image))), - _Utils_Tuple2( - 'twitter:image:alt', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2( - $elm$core$Maybe$map, - function ($) { - return $.alt; - }, - details.image))), - _Utils_Tuple2( - 'twitter:app:name:iphone', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.appNameIphone)), - _Utils_Tuple2( - 'twitter:app:name:ipad', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.appNameIpad)), - _Utils_Tuple2( - 'twitter:app:name:googleplay', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.appNameGooglePlay)), - _Utils_Tuple2( - 'twitter:app:id:iphone', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2($elm$core$Maybe$map, $elm$core$String$fromInt, details.appIdIphone))), - _Utils_Tuple2( - 'twitter:app:id:ipad', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2($elm$core$Maybe$map, $elm$core$String$fromInt, details.appIdIpad))), - _Utils_Tuple2( - 'twitter:app:id:googleplay', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.appIdGooglePlay)), - _Utils_Tuple2( - 'twitter:app:url:iphone', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.appUrlIphone)), - _Utils_Tuple2( - 'twitter:app:url:ipad', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.appUrlIpad)), - _Utils_Tuple2( - 'twitter:app:url:googleplay', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.appUrlGooglePlay)), - _Utils_Tuple2( - 'twitter:app:country', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.appCountry)) - ]); - default: - var details = card.a; - return _List_fromArray( - [ - _Utils_Tuple2( - 'twitter:title', - $elm$core$Maybe$Just( - $author$project$Head$raw(details.title))), - _Utils_Tuple2( - 'twitter:site', - $elm$core$Maybe$Just( - $author$project$Head$raw(details.siteUser))), - _Utils_Tuple2( - 'twitter:description', - A2($elm$core$Maybe$map, $author$project$Head$raw, details.description)), - _Utils_Tuple2( - 'twitter:image', - $elm$core$Maybe$Just( - $author$project$Head$fullImageUrl(details.image.url))), - _Utils_Tuple2( - 'twitter:image:alt', - $elm$core$Maybe$Just( - $author$project$Head$raw(details.image.alt))) - ]); - } - }()); -}; -var $author$project$Head$Seo$tagsForAudio = function (audio) { - return _List_fromArray( - [ - _Utils_Tuple2( - 'og:audio', - $elm$core$Maybe$Just( - $author$project$Head$raw(audio.url))), - _Utils_Tuple2( - 'og:audio:secure_url', - $elm$core$Maybe$Just( - $author$project$Head$raw(audio.url))), - _Utils_Tuple2( - 'og:audio:type', - A2($elm$core$Maybe$map, $author$project$Head$raw, audio.mimeType)) - ]); -}; -var $author$project$Head$Seo$tagsForImage = function (image) { - return _List_fromArray( - [ - _Utils_Tuple2( - 'og:image', - $elm$core$Maybe$Just( - $author$project$Head$fullImageUrl(image.url))), - _Utils_Tuple2( - 'og:image:secure_url', - $elm$core$Maybe$Just( - $author$project$Head$fullImageUrl(image.url))), - _Utils_Tuple2( - 'og:image:alt', - $elm$core$Maybe$Just( - $author$project$Head$raw(image.alt))), - _Utils_Tuple2( - 'og:image:width', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2( - $elm$core$Maybe$map, - $elm$core$String$fromInt, - A2( - $elm$core$Maybe$map, - function ($) { - return $.width; - }, - image.dimensions)))), - _Utils_Tuple2( - 'og:image:height', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2( - $elm$core$Maybe$map, - $elm$core$String$fromInt, - A2( - $elm$core$Maybe$map, - function ($) { - return $.height; - }, - image.dimensions)))) - ]); -}; -var $author$project$Head$Seo$tagsForVideo = function (video) { - return _List_fromArray( - [ - _Utils_Tuple2( - 'og:video', - $elm$core$Maybe$Just( - $author$project$Head$raw(video.url))), - _Utils_Tuple2( - 'og:video:secure_url', - $elm$core$Maybe$Just( - $author$project$Head$raw(video.url))), - _Utils_Tuple2( - 'og:video:width', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2( - $elm$core$Maybe$map, - $elm$core$String$fromInt, - A2( - $elm$core$Maybe$map, - function ($) { - return $.width; - }, - video.dimensions)))), - _Utils_Tuple2( - 'og:video:height', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2( - $elm$core$Maybe$map, - $elm$core$String$fromInt, - A2( - $elm$core$Maybe$map, - function ($) { - return $.height; - }, - video.dimensions)))) - ]); -}; -var $author$project$Head$Seo$tagsForCommon = function (common) { - return _Utils_ap( - $author$project$Head$Seo$tagsForImage(common.image), - _Utils_ap( - A2( - $elm$core$Maybe$withDefault, - _List_Nil, - A2($elm$core$Maybe$map, $author$project$Head$Seo$tagsForAudio, common.audio)), - _Utils_ap( - A2( - $elm$core$Maybe$withDefault, - _List_Nil, - A2($elm$core$Maybe$map, $author$project$Head$Seo$tagsForVideo, common.video)), - _Utils_ap( - _List_fromArray( - [ - _Utils_Tuple2( - 'og:title', - $elm$core$Maybe$Just( - $author$project$Head$raw(common.title))), - _Utils_Tuple2( - 'og:url', - $elm$core$Maybe$Just( - A2( - $elm$core$Maybe$withDefault, - $author$project$Head$currentPageFullUrl, - A2($elm$core$Maybe$map, $author$project$Head$fullPageUrl, common.canonicalUrlOverride)))), - _Utils_Tuple2( - 'og:description', - $elm$core$Maybe$Just( - $author$project$Head$raw(common.description))), - _Utils_Tuple2( - 'og:site_name', - $elm$core$Maybe$Just( - $author$project$Head$raw(common.siteName))), - _Utils_Tuple2( - 'og:locale', - A2($elm$core$Maybe$map, $author$project$Head$raw, common.locale)) - ]), - _Utils_ap( - A2( - $elm$core$List$map, - function (alternateLocale) { - return _Utils_Tuple2( - 'og:locale:alternate', - $elm$core$Maybe$Just( - $author$project$Head$raw(alternateLocale))); - }, - common.alternateLocales), - $author$project$Head$Twitter$rawTags(common.twitterCard)))))); -}; -var $author$project$Head$Seo$tags = function (_v0) { - var common = _v0.a; - var details = _v0.b; - return A2( - $elm$core$List$append, - _List_fromArray( - [ - $author$project$Head$canonicalLink(common.canonicalUrlOverride), - A2( - $author$project$Head$metaName, - 'description', - $author$project$Head$raw(common.description)) - ]), - A2( - $elm$core$List$filterMap, - function (_v2) { - var name = _v2.a; - var maybeContent = _v2.b; - return A2( - $elm$core$Maybe$map, - function (metaContent) { - return A2($author$project$Head$metaProperty, name, metaContent); - }, - maybeContent); - }, - _Utils_ap( - $author$project$Head$Seo$tagsForCommon(common), - function () { - switch (details.$) { - case 'Website': - return _List_fromArray( - [ - _Utils_Tuple2( - 'og:type', - $elm$core$Maybe$Just( - $author$project$Head$raw('website'))) - ]); - case 'Article': - var articleDetails = details.a; - return _Utils_ap( - _List_fromArray( - [ - _Utils_Tuple2( - 'og:type', - $elm$core$Maybe$Just( - $author$project$Head$raw('article'))), - _Utils_Tuple2( - 'article:section', - A2($elm$core$Maybe$map, $author$project$Head$raw, articleDetails.section)), - _Utils_Tuple2( - 'article:published_time', - A2($elm$core$Maybe$map, $author$project$Head$raw, articleDetails.publishedTime)), - _Utils_Tuple2( - 'article:modified_time', - A2($elm$core$Maybe$map, $author$project$Head$raw, articleDetails.modifiedTime)), - _Utils_Tuple2( - 'article:expiration_time', - A2($elm$core$Maybe$map, $author$project$Head$raw, articleDetails.expirationTime)) - ]), - A2( - $elm$core$List$map, - function (tag) { - return _Utils_Tuple2( - 'article:tag', - $elm$core$Maybe$Just( - $author$project$Head$raw(tag))); - }, - articleDetails.tags)); - case 'Book': - var bookDetails = details.a; - return _Utils_ap( - _List_fromArray( - [ - _Utils_Tuple2( - 'og:type', - $elm$core$Maybe$Just( - $author$project$Head$raw('book'))), - _Utils_Tuple2( - 'og:isbn', - A2($elm$core$Maybe$map, $author$project$Head$raw, bookDetails.isbn)), - _Utils_Tuple2( - 'og:release_date', - A2($elm$core$Maybe$map, $author$project$Head$raw, bookDetails.releaseDate)) - ]), - A2( - $elm$core$List$map, - function (tag) { - return _Utils_Tuple2( - 'book:tag', - $elm$core$Maybe$Just( - $author$project$Head$raw(tag))); - }, - bookDetails.tags)); - case 'Song': - var songDetails = details.a; - return _List_fromArray( - [ - _Utils_Tuple2( - 'og:type', - $elm$core$Maybe$Just( - $author$project$Head$raw('music.song'))), - _Utils_Tuple2( - 'music:duration', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2($elm$core$Maybe$map, $elm$core$String$fromInt, songDetails.duration))), - _Utils_Tuple2( - 'music:album:disc', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2($elm$core$Maybe$map, $elm$core$String$fromInt, songDetails.disc))), - _Utils_Tuple2( - 'music:album:track', - A2( - $elm$core$Maybe$map, - $author$project$Head$raw, - A2($elm$core$Maybe$map, $elm$core$String$fromInt, songDetails.track))) - ]); - default: - var profileDetails = details.a; - return _List_fromArray( - [ - _Utils_Tuple2( - 'og:type', - $elm$core$Maybe$Just( - $author$project$Head$raw('profile'))), - _Utils_Tuple2( - 'profile:first_name', - $elm$core$Maybe$Just( - $author$project$Head$raw(profileDetails.firstName))), - _Utils_Tuple2( - 'profile:last_name', - $elm$core$Maybe$Just( - $author$project$Head$raw(profileDetails.lastName))), - _Utils_Tuple2( - 'profile:username', - A2($elm$core$Maybe$map, $author$project$Head$raw, profileDetails.username)) - ]); - } - }()))); -}; -var $author$project$Head$Seo$website = function (common) { - return $author$project$Head$Seo$tags( - A2($author$project$Head$Seo$Content, common, $author$project$Head$Seo$Website)); -}; -var $author$project$Template$Slide$Number_$head = function (_static) { - return $author$project$Head$Seo$website( - $author$project$Head$Seo$summary( - { - canonicalUrlOverride: $elm$core$Maybe$Nothing, - description: 'TODO', - image: { - alt: 'elm-pages logo', - dimensions: $elm$core$Maybe$Nothing, - mimeType: $elm$core$Maybe$Nothing, - url: $author$project$Pages$ImagePath$build( - _List_fromArray( - ['TODO'])) - }, - locale: $elm$core$Maybe$Nothing, - siteName: 'elm-pages', - title: 'TODO title' - })); -}; -var $author$project$Internal$OptimizedDecoder$OptimizedDecoder = F2( - function (a, b) { - return {$: 'OptimizedDecoder', a: a, b: b}; - }); -var $elm$json$Json$Decode$andThen = _Json_andThen; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Decoder = function (a) { - return {$: 'Decoder', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$andThen = F2( - function (toDecoderB, _v0) { - var decoderFnA = _v0.a; - return $zwilias$json_decode_exploration$Json$Decode$Exploration$Decoder( - function (json) { - var _v1 = decoderFnA(json); - if (_v1.b.$ === 'Ok') { - var annVal = _v1.a; - var accA = _v1.b.a; - var _v2 = toDecoderB(accA.value); - var decoderFnB = _v2.a; - var _v3 = decoderFnB(annVal); - var annValB = _v3.a; - var res = _v3.b; - return _Utils_Tuple2( - annValB, - A2( - $elm$core$Result$map, - function (accB) { - return _Utils_update( - accB, - { - warnings: _Utils_ap(accA.warnings, accB.warnings) - }); - }, - res)); - } else { - var annVal = _v1.a; - var e = _v1.b.a; - return _Utils_Tuple2( - annVal, - $elm$core$Result$Err(e)); - } - }); - }); -var $author$project$Internal$OptimizedDecoder$jd = function (_v0) { - var jd_ = _v0.a; - var jde_ = _v0.b; - return jd_; -}; -var $author$project$Internal$OptimizedDecoder$jde = function (_v0) { - var jd_ = _v0.a; - var jde_ = _v0.b; - return jde_; -}; -var $author$project$OptimizedDecoder$andThen = F2( - function (toDecoderB, _v0) { - var jd = _v0.a; - var jde = _v0.b; - return A2( - $author$project$Internal$OptimizedDecoder$OptimizedDecoder, - A2( - $elm$json$Json$Decode$andThen, - A2($elm$core$Basics$composeR, toDecoderB, $author$project$Internal$OptimizedDecoder$jd), - jd), - A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$andThen, - A2($elm$core$Basics$composeR, toDecoderB, $author$project$Internal$OptimizedDecoder$jde), - jde)); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$InField = F2( - function (a, b) { - return {$: 'InField', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Object = F2( - function (a, b) { - return {$: 'Object', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$TObject = {$: 'TObject'}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$TObjectField = function (a) { - return {$: 'TObjectField', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Expected = F2( - function (a, b) { - return {$: 'Expected', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here = function (a) { - return {$: 'Here', a: a}; -}; -var $elm$json$Json$Encode$bool = _Json_wrap; -var $elm$json$Json$Encode$float = _Json_wrap; -var $elm$json$Json$Encode$null = _Json_encodeNull; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$encode = function (v) { - switch (v.$) { - case 'String': - var val = v.b; - return $elm$json$Json$Encode$string(val); - case 'Number': - var val = v.b; - return $elm$json$Json$Encode$float(val); - case 'Bool': - var val = v.b; - return $elm$json$Json$Encode$bool(val); - case 'Null': - return $elm$json$Json$Encode$null; - case 'Array': - var values = v.b; - return A2( - $elm$json$Json$Encode$list, - A2($elm$core$Basics$composeR, $elm$core$Tuple$second, $zwilias$json_decode_exploration$Json$Decode$Exploration$encode), - values); - default: - var kvPairs = v.b; - return $elm$json$Json$Encode$object( - A2( - $elm$core$List$map, - function (_v1) { - var k = _v1.b; - var v_ = _v1.c; - return _Utils_Tuple2( - k, - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(v_)); - }, - kvPairs)); - } -}; -var $mgold$elm_nonempty_list$List$Nonempty$Nonempty = F2( - function (a, b) { - return {$: 'Nonempty', a: a, b: b}; - }); -var $mgold$elm_nonempty_list$List$Nonempty$fromElement = function (x) { - return A2($mgold$elm_nonempty_list$List$Nonempty$Nonempty, x, _List_Nil); -}; -var $elm$core$Tuple$pair = F2( - function (a, b) { - return _Utils_Tuple2(a, b); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$expected = F2( - function (expectedType, json) { - return A2( - $elm$core$Tuple$pair, - json, - $elm$core$Result$Err( - $mgold$elm_nonempty_list$List$Nonempty$fromElement( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Expected, - expectedType, - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(json)))))); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$field = F2( - function (fieldName, _v0) { - var decoderFn = _v0.a; - var finalize = function (_v6) { - var values = _v6.a; - var warnings = _v6.b; - var res = _v6.c; - if (res.$ === 'Nothing') { - return A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$expected, - $zwilias$json_decode_exploration$Json$Decode$Exploration$TObjectField(fieldName), - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Object, true, values)); - } else { - if (res.a.$ === 'Err') { - var e = res.a.a; - return _Utils_Tuple2( - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Object, true, values), - $elm$core$Result$Err(e)); - } else { - var v = res.a.a; - return _Utils_Tuple2( - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Object, true, values), - $elm$core$Result$Ok( - {value: v, warnings: warnings})); - } - } - }; - var accumulate = F2( - function (_v3, _v4) { - var used = _v3.a; - var key = _v3.b; - var val = _v3.c; - var acc = _v4.a; - var warnings = _v4.b; - var result = _v4.c; - if (_Utils_eq(key, fieldName)) { - var _v2 = decoderFn(val); - if (_v2.b.$ === 'Err') { - var annVal = _v2.a; - var e = _v2.b.a; - return _Utils_Tuple3( - A2( - $elm$core$List$cons, - _Utils_Tuple3(true, key, annVal), - acc), - warnings, - $elm$core$Maybe$Just( - $elm$core$Result$Err( - $mgold$elm_nonempty_list$List$Nonempty$fromElement( - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Located$InField, key, e))))); - } else { - var annVal = _v2.a; - var res = _v2.b.a; - return _Utils_Tuple3( - A2( - $elm$core$List$cons, - _Utils_Tuple3(true, key, annVal), - acc), - _Utils_ap( - A2( - $elm$core$List$map, - A2( - $elm$core$Basics$composeR, - $mgold$elm_nonempty_list$List$Nonempty$fromElement, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$InField(key)), - res.warnings), - warnings), - $elm$core$Maybe$Just( - $elm$core$Result$Ok(res.value))); - } - } else { - return _Utils_Tuple3( - A2( - $elm$core$List$cons, - _Utils_Tuple3(used, key, val), - acc), - warnings, - result); - } - }); - return $zwilias$json_decode_exploration$Json$Decode$Exploration$Decoder( - function (json) { - if (json.$ === 'Object') { - var kvPairs = json.b; - return finalize( - A3( - $elm$core$List$foldr, - accumulate, - _Utils_Tuple3(_List_Nil, _List_Nil, $elm$core$Maybe$Nothing), - kvPairs)); - } else { - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$expected, $zwilias$json_decode_exploration$Json$Decode$Exploration$TObject, json); - } - }); - }); -var $author$project$OptimizedDecoder$field = F2( - function (fieldName, _v0) { - var jd = _v0.a; - var jde = _v0.b; - return A2( - $author$project$Internal$OptimizedDecoder$OptimizedDecoder, - A2($elm$json$Json$Decode$field, fieldName, jd), - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$field, fieldName, jde)); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$TString = {$: 'TString'}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Array = F2( - function (a, b) { - return {$: 'Array', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Bool = F2( - function (a, b) { - return {$: 'Bool', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Null = function (a) { - return {$: 'Null', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Number = F2( - function (a, b) { - return {$: 'Number', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$String = F2( - function (a, b) { - return {$: 'String', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$markUsed = function (annotatedValue) { - switch (annotatedValue.$) { - case 'String': - var val = annotatedValue.b; - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$String, true, val); - case 'Number': - var val = annotatedValue.b; - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Number, true, val); - case 'Bool': - var val = annotatedValue.b; - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Bool, true, val); - case 'Null': - return $zwilias$json_decode_exploration$Json$Decode$Exploration$Null(true); - case 'Array': - var values = annotatedValue.b; - return A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Array, - true, - A2( - $elm$core$List$map, - function (_v1) { - var v = _v1.b; - return _Utils_Tuple2( - true, - $zwilias$json_decode_exploration$Json$Decode$Exploration$markUsed(v)); - }, - values)); - default: - var values = annotatedValue.b; - return A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Object, - true, - A2( - $elm$core$List$map, - function (_v2) { - var f = _v2.b; - var v = _v2.c; - return _Utils_Tuple3( - true, - f, - $zwilias$json_decode_exploration$Json$Decode$Exploration$markUsed(v)); - }, - values)); - } -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$ok = F2( - function (json, val) { - return _Utils_Tuple2( - json, - $elm$core$Result$Ok( - {value: val, warnings: _List_Nil})); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$string = $zwilias$json_decode_exploration$Json$Decode$Exploration$Decoder( - function (json) { - if (json.$ === 'String') { - var val = json.b; - return A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$ok, - $zwilias$json_decode_exploration$Json$Decode$Exploration$markUsed(json), - val); - } else { - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$expected, $zwilias$json_decode_exploration$Json$Decode$Exploration$TString, json); - } - }); -var $author$project$OptimizedDecoder$string = A2($author$project$Internal$OptimizedDecoder$OptimizedDecoder, $elm$json$Json$Decode$string, $zwilias$json_decode_exploration$Json$Decode$Exploration$string); -var $author$project$Pages$StaticFile$body = A2($author$project$OptimizedDecoder$field, 'withoutFrontmatter', $author$project$OptimizedDecoder$string); -var $elm$json$Json$Decode$fail = _Json_fail; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Failure = F2( - function (a, b) { - return {$: 'Failure', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$fail = function (message) { - return $zwilias$json_decode_exploration$Json$Decode$Exploration$Decoder( - function (json) { - return A2( - $elm$core$Tuple$pair, - json, - $elm$core$Result$Err( - $mgold$elm_nonempty_list$List$Nonempty$fromElement( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Failure, - message, - $elm$core$Maybe$Just( - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(json))))))); - }); -}; -var $author$project$OptimizedDecoder$fail = function (message) { - return A2( - $author$project$Internal$OptimizedDecoder$OptimizedDecoder, - $elm$json$Json$Decode$fail(message), - $zwilias$json_decode_exploration$Json$Decode$Exploration$fail(message)); -}; -var $dillonkearns$elm_markdown$Markdown$Block$foldl = F3( - function (_function, acc, list) { - foldl: - while (true) { - if (!list.b) { - return acc; - } else { - var block = list.a; - var remainingBlocks = list.b; - switch (block.$) { - case 'HtmlBlock': - var html = block.a; - if (html.$ === 'HtmlElement') { - var children = html.c; - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = _Utils_ap(children, remainingBlocks); - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - } else { - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = remainingBlocks; - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - } - case 'UnorderedList': - var listItems = block.a; - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = remainingBlocks; - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - case 'OrderedList': - var _int = block.a; - var lists = block.b; - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = remainingBlocks; - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - case 'BlockQuote': - var blocks = block.a; - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = _Utils_ap(blocks, remainingBlocks); - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - case 'Heading': - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = remainingBlocks; - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - case 'Paragraph': - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = remainingBlocks; - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - case 'Table': - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = remainingBlocks; - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - case 'CodeBlock': - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = remainingBlocks; - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - default: - var $temp$function = _function, - $temp$acc = A2(_function, block, acc), - $temp$list = remainingBlocks; - _function = $temp$function; - acc = $temp$acc; - list = $temp$list; - continue foldl; - } - } - } - }); -var $author$project$Template$Slide$Number_$markdownIndexedByHeading = F2( - function (index, markdownBlocks) { - return $elm$core$List$reverse( - A3( - $dillonkearns$elm_markdown$Markdown$Block$foldl, - F2( - function (block, _v0) { - var currentIndex = _v0.a; - var markdownToKeep = _v0.b; - if ((block.$ === 'Heading') && (block.a.$ === 'H2')) { - var _v2 = block.a; - var newIndex = currentIndex + 1; - return _Utils_eq(newIndex, index) ? _Utils_Tuple2( - newIndex, - A2($elm$core$List$cons, block, markdownToKeep)) : _Utils_Tuple2(newIndex, markdownToKeep); - } else { - return _Utils_eq(currentIndex, index) ? _Utils_Tuple2( - currentIndex, - A2($elm$core$List$cons, block, markdownToKeep)) : _Utils_Tuple2(currentIndex, markdownToKeep); - } - }), - _Utils_Tuple2(0, _List_Nil), - markdownBlocks).b); - }); -var $dillonkearns$elm_markdown$Markdown$Block$BlockQuote = function (a) { - return {$: 'BlockQuote', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$RawBlock$BlockQuote = function (a) { - return {$: 'BlockQuote', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$RawBlock$Body = function (a) { - return {$: 'Body', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$Cdata = function (a) { - return {$: 'Cdata', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$CodeBlock = function (a) { - return {$: 'CodeBlock', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$RawBlock$CodeBlock = function (a) { - return {$: 'CodeBlock', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$CodeSpan = function (a) { - return {$: 'CodeSpan', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$CompletedTask = {$: 'CompletedTask'}; -var $elm$parser$Parser$Advanced$Done = function (a) { - return {$: 'Done', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$Emphasis = function (a) { - return {$: 'Emphasis', a: a}; -}; -var $elm$parser$Parser$Expecting = function (a) { - return {$: 'Expecting', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$HardLineBreak = {$: 'HardLineBreak'}; -var $dillonkearns$elm_markdown$Markdown$Block$Heading = F2( - function (a, b) { - return {$: 'Heading', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$Markdown$RawBlock$Html = function (a) { - return {$: 'Html', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$HtmlBlock = function (a) { - return {$: 'HtmlBlock', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$HtmlComment = function (a) { - return {$: 'HtmlComment', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$HtmlDeclaration = F2( - function (a, b) { - return {$: 'HtmlDeclaration', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$Markdown$Block$HtmlElement = F3( - function (a, b, c) { - return {$: 'HtmlElement', a: a, b: b, c: c}; - }); -var $dillonkearns$elm_markdown$Markdown$Block$HtmlInline = function (a) { - return {$: 'HtmlInline', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$Image = F3( - function (a, b, c) { - return {$: 'Image', a: a, b: b, c: c}; - }); -var $dillonkearns$elm_markdown$Markdown$Block$IncompleteTask = {$: 'IncompleteTask'}; -var $dillonkearns$elm_markdown$Markdown$RawBlock$IndentedCodeBlock = function (a) { - return {$: 'IndentedCodeBlock', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$Link = F3( - function (a, b, c) { - return {$: 'Link', a: a, b: b, c: c}; - }); -var $dillonkearns$elm_markdown$Markdown$Block$ListItem = F2( - function (a, b) { - return {$: 'ListItem', a: a, b: b}; - }); -var $elm$parser$Parser$Advanced$Loop = function (a) { - return {$: 'Loop', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$NoTask = {$: 'NoTask'}; -var $dillonkearns$elm_markdown$Markdown$Block$OrderedList = F2( - function (a, b) { - return {$: 'OrderedList', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$Markdown$Block$Paragraph = function (a) { - return {$: 'Paragraph', a: a}; -}; -var $elm$parser$Parser$Problem = function (a) { - return {$: 'Problem', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$ProcessingInstruction = function (a) { - return {$: 'ProcessingInstruction', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$Strong = function (a) { - return {$: 'Strong', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$Table = F2( - function (a, b) { - return {$: 'Table', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$Markdown$Block$Text = function (a) { - return {$: 'Text', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Block$ThematicBreak = {$: 'ThematicBreak'}; -var $dillonkearns$elm_markdown$Markdown$RawBlock$ThematicBreak = {$: 'ThematicBreak'}; -var $dillonkearns$elm_markdown$Markdown$Block$UnorderedList = function (a) { - return {$: 'UnorderedList', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines = function (a) { - return {$: 'UnparsedInlines', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Parser$addReference = F2( - function (state, linkRef) { - return _Utils_update( - state, - { - linkReferenceDefinitions: A2($elm$core$List$cons, linkRef, state.linkReferenceDefinitions) - }); - }); -var $elm$parser$Parser$Advanced$Bad = F2( - function (a, b) { - return {$: 'Bad', a: a, b: b}; - }); -var $elm$parser$Parser$Advanced$Good = F3( - function (a, b, c) { - return {$: 'Good', a: a, b: b, c: c}; - }); -var $elm$parser$Parser$Advanced$Parser = function (a) { - return {$: 'Parser', a: a}; -}; -var $elm$parser$Parser$Advanced$andThen = F2( - function (callback, _v0) { - var parseA = _v0.a; - return $elm$parser$Parser$Advanced$Parser( - function (s0) { - var _v1 = parseA(s0); - if (_v1.$ === 'Bad') { - var p = _v1.a; - var x = _v1.b; - return A2($elm$parser$Parser$Advanced$Bad, p, x); - } else { - var p1 = _v1.a; - var a = _v1.b; - var s1 = _v1.c; - var _v2 = callback(a); - var parseB = _v2.a; - var _v3 = parseB(s1); - if (_v3.$ === 'Bad') { - var p2 = _v3.a; - var x = _v3.b; - return A2($elm$parser$Parser$Advanced$Bad, p1 || p2, x); - } else { - var p2 = _v3.a; - var b = _v3.b; - var s2 = _v3.c; - return A3($elm$parser$Parser$Advanced$Good, p1 || p2, b, s2); - } - } - }); - }); -var $elm$parser$Parser$Advanced$backtrackable = function (_v0) { - var parse = _v0.a; - return $elm$parser$Parser$Advanced$Parser( - function (s0) { - var _v1 = parse(s0); - if (_v1.$ === 'Bad') { - var x = _v1.b; - return A2($elm$parser$Parser$Advanced$Bad, false, x); - } else { - var a = _v1.b; - var s1 = _v1.c; - return A3($elm$parser$Parser$Advanced$Good, false, a, s1); - } - }); -}; -var $dillonkearns$elm_markdown$Markdown$RawBlock$BlankLine = {$: 'BlankLine'}; -var $elm$parser$Parser$Advanced$Token = F2( - function (a, b) { - return {$: 'Token', a: a, b: b}; - }); -var $elm$parser$Parser$Advanced$isSubChar = _Parser_isSubChar; -var $elm$parser$Parser$Advanced$chompWhileHelp = F5( - function (isGood, offset, row, col, s0) { - chompWhileHelp: - while (true) { - var newOffset = A3($elm$parser$Parser$Advanced$isSubChar, isGood, offset, s0.src); - if (_Utils_eq(newOffset, -1)) { - return A3( - $elm$parser$Parser$Advanced$Good, - _Utils_cmp(s0.offset, offset) < 0, - _Utils_Tuple0, - {col: col, context: s0.context, indent: s0.indent, offset: offset, row: row, src: s0.src}); - } else { - if (_Utils_eq(newOffset, -2)) { - var $temp$isGood = isGood, - $temp$offset = offset + 1, - $temp$row = row + 1, - $temp$col = 1, - $temp$s0 = s0; - isGood = $temp$isGood; - offset = $temp$offset; - row = $temp$row; - col = $temp$col; - s0 = $temp$s0; - continue chompWhileHelp; - } else { - var $temp$isGood = isGood, - $temp$offset = newOffset, - $temp$row = row, - $temp$col = col + 1, - $temp$s0 = s0; - isGood = $temp$isGood; - offset = $temp$offset; - row = $temp$row; - col = $temp$col; - s0 = $temp$s0; - continue chompWhileHelp; - } - } - } - }); -var $elm$parser$Parser$Advanced$chompWhile = function (isGood) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - return A5($elm$parser$Parser$Advanced$chompWhileHelp, isGood, s.offset, s.row, s.col, s); - }); -}; -var $elm$parser$Parser$Advanced$map2 = F3( - function (func, _v0, _v1) { - var parseA = _v0.a; - var parseB = _v1.a; - return $elm$parser$Parser$Advanced$Parser( - function (s0) { - var _v2 = parseA(s0); - if (_v2.$ === 'Bad') { - var p = _v2.a; - var x = _v2.b; - return A2($elm$parser$Parser$Advanced$Bad, p, x); - } else { - var p1 = _v2.a; - var a = _v2.b; - var s1 = _v2.c; - var _v3 = parseB(s1); - if (_v3.$ === 'Bad') { - var p2 = _v3.a; - var x = _v3.b; - return A2($elm$parser$Parser$Advanced$Bad, p1 || p2, x); - } else { - var p2 = _v3.a; - var b = _v3.b; - var s2 = _v3.c; - return A3( - $elm$parser$Parser$Advanced$Good, - p1 || p2, - A2(func, a, b), - s2); - } - } - }); - }); -var $elm$parser$Parser$Advanced$ignorer = F2( - function (keepParser, ignoreParser) { - return A3($elm$parser$Parser$Advanced$map2, $elm$core$Basics$always, keepParser, ignoreParser); - }); -var $dillonkearns$elm_markdown$Helpers$isSpaceOrTab = function (c) { - switch (c.valueOf()) { - case ' ': - return true; - case '\t': - return true; - default: - return false; - } -}; -var $elm$parser$Parser$Advanced$map = F2( - function (func, _v0) { - var parse = _v0.a; - return $elm$parser$Parser$Advanced$Parser( - function (s0) { - var _v1 = parse(s0); - if (_v1.$ === 'Good') { - var p = _v1.a; - var a = _v1.b; - var s1 = _v1.c; - return A3( - $elm$parser$Parser$Advanced$Good, - p, - func(a), - s1); - } else { - var p = _v1.a; - var x = _v1.b; - return A2($elm$parser$Parser$Advanced$Bad, p, x); - } - }); - }); -var $elm$parser$Parser$Advanced$AddRight = F2( - function (a, b) { - return {$: 'AddRight', a: a, b: b}; - }); -var $elm$parser$Parser$Advanced$DeadEnd = F4( - function (row, col, problem, contextStack) { - return {col: col, contextStack: contextStack, problem: problem, row: row}; - }); -var $elm$parser$Parser$Advanced$Empty = {$: 'Empty'}; -var $elm$parser$Parser$Advanced$fromState = F2( - function (s, x) { - return A2( - $elm$parser$Parser$Advanced$AddRight, - $elm$parser$Parser$Advanced$Empty, - A4($elm$parser$Parser$Advanced$DeadEnd, s.row, s.col, x, s.context)); - }); -var $elm$parser$Parser$Advanced$isSubString = _Parser_isSubString; -var $elm$parser$Parser$Advanced$token = function (_v0) { - var str = _v0.a; - var expecting = _v0.b; - var progress = !$elm$core$String$isEmpty(str); - return $elm$parser$Parser$Advanced$Parser( - function (s) { - var _v1 = A5($elm$parser$Parser$Advanced$isSubString, str, s.offset, s.row, s.col, s.src); - var newOffset = _v1.a; - var newRow = _v1.b; - var newCol = _v1.c; - return _Utils_eq(newOffset, -1) ? A2( - $elm$parser$Parser$Advanced$Bad, - false, - A2($elm$parser$Parser$Advanced$fromState, s, expecting)) : A3( - $elm$parser$Parser$Advanced$Good, - progress, - _Utils_Tuple0, - {col: newCol, context: s.context, indent: s.indent, offset: newOffset, row: newRow, src: s.src}); - }); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$blankLine = A2( - $elm$parser$Parser$Advanced$map, - function (_v0) { - return $dillonkearns$elm_markdown$Markdown$RawBlock$BlankLine; - }, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$backtrackable( - $elm$parser$Parser$Advanced$chompWhile( - function (c) { - return $dillonkearns$elm_markdown$Helpers$isSpaceOrTab(c); - })), - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$Expecting('\\n'))))); -var $elm$parser$Parser$Advanced$chompIf = F2( - function (isGood, expecting) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - var newOffset = A3($elm$parser$Parser$Advanced$isSubChar, isGood, s.offset, s.src); - return _Utils_eq(newOffset, -1) ? A2( - $elm$parser$Parser$Advanced$Bad, - false, - A2($elm$parser$Parser$Advanced$fromState, s, expecting)) : (_Utils_eq(newOffset, -2) ? A3( - $elm$parser$Parser$Advanced$Good, - true, - _Utils_Tuple0, - {col: 1, context: s.context, indent: s.indent, offset: s.offset + 1, row: s.row + 1, src: s.src}) : A3( - $elm$parser$Parser$Advanced$Good, - true, - _Utils_Tuple0, - {col: s.col + 1, context: s.context, indent: s.indent, offset: newOffset, row: s.row, src: s.src})); - }); - }); -var $elm$parser$Parser$Advanced$chompUntilEndOr = function (str) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - var _v0 = A5(_Parser_findSubString, str, s.offset, s.row, s.col, s.src); - var newOffset = _v0.a; - var newRow = _v0.b; - var newCol = _v0.c; - var adjustedOffset = (newOffset < 0) ? $elm$core$String$length(s.src) : newOffset; - return A3( - $elm$parser$Parser$Advanced$Good, - _Utils_cmp(s.offset, adjustedOffset) < 0, - _Utils_Tuple0, - {col: newCol, context: s.context, indent: s.indent, offset: adjustedOffset, row: newRow, src: s.src}); - }); -}; -var $elm$parser$Parser$Advanced$end = function (x) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - return _Utils_eq( - $elm$core$String$length(s.src), - s.offset) ? A3($elm$parser$Parser$Advanced$Good, false, _Utils_Tuple0, s) : A2( - $elm$parser$Parser$Advanced$Bad, - false, - A2($elm$parser$Parser$Advanced$fromState, s, x)); - }); -}; -var $elm$parser$Parser$Advanced$mapChompedString = F2( - function (func, _v0) { - var parse = _v0.a; - return $elm$parser$Parser$Advanced$Parser( - function (s0) { - var _v1 = parse(s0); - if (_v1.$ === 'Bad') { - var p = _v1.a; - var x = _v1.b; - return A2($elm$parser$Parser$Advanced$Bad, p, x); - } else { - var p = _v1.a; - var a = _v1.b; - var s1 = _v1.c; - return A3( - $elm$parser$Parser$Advanced$Good, - p, - A2( - func, - A3($elm$core$String$slice, s0.offset, s1.offset, s0.src), - a), - s1); - } - }); - }); -var $elm$parser$Parser$Advanced$getChompedString = function (parser) { - return A2($elm$parser$Parser$Advanced$mapChompedString, $elm$core$Basics$always, parser); -}; -var $dillonkearns$elm_markdown$Helpers$isNewline = function (character) { - if ('\n' === character.valueOf()) { - return true; - } else { - return false; - } -}; -var $elm$parser$Parser$Advanced$keeper = F2( - function (parseFunc, parseArg) { - return A3($elm$parser$Parser$Advanced$map2, $elm$core$Basics$apL, parseFunc, parseArg); - }); -var $elm$parser$Parser$Advanced$Append = F2( - function (a, b) { - return {$: 'Append', a: a, b: b}; - }); -var $elm$parser$Parser$Advanced$oneOfHelp = F3( - function (s0, bag, parsers) { - oneOfHelp: - while (true) { - if (!parsers.b) { - return A2($elm$parser$Parser$Advanced$Bad, false, bag); - } else { - var parse = parsers.a.a; - var remainingParsers = parsers.b; - var _v1 = parse(s0); - if (_v1.$ === 'Good') { - var step = _v1; - return step; - } else { - var step = _v1; - var p = step.a; - var x = step.b; - if (p) { - return step; - } else { - var $temp$s0 = s0, - $temp$bag = A2($elm$parser$Parser$Advanced$Append, bag, x), - $temp$parsers = remainingParsers; - s0 = $temp$s0; - bag = $temp$bag; - parsers = $temp$parsers; - continue oneOfHelp; - } - } - } - } - }); -var $elm$parser$Parser$Advanced$oneOf = function (parsers) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - return A3($elm$parser$Parser$Advanced$oneOfHelp, s, $elm$parser$Parser$Advanced$Empty, parsers); - }); -}; -var $elm$parser$Parser$Advanced$succeed = function (a) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - return A3($elm$parser$Parser$Advanced$Good, false, a, s); - }); -}; -var $elm$parser$Parser$Advanced$symbol = $elm$parser$Parser$Advanced$token; -var $dillonkearns$elm_markdown$Markdown$Parser$blockQuote = A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$RawBlock$BlockQuote), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - ' > ', - $elm$parser$Parser$Expecting(' > '))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - ' > ', - $elm$parser$Parser$Expecting(' > '))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - ' > ', - $elm$parser$Parser$Expecting(' > '))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '> ', - $elm$parser$Parser$Expecting('> '))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - ' >', - $elm$parser$Parser$Expecting(' >'))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - ' >', - $elm$parser$Parser$Expecting(' >'))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - ' >', - $elm$parser$Parser$Expecting(' >'))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '>', - $elm$parser$Parser$Expecting('>'))) - ]))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\n')), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Problem('Expecting end')), - A2( - $elm$parser$Parser$Advanced$chompIf, - $dillonkearns$elm_markdown$Helpers$isNewline, - $elm$parser$Parser$Problem('Expecting newline')) - ])))); -var $dillonkearns$elm_markdown$Markdown$Parser$combine = function (list) { - return A3( - $elm$core$List$foldr, - F2( - function (parser, listParser) { - return A2( - $elm$parser$Parser$Advanced$andThen, - function (soFar) { - return A2( - $elm$parser$Parser$Advanced$map, - function (a) { - return A2($elm$core$List$cons, a, soFar); - }, - parser); - }, - listParser); - }), - $elm$parser$Parser$Advanced$succeed(_List_Nil), - list); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$problemToString = function (problem) { - switch (problem.$) { - case 'Expecting': - var string = problem.a; - return 'Expecting ' + string; - case 'ExpectingInt': - return 'Expecting int'; - case 'ExpectingHex': - return 'Expecting hex'; - case 'ExpectingOctal': - return 'Expecting octal'; - case 'ExpectingBinary': - return 'Expecting binary'; - case 'ExpectingFloat': - return 'Expecting float'; - case 'ExpectingNumber': - return 'Expecting number'; - case 'ExpectingVariable': - return 'Expecting variable'; - case 'ExpectingSymbol': - var string = problem.a; - return 'Expecting symbol ' + string; - case 'ExpectingKeyword': - var string = problem.a; - return 'Expecting keyword ' + string; - case 'ExpectingEnd': - return 'Expecting keyword end'; - case 'UnexpectedChar': - return 'Unexpected char'; - case 'Problem': - var problemDescription = problem.a; - return problemDescription; - default: - return 'Bad repeat'; - } -}; -var $dillonkearns$elm_markdown$Markdown$Parser$deadEndToString = function (deadEnd) { - return 'Problem at row ' + ($elm$core$String$fromInt(deadEnd.row) + ('\n' + $dillonkearns$elm_markdown$Markdown$Parser$problemToString(deadEnd.problem))); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$deadEndsToString = function (deadEnds) { - return A2( - $elm$core$String$join, - '\n', - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Parser$deadEndToString, deadEnds)); -}; -var $elm$core$List$head = function (list) { - if (list.b) { - var x = list.a; - var xs = list.b; - return $elm$core$Maybe$Just(x); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $dillonkearns$elm_markdown$Markdown$RawBlock$Heading = F2( - function (a, b) { - return {$: 'Heading', a: a, b: b}; - }); -var $elm$core$String$trimRight = _String_trimRight; -var $dillonkearns$elm_markdown$Markdown$Parser$dropTrailingHashes = function (headingString) { - return A2($elm$core$String$endsWith, '#', headingString) ? $dillonkearns$elm_markdown$Markdown$Parser$dropTrailingHashes( - $elm$core$String$trimRight( - A2($elm$core$String$dropRight, 1, headingString))) : headingString; -}; -var $dillonkearns$elm_markdown$Helpers$isSpacebar = function (c) { - if (' ' === c.valueOf()) { - return true; - } else { - return false; - } -}; -var $elm$parser$Parser$Advanced$problem = function (x) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - return A2( - $elm$parser$Parser$Advanced$Bad, - false, - A2($elm$parser$Parser$Advanced$fromState, s, x)); - }); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$heading = A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$RawBlock$Heading), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '#', - $elm$parser$Parser$Expecting('#')))), - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$andThen, - function (additionalHashes) { - var level = $elm$core$String$length(additionalHashes) + 1; - return (level >= 7) ? $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Expecting('heading with < 7 #\'s')) : $elm$parser$Parser$Advanced$succeed(level); - }, - $elm$parser$Parser$Advanced$getChompedString( - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0), - $elm$parser$Parser$Advanced$chompWhile( - function (c) { - if ('#' === c.valueOf()) { - return true; - } else { - return false; - } - })))), - $elm$parser$Parser$Advanced$chompWhile($dillonkearns$elm_markdown$Helpers$isSpacebar))), - A2( - $elm$parser$Parser$Advanced$andThen, - function (headingText) { - return $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines( - $dillonkearns$elm_markdown$Markdown$Parser$dropTrailingHashes(headingText))); - }, - $elm$parser$Parser$Advanced$getChompedString( - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0), - $elm$parser$Parser$Advanced$chompUntilEndOr('\n'))))); -var $dillonkearns$elm_markdown$HtmlParser$Cdata = function (a) { - return {$: 'Cdata', a: a}; -}; -var $dillonkearns$elm_markdown$HtmlParser$Element = F3( - function (a, b, c) { - return {$: 'Element', a: a, b: b, c: c}; - }); -var $dillonkearns$elm_markdown$HtmlParser$Text = function (a) { - return {$: 'Text', a: a}; -}; -var $dillonkearns$elm_markdown$HtmlParser$Attribute = F2( - function (name, value) { - return {name: name, value: value}; - }); -var $elm$parser$Parser$Advanced$Located = F3( - function (row, col, context) { - return {col: col, context: context, row: row}; - }); -var $elm$parser$Parser$Advanced$changeContext = F2( - function (newContext, s) { - return {col: s.col, context: newContext, indent: s.indent, offset: s.offset, row: s.row, src: s.src}; - }); -var $elm$parser$Parser$Advanced$inContext = F2( - function (context, _v0) { - var parse = _v0.a; - return $elm$parser$Parser$Advanced$Parser( - function (s0) { - var _v1 = parse( - A2( - $elm$parser$Parser$Advanced$changeContext, - A2( - $elm$core$List$cons, - A3($elm$parser$Parser$Advanced$Located, s0.row, s0.col, context), - s0.context), - s0)); - if (_v1.$ === 'Good') { - var p = _v1.a; - var a = _v1.b; - var s1 = _v1.c; - return A3( - $elm$parser$Parser$Advanced$Good, - p, - a, - A2($elm$parser$Parser$Advanced$changeContext, s0.context, s1)); - } else { - var step = _v1; - return step; - } - }); - }); -var $dillonkearns$elm_markdown$HtmlParser$isUninteresting = function (c) { - switch (c.valueOf()) { - case '/': - return false; - case '<': - return false; - case '>': - return false; - case '\"': - return false; - case '\'': - return false; - case '=': - return false; - default: - return true; - } -}; -var $dillonkearns$elm_markdown$HtmlParser$isWhitespace = function (c) { - switch (c.valueOf()) { - case ' ': - return true; - case '\u000D': - return true; - case '\n': - return true; - case '\t': - return true; - default: - return false; - } -}; -var $elm$parser$Parser$BadRepeat = {$: 'BadRepeat'}; -var $dillonkearns$elm_markdown$HtmlParser$keep = F2( - function (count, predicate) { - var n = count.a; - return A2( - $elm$parser$Parser$Advanced$andThen, - function (str) { - return (_Utils_cmp( - n, - $elm$core$String$length(str)) < 1) ? $elm$parser$Parser$Advanced$succeed(str) : $elm$parser$Parser$Advanced$problem($elm$parser$Parser$BadRepeat); - }, - $elm$parser$Parser$Advanced$getChompedString( - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0), - $elm$parser$Parser$Advanced$chompWhile(predicate)))); - }); -var $dillonkearns$elm_markdown$HtmlParser$AtLeast = function (a) { - return {$: 'AtLeast', a: a}; -}; -var $dillonkearns$elm_markdown$HtmlParser$oneOrMore = $dillonkearns$elm_markdown$HtmlParser$AtLeast(1); -var $dillonkearns$elm_markdown$HtmlParser$attributeName = A2( - $elm$parser$Parser$Advanced$inContext, - 'attributeName', - A2( - $dillonkearns$elm_markdown$HtmlParser$keep, - $dillonkearns$elm_markdown$HtmlParser$oneOrMore, - function (c) { - return (!$dillonkearns$elm_markdown$HtmlParser$isWhitespace(c)) && $dillonkearns$elm_markdown$HtmlParser$isUninteresting(c); - })); -var $elm$parser$Parser$ExpectingSymbol = function (a) { - return {$: 'ExpectingSymbol', a: a}; -}; -var $dillonkearns$elm_markdown$HtmlParser$symbol = function (str) { - return $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - str, - $elm$parser$Parser$ExpectingSymbol(str))); -}; -var $elm$core$String$cons = _String_cons; -var $dillonkearns$elm_markdown$HtmlParser$entities = $elm$core$Dict$fromList( - _List_fromArray( - [ - _Utils_Tuple2( - 'amp', - _Utils_chr('&')), - _Utils_Tuple2( - 'lt', - _Utils_chr('<')), - _Utils_Tuple2( - 'gt', - _Utils_chr('>')), - _Utils_Tuple2( - 'apos', - _Utils_chr('\'')), - _Utils_Tuple2( - 'quot', - _Utils_chr('\"')) - ])); -var $elm$core$Char$fromCode = _Char_fromCode; -var $elm$core$Result$fromMaybe = F2( - function (err, maybe) { - if (maybe.$ === 'Just') { - var v = maybe.a; - return $elm$core$Result$Ok(v); - } else { - return $elm$core$Result$Err(err); - } - }); -var $elm$core$String$fromChar = function (_char) { - return A2($elm$core$String$cons, _char, ''); -}; -var $elm$core$Basics$pow = _Basics_pow; -var $rtfeldman$elm_hex$Hex$fromStringHelp = F3( - function (position, chars, accumulated) { - fromStringHelp: - while (true) { - if (!chars.b) { - return $elm$core$Result$Ok(accumulated); - } else { - var _char = chars.a; - var rest = chars.b; - switch (_char.valueOf()) { - case '0': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated; - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '1': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + A2($elm$core$Basics$pow, 16, position); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '2': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (2 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '3': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (3 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '4': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (4 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '5': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (5 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '6': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (6 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '7': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (7 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '8': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (8 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case '9': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (9 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case 'a': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (10 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case 'b': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (11 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case 'c': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (12 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case 'd': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (13 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case 'e': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (14 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - case 'f': - var $temp$position = position - 1, - $temp$chars = rest, - $temp$accumulated = accumulated + (15 * A2($elm$core$Basics$pow, 16, position)); - position = $temp$position; - chars = $temp$chars; - accumulated = $temp$accumulated; - continue fromStringHelp; - default: - var nonHex = _char; - return $elm$core$Result$Err( - $elm$core$String$fromChar(nonHex) + ' is not a valid hexadecimal character.'); - } - } - } - }); -var $elm$core$List$tail = function (list) { - if (list.b) { - var x = list.a; - var xs = list.b; - return $elm$core$Maybe$Just(xs); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $elm$core$String$foldr = _String_foldr; -var $elm$core$String$toList = function (string) { - return A3($elm$core$String$foldr, $elm$core$List$cons, _List_Nil, string); -}; -var $rtfeldman$elm_hex$Hex$fromString = function (str) { - if ($elm$core$String$isEmpty(str)) { - return $elm$core$Result$Err('Empty strings are not valid hexadecimal strings.'); - } else { - var result = function () { - if (A2($elm$core$String$startsWith, '-', str)) { - var list = A2( - $elm$core$Maybe$withDefault, - _List_Nil, - $elm$core$List$tail( - $elm$core$String$toList(str))); - return A2( - $elm$core$Result$map, - $elm$core$Basics$negate, - A3( - $rtfeldman$elm_hex$Hex$fromStringHelp, - $elm$core$List$length(list) - 1, - list, - 0)); - } else { - return A3( - $rtfeldman$elm_hex$Hex$fromStringHelp, - $elm$core$String$length(str) - 1, - $elm$core$String$toList(str), - 0); - } - }(); - var formatError = function (err) { - return A2( - $elm$core$String$join, - ' ', - _List_fromArray( - ['\"' + (str + '\"'), 'is not a valid hexadecimal string because', err])); - }; - return A2($elm$core$Result$mapError, formatError, result); - } -}; -var $dillonkearns$elm_markdown$HtmlParser$decodeEscape = function (s) { - return A2($elm$core$String$startsWith, '#x', s) ? A2( - $elm$core$Result$mapError, - $elm$parser$Parser$Problem, - A2( - $elm$core$Result$map, - $elm$core$Char$fromCode, - $rtfeldman$elm_hex$Hex$fromString( - A2($elm$core$String$dropLeft, 2, s)))) : (A2($elm$core$String$startsWith, '#', s) ? A2( - $elm$core$Result$fromMaybe, - $elm$parser$Parser$Problem('Invalid escaped character: ' + s), - A2( - $elm$core$Maybe$map, - $elm$core$Char$fromCode, - $elm$core$String$toInt( - A2($elm$core$String$dropLeft, 1, s)))) : A2( - $elm$core$Result$fromMaybe, - $elm$parser$Parser$Problem('No entity named \"&' + (s + ';\" found.')), - A2($elm$core$Dict$get, s, $dillonkearns$elm_markdown$HtmlParser$entities))); -}; -var $dillonkearns$elm_markdown$HtmlParser$fail = function (str) { - return $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Problem(str)); -}; -var $dillonkearns$elm_markdown$HtmlParser$notSemiColon = function (c) { - if (';' === c.valueOf()) { - return false; - } else { - return true; - } -}; -var $dillonkearns$elm_markdown$HtmlParser$escapedChar = function (end_) { - return A2( - $elm$parser$Parser$Advanced$inContext, - 'escapedChar', - A2( - $elm$parser$Parser$Advanced$andThen, - function (s) { - return $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$andThen, - function (_v0) { - var _v1 = $dillonkearns$elm_markdown$HtmlParser$decodeEscape(s); - if (_v1.$ === 'Ok') { - var c = _v1.a; - return $elm$parser$Parser$Advanced$succeed(c); - } else { - var e = _v1.a; - return $elm$parser$Parser$Advanced$problem(e); - } - }, - $dillonkearns$elm_markdown$HtmlParser$symbol(';')), - $dillonkearns$elm_markdown$HtmlParser$fail('Entities must end_ with \";\": &' + s) - ])); - }, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $dillonkearns$elm_markdown$HtmlParser$symbol('&')), - A2( - $dillonkearns$elm_markdown$HtmlParser$keep, - $dillonkearns$elm_markdown$HtmlParser$oneOrMore, - function (c) { - return (!_Utils_eq(c, end_)) && $dillonkearns$elm_markdown$HtmlParser$notSemiColon(c); - })))); -}; -var $elm$parser$Parser$Advanced$lazy = function (thunk) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - var _v0 = thunk(_Utils_Tuple0); - var parse = _v0.a; - return parse(s); - }); -}; -var $dillonkearns$elm_markdown$HtmlParser$notAmpersand = function (c) { - if ('&' === c.valueOf()) { - return false; - } else { - return true; - } -}; -var $dillonkearns$elm_markdown$HtmlParser$zeroOrMore = $dillonkearns$elm_markdown$HtmlParser$AtLeast(0); -var $dillonkearns$elm_markdown$HtmlParser$textString = function (end_) { - return A2( - $elm$parser$Parser$Advanced$inContext, - 'textString', - A2( - $elm$parser$Parser$Advanced$andThen, - function (s) { - return $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - F2( - function (c, t) { - return _Utils_ap( - s, - A2($elm$core$String$cons, c, t)); - })), - $dillonkearns$elm_markdown$HtmlParser$escapedChar(end_)), - $elm$parser$Parser$Advanced$lazy( - function (_v0) { - return $dillonkearns$elm_markdown$HtmlParser$textString(end_); - })), - $elm$parser$Parser$Advanced$succeed(s) - ])); - }, - A2( - $dillonkearns$elm_markdown$HtmlParser$keep, - $dillonkearns$elm_markdown$HtmlParser$zeroOrMore, - function (c) { - return (!_Utils_eq(c, end_)) && $dillonkearns$elm_markdown$HtmlParser$notAmpersand(c); - }))); -}; -var $dillonkearns$elm_markdown$HtmlParser$attributeValue = A2( - $elm$parser$Parser$Advanced$inContext, - 'attributeValue', - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $dillonkearns$elm_markdown$HtmlParser$symbol('\"')), - A2( - $elm$parser$Parser$Advanced$ignorer, - $dillonkearns$elm_markdown$HtmlParser$textString( - _Utils_chr('\"')), - $dillonkearns$elm_markdown$HtmlParser$symbol('\"'))), - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $dillonkearns$elm_markdown$HtmlParser$symbol('\'')), - A2( - $elm$parser$Parser$Advanced$ignorer, - $dillonkearns$elm_markdown$HtmlParser$textString( - _Utils_chr('\'')), - $dillonkearns$elm_markdown$HtmlParser$symbol('\''))) - ]))); -var $dillonkearns$elm_markdown$HtmlParser$ignore = F2( - function (count, predicate) { - return A2( - $elm$parser$Parser$Advanced$map, - function (_v0) { - return _Utils_Tuple0; - }, - A2($dillonkearns$elm_markdown$HtmlParser$keep, count, predicate)); - }); -var $dillonkearns$elm_markdown$HtmlParser$whiteSpace = A2($dillonkearns$elm_markdown$HtmlParser$ignore, $dillonkearns$elm_markdown$HtmlParser$zeroOrMore, $dillonkearns$elm_markdown$HtmlParser$isWhitespace); -var $dillonkearns$elm_markdown$HtmlParser$attribute = A2( - $elm$parser$Parser$Advanced$inContext, - 'attribute', - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$HtmlParser$Attribute), - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2($elm$parser$Parser$Advanced$ignorer, $dillonkearns$elm_markdown$HtmlParser$attributeName, $dillonkearns$elm_markdown$HtmlParser$whiteSpace), - $dillonkearns$elm_markdown$HtmlParser$symbol('=')), - $dillonkearns$elm_markdown$HtmlParser$whiteSpace)), - $dillonkearns$elm_markdown$HtmlParser$attributeValue)); -var $elm$core$Set$Set_elm_builtin = function (a) { - return {$: 'Set_elm_builtin', a: a}; -}; -var $elm$core$Set$insert = F2( - function (key, _v0) { - var dict = _v0.a; - return $elm$core$Set$Set_elm_builtin( - A3($elm$core$Dict$insert, key, _Utils_Tuple0, dict)); - }); -var $elm$core$Dict$member = F2( - function (key, dict) { - var _v0 = A2($elm$core$Dict$get, key, dict); - if (_v0.$ === 'Just') { - return true; - } else { - return false; - } - }); -var $elm$core$Set$member = F2( - function (key, _v0) { - var dict = _v0.a; - return A2($elm$core$Dict$member, key, dict); - }); -var $elm$core$String$toLower = _String_toLower; -var $dillonkearns$elm_markdown$HtmlParser$attributes = function (keys) { - return A2( - $elm$parser$Parser$Advanced$map, - function (attrs) { - return A2( - $elm$core$List$map, - function (attr) { - return { - name: $elm$core$String$toLower(attr.name), - value: attr.value - }; - }, - attrs); - }, - A2( - $elm$parser$Parser$Advanced$inContext, - 'attributes', - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$andThen, - function (attr) { - return A2($elm$core$Set$member, attr.name, keys) ? $dillonkearns$elm_markdown$HtmlParser$fail('attribute ' + (attr.name + ' is duplicated')) : A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed( - $elm$core$List$cons(attr)), - $dillonkearns$elm_markdown$HtmlParser$whiteSpace), - $dillonkearns$elm_markdown$HtmlParser$attributes( - A2($elm$core$Set$insert, attr.name, keys))); - }, - $dillonkearns$elm_markdown$HtmlParser$attribute), - $elm$parser$Parser$Advanced$succeed(_List_Nil) - ])))); -}; -var $dillonkearns$elm_markdown$HtmlParser$cdata = A2( - $elm$parser$Parser$Advanced$inContext, - 'cdata', - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $dillonkearns$elm_markdown$HtmlParser$symbol('')), - $dillonkearns$elm_markdown$HtmlParser$symbol(']]>')))); -var $dillonkearns$elm_markdown$HtmlParser$tagName = A2( - $elm$parser$Parser$Advanced$map, - function (name) { - return $elm$core$String$toLower(name); - }, - A2( - $elm$parser$Parser$Advanced$inContext, - 'tagName', - A2( - $dillonkearns$elm_markdown$HtmlParser$keep, - $dillonkearns$elm_markdown$HtmlParser$oneOrMore, - function (c) { - return (!$dillonkearns$elm_markdown$HtmlParser$isWhitespace(c)) && $dillonkearns$elm_markdown$HtmlParser$isUninteresting(c); - }))); -var $dillonkearns$elm_markdown$HtmlParser$closingTag = function (startTagName) { - return A2( - $elm$parser$Parser$Advanced$inContext, - 'closingTag', - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0), - $dillonkearns$elm_markdown$HtmlParser$symbol(''))); -}; -var $dillonkearns$elm_markdown$HtmlParser$Comment = function (a) { - return {$: 'Comment', a: a}; -}; -var $dillonkearns$elm_markdown$HtmlParser$toToken = function (str) { - return A2( - $elm$parser$Parser$Advanced$Token, - str, - $elm$parser$Parser$Expecting(str)); -}; -var $dillonkearns$elm_markdown$HtmlParser$comment = A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$HtmlParser$Comment), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$HtmlParser$toToken('')), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$HtmlParser$toToken('-->')))); -var $dillonkearns$elm_markdown$HtmlParser$Declaration = F2( - function (a, b) { - return {$: 'Declaration', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$HtmlParser$allUppercase = A2( - $dillonkearns$elm_markdown$HtmlParser$keep, - $dillonkearns$elm_markdown$HtmlParser$oneOrMore, - function (c) { - return $elm$core$Char$isUpper(c); - }); -var $dillonkearns$elm_markdown$HtmlParser$oneOrMoreWhiteSpace = A2($dillonkearns$elm_markdown$HtmlParser$ignore, $dillonkearns$elm_markdown$HtmlParser$oneOrMore, $dillonkearns$elm_markdown$HtmlParser$isWhitespace); -var $dillonkearns$elm_markdown$HtmlParser$docType = A2( - $elm$parser$Parser$Advanced$inContext, - 'declaration', - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$HtmlParser$Declaration), - $dillonkearns$elm_markdown$HtmlParser$symbol('')), - $dillonkearns$elm_markdown$HtmlParser$symbol('>')))); -var $elm$core$Set$empty = $elm$core$Set$Set_elm_builtin($elm$core$Dict$empty); -var $dillonkearns$elm_markdown$HtmlParser$ProcessingInstruction = function (a) { - return {$: 'ProcessingInstruction', a: a}; -}; -var $dillonkearns$elm_markdown$HtmlParser$processingInstruction = A2( - $elm$parser$Parser$Advanced$inContext, - 'processingInstruction', - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$HtmlParser$ProcessingInstruction), - $dillonkearns$elm_markdown$HtmlParser$symbol('')), - $dillonkearns$elm_markdown$HtmlParser$symbol('?>')))); -function $dillonkearns$elm_markdown$HtmlParser$cyclic$textNodeString() { - return A2( - $elm$parser$Parser$Advanced$inContext, - 'textNodeString', - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - F2( - function (s, maybeString) { - return $elm$core$Maybe$Just( - _Utils_ap( - s, - A2($elm$core$Maybe$withDefault, '', maybeString))); - })), - A2( - $dillonkearns$elm_markdown$HtmlParser$keep, - $dillonkearns$elm_markdown$HtmlParser$oneOrMore, - function (c) { - switch (c.valueOf()) { - case '<': - return false; - case '&': - return false; - default: - return true; - } - })), - $elm$parser$Parser$Advanced$lazy( - function (_v1) { - return $dillonkearns$elm_markdown$HtmlParser$cyclic$textNodeString(); - })), - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - F2( - function (c, maybeString) { - return $elm$core$Maybe$Just( - A2( - $elm$core$String$cons, - c, - A2($elm$core$Maybe$withDefault, '', maybeString))); - })), - $dillonkearns$elm_markdown$HtmlParser$escapedChar( - _Utils_chr('<'))), - $elm$parser$Parser$Advanced$lazy( - function (_v2) { - return $dillonkearns$elm_markdown$HtmlParser$cyclic$textNodeString(); - })), - $elm$parser$Parser$Advanced$succeed($elm$core$Maybe$Nothing) - ]))); -} -try { - var $dillonkearns$elm_markdown$HtmlParser$textNodeString = $dillonkearns$elm_markdown$HtmlParser$cyclic$textNodeString(); - $dillonkearns$elm_markdown$HtmlParser$cyclic$textNodeString = function () { - return $dillonkearns$elm_markdown$HtmlParser$textNodeString; - }; -} catch ($) { - throw 'Some top-level definitions from `HtmlParser` are causing infinite recursion:\n\n ┌─────┐\n │ textNodeString\n └─────┘\n\nThese errors are very tricky, so read https://elm-lang.org/0.19.1/bad-recursion to learn how to fix it!';} -var $dillonkearns$elm_markdown$HtmlParser$children = function (startTagName) { - return A2( - $elm$parser$Parser$Advanced$inContext, - 'children', - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_List_Nil), - $dillonkearns$elm_markdown$HtmlParser$closingTag(startTagName)), - A2( - $elm$parser$Parser$Advanced$andThen, - function (maybeString) { - if (maybeString.$ === 'Just') { - var s = maybeString.a; - return A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - function (rest) { - return A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$HtmlParser$Text(s), - rest); - }), - $dillonkearns$elm_markdown$HtmlParser$children(startTagName)); - } else { - return A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_List_Nil), - $dillonkearns$elm_markdown$HtmlParser$closingTag(startTagName)); - } - }, - $dillonkearns$elm_markdown$HtmlParser$textNodeString), - $elm$parser$Parser$Advanced$lazy( - function (_v2) { - return A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed($elm$core$List$cons), - $dillonkearns$elm_markdown$HtmlParser$cyclic$html()), - $dillonkearns$elm_markdown$HtmlParser$children(startTagName)); - }) - ]))); -}; -function $dillonkearns$elm_markdown$HtmlParser$cyclic$html() { - return $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2($elm$parser$Parser$Advanced$map, $dillonkearns$elm_markdown$HtmlParser$Cdata, $dillonkearns$elm_markdown$HtmlParser$cdata), - $dillonkearns$elm_markdown$HtmlParser$processingInstruction, - $dillonkearns$elm_markdown$HtmlParser$comment, - $dillonkearns$elm_markdown$HtmlParser$docType, - $dillonkearns$elm_markdown$HtmlParser$cyclic$element() - ])); -} -function $dillonkearns$elm_markdown$HtmlParser$cyclic$element() { - return A2( - $elm$parser$Parser$Advanced$inContext, - 'element', - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $dillonkearns$elm_markdown$HtmlParser$symbol('<')), - A2( - $elm$parser$Parser$Advanced$andThen, - function (startTagName) { - return A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$HtmlParser$Element(startTagName)), - $dillonkearns$elm_markdown$HtmlParser$whiteSpace), - A2( - $elm$parser$Parser$Advanced$ignorer, - $dillonkearns$elm_markdown$HtmlParser$attributes($elm$core$Set$empty), - $dillonkearns$elm_markdown$HtmlParser$whiteSpace)), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_List_Nil), - $dillonkearns$elm_markdown$HtmlParser$symbol('/>')), - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $dillonkearns$elm_markdown$HtmlParser$symbol('>')), - $elm$parser$Parser$Advanced$lazy( - function (_v0) { - return $dillonkearns$elm_markdown$HtmlParser$children(startTagName); - })) - ]))); - }, - $dillonkearns$elm_markdown$HtmlParser$tagName))); -} -try { - var $dillonkearns$elm_markdown$HtmlParser$html = $dillonkearns$elm_markdown$HtmlParser$cyclic$html(); - $dillonkearns$elm_markdown$HtmlParser$cyclic$html = function () { - return $dillonkearns$elm_markdown$HtmlParser$html; - }; - var $dillonkearns$elm_markdown$HtmlParser$element = $dillonkearns$elm_markdown$HtmlParser$cyclic$element(); - $dillonkearns$elm_markdown$HtmlParser$cyclic$element = function () { - return $dillonkearns$elm_markdown$HtmlParser$element; - }; -} catch ($) { - throw 'Some top-level definitions from `HtmlParser` are causing infinite recursion:\n\n ┌─────┐\n │ children\n │ ↓\n │ html\n │ ↓\n │ element\n └─────┘\n\nThese errors are very tricky, so read https://elm-lang.org/0.19.1/bad-recursion to learn how to fix it!';} -var $dillonkearns$elm_markdown$Markdown$Parser$indentedCodeBlock = A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$RawBlock$IndentedCodeBlock), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - ' ', - $elm$parser$Parser$ExpectingSymbol('Indentation'))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\t', - $elm$parser$Parser$ExpectingSymbol('Indentation'))) - ]))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\n')), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\\n'))), - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Expecting('End of input')) - ])))); -var $elm$core$String$concat = function (strings) { - return A2($elm$core$String$join, '', strings); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$joinRawStringsWith = F3( - function (joinWith, string1, string2) { - var _v0 = _Utils_Tuple2(string1, string2); - if (_v0.a === '') { - if (_v0.b === '') { - return $elm$core$String$concat( - _List_fromArray( - [string1, string2])); - } else { - return $elm$core$String$concat( - _List_fromArray( - [string1, string2])); - } - } else { - if (_v0.b === '') { - return $elm$core$String$concat( - _List_fromArray( - [string1, string2])); - } else { - return $elm$core$String$concat( - _List_fromArray( - [string1, joinWith, string2])); - } - } - }); -var $dillonkearns$elm_markdown$Markdown$Parser$joinStringsPreserveAll = F2( - function (string1, string2) { - return $elm$core$String$concat( - _List_fromArray( - [string1, '\n', string2])); - }); -var $dillonkearns$elm_markdown$Markdown$Parser$just = function (value) { - return $elm$parser$Parser$Advanced$succeed( - $elm$core$Maybe$Just(value)); -}; -var $dillonkearns$elm_markdown$Markdown$Block$H1 = {$: 'H1'}; -var $dillonkearns$elm_markdown$Markdown$Block$H2 = {$: 'H2'}; -var $dillonkearns$elm_markdown$Markdown$Block$H3 = {$: 'H3'}; -var $dillonkearns$elm_markdown$Markdown$Block$H4 = {$: 'H4'}; -var $dillonkearns$elm_markdown$Markdown$Block$H5 = {$: 'H5'}; -var $dillonkearns$elm_markdown$Markdown$Block$H6 = {$: 'H6'}; -var $dillonkearns$elm_markdown$Markdown$Parser$levelParser = function (level) { - switch (level) { - case 1: - return $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$Block$H1); - case 2: - return $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$Block$H2); - case 3: - return $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$Block$H3); - case 4: - return $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$Block$H4); - case 5: - return $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$Block$H5); - case 6: - return $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$Block$H6); - default: - return $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Expecting( - 'A heading with 1 to 6 #\'s, but found ' + $elm$core$String$fromInt(level))); - } -}; -var $elm$parser$Parser$Advanced$loopHelp = F4( - function (p, state, callback, s0) { - loopHelp: - while (true) { - var _v0 = callback(state); - var parse = _v0.a; - var _v1 = parse(s0); - if (_v1.$ === 'Good') { - var p1 = _v1.a; - var step = _v1.b; - var s1 = _v1.c; - if (step.$ === 'Loop') { - var newState = step.a; - var $temp$p = p || p1, - $temp$state = newState, - $temp$callback = callback, - $temp$s0 = s1; - p = $temp$p; - state = $temp$state; - callback = $temp$callback; - s0 = $temp$s0; - continue loopHelp; - } else { - var result = step.a; - return A3($elm$parser$Parser$Advanced$Good, p || p1, result, s1); - } - } else { - var p1 = _v1.a; - var x = _v1.b; - return A2($elm$parser$Parser$Advanced$Bad, p || p1, x); - } - } - }); -var $elm$parser$Parser$Advanced$loop = F2( - function (state, callback) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - return A4($elm$parser$Parser$Advanced$loopHelp, false, state, callback, s); - }); - }); -var $dillonkearns$elm_markdown$Markdown$RawBlock$OrderedListBlock = F2( - function (a, b) { - return {$: 'OrderedListBlock', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$Parser$Extra$oneOrMore = function (condition) { - return A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$chompIf, - condition, - $elm$parser$Parser$Problem('Expected one or more character')), - $elm$parser$Parser$Advanced$chompWhile(condition)); -}; -var $dillonkearns$elm_markdown$Parser$Extra$positiveInteger = A2( - $elm$parser$Parser$Advanced$mapChompedString, - F2( - function (str, _v0) { - return A2( - $elm$core$Maybe$withDefault, - 0, - $elm$core$String$toInt(str)); - }), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0), - $dillonkearns$elm_markdown$Parser$Extra$oneOrMore($elm$core$Char$isDigit))); -var $dillonkearns$elm_markdown$Markdown$OrderedList$positiveIntegerMaxOf9Digits = A2( - $elm$parser$Parser$Advanced$andThen, - function (parsed) { - return (parsed <= 999999999) ? $elm$parser$Parser$Advanced$succeed(parsed) : $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Problem('Starting numbers must be nine digits or less.')); - }, - $dillonkearns$elm_markdown$Parser$Extra$positiveInteger); -var $dillonkearns$elm_markdown$Markdown$OrderedList$listMarkerParser = function () { - var markerOption = function (marker) { - return $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - marker, - $elm$parser$Parser$ExpectingSymbol(marker)))); - }; - return A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed($elm$core$Tuple$pair), - $dillonkearns$elm_markdown$Markdown$OrderedList$positiveIntegerMaxOf9Digits), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - markerOption('.'), - markerOption(')') - ]))); -}(); -var $dillonkearns$elm_markdown$Markdown$OrderedList$openingItemParser = function (lastBlock) { - var validateStartsWith1 = function (parsed) { - if (parsed.a === 1) { - return $elm$parser$Parser$Advanced$succeed(parsed); - } else { - return $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Problem('Lists inside a paragraph or after a paragraph without a blank line must start with 1')); - } - }; - var validateStartsWith1IfInParagraph = function (parsed) { - if ((lastBlock.$ === 'Just') && (lastBlock.a.$ === 'Body')) { - return validateStartsWith1(parsed); - } else { - return $elm$parser$Parser$Advanced$succeed(parsed); - } - }; - return A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - F2( - function (_v0, item) { - var startingIndex = _v0.a; - var marker = _v0.b; - return _Utils_Tuple3(startingIndex, marker, item); - })), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$backtrackable( - A2($elm$parser$Parser$Advanced$andThen, validateStartsWith1IfInParagraph, $dillonkearns$elm_markdown$Markdown$OrderedList$listMarkerParser)), - $dillonkearns$elm_markdown$Parser$Extra$oneOrMore($dillonkearns$elm_markdown$Helpers$isSpacebar))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\n')), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\n'))))); -}; -var $elm$parser$Parser$Advanced$getOffset = $elm$parser$Parser$Advanced$Parser( - function (s) { - return A3($elm$parser$Parser$Advanced$Good, false, s.offset, s); - }); -var $elm$parser$Parser$Advanced$commit = function (a) { - return $elm$parser$Parser$Advanced$Parser( - function (s) { - return A3($elm$parser$Parser$Advanced$Good, true, a, s); - }); -}; -var $dillonkearns$elm_markdown$Markdown$OrderedList$itemBody = $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $elm$parser$Parser$Advanced$backtrackable( - $dillonkearns$elm_markdown$Parser$Extra$oneOrMore($dillonkearns$elm_markdown$Helpers$isSpacebar))), - $elm$parser$Parser$Advanced$commit('')), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\n')), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\\n'))), - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Expecting('End of input')) - ])))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(''), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\\n')))) - ])); -var $dillonkearns$elm_markdown$Markdown$OrderedList$singleItemParser = function (listMarker) { - return A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $elm$parser$Parser$Advanced$backtrackable( - A2( - $elm$parser$Parser$Advanced$ignorer, - $dillonkearns$elm_markdown$Parser$Extra$positiveInteger, - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - listMarker, - $elm$parser$Parser$ExpectingSymbol(listMarker)))))), - $dillonkearns$elm_markdown$Markdown$OrderedList$itemBody); -}; -var $dillonkearns$elm_markdown$Markdown$OrderedList$statementsHelp = F3( - function (listMarker, firstItem, revStmts) { - return $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - F3( - function (offsetBefore, stmt, offsetAfter) { - return $elm$parser$Parser$Advanced$Loop( - A2($elm$core$List$cons, stmt, revStmts)); - })), - $elm$parser$Parser$Advanced$getOffset), - $dillonkearns$elm_markdown$Markdown$OrderedList$singleItemParser(listMarker)), - $elm$parser$Parser$Advanced$getOffset), - A2( - $elm$parser$Parser$Advanced$map, - function (_v0) { - return $elm$parser$Parser$Advanced$Done( - A2( - $elm$core$List$cons, - firstItem, - $elm$core$List$reverse(revStmts))); - }, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0)) - ])); - }); -var $dillonkearns$elm_markdown$Markdown$OrderedList$parser = function (lastBlock) { - return A2( - $elm$parser$Parser$Advanced$andThen, - function (_v0) { - var startingIndex = _v0.a; - var listMarker = _v0.b; - var firstItem = _v0.c; - return A2( - $elm$parser$Parser$Advanced$map, - function (items) { - return _Utils_Tuple2(startingIndex, items); - }, - A2( - $elm$parser$Parser$Advanced$loop, - _List_Nil, - A2($dillonkearns$elm_markdown$Markdown$OrderedList$statementsHelp, listMarker, firstItem))); - }, - $dillonkearns$elm_markdown$Markdown$OrderedList$openingItemParser(lastBlock)); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$orderedListBlock = function (lastBlock) { - return A2( - $elm$parser$Parser$Advanced$map, - function (_v0) { - var startingIndex = _v0.a; - var unparsedLines = _v0.b; - return A2( - $dillonkearns$elm_markdown$Markdown$RawBlock$OrderedListBlock, - startingIndex, - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines, unparsedLines)); - }, - $dillonkearns$elm_markdown$Markdown$OrderedList$parser(lastBlock)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$initParser = F2( - function (refs, rawText) { - return {matches: _List_Nil, rawText: rawText, refs: refs, tokens: _List_Nil}; - }); -var $dillonkearns$elm_markdown$Markdown$Inline$CodeInline = function (a) { - return {$: 'CodeInline', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Inline$Emphasis = F2( - function (a, b) { - return {$: 'Emphasis', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$Markdown$Inline$HardLineBreak = {$: 'HardLineBreak'}; -var $dillonkearns$elm_markdown$Markdown$Inline$HtmlInline = function (a) { - return {$: 'HtmlInline', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Inline$Image = F3( - function (a, b, c) { - return {$: 'Image', a: a, b: b, c: c}; - }); -var $dillonkearns$elm_markdown$Markdown$Inline$Link = F3( - function (a, b, c) { - return {$: 'Link', a: a, b: b, c: c}; - }); -var $dillonkearns$elm_markdown$Markdown$Inline$Text = function (a) { - return {$: 'Text', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$matchToInline = function (_v0) { - var match = _v0.a; - var _v1 = match.type_; - switch (_v1.$) { - case 'NormalType': - return $dillonkearns$elm_markdown$Markdown$Inline$Text(match.text); - case 'HardLineBreakType': - return $dillonkearns$elm_markdown$Markdown$Inline$HardLineBreak; - case 'CodeType': - return $dillonkearns$elm_markdown$Markdown$Inline$CodeInline(match.text); - case 'AutolinkType': - var _v2 = _v1.a; - var text = _v2.a; - var url = _v2.b; - return A3( - $dillonkearns$elm_markdown$Markdown$Inline$Link, - url, - $elm$core$Maybe$Nothing, - _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$Inline$Text(text) - ])); - case 'LinkType': - var _v3 = _v1.a; - var url = _v3.a; - var maybeTitle = _v3.b; - return A3( - $dillonkearns$elm_markdown$Markdown$Inline$Link, - url, - maybeTitle, - $dillonkearns$elm_markdown$Markdown$InlineParser$matchesToInlines(match.matches)); - case 'ImageType': - var _v4 = _v1.a; - var url = _v4.a; - var maybeTitle = _v4.b; - return A3( - $dillonkearns$elm_markdown$Markdown$Inline$Image, - url, - maybeTitle, - $dillonkearns$elm_markdown$Markdown$InlineParser$matchesToInlines(match.matches)); - case 'HtmlType': - var model = _v1.a; - return $dillonkearns$elm_markdown$Markdown$Inline$HtmlInline(model); - default: - var length = _v1.a; - return A2( - $dillonkearns$elm_markdown$Markdown$Inline$Emphasis, - length, - $dillonkearns$elm_markdown$Markdown$InlineParser$matchesToInlines(match.matches)); - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$matchesToInlines = function (matches) { - return A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$InlineParser$matchToInline, matches); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$Match = function (a) { - return {$: 'Match', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$prepareChildMatch = F2( - function (parentMatch, childMatch) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - childMatch, - {end: childMatch.end - parentMatch.textStart, start: childMatch.start - parentMatch.textStart, textEnd: childMatch.textEnd - parentMatch.textStart, textStart: childMatch.textStart - parentMatch.textStart})); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$addChild = F2( - function (parentMatch, childMatch) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - parentMatch, - { - matches: A2( - $elm$core$List$cons, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$prepareChildMatch, parentMatch, childMatch), - parentMatch.matches) - })); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$organizeMatch = F2( - function (_v0, matches) { - var match = _v0.a; - if (!matches.b) { - return _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$InlineParser$Match(match) - ]); - } else { - var prevMatch = matches.a.a; - var matchesTail = matches.b; - return (_Utils_cmp(prevMatch.end, match.start) < 1) ? A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$Markdown$InlineParser$Match(match), - matches) : (((_Utils_cmp(prevMatch.start, match.start) < 0) && (_Utils_cmp(prevMatch.end, match.end) > 0)) ? A2( - $elm$core$List$cons, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addChild, prevMatch, match), - matchesTail) : matches); - } - }); -var $elm$core$List$sortBy = _List_sortBy; -function $dillonkearns$elm_markdown$Markdown$InlineParser$cyclic$organizeMatches() { - return A2( - $elm$core$Basics$composeR, - $elm$core$List$sortBy( - function (_v0) { - var match = _v0.a; - return match.start; - }), - A2( - $elm$core$Basics$composeR, - A2($elm$core$List$foldl, $dillonkearns$elm_markdown$Markdown$InlineParser$organizeMatch, _List_Nil), - $elm$core$List$map( - function (_v1) { - var match = _v1.a; - return $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - match, - { - matches: $dillonkearns$elm_markdown$Markdown$InlineParser$cyclic$organizeMatches()(match.matches) - })); - }))); -} -try { - var $dillonkearns$elm_markdown$Markdown$InlineParser$organizeMatches = $dillonkearns$elm_markdown$Markdown$InlineParser$cyclic$organizeMatches(); - $dillonkearns$elm_markdown$Markdown$InlineParser$cyclic$organizeMatches = function () { - return $dillonkearns$elm_markdown$Markdown$InlineParser$organizeMatches; - }; -} catch ($) { - throw 'Some top-level definitions from `Markdown.InlineParser` are causing infinite recursion:\n\n ┌─────┐\n │ organizeMatches\n └─────┘\n\nThese errors are very tricky, so read https://elm-lang.org/0.19.1/bad-recursion to learn how to fix it!';} -var $dillonkearns$elm_markdown$Markdown$InlineParser$organizeParserMatches = function (model) { - return _Utils_update( - model, - { - matches: $dillonkearns$elm_markdown$Markdown$InlineParser$organizeMatches(model.matches) - }); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$NormalType = {$: 'NormalType'}; -var $elm$regex$Regex$Match = F4( - function (match, index, number, submatches) { - return {index: index, match: match, number: number, submatches: submatches}; - }); -var $elm$regex$Regex$fromStringWith = _Regex_fromStringWith; -var $elm$regex$Regex$fromString = function (string) { - return A2( - $elm$regex$Regex$fromStringWith, - {caseInsensitive: false, multiline: false}, - string); -}; -var $elm$regex$Regex$never = _Regex_never; -var $dillonkearns$elm_markdown$Markdown$Entity$decimalRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('&#([0-9]{1,8});')); -var $elm$regex$Regex$replace = _Regex_replaceAtMost(_Regex_infinity); -var $elm$core$Basics$modBy = _Basics_modBy; -var $dillonkearns$elm_markdown$Markdown$Entity$isBadEndUnicode = function (_int) { - var remain_ = A2($elm$core$Basics$modBy, 16, _int); - var remain = A2($elm$core$Basics$modBy, 131070, _int); - return (_int >= 131070) && ((((0 <= remain) && (remain <= 15)) || ((65536 <= remain) && (remain <= 65551))) && ((remain_ === 14) || (remain_ === 15))); -}; -var $dillonkearns$elm_markdown$Markdown$Entity$isValidUnicode = function (_int) { - return (_int === 9) || ((_int === 10) || ((_int === 13) || ((_int === 133) || (((32 <= _int) && (_int <= 126)) || (((160 <= _int) && (_int <= 55295)) || (((57344 <= _int) && (_int <= 64975)) || (((65008 <= _int) && (_int <= 65533)) || ((65536 <= _int) && (_int <= 1114109))))))))); -}; -var $dillonkearns$elm_markdown$Markdown$Entity$validUnicode = function (_int) { - return ($dillonkearns$elm_markdown$Markdown$Entity$isValidUnicode(_int) && (!$dillonkearns$elm_markdown$Markdown$Entity$isBadEndUnicode(_int))) ? $elm$core$String$fromChar( - $elm$core$Char$fromCode(_int)) : $elm$core$String$fromChar( - $elm$core$Char$fromCode(65533)); -}; -var $dillonkearns$elm_markdown$Markdown$Entity$replaceDecimal = function (match) { - return A2( - $elm$core$Maybe$withDefault, - match.match, - A2( - $elm$core$Maybe$map, - $dillonkearns$elm_markdown$Markdown$Entity$validUnicode, - A2( - $elm$core$Maybe$andThen, - $elm$core$String$toInt, - A2( - $elm$core$Maybe$withDefault, - $elm$core$Maybe$Nothing, - $elm$core$List$head(match.submatches))))); -}; -var $dillonkearns$elm_markdown$Markdown$Entity$replaceDecimals = A2($elm$regex$Regex$replace, $dillonkearns$elm_markdown$Markdown$Entity$decimalRegex, $dillonkearns$elm_markdown$Markdown$Entity$replaceDecimal); -var $dillonkearns$elm_markdown$Markdown$Entity$entitiesRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('&([0-9a-zA-Z]+);')); -var $dillonkearns$elm_markdown$Markdown$Entity$entities = $elm$core$Dict$fromList( - _List_fromArray( - [ - _Utils_Tuple2('quot', 34), - _Utils_Tuple2('amp', 38), - _Utils_Tuple2('apos', 39), - _Utils_Tuple2('lt', 60), - _Utils_Tuple2('gt', 62), - _Utils_Tuple2('nbsp', 160), - _Utils_Tuple2('iexcl', 161), - _Utils_Tuple2('cent', 162), - _Utils_Tuple2('pound', 163), - _Utils_Tuple2('curren', 164), - _Utils_Tuple2('yen', 165), - _Utils_Tuple2('brvbar', 166), - _Utils_Tuple2('sect', 167), - _Utils_Tuple2('uml', 168), - _Utils_Tuple2('copy', 169), - _Utils_Tuple2('ordf', 170), - _Utils_Tuple2('laquo', 171), - _Utils_Tuple2('not', 172), - _Utils_Tuple2('shy', 173), - _Utils_Tuple2('reg', 174), - _Utils_Tuple2('macr', 175), - _Utils_Tuple2('deg', 176), - _Utils_Tuple2('plusmn', 177), - _Utils_Tuple2('sup2', 178), - _Utils_Tuple2('sup3', 179), - _Utils_Tuple2('acute', 180), - _Utils_Tuple2('micro', 181), - _Utils_Tuple2('para', 182), - _Utils_Tuple2('middot', 183), - _Utils_Tuple2('cedil', 184), - _Utils_Tuple2('sup1', 185), - _Utils_Tuple2('ordm', 186), - _Utils_Tuple2('raquo', 187), - _Utils_Tuple2('frac14', 188), - _Utils_Tuple2('frac12', 189), - _Utils_Tuple2('frac34', 190), - _Utils_Tuple2('iquest', 191), - _Utils_Tuple2('Agrave', 192), - _Utils_Tuple2('Aacute', 193), - _Utils_Tuple2('Acirc', 194), - _Utils_Tuple2('Atilde', 195), - _Utils_Tuple2('Auml', 196), - _Utils_Tuple2('Aring', 197), - _Utils_Tuple2('AElig', 198), - _Utils_Tuple2('Ccedil', 199), - _Utils_Tuple2('Egrave', 200), - _Utils_Tuple2('Eacute', 201), - _Utils_Tuple2('Ecirc', 202), - _Utils_Tuple2('Euml', 203), - _Utils_Tuple2('Igrave', 204), - _Utils_Tuple2('Iacute', 205), - _Utils_Tuple2('Icirc', 206), - _Utils_Tuple2('Iuml', 207), - _Utils_Tuple2('ETH', 208), - _Utils_Tuple2('Ntilde', 209), - _Utils_Tuple2('Ograve', 210), - _Utils_Tuple2('Oacute', 211), - _Utils_Tuple2('Ocirc', 212), - _Utils_Tuple2('Otilde', 213), - _Utils_Tuple2('Ouml', 214), - _Utils_Tuple2('times', 215), - _Utils_Tuple2('Oslash', 216), - _Utils_Tuple2('Ugrave', 217), - _Utils_Tuple2('Uacute', 218), - _Utils_Tuple2('Ucirc', 219), - _Utils_Tuple2('Uuml', 220), - _Utils_Tuple2('Yacute', 221), - _Utils_Tuple2('THORN', 222), - _Utils_Tuple2('szlig', 223), - _Utils_Tuple2('agrave', 224), - _Utils_Tuple2('aacute', 225), - _Utils_Tuple2('acirc', 226), - _Utils_Tuple2('atilde', 227), - _Utils_Tuple2('auml', 228), - _Utils_Tuple2('aring', 229), - _Utils_Tuple2('aelig', 230), - _Utils_Tuple2('ccedil', 231), - _Utils_Tuple2('egrave', 232), - _Utils_Tuple2('eacute', 233), - _Utils_Tuple2('ecirc', 234), - _Utils_Tuple2('euml', 235), - _Utils_Tuple2('igrave', 236), - _Utils_Tuple2('iacute', 237), - _Utils_Tuple2('icirc', 238), - _Utils_Tuple2('iuml', 239), - _Utils_Tuple2('eth', 240), - _Utils_Tuple2('ntilde', 241), - _Utils_Tuple2('ograve', 242), - _Utils_Tuple2('oacute', 243), - _Utils_Tuple2('ocirc', 244), - _Utils_Tuple2('otilde', 245), - _Utils_Tuple2('ouml', 246), - _Utils_Tuple2('divide', 247), - _Utils_Tuple2('oslash', 248), - _Utils_Tuple2('ugrave', 249), - _Utils_Tuple2('uacute', 250), - _Utils_Tuple2('ucirc', 251), - _Utils_Tuple2('uuml', 252), - _Utils_Tuple2('yacute', 253), - _Utils_Tuple2('thorn', 254), - _Utils_Tuple2('yuml', 255), - _Utils_Tuple2('OElig', 338), - _Utils_Tuple2('oelig', 339), - _Utils_Tuple2('Scaron', 352), - _Utils_Tuple2('scaron', 353), - _Utils_Tuple2('Yuml', 376), - _Utils_Tuple2('fnof', 402), - _Utils_Tuple2('circ', 710), - _Utils_Tuple2('tilde', 732), - _Utils_Tuple2('Alpha', 913), - _Utils_Tuple2('Beta', 914), - _Utils_Tuple2('Gamma', 915), - _Utils_Tuple2('Delta', 916), - _Utils_Tuple2('Epsilon', 917), - _Utils_Tuple2('Zeta', 918), - _Utils_Tuple2('Eta', 919), - _Utils_Tuple2('Theta', 920), - _Utils_Tuple2('Iota', 921), - _Utils_Tuple2('Kappa', 922), - _Utils_Tuple2('Lambda', 923), - _Utils_Tuple2('Mu', 924), - _Utils_Tuple2('Nu', 925), - _Utils_Tuple2('Xi', 926), - _Utils_Tuple2('Omicron', 927), - _Utils_Tuple2('Pi', 928), - _Utils_Tuple2('Rho', 929), - _Utils_Tuple2('Sigma', 931), - _Utils_Tuple2('Tau', 932), - _Utils_Tuple2('Upsilon', 933), - _Utils_Tuple2('Phi', 934), - _Utils_Tuple2('Chi', 935), - _Utils_Tuple2('Psi', 936), - _Utils_Tuple2('Omega', 937), - _Utils_Tuple2('alpha', 945), - _Utils_Tuple2('beta', 946), - _Utils_Tuple2('gamma', 947), - _Utils_Tuple2('delta', 948), - _Utils_Tuple2('epsilon', 949), - _Utils_Tuple2('zeta', 950), - _Utils_Tuple2('eta', 951), - _Utils_Tuple2('theta', 952), - _Utils_Tuple2('iota', 953), - _Utils_Tuple2('kappa', 954), - _Utils_Tuple2('lambda', 955), - _Utils_Tuple2('mu', 956), - _Utils_Tuple2('nu', 957), - _Utils_Tuple2('xi', 958), - _Utils_Tuple2('omicron', 959), - _Utils_Tuple2('pi', 960), - _Utils_Tuple2('rho', 961), - _Utils_Tuple2('sigmaf', 962), - _Utils_Tuple2('sigma', 963), - _Utils_Tuple2('tau', 964), - _Utils_Tuple2('upsilon', 965), - _Utils_Tuple2('phi', 966), - _Utils_Tuple2('chi', 967), - _Utils_Tuple2('psi', 968), - _Utils_Tuple2('omega', 969), - _Utils_Tuple2('thetasym', 977), - _Utils_Tuple2('upsih', 978), - _Utils_Tuple2('piv', 982), - _Utils_Tuple2('ensp', 8194), - _Utils_Tuple2('emsp', 8195), - _Utils_Tuple2('thinsp', 8201), - _Utils_Tuple2('zwnj', 8204), - _Utils_Tuple2('zwj', 8205), - _Utils_Tuple2('lrm', 8206), - _Utils_Tuple2('rlm', 8207), - _Utils_Tuple2('ndash', 8211), - _Utils_Tuple2('mdash', 8212), - _Utils_Tuple2('lsquo', 8216), - _Utils_Tuple2('rsquo', 8217), - _Utils_Tuple2('sbquo', 8218), - _Utils_Tuple2('ldquo', 8220), - _Utils_Tuple2('rdquo', 8221), - _Utils_Tuple2('bdquo', 8222), - _Utils_Tuple2('dagger', 8224), - _Utils_Tuple2('Dagger', 8225), - _Utils_Tuple2('bull', 8226), - _Utils_Tuple2('hellip', 8230), - _Utils_Tuple2('permil', 8240), - _Utils_Tuple2('prime', 8242), - _Utils_Tuple2('Prime', 8243), - _Utils_Tuple2('lsaquo', 8249), - _Utils_Tuple2('rsaquo', 8250), - _Utils_Tuple2('oline', 8254), - _Utils_Tuple2('frasl', 8260), - _Utils_Tuple2('euro', 8364), - _Utils_Tuple2('image', 8465), - _Utils_Tuple2('weierp', 8472), - _Utils_Tuple2('real', 8476), - _Utils_Tuple2('trade', 8482), - _Utils_Tuple2('alefsym', 8501), - _Utils_Tuple2('larr', 8592), - _Utils_Tuple2('uarr', 8593), - _Utils_Tuple2('rarr', 8594), - _Utils_Tuple2('darr', 8595), - _Utils_Tuple2('harr', 8596), - _Utils_Tuple2('crarr', 8629), - _Utils_Tuple2('lArr', 8656), - _Utils_Tuple2('uArr', 8657), - _Utils_Tuple2('rArr', 8658), - _Utils_Tuple2('dArr', 8659), - _Utils_Tuple2('hArr', 8660), - _Utils_Tuple2('forall', 8704), - _Utils_Tuple2('part', 8706), - _Utils_Tuple2('exist', 8707), - _Utils_Tuple2('empty', 8709), - _Utils_Tuple2('nabla', 8711), - _Utils_Tuple2('isin', 8712), - _Utils_Tuple2('notin', 8713), - _Utils_Tuple2('ni', 8715), - _Utils_Tuple2('prod', 8719), - _Utils_Tuple2('sum', 8721), - _Utils_Tuple2('minus', 8722), - _Utils_Tuple2('lowast', 8727), - _Utils_Tuple2('radic', 8730), - _Utils_Tuple2('prop', 8733), - _Utils_Tuple2('infin', 8734), - _Utils_Tuple2('ang', 8736), - _Utils_Tuple2('and', 8743), - _Utils_Tuple2('or', 8744), - _Utils_Tuple2('cap', 8745), - _Utils_Tuple2('cup', 8746), - _Utils_Tuple2('int', 8747), - _Utils_Tuple2('there4', 8756), - _Utils_Tuple2('sim', 8764), - _Utils_Tuple2('cong', 8773), - _Utils_Tuple2('asymp', 8776), - _Utils_Tuple2('ne', 8800), - _Utils_Tuple2('equiv', 8801), - _Utils_Tuple2('le', 8804), - _Utils_Tuple2('ge', 8805), - _Utils_Tuple2('sub', 8834), - _Utils_Tuple2('sup', 8835), - _Utils_Tuple2('nsub', 8836), - _Utils_Tuple2('sube', 8838), - _Utils_Tuple2('supe', 8839), - _Utils_Tuple2('oplus', 8853), - _Utils_Tuple2('otimes', 8855), - _Utils_Tuple2('perp', 8869), - _Utils_Tuple2('sdot', 8901), - _Utils_Tuple2('lceil', 8968), - _Utils_Tuple2('rceil', 8969), - _Utils_Tuple2('lfloor', 8970), - _Utils_Tuple2('rfloor', 8971), - _Utils_Tuple2('lang', 9001), - _Utils_Tuple2('rang', 9002), - _Utils_Tuple2('loz', 9674), - _Utils_Tuple2('spades', 9824), - _Utils_Tuple2('clubs', 9827), - _Utils_Tuple2('hearts', 9829), - _Utils_Tuple2('diams', 9830) - ])); -var $dillonkearns$elm_markdown$Markdown$Entity$replaceEntity = function (match) { - return A2( - $elm$core$Maybe$withDefault, - match.match, - A2( - $elm$core$Maybe$map, - A2($elm$core$Basics$composeR, $elm$core$Char$fromCode, $elm$core$String$fromChar), - A2( - $elm$core$Maybe$andThen, - function (a) { - return A2($elm$core$Dict$get, a, $dillonkearns$elm_markdown$Markdown$Entity$entities); - }, - A2( - $elm$core$Maybe$withDefault, - $elm$core$Maybe$Nothing, - $elm$core$List$head(match.submatches))))); -}; -var $dillonkearns$elm_markdown$Markdown$Entity$replaceEntities = A2($elm$regex$Regex$replace, $dillonkearns$elm_markdown$Markdown$Entity$entitiesRegex, $dillonkearns$elm_markdown$Markdown$Entity$replaceEntity); -var $dillonkearns$elm_markdown$Markdown$Helpers$escapableRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(\\\\+)([!\"#$%&\\\'()*+,./:;<=>?@[\\\\\\]^_`{|}~-])')); -var $dillonkearns$elm_markdown$Markdown$Helpers$replaceEscapable = A2( - $elm$regex$Regex$replace, - $dillonkearns$elm_markdown$Markdown$Helpers$escapableRegex, - function (regexMatch) { - var _v0 = regexMatch.submatches; - if (((_v0.b && (_v0.a.$ === 'Just')) && _v0.b.b) && (_v0.b.a.$ === 'Just')) { - var backslashes = _v0.a.a; - var _v1 = _v0.b; - var escapedStr = _v1.a.a; - return _Utils_ap( - A2( - $elm$core$String$repeat, - ($elm$core$String$length(backslashes) / 2) | 0, - '\\'), - escapedStr); - } else { - return regexMatch.match; - } - }); -var $dillonkearns$elm_markdown$Markdown$Entity$hexadecimalRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('&#[Xx]([0-9a-fA-F]{1,8});')); -var $dillonkearns$elm_markdown$Markdown$Entity$hexToInt = A2( - $elm$core$Basics$composeR, - $elm$core$String$toLower, - A2( - $elm$core$Basics$composeR, - $elm$core$String$toList, - A2( - $elm$core$List$foldl, - F2( - function (hexDigit, _int) { - return ((_int * 16) + A2( - $elm$core$Basics$modBy, - 39, - $elm$core$Char$toCode(hexDigit))) - 9; - }), - 0))); -var $dillonkearns$elm_markdown$Markdown$Entity$replaceHexadecimal = function (match) { - return A2( - $elm$core$Maybe$withDefault, - match.match, - A2( - $elm$core$Maybe$map, - A2($elm$core$Basics$composeR, $dillonkearns$elm_markdown$Markdown$Entity$hexToInt, $dillonkearns$elm_markdown$Markdown$Entity$validUnicode), - A2( - $elm$core$Maybe$withDefault, - $elm$core$Maybe$Nothing, - $elm$core$List$head(match.submatches)))); -}; -var $dillonkearns$elm_markdown$Markdown$Entity$replaceHexadecimals = A2($elm$regex$Regex$replace, $dillonkearns$elm_markdown$Markdown$Entity$hexadecimalRegex, $dillonkearns$elm_markdown$Markdown$Entity$replaceHexadecimal); -var $dillonkearns$elm_markdown$Markdown$Helpers$formatStr = function (str) { - return $dillonkearns$elm_markdown$Markdown$Entity$replaceHexadecimals( - $dillonkearns$elm_markdown$Markdown$Entity$replaceDecimals( - $dillonkearns$elm_markdown$Markdown$Entity$replaceEntities( - $dillonkearns$elm_markdown$Markdown$Helpers$replaceEscapable(str)))); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$normalMatch = function (text) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - { - end: 0, - matches: _List_Nil, - start: 0, - text: $dillonkearns$elm_markdown$Markdown$Helpers$formatStr(text), - textEnd: 0, - textStart: 0, - type_: $dillonkearns$elm_markdown$Markdown$InlineParser$NormalType - }); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$parseTextMatch = F3( - function (rawText, _v2, parsedMatches) { - var matchModel = _v2.a; - var updtMatch = $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - matchModel, - { - matches: A3($dillonkearns$elm_markdown$Markdown$InlineParser$parseTextMatches, matchModel.text, _List_Nil, matchModel.matches) - })); - if (!parsedMatches.b) { - var finalStr = A2($elm$core$String$dropLeft, matchModel.end, rawText); - return $elm$core$String$isEmpty(finalStr) ? _List_fromArray( - [updtMatch]) : _List_fromArray( - [ - updtMatch, - $dillonkearns$elm_markdown$Markdown$InlineParser$normalMatch(finalStr) - ]); - } else { - var matchHead = parsedMatches.a.a; - var matchesTail = parsedMatches.b; - return _Utils_eq(matchHead.type_, $dillonkearns$elm_markdown$Markdown$InlineParser$NormalType) ? A2($elm$core$List$cons, updtMatch, parsedMatches) : (_Utils_eq(matchModel.end, matchHead.start) ? A2($elm$core$List$cons, updtMatch, parsedMatches) : ((_Utils_cmp(matchModel.end, matchHead.start) < 0) ? A2( - $elm$core$List$cons, - updtMatch, - A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$Markdown$InlineParser$normalMatch( - A3($elm$core$String$slice, matchModel.end, matchHead.start, rawText)), - parsedMatches)) : parsedMatches)); - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$parseTextMatches = F3( - function (rawText, parsedMatches, matches) { - parseTextMatches: - while (true) { - if (!matches.b) { - if (!parsedMatches.b) { - return $elm$core$String$isEmpty(rawText) ? _List_Nil : _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$InlineParser$normalMatch(rawText) - ]); - } else { - var matchModel = parsedMatches.a.a; - return (matchModel.start > 0) ? A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$Markdown$InlineParser$normalMatch( - A2($elm$core$String$left, matchModel.start, rawText)), - parsedMatches) : parsedMatches; - } - } else { - var match = matches.a; - var matchesTail = matches.b; - var $temp$rawText = rawText, - $temp$parsedMatches = A3($dillonkearns$elm_markdown$Markdown$InlineParser$parseTextMatch, rawText, match, parsedMatches), - $temp$matches = matchesTail; - rawText = $temp$rawText; - parsedMatches = $temp$parsedMatches; - matches = $temp$matches; - continue parseTextMatches; - } - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$parseText = function (model) { - return _Utils_update( - model, - { - matches: A3($dillonkearns$elm_markdown$Markdown$InlineParser$parseTextMatches, model.rawText, _List_Nil, model.matches) - }); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$angleBracketLTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(\\\\*)(\\<)')); -var $elm$regex$Regex$find = _Regex_findAtMost(_Regex_infinity); -var $dillonkearns$elm_markdown$Markdown$InlineParser$CharToken = function (a) { - return {$: 'CharToken', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Helpers$isEven = function (_int) { - return !A2($elm$core$Basics$modBy, 2, _int); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToAngleBracketLToken = function (regMatch) { - var _v0 = regMatch.submatches; - if ((_v0.b && _v0.b.b) && (_v0.b.a.$ === 'Just')) { - var maybeBackslashes = _v0.a; - var _v1 = _v0.b; - var delimiter = _v1.a.a; - var backslashesLength = A2( - $elm$core$Maybe$withDefault, - 0, - A2($elm$core$Maybe$map, $elm$core$String$length, maybeBackslashes)); - return $dillonkearns$elm_markdown$Markdown$Helpers$isEven(backslashesLength) ? $elm$core$Maybe$Just( - { - index: regMatch.index + backslashesLength, - length: 1, - meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$CharToken( - _Utils_chr('<')) - }) : $elm$core$Maybe$Nothing; - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$findAngleBracketLTokens = function (str) { - return A2( - $elm$core$List$filterMap, - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToAngleBracketLToken, - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$angleBracketLTokenRegex, str)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$angleBracketRTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(\\\\*)(\\>)')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$RightAngleBracket = function (a) { - return {$: 'RightAngleBracket', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToAngleBracketRToken = function (regMatch) { - var _v0 = regMatch.submatches; - if ((_v0.b && _v0.b.b) && (_v0.b.a.$ === 'Just')) { - var maybeBackslashes = _v0.a; - var _v1 = _v0.b; - var backslashesLength = A2( - $elm$core$Maybe$withDefault, - 0, - A2($elm$core$Maybe$map, $elm$core$String$length, maybeBackslashes)); - return $elm$core$Maybe$Just( - { - index: regMatch.index + backslashesLength, - length: 1, - meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$RightAngleBracket( - !$dillonkearns$elm_markdown$Markdown$Helpers$isEven(backslashesLength)) - }); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$findAngleBracketRTokens = function (str) { - return A2( - $elm$core$List$filterMap, - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToAngleBracketRToken, - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$angleBracketRTokenRegex, str)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$asteriskEmphasisTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(\\\\*)([^*])?(\\*+)([^*])?')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$EmphasisToken = F2( - function (a, b) { - return {$: 'EmphasisToken', a: a, b: b}; - }); -var $elm$regex$Regex$contains = _Regex_contains; -var $dillonkearns$elm_markdown$Markdown$InlineParser$punctuationRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('[!-#%-\\*,-/:;\\?@\\[-\\]_\\{\\}]')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$containPunctuation = $elm$regex$Regex$contains($dillonkearns$elm_markdown$Markdown$InlineParser$punctuationRegex); -var $dillonkearns$elm_markdown$Markdown$InlineParser$spaceRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('\\s')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$containSpace = $elm$regex$Regex$contains($dillonkearns$elm_markdown$Markdown$InlineParser$spaceRegex); -var $dillonkearns$elm_markdown$Markdown$InlineParser$charFringeRank = function (_char) { - var string = $elm$core$String$fromChar(_char); - return $dillonkearns$elm_markdown$Markdown$InlineParser$containSpace(string) ? 0 : ($dillonkearns$elm_markdown$Markdown$InlineParser$containPunctuation(string) ? 1 : 2); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$maybeCharFringeRank = function (maybeChar) { - return A2( - $elm$core$Maybe$withDefault, - 0, - A2($elm$core$Maybe$map, $dillonkearns$elm_markdown$Markdown$InlineParser$charFringeRank, maybeChar)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$getFringeRank = A2( - $elm$core$Basics$composeR, - $elm$core$Maybe$map( - A2( - $elm$core$Basics$composeR, - $elm$core$String$uncons, - A2( - $elm$core$Basics$composeR, - $elm$core$Maybe$map($elm$core$Tuple$first), - $dillonkearns$elm_markdown$Markdown$InlineParser$maybeCharFringeRank))), - $elm$core$Maybe$withDefault(0)); -var $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToEmphasisToken = F3( - function (_char, rawText, regMatch) { - var _v0 = regMatch.submatches; - if ((((_v0.b && _v0.b.b) && _v0.b.b.b) && (_v0.b.b.a.$ === 'Just')) && _v0.b.b.b.b) { - var maybeBackslashes = _v0.a; - var _v1 = _v0.b; - var maybeLeftFringe = _v1.a; - var _v2 = _v1.b; - var delimiter = _v2.a.a; - var _v3 = _v2.b; - var maybeRightFringe = _v3.a; - var leftFringeLength = A2( - $elm$core$Maybe$withDefault, - 0, - A2($elm$core$Maybe$map, $elm$core$String$length, maybeLeftFringe)); - var mLeftFringe = ((!(!regMatch.index)) && (!leftFringeLength)) ? $elm$core$Maybe$Just( - A3($elm$core$String$slice, regMatch.index - 1, regMatch.index, rawText)) : maybeLeftFringe; - var backslashesLength = A2( - $elm$core$Maybe$withDefault, - 0, - A2($elm$core$Maybe$map, $elm$core$String$length, maybeBackslashes)); - var isEscaped = ((!$dillonkearns$elm_markdown$Markdown$Helpers$isEven(backslashesLength)) && (!leftFringeLength)) || _Utils_eq( - mLeftFringe, - $elm$core$Maybe$Just('\\')); - var delimiterLength = isEscaped ? ($elm$core$String$length(delimiter) - 1) : $elm$core$String$length(delimiter); - var fringeRank = _Utils_Tuple2( - isEscaped ? 1 : $dillonkearns$elm_markdown$Markdown$InlineParser$getFringeRank(mLeftFringe), - $dillonkearns$elm_markdown$Markdown$InlineParser$getFringeRank(maybeRightFringe)); - var index = ((regMatch.index + backslashesLength) + leftFringeLength) + (isEscaped ? 1 : 0); - return ((delimiterLength <= 0) || (_Utils_eq( - _char, - _Utils_chr('_')) && _Utils_eq( - fringeRank, - _Utils_Tuple2(2, 2)))) ? $elm$core$Maybe$Nothing : $elm$core$Maybe$Just( - { - index: index, - length: delimiterLength, - meaning: A2($dillonkearns$elm_markdown$Markdown$InlineParser$EmphasisToken, _char, fringeRank) - }); - } else { - return $elm$core$Maybe$Nothing; - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$findAsteriskEmphasisTokens = function (str) { - return A2( - $elm$core$List$filterMap, - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToEmphasisToken, - _Utils_chr('*'), - str), - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$asteriskEmphasisTokenRegex, str)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$codeTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(\\\\*)(\\`+)')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$CodeToken = function (a) { - return {$: 'CodeToken', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToCodeToken = function (regMatch) { - var _v0 = regMatch.submatches; - if ((_v0.b && _v0.b.b) && (_v0.b.a.$ === 'Just')) { - var maybeBackslashes = _v0.a; - var _v1 = _v0.b; - var backtick = _v1.a.a; - var backslashesLength = A2( - $elm$core$Maybe$withDefault, - 0, - A2($elm$core$Maybe$map, $elm$core$String$length, maybeBackslashes)); - return $elm$core$Maybe$Just( - { - index: regMatch.index + backslashesLength, - length: $elm$core$String$length(backtick), - meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$CodeToken( - !$dillonkearns$elm_markdown$Markdown$Helpers$isEven(backslashesLength)) - }); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$findCodeTokens = function (str) { - return A2( - $elm$core$List$filterMap, - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToCodeToken, - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$codeTokenRegex, str)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$hardBreakTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(?:(\\\\+)|( {2,}))\\n')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakToken = {$: 'HardLineBreakToken'}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToHardBreakToken = function (regMatch) { - var _v0 = regMatch.submatches; - _v0$2: - while (true) { - if (_v0.b) { - if (_v0.a.$ === 'Just') { - var backslashes = _v0.a.a; - var backslashesLength = $elm$core$String$length(backslashes); - return (!$dillonkearns$elm_markdown$Markdown$Helpers$isEven(backslashesLength)) ? $elm$core$Maybe$Just( - {index: (regMatch.index + backslashesLength) - 1, length: 2, meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakToken}) : $elm$core$Maybe$Nothing; - } else { - if (_v0.b.b && (_v0.b.a.$ === 'Just')) { - var _v1 = _v0.b; - return $elm$core$Maybe$Just( - { - index: regMatch.index, - length: $elm$core$String$length(regMatch.match), - meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakToken - }); - } else { - break _v0$2; - } - } - } else { - break _v0$2; - } - } - return $elm$core$Maybe$Nothing; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToSoftHardBreakToken = function (regMatch) { - var _v0 = regMatch.submatches; - _v0$2: - while (true) { - if (_v0.b) { - if (_v0.a.$ === 'Just') { - var backslashes = _v0.a.a; - var backslashesLength = $elm$core$String$length(backslashes); - return $dillonkearns$elm_markdown$Markdown$Helpers$isEven(backslashesLength) ? $elm$core$Maybe$Just( - {index: regMatch.index + backslashesLength, length: 1, meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakToken}) : $elm$core$Maybe$Just( - {index: (regMatch.index + backslashesLength) - 1, length: 2, meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakToken}); - } else { - if (_v0.b.b) { - var _v1 = _v0.b; - var maybeSpaces = _v1.a; - return $elm$core$Maybe$Just( - { - index: regMatch.index, - length: $elm$core$String$length(regMatch.match), - meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakToken - }); - } else { - break _v0$2; - } - } - } else { - break _v0$2; - } - } - return $elm$core$Maybe$Nothing; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$softAsHardLineBreak = false; -var $dillonkearns$elm_markdown$Markdown$InlineParser$softAsHardLineBreakTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(?:(\\\\+)|( *))\\n')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$findHardBreakTokens = function (str) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$softAsHardLineBreak ? A2( - $elm$core$List$filterMap, - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToSoftHardBreakToken, - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$softAsHardLineBreakTokenRegex, str)) : A2( - $elm$core$List$filterMap, - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToHardBreakToken, - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$hardBreakTokenRegex, str)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$linkImageCloseTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(\\\\*)(\\])')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToLinkImageCloseToken = function (regMatch) { - var _v0 = regMatch.submatches; - if ((_v0.b && _v0.b.b) && (_v0.b.a.$ === 'Just')) { - var maybeBackslashes = _v0.a; - var _v1 = _v0.b; - var delimiter = _v1.a.a; - var backslashesLength = A2( - $elm$core$Maybe$withDefault, - 0, - A2($elm$core$Maybe$map, $elm$core$String$length, maybeBackslashes)); - return $dillonkearns$elm_markdown$Markdown$Helpers$isEven(backslashesLength) ? $elm$core$Maybe$Just( - { - index: regMatch.index + backslashesLength, - length: 1, - meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$CharToken( - _Utils_chr(']')) - }) : $elm$core$Maybe$Nothing; - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$findLinkImageCloseTokens = function (str) { - return A2( - $elm$core$List$filterMap, - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToLinkImageCloseToken, - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$linkImageCloseTokenRegex, str)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$linkImageOpenTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(\\\\*)(\\!)?(\\[)')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$ImageOpenToken = {$: 'ImageOpenToken'}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$LinkOpenToken = function (a) { - return {$: 'LinkOpenToken', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToLinkImageOpenToken = function (regMatch) { - var _v0 = regMatch.submatches; - if (((_v0.b && _v0.b.b) && _v0.b.b.b) && (_v0.b.b.a.$ === 'Just')) { - var maybeBackslashes = _v0.a; - var _v1 = _v0.b; - var maybeImageOpen = _v1.a; - var _v2 = _v1.b; - var delimiter = _v2.a.a; - var backslashesLength = A2( - $elm$core$Maybe$withDefault, - 0, - A2($elm$core$Maybe$map, $elm$core$String$length, maybeBackslashes)); - var isEscaped = !$dillonkearns$elm_markdown$Markdown$Helpers$isEven(backslashesLength); - var index = (regMatch.index + backslashesLength) + ((isEscaped && _Utils_eq( - maybeImageOpen, - $elm$core$Maybe$Just('!'))) ? 1 : 0); - var meaning = isEscaped ? A2( - $elm$core$Maybe$map, - function (_v3) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$LinkOpenToken(true); - }, - maybeImageOpen) : $elm$core$Maybe$Just( - A2( - $elm$core$Maybe$withDefault, - $dillonkearns$elm_markdown$Markdown$InlineParser$LinkOpenToken(true), - A2( - $elm$core$Maybe$map, - function (_v4) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$ImageOpenToken; - }, - maybeImageOpen))); - var length = _Utils_eq( - meaning, - $elm$core$Maybe$Just($dillonkearns$elm_markdown$Markdown$InlineParser$ImageOpenToken)) ? 2 : 1; - var toModel = function (m) { - return {index: index, length: length, meaning: m}; - }; - return A2($elm$core$Maybe$map, toModel, meaning); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$findLinkImageOpenTokens = function (str) { - return A2( - $elm$core$List$filterMap, - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToLinkImageOpenToken, - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$linkImageOpenTokenRegex, str)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$underlineEmphasisTokenRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('(\\\\*)([^_])?(\\_+)([^_])?')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$findUnderlineEmphasisTokens = function (str) { - return A2( - $elm$core$List$filterMap, - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$regMatchToEmphasisToken, - _Utils_chr('_'), - str), - A2($elm$regex$Regex$find, $dillonkearns$elm_markdown$Markdown$InlineParser$underlineEmphasisTokenRegex, str)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$tokenize = function (model) { - return _Utils_update( - model, - { - tokens: A2( - $elm$core$List$sortBy, - function ($) { - return $.index; - }, - _Utils_ap( - $dillonkearns$elm_markdown$Markdown$InlineParser$findAngleBracketRTokens(model.rawText), - _Utils_ap( - $dillonkearns$elm_markdown$Markdown$InlineParser$findAngleBracketLTokens(model.rawText), - _Utils_ap( - $dillonkearns$elm_markdown$Markdown$InlineParser$findHardBreakTokens(model.rawText), - _Utils_ap( - $dillonkearns$elm_markdown$Markdown$InlineParser$findLinkImageCloseTokens(model.rawText), - _Utils_ap( - $dillonkearns$elm_markdown$Markdown$InlineParser$findLinkImageOpenTokens(model.rawText), - _Utils_ap( - $dillonkearns$elm_markdown$Markdown$InlineParser$findUnderlineEmphasisTokens(model.rawText), - _Utils_ap( - $dillonkearns$elm_markdown$Markdown$InlineParser$findAsteriskEmphasisTokens(model.rawText), - $dillonkearns$elm_markdown$Markdown$InlineParser$findCodeTokens(model.rawText))))))))) - }); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$CodeType = {$: 'CodeType'}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$EmphasisType = function (a) { - return {$: 'EmphasisType', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$HtmlType = function (a) { - return {$: 'HtmlType', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$ImageType = function (a) { - return {$: 'ImageType', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$LinkType = function (a) { - return {$: 'LinkType', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$addMatch = F2( - function (model, match) { - return _Utils_update( - model, - { - matches: A2($elm$core$List$cons, match, model.matches) - }); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$addToken = F2( - function (model, token) { - return _Utils_update( - model, - { - tokens: A2($elm$core$List$cons, token, model.tokens) - }); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$applyTTM = F2( - function (finderFunction, model) { - return finderFunction( - _Utils_Tuple2( - model.tokens, - _Utils_update( - model, - {tokens: _List_Nil}))); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$AutolinkType = function (a) { - return {$: 'AutolinkType', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$decodeUrlRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('%(?:3B|2C|2F|3F|3A|40|26|3D|2B|24|23|25)')); -var $elm$url$Url$percentDecode = _Url_percentDecode; -var $elm$url$Url$percentEncode = _Url_percentEncode; -var $dillonkearns$elm_markdown$Markdown$InlineParser$encodeUrl = A2( - $elm$core$Basics$composeR, - $elm$url$Url$percentEncode, - A2( - $elm$regex$Regex$replace, - $dillonkearns$elm_markdown$Markdown$InlineParser$decodeUrlRegex, - function (match) { - return A2( - $elm$core$Maybe$withDefault, - match.match, - $elm$url$Url$percentDecode(match.match)); - })); -var $dillonkearns$elm_markdown$Markdown$InlineParser$urlRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('^([A-Za-z][A-Za-z0-9.+\\-]{1,31}:[^<>\\x00-\\x20]*)$')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$autolinkToMatch = function (_v0) { - var match = _v0.a; - return A2($elm$regex$Regex$contains, $dillonkearns$elm_markdown$Markdown$InlineParser$urlRegex, match.text) ? $elm$core$Result$Ok( - $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - match, - { - type_: $dillonkearns$elm_markdown$Markdown$InlineParser$AutolinkType( - _Utils_Tuple2( - match.text, - $dillonkearns$elm_markdown$Markdown$InlineParser$encodeUrl(match.text))) - }))) : $elm$core$Result$Err( - $dillonkearns$elm_markdown$Markdown$InlineParser$Match(match)); -}; -var $elm$regex$Regex$findAtMost = _Regex_findAtMost; -var $dillonkearns$elm_markdown$Markdown$Helpers$lineEndChars = '\\f\\v\\r\\n'; -var $dillonkearns$elm_markdown$Markdown$Helpers$whiteSpaceChars = ' \\t\\f\\v\\r\\n'; -var $dillonkearns$elm_markdown$Markdown$InlineParser$hrefRegex = '(?:<([^<>' + ($dillonkearns$elm_markdown$Markdown$Helpers$lineEndChars + (']*)>|([^' + ($dillonkearns$elm_markdown$Markdown$Helpers$whiteSpaceChars + ('\\(\\)\\\\]*(?:\\\\.[^' + ($dillonkearns$elm_markdown$Markdown$Helpers$whiteSpaceChars + '\\(\\)\\\\]*)*))'))))); -var $dillonkearns$elm_markdown$Markdown$Helpers$titleRegex = '(?:[' + ($dillonkearns$elm_markdown$Markdown$Helpers$whiteSpaceChars + (']+' + ('(?:\'([^\'\\\\]*(?:\\\\.[^\'\\\\]*)*)\'|' + ('\"([^\"\\\\]*(?:\\\\.[^\"\\\\]*)*)\"|' + '\\(([^\\)\\\\]*(?:\\\\.[^\\)\\\\]*)*)\\)))?')))); -var $dillonkearns$elm_markdown$Markdown$InlineParser$inlineLinkTypeOrImageTypeRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('^\\(\\s*' + ($dillonkearns$elm_markdown$Markdown$InlineParser$hrefRegex + ($dillonkearns$elm_markdown$Markdown$Helpers$titleRegex + '\\s*\\)')))); -var $dillonkearns$elm_markdown$Markdown$InlineParser$prepareUrlAndTitle = function (_v0) { - var rawUrl = _v0.a; - var maybeTitle = _v0.b; - return _Utils_Tuple2( - $dillonkearns$elm_markdown$Markdown$InlineParser$encodeUrl( - $dillonkearns$elm_markdown$Markdown$Helpers$formatStr(rawUrl)), - A2($elm$core$Maybe$map, $dillonkearns$elm_markdown$Markdown$Helpers$formatStr, maybeTitle)); -}; -var $dillonkearns$elm_markdown$Markdown$Helpers$returnFirstJust = function (maybes) { - var process = F2( - function (a, maybeFound) { - if (maybeFound.$ === 'Just') { - var found = maybeFound.a; - return $elm$core$Maybe$Just(found); - } else { - return a; - } - }); - return A3($elm$core$List$foldl, process, $elm$core$Maybe$Nothing, maybes); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$inlineLinkTypeOrImageTypeRegexToMatch = F3( - function (matchModel, model, regexMatch) { - var _v0 = regexMatch.submatches; - if ((((_v0.b && _v0.b.b) && _v0.b.b.b) && _v0.b.b.b.b) && _v0.b.b.b.b.b) { - var maybeRawUrlAngleBrackets = _v0.a; - var _v1 = _v0.b; - var maybeRawUrlWithoutBrackets = _v1.a; - var _v2 = _v1.b; - var maybeTitleSingleQuotes = _v2.a; - var _v3 = _v2.b; - var maybeTitleDoubleQuotes = _v3.a; - var _v4 = _v3.b; - var maybeTitleParenthesis = _v4.a; - var maybeTitle = $dillonkearns$elm_markdown$Markdown$Helpers$returnFirstJust( - _List_fromArray( - [maybeTitleSingleQuotes, maybeTitleDoubleQuotes, maybeTitleParenthesis])); - var toMatch = function (rawUrl) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - matchModel, - { - end: matchModel.end + $elm$core$String$length(regexMatch.match), - type_: function () { - var _v5 = matchModel.type_; - if (_v5.$ === 'ImageType') { - return $dillonkearns$elm_markdown$Markdown$InlineParser$ImageType; - } else { - return $dillonkearns$elm_markdown$Markdown$InlineParser$LinkType; - } - }()( - $dillonkearns$elm_markdown$Markdown$InlineParser$prepareUrlAndTitle( - _Utils_Tuple2(rawUrl, maybeTitle))) - })); - }; - var maybeRawUrl = $dillonkearns$elm_markdown$Markdown$Helpers$returnFirstJust( - _List_fromArray( - [maybeRawUrlAngleBrackets, maybeRawUrlWithoutBrackets])); - return $elm$core$Maybe$Just( - toMatch( - A2($elm$core$Maybe$withDefault, '', maybeRawUrl))); - } else { - return $elm$core$Maybe$Nothing; - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$checkForInlineLinkTypeOrImageType = function (_v0) { - var remainText = _v0.a; - var tempMatch = _v0.b.a; - var model = _v0.c; - return A2( - $elm$core$Result$fromMaybe, - _Utils_Tuple3( - remainText, - $dillonkearns$elm_markdown$Markdown$InlineParser$Match(tempMatch), - model), - A2( - $elm$core$Maybe$map, - $dillonkearns$elm_markdown$Markdown$InlineParser$addMatch(model), - A2( - $elm$core$Maybe$andThen, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$inlineLinkTypeOrImageTypeRegexToMatch, tempMatch, model), - $elm$core$List$head( - A3($elm$regex$Regex$findAtMost, 1, $dillonkearns$elm_markdown$Markdown$InlineParser$inlineLinkTypeOrImageTypeRegex, remainText))))); -}; -var $dillonkearns$elm_markdown$Markdown$Helpers$insideSquareBracketRegex = '[^\\[\\]\\\\]*(?:\\\\.[^\\[\\]\\\\]*)*'; -var $dillonkearns$elm_markdown$Markdown$InlineParser$refLabelRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('^\\[\\s*(' + ($dillonkearns$elm_markdown$Markdown$Helpers$insideSquareBracketRegex + ')\\s*\\]'))); -var $dillonkearns$elm_markdown$Markdown$Helpers$cleanWhitespaces = function (original) { - return original; -}; -var $dillonkearns$elm_markdown$Markdown$Helpers$prepareRefLabel = A2($elm$core$Basics$composeR, $dillonkearns$elm_markdown$Markdown$Helpers$cleanWhitespaces, $elm$core$String$toLower); -var $dillonkearns$elm_markdown$Markdown$InlineParser$refRegexToMatch = F3( - function (matchModel, model, maybeRegexMatch) { - var regexMatchLength = A2( - $elm$core$Maybe$withDefault, - 0, - A2( - $elm$core$Maybe$map, - A2( - $elm$core$Basics$composeR, - function ($) { - return $.match; - }, - $elm$core$String$length), - maybeRegexMatch)); - var toMatch = function (urlTitle) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - matchModel, - { - end: matchModel.end + regexMatchLength, - type_: function () { - var _v0 = matchModel.type_; - if (_v0.$ === 'ImageType') { - return $dillonkearns$elm_markdown$Markdown$InlineParser$ImageType; - } else { - return $dillonkearns$elm_markdown$Markdown$InlineParser$LinkType; - } - }()( - $dillonkearns$elm_markdown$Markdown$InlineParser$prepareUrlAndTitle(urlTitle)) - })); - }; - var refLabel = function (str) { - return $elm$core$String$isEmpty(str) ? matchModel.text : str; - }( - A2( - $elm$core$Maybe$withDefault, - matchModel.text, - A2( - $elm$core$Maybe$withDefault, - $elm$core$Maybe$Nothing, - A2( - $elm$core$Maybe$withDefault, - $elm$core$Maybe$Nothing, - A2( - $elm$core$Maybe$map, - A2( - $elm$core$Basics$composeR, - function ($) { - return $.submatches; - }, - $elm$core$List$head), - maybeRegexMatch))))); - var maybeRefItem = A2( - $elm$core$Dict$get, - $dillonkearns$elm_markdown$Markdown$Helpers$prepareRefLabel(refLabel), - model.refs); - return A2($elm$core$Maybe$map, toMatch, maybeRefItem); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$checkForRefLinkTypeOrImageType = function (_v0) { - var remainText = _v0.a; - var tempMatch = _v0.b.a; - var model = _v0.c; - return A2( - $elm$core$Result$fromMaybe, - _Utils_Tuple3( - remainText, - $dillonkearns$elm_markdown$Markdown$InlineParser$Match(tempMatch), - model), - A2( - $elm$core$Maybe$map, - $dillonkearns$elm_markdown$Markdown$InlineParser$addMatch(model), - A3( - $dillonkearns$elm_markdown$Markdown$InlineParser$refRegexToMatch, - tempMatch, - model, - $elm$core$List$head( - A3($elm$regex$Regex$findAtMost, 1, $dillonkearns$elm_markdown$Markdown$InlineParser$refLabelRegex, remainText))))); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$checkParsedAheadOverlapping = function (parser) { - var _v0 = parser.matches; - if (!_v0.b) { - return $elm$core$Result$Err(_Utils_Tuple0); - } else { - var match = _v0.a.a; - var remainMatches = _v0.b; - var overlappingMatches = A2( - $elm$core$List$filter, - function (_v1) { - var testMatch = _v1.a; - return (_Utils_cmp(match.end, testMatch.start) > 0) && (_Utils_cmp(match.end, testMatch.end) < 0); - }, - remainMatches); - return ($elm$core$List$isEmpty(remainMatches) || $elm$core$List$isEmpty(overlappingMatches)) ? $elm$core$Result$Ok(parser) : $elm$core$Result$Err(_Utils_Tuple0); - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$emailRegex = A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString('^([a-zA-Z0-9.!#$%&\'*+\\/=?^_`{|}~\\-]+@[a-zA-Z0-9](?:[a-zA-Z0-9\\-]{0,61}[a-zA-Z0-9])?(?:\\.[a-zA-Z0-9](?:[a-zA-Z0-9\\-]{0,61}[a-zA-Z0-9])?)*)$')); -var $dillonkearns$elm_markdown$Markdown$InlineParser$emailAutolinkTypeToMatch = function (_v0) { - var match = _v0.a; - return A2($elm$regex$Regex$contains, $dillonkearns$elm_markdown$Markdown$InlineParser$emailRegex, match.text) ? $elm$core$Result$Ok( - $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - match, - { - type_: $dillonkearns$elm_markdown$Markdown$InlineParser$AutolinkType( - _Utils_Tuple2( - match.text, - 'mailto:' + $dillonkearns$elm_markdown$Markdown$InlineParser$encodeUrl(match.text))) - }))) : $elm$core$Result$Err( - $dillonkearns$elm_markdown$Markdown$InlineParser$Match(match)); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$filterTokens = F2( - function (filter, model) { - return _Utils_update( - model, - { - tokens: A2($elm$core$List$filter, filter, model.tokens) - }); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$findToken = F2( - function (isToken, tokens) { - var search = F2( - function (token, _v2) { - var maybeToken = _v2.a; - var innerTokens = _v2.b; - var remainTokens = _v2.c; - if (maybeToken.$ === 'Nothing') { - return isToken(token) ? _Utils_Tuple3( - $elm$core$Maybe$Just(token), - innerTokens, - _List_Nil) : _Utils_Tuple3( - $elm$core$Maybe$Nothing, - A2($elm$core$List$cons, token, innerTokens), - _List_Nil); - } else { - return _Utils_Tuple3( - maybeToken, - innerTokens, - A2($elm$core$List$cons, token, remainTokens)); - } - }); - var _return = function (_v0) { - var maybeToken = _v0.a; - var innerTokens = _v0.b; - var remainTokens = _v0.c; - return A2( - $elm$core$Maybe$map, - function (token) { - return _Utils_Tuple3( - token, - $elm$core$List$reverse(innerTokens), - $elm$core$List$reverse(remainTokens)); - }, - maybeToken); - }; - return _return( - A3( - $elm$core$List$foldl, - search, - _Utils_Tuple3($elm$core$Maybe$Nothing, _List_Nil, _List_Nil), - tokens)); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$HtmlToken = F2( - function (a, b) { - return {$: 'HtmlToken', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$log = F2( - function (label, value) { - return value; - }); -var $elm$parser$Parser$Advanced$bagToList = F2( - function (bag, list) { - bagToList: - while (true) { - switch (bag.$) { - case 'Empty': - return list; - case 'AddRight': - var bag1 = bag.a; - var x = bag.b; - var $temp$bag = bag1, - $temp$list = A2($elm$core$List$cons, x, list); - bag = $temp$bag; - list = $temp$list; - continue bagToList; - default: - var bag1 = bag.a; - var bag2 = bag.b; - var $temp$bag = bag1, - $temp$list = A2($elm$parser$Parser$Advanced$bagToList, bag2, list); - bag = $temp$bag; - list = $temp$list; - continue bagToList; - } - } - }); -var $elm$parser$Parser$Advanced$run = F2( - function (_v0, src) { - var parse = _v0.a; - var _v1 = parse( - {col: 1, context: _List_Nil, indent: 1, offset: 0, row: 1, src: src}); - if (_v1.$ === 'Good') { - var value = _v1.b; - return $elm$core$Result$Ok(value); - } else { - var bag = _v1.b; - return $elm$core$Result$Err( - A2($elm$parser$Parser$Advanced$bagToList, bag, _List_Nil)); - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$htmlFromRegex = F2( - function (model, match) { - var consumedCharacters = A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - F3( - function (startOffset, htmlTag, endOffset) { - return {htmlTag: htmlTag, length: endOffset - startOffset}; - })), - $elm$parser$Parser$Advanced$getOffset), - $dillonkearns$elm_markdown$HtmlParser$html), - $elm$parser$Parser$Advanced$getOffset); - var parsed = A2( - $elm$parser$Parser$Advanced$run, - consumedCharacters, - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$log, - 'dropped', - A2( - $elm$core$String$dropLeft, - match.start, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$log, 'rawText', model.rawText)))); - var _v0 = A2($dillonkearns$elm_markdown$Markdown$InlineParser$log, 'match', match); - if (parsed.$ === 'Ok') { - var htmlTag = parsed.a.htmlTag; - var length = parsed.a.length; - var htmlToken = A2($dillonkearns$elm_markdown$Markdown$InlineParser$HtmlToken, false, htmlTag); - return $elm$core$Maybe$Just( - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$addToken, - model, - {index: match.start, length: length, meaning: htmlToken})); - } else { - var error = parsed.a; - var _v2 = A2($dillonkearns$elm_markdown$Markdown$InlineParser$log, 'error', error); - return $elm$core$Maybe$Nothing; - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$htmlToToken = F2( - function (model, _v0) { - var match = _v0.a; - return A2($dillonkearns$elm_markdown$Markdown$InlineParser$htmlFromRegex, model, match); - }); -var $dillonkearns$elm_markdown$Markdown$Helpers$ifError = F2( - function (_function, result) { - if (result.$ === 'Ok') { - return result; - } else { - var err = result.a; - return _function(err); - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$isCloseToken = F2( - function (htmlModel, token) { - return false; - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$isCodeTokenPair = F2( - function (closeToken, openToken) { - var _v0 = openToken.meaning; - if (_v0.$ === 'CodeToken') { - var isEscaped = _v0.a; - return isEscaped ? _Utils_eq(openToken.length - 1, closeToken.length) : _Utils_eq(openToken.length, closeToken.length); - } else { - return false; - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$isLinkTypeOrImageOpenToken = function (token) { - var _v0 = token.meaning; - switch (_v0.$) { - case 'LinkOpenToken': - return true; - case 'ImageOpenToken': - return true; - default: - return false; - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$isOpenEmphasisToken = F2( - function (closeToken, openToken) { - var _v0 = openToken.meaning; - if (_v0.$ === 'EmphasisToken') { - var openChar = _v0.a; - var _v1 = _v0.b; - var openLR = _v1.a; - var openRR = _v1.b; - var _v2 = closeToken.meaning; - if (_v2.$ === 'EmphasisToken') { - var closeChar = _v2.a; - var _v3 = _v2.b; - var closeLR = _v3.a; - var closeRR = _v3.b; - return _Utils_eq(openChar, closeChar) ? ((_Utils_eq(openLR, openRR) || _Utils_eq(closeLR, closeRR)) ? (!(!A2($elm$core$Basics$modBy, 3, closeToken.length + openToken.length))) : true) : false; - } else { - return false; - } - } else { - return false; - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$isVoidTag = function (htmlModel) { - return false; -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakType = {$: 'HardLineBreakType'}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$SoftLineBreakToken = {$: 'SoftLineBreakToken'}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$reverseTokens = function (model) { - return _Utils_update( - model, - { - tokens: $elm$core$List$reverse(model.tokens) - }); -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$tokenToMatch = F2( - function (token, type_) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - {end: token.index + token.length, matches: _List_Nil, start: token.index, text: '', textEnd: 0, textStart: 0, type_: type_}); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$lineBreakTTM = function (_v0) { - lineBreakTTM: - while (true) { - var tokens = _v0.a; - var model = _v0.b; - if (!tokens.b) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$reverseTokens(model); - } else { - var token = tokens.a; - var tokensTail = tokens.b; - if (_Utils_eq(token.meaning, $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakToken) || (_Utils_eq(token.meaning, $dillonkearns$elm_markdown$Markdown$InlineParser$SoftLineBreakToken) && $dillonkearns$elm_markdown$Markdown$InlineParser$softAsHardLineBreak)) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$lineBreakTTM( - function (b) { - return _Utils_Tuple2(tokensTail, b); - }( - _Utils_update( - model, - { - matches: A2( - $elm$core$List$cons, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$tokenToMatch, token, $dillonkearns$elm_markdown$Markdown$InlineParser$HardLineBreakType), - model.matches) - }))); - } else { - var $temp$_v0 = _Utils_Tuple2( - tokensTail, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addToken, model, token)); - _v0 = $temp$_v0; - continue lineBreakTTM; - } - } - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$removeParsedAheadTokens = F2( - function (tokensTail, parser) { - var _v0 = parser.matches; - if (!_v0.b) { - return _Utils_Tuple2(tokensTail, parser); - } else { - var match = _v0.a.a; - return _Utils_Tuple2( - A2( - $elm$core$List$filter, - function (token) { - return _Utils_cmp(token.index, match.end) > -1; - }, - tokensTail), - parser); - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$angleBracketsToMatch = F4( - function (closeToken, isEscaped, model, _v24) { - var openToken = _v24.a; - var remainTokens = _v24.c; - return function (result) { - if (result.$ === 'Err') { - var tempMatch = result.a; - return (!isEscaped) ? A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$htmlToToken, - _Utils_update( - model, - {tokens: remainTokens}), - tempMatch) : $elm$core$Result$toMaybe(result); - } else { - return $elm$core$Result$toMaybe(result); - } - }( - A2( - $elm$core$Result$map, - function (newMatch) { - return _Utils_update( - model, - { - matches: A2($elm$core$List$cons, newMatch, model.matches), - tokens: remainTokens - }); - }, - A2( - $dillonkearns$elm_markdown$Markdown$Helpers$ifError, - $dillonkearns$elm_markdown$Markdown$InlineParser$emailAutolinkTypeToMatch, - $dillonkearns$elm_markdown$Markdown$InlineParser$autolinkToMatch( - A6( - $dillonkearns$elm_markdown$Markdown$InlineParser$tokenPairToMatch, - model, - function (s) { - return s; - }, - $dillonkearns$elm_markdown$Markdown$InlineParser$CodeType, - openToken, - closeToken, - _List_Nil))))); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$codeAutolinkTypeHtmlTagTTM = function (_v21) { - codeAutolinkTypeHtmlTagTTM: - while (true) { - var tokens = _v21.a; - var model = _v21.b; - if (!tokens.b) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$reverseTokens(model); - } else { - var token = tokens.a; - var tokensTail = tokens.b; - var _v23 = token.meaning; - switch (_v23.$) { - case 'CodeToken': - var isEscaped = _v23.a; - return $dillonkearns$elm_markdown$Markdown$InlineParser$codeAutolinkTypeHtmlTagTTM( - function (b) { - return _Utils_Tuple2(tokensTail, b); - }( - A2( - $elm$core$Maybe$withDefault, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addToken, model, token), - A2( - $elm$core$Maybe$map, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$codeToMatch, token, model), - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$findToken, - $dillonkearns$elm_markdown$Markdown$InlineParser$isCodeTokenPair(token), - model.tokens))))); - case 'RightAngleBracket': - var isEscaped = _v23.a; - return $dillonkearns$elm_markdown$Markdown$InlineParser$codeAutolinkTypeHtmlTagTTM( - function (b) { - return _Utils_Tuple2(tokensTail, b); - }( - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$filterTokens, - A2( - $elm$core$Basics$composeR, - function ($) { - return $.meaning; - }, - $elm$core$Basics$neq( - $dillonkearns$elm_markdown$Markdown$InlineParser$CharToken( - _Utils_chr('<')))), - A2( - $elm$core$Maybe$withDefault, - model, - A2( - $elm$core$Maybe$andThen, - A3($dillonkearns$elm_markdown$Markdown$InlineParser$angleBracketsToMatch, token, isEscaped, model), - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$findToken, - A2( - $elm$core$Basics$composeR, - function ($) { - return $.meaning; - }, - $elm$core$Basics$eq( - $dillonkearns$elm_markdown$Markdown$InlineParser$CharToken( - _Utils_chr('<')))), - model.tokens)))))); - default: - var $temp$_v21 = _Utils_Tuple2( - tokensTail, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addToken, model, token)); - _v21 = $temp$_v21; - continue codeAutolinkTypeHtmlTagTTM; - } - } - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$codeToMatch = F3( - function (closeToken, model, _v20) { - var openToken = _v20.a; - var remainTokens = _v20.c; - var updtOpenToken = _Utils_eq( - openToken.meaning, - $dillonkearns$elm_markdown$Markdown$InlineParser$CodeToken(true)) ? _Utils_update( - openToken, - {index: openToken.index + 1, length: openToken.length - 1}) : openToken; - return _Utils_update( - model, - { - matches: A2( - $elm$core$List$cons, - A6($dillonkearns$elm_markdown$Markdown$InlineParser$tokenPairToMatch, model, $dillonkearns$elm_markdown$Markdown$Helpers$cleanWhitespaces, $dillonkearns$elm_markdown$Markdown$InlineParser$CodeType, updtOpenToken, closeToken, _List_Nil), - model.matches), - tokens: remainTokens - }); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$emphasisTTM = function (_v16) { - emphasisTTM: - while (true) { - var tokens = _v16.a; - var model = _v16.b; - if (!tokens.b) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$reverseTokens(model); - } else { - var token = tokens.a; - var tokensTail = tokens.b; - var _v18 = token.meaning; - if (_v18.$ === 'EmphasisToken') { - var _char = _v18.a; - var _v19 = _v18.b; - var leftRank = _v19.a; - var rightRank = _v19.b; - if (_Utils_eq(leftRank, rightRank)) { - if ((!(!rightRank)) && ((!_Utils_eq( - _char, - _Utils_chr('_'))) || (rightRank === 1))) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$emphasisTTM( - A2( - $elm$core$Maybe$withDefault, - _Utils_Tuple2( - tokensTail, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addToken, model, token)), - A2( - $elm$core$Maybe$map, - A3($dillonkearns$elm_markdown$Markdown$InlineParser$emphasisToMatch, token, tokensTail, model), - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$findToken, - $dillonkearns$elm_markdown$Markdown$InlineParser$isOpenEmphasisToken(token), - model.tokens)))); - } else { - var $temp$_v16 = _Utils_Tuple2(tokensTail, model); - _v16 = $temp$_v16; - continue emphasisTTM; - } - } else { - if (_Utils_cmp(leftRank, rightRank) < 0) { - var $temp$_v16 = _Utils_Tuple2( - tokensTail, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addToken, model, token)); - _v16 = $temp$_v16; - continue emphasisTTM; - } else { - return $dillonkearns$elm_markdown$Markdown$InlineParser$emphasisTTM( - A2( - $elm$core$Maybe$withDefault, - _Utils_Tuple2(tokensTail, model), - A2( - $elm$core$Maybe$map, - A3($dillonkearns$elm_markdown$Markdown$InlineParser$emphasisToMatch, token, tokensTail, model), - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$findToken, - $dillonkearns$elm_markdown$Markdown$InlineParser$isOpenEmphasisToken(token), - model.tokens)))); - } - } - } else { - var $temp$_v16 = _Utils_Tuple2( - tokensTail, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addToken, model, token)); - _v16 = $temp$_v16; - continue emphasisTTM; - } - } - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$emphasisToMatch = F4( - function (closeToken, tokensTail, model, _v15) { - var openToken = _v15.a; - var innerTokens = _v15.b; - var remainTokens = _v15.c; - var remainLength = openToken.length - closeToken.length; - var updt = (!remainLength) ? {closeToken: closeToken, openToken: openToken, remainTokens: remainTokens, tokensTail: tokensTail} : ((remainLength > 0) ? { - closeToken: closeToken, - openToken: _Utils_update( - openToken, - {index: openToken.index + remainLength, length: closeToken.length}), - remainTokens: A2( - $elm$core$List$cons, - _Utils_update( - openToken, - {length: remainLength}), - remainTokens), - tokensTail: tokensTail - } : { - closeToken: _Utils_update( - closeToken, - {length: openToken.length}), - openToken: openToken, - remainTokens: remainTokens, - tokensTail: A2( - $elm$core$List$cons, - _Utils_update( - closeToken, - {index: closeToken.index + openToken.length, length: -remainLength}), - tokensTail) - }); - var match = A6( - $dillonkearns$elm_markdown$Markdown$InlineParser$tokenPairToMatch, - model, - function (s) { - return s; - }, - $dillonkearns$elm_markdown$Markdown$InlineParser$EmphasisType(updt.openToken.length), - updt.openToken, - updt.closeToken, - $elm$core$List$reverse(innerTokens)); - return _Utils_Tuple2( - updt.tokensTail, - _Utils_update( - model, - { - matches: A2($elm$core$List$cons, match, model.matches), - tokens: updt.remainTokens - })); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$htmlElementTTM = function (_v12) { - htmlElementTTM: - while (true) { - var tokens = _v12.a; - var model = _v12.b; - if (!tokens.b) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$reverseTokens(model); - } else { - var token = tokens.a; - var tokensTail = tokens.b; - var _v14 = token.meaning; - if (_v14.$ === 'HtmlToken') { - var isOpen = _v14.a; - var htmlModel = _v14.b; - return ($dillonkearns$elm_markdown$Markdown$InlineParser$isVoidTag(htmlModel) || (!isOpen)) ? $dillonkearns$elm_markdown$Markdown$InlineParser$htmlElementTTM( - function (b) { - return _Utils_Tuple2(tokensTail, b); - }( - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$addMatch, - model, - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$tokenToMatch, - token, - $dillonkearns$elm_markdown$Markdown$InlineParser$HtmlType(htmlModel))))) : $dillonkearns$elm_markdown$Markdown$InlineParser$htmlElementTTM( - A2( - $elm$core$Maybe$withDefault, - function (b) { - return _Utils_Tuple2(tokensTail, b); - }( - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$addMatch, - model, - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$tokenToMatch, - token, - $dillonkearns$elm_markdown$Markdown$InlineParser$HtmlType(htmlModel)))), - A2( - $elm$core$Maybe$map, - A3($dillonkearns$elm_markdown$Markdown$InlineParser$htmlElementToMatch, token, model, htmlModel), - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$findToken, - $dillonkearns$elm_markdown$Markdown$InlineParser$isCloseToken(htmlModel), - tokensTail)))); - } else { - var $temp$_v12 = _Utils_Tuple2( - tokensTail, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addToken, model, token)); - _v12 = $temp$_v12; - continue htmlElementTTM; - } - } - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$htmlElementToMatch = F4( - function (openToken, model, htmlModel, _v11) { - var closeToken = _v11.a; - var innerTokens = _v11.b; - var remainTokens = _v11.c; - return _Utils_Tuple2( - remainTokens, - _Utils_update( - model, - { - matches: A2( - $elm$core$List$cons, - A6( - $dillonkearns$elm_markdown$Markdown$InlineParser$tokenPairToMatch, - model, - function (s) { - return s; - }, - $dillonkearns$elm_markdown$Markdown$InlineParser$HtmlType(htmlModel), - openToken, - closeToken, - innerTokens), - model.matches) - })); - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$linkImageTypeTTM = function (_v8) { - linkImageTypeTTM: - while (true) { - var tokens = _v8.a; - var model = _v8.b; - if (!tokens.b) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$reverseTokens(model); - } else { - var token = tokens.a; - var tokensTail = tokens.b; - var _v10 = token.meaning; - if ((_v10.$ === 'CharToken') && (']' === _v10.a.valueOf())) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$linkImageTypeTTM( - A2( - $elm$core$Maybe$withDefault, - _Utils_Tuple2(tokensTail, model), - A2( - $elm$core$Maybe$andThen, - A3($dillonkearns$elm_markdown$Markdown$InlineParser$linkOrImageTypeToMatch, token, tokensTail, model), - A2($dillonkearns$elm_markdown$Markdown$InlineParser$findToken, $dillonkearns$elm_markdown$Markdown$InlineParser$isLinkTypeOrImageOpenToken, model.tokens)))); - } else { - var $temp$_v8 = _Utils_Tuple2( - tokensTail, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$addToken, model, token)); - _v8 = $temp$_v8; - continue linkImageTypeTTM; - } - } - } -}; -var $dillonkearns$elm_markdown$Markdown$InlineParser$linkOrImageTypeToMatch = F4( - function (closeToken, tokensTail, model, _v1) { - var openToken = _v1.a; - var innerTokens = _v1.b; - var remainTokens = _v1.c; - var tempMatch = function (isLinkType) { - return A6( - $dillonkearns$elm_markdown$Markdown$InlineParser$tokenPairToMatch, - model, - function (s) { - return s; - }, - isLinkType ? $dillonkearns$elm_markdown$Markdown$InlineParser$LinkType( - _Utils_Tuple2('', $elm$core$Maybe$Nothing)) : $dillonkearns$elm_markdown$Markdown$InlineParser$ImageType( - _Utils_Tuple2('', $elm$core$Maybe$Nothing)), - openToken, - closeToken, - $elm$core$List$reverse(innerTokens)); - }; - var removeOpenToken = _Utils_Tuple2( - tokensTail, - _Utils_update( - model, - { - tokens: _Utils_ap(innerTokens, remainTokens) - })); - var remainText = A2($elm$core$String$dropLeft, closeToken.index + 1, model.rawText); - var linkOpenTokenToInactive = function (model_) { - var process = function (token) { - var _v7 = token.meaning; - if (_v7.$ === 'LinkOpenToken') { - return _Utils_update( - token, - { - meaning: $dillonkearns$elm_markdown$Markdown$InlineParser$LinkOpenToken(false) - }); - } else { - return token; - } - }; - return _Utils_update( - model_, - { - tokens: A2($elm$core$List$map, process, model_.tokens) - }); - }; - var args = function (isLinkType) { - return _Utils_Tuple3( - remainText, - tempMatch(isLinkType), - _Utils_update( - model, - {tokens: remainTokens})); - }; - var _v2 = openToken.meaning; - switch (_v2.$) { - case 'ImageOpenToken': - return $elm$core$Result$toMaybe( - A2( - $dillonkearns$elm_markdown$Markdown$Helpers$ifError, - function (_v4) { - return $elm$core$Result$Ok(removeOpenToken); - }, - A2( - $elm$core$Result$map, - $dillonkearns$elm_markdown$Markdown$InlineParser$removeParsedAheadTokens(tokensTail), - A2( - $elm$core$Result$andThen, - $dillonkearns$elm_markdown$Markdown$InlineParser$checkParsedAheadOverlapping, - A2( - $elm$core$Result$mapError, - function (_v3) { - return _Utils_Tuple0; - }, - A2( - $dillonkearns$elm_markdown$Markdown$Helpers$ifError, - $dillonkearns$elm_markdown$Markdown$InlineParser$checkForRefLinkTypeOrImageType, - $dillonkearns$elm_markdown$Markdown$InlineParser$checkForInlineLinkTypeOrImageType( - args(false)))))))); - case 'LinkOpenToken': - if (_v2.a) { - return $elm$core$Result$toMaybe( - A2( - $dillonkearns$elm_markdown$Markdown$Helpers$ifError, - function (_v6) { - return $elm$core$Result$Ok(removeOpenToken); - }, - A2( - $elm$core$Result$map, - $dillonkearns$elm_markdown$Markdown$InlineParser$removeParsedAheadTokens(tokensTail), - A2( - $elm$core$Result$map, - linkOpenTokenToInactive, - A2( - $elm$core$Result$andThen, - $dillonkearns$elm_markdown$Markdown$InlineParser$checkParsedAheadOverlapping, - A2( - $elm$core$Result$mapError, - function (_v5) { - return _Utils_Tuple0; - }, - A2( - $dillonkearns$elm_markdown$Markdown$Helpers$ifError, - $dillonkearns$elm_markdown$Markdown$InlineParser$checkForRefLinkTypeOrImageType, - $dillonkearns$elm_markdown$Markdown$InlineParser$checkForInlineLinkTypeOrImageType( - args(true))))))))); - } else { - return $elm$core$Maybe$Just(removeOpenToken); - } - default: - return $elm$core$Maybe$Nothing; - } - }); -var $dillonkearns$elm_markdown$Markdown$InlineParser$tokenPairToMatch = F6( - function (model, processText, type_, openToken, closeToken, innerTokens) { - var textStart = openToken.index + openToken.length; - var textEnd = closeToken.index; - var start = openToken.index; - var end = closeToken.index + closeToken.length; - var match = { - end: end, - matches: _List_Nil, - start: start, - text: processText( - A3($elm$core$String$slice, textStart, textEnd, model.rawText)), - textEnd: textEnd, - textStart: textStart, - type_: type_ - }; - var matches = A2( - $elm$core$List$map, - function (_v0) { - var matchModel = _v0.a; - return A2($dillonkearns$elm_markdown$Markdown$InlineParser$prepareChildMatch, match, matchModel); - }, - $dillonkearns$elm_markdown$Markdown$InlineParser$cyclic$tokensToMatches()( - _Utils_update( - model, - {matches: _List_Nil, tokens: innerTokens})).matches); - return $dillonkearns$elm_markdown$Markdown$InlineParser$Match( - _Utils_update( - match, - {matches: matches})); - }); -function $dillonkearns$elm_markdown$Markdown$InlineParser$cyclic$tokensToMatches() { - return A2( - $elm$core$Basics$composeR, - $dillonkearns$elm_markdown$Markdown$InlineParser$applyTTM($dillonkearns$elm_markdown$Markdown$InlineParser$codeAutolinkTypeHtmlTagTTM), - A2( - $elm$core$Basics$composeR, - $dillonkearns$elm_markdown$Markdown$InlineParser$applyTTM($dillonkearns$elm_markdown$Markdown$InlineParser$htmlElementTTM), - A2( - $elm$core$Basics$composeR, - $dillonkearns$elm_markdown$Markdown$InlineParser$applyTTM($dillonkearns$elm_markdown$Markdown$InlineParser$linkImageTypeTTM), - A2( - $elm$core$Basics$composeR, - $dillonkearns$elm_markdown$Markdown$InlineParser$applyTTM($dillonkearns$elm_markdown$Markdown$InlineParser$emphasisTTM), - $dillonkearns$elm_markdown$Markdown$InlineParser$applyTTM($dillonkearns$elm_markdown$Markdown$InlineParser$lineBreakTTM))))); -} -try { - var $dillonkearns$elm_markdown$Markdown$InlineParser$tokensToMatches = $dillonkearns$elm_markdown$Markdown$InlineParser$cyclic$tokensToMatches(); - $dillonkearns$elm_markdown$Markdown$InlineParser$cyclic$tokensToMatches = function () { - return $dillonkearns$elm_markdown$Markdown$InlineParser$tokensToMatches; - }; -} catch ($) { - throw 'Some top-level definitions from `Markdown.InlineParser` are causing infinite recursion:\n\n ┌─────┐\n │ angleBracketsToMatch\n │ ↓\n │ tokensToMatches\n │ ↓\n │ codeAutolinkTypeHtmlTagTTM\n │ ↓\n │ codeToMatch\n │ ↓\n │ emphasisTTM\n │ ↓\n │ emphasisToMatch\n │ ↓\n │ htmlElementTTM\n │ ↓\n │ htmlElementToMatch\n │ ↓\n │ linkImageTypeTTM\n │ ↓\n │ linkOrImageTypeToMatch\n │ ↓\n │ tokenPairToMatch\n └─────┘\n\nThese errors are very tricky, so read https://elm-lang.org/0.19.1/bad-recursion to learn how to fix it!';} -var $elm$core$String$trim = _String_trim; -var $dillonkearns$elm_markdown$Markdown$InlineParser$parse = F2( - function (refs, rawText) { - return $dillonkearns$elm_markdown$Markdown$InlineParser$matchesToInlines( - $dillonkearns$elm_markdown$Markdown$InlineParser$parseText( - $dillonkearns$elm_markdown$Markdown$InlineParser$organizeParserMatches( - $dillonkearns$elm_markdown$Markdown$InlineParser$tokensToMatches( - $dillonkearns$elm_markdown$Markdown$InlineParser$tokenize( - A2( - $dillonkearns$elm_markdown$Markdown$InlineParser$initParser, - refs, - $elm$core$String$trim(rawText)))))).matches); - }); -var $dillonkearns$elm_markdown$Markdown$Parser$endOfLineOrFile = A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$chompUntilEndOr('\n'), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\\n'))), - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Expecting('End of input')) - ]))); -var $dillonkearns$elm_markdown$Markdown$Parser$thisIsDefinitelyNotAnHtmlTag = $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - ' ', - $elm$parser$Parser$Expecting(' '))), - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - '>', - $elm$parser$Parser$Expecting('>'))), - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$chompIf, - $elm$core$Char$isAlpha, - $elm$parser$Parser$Expecting('Alpha')), - $elm$parser$Parser$Advanced$chompWhile( - function (c) { - return $elm$core$Char$isAlphaNum(c) || _Utils_eq( - c, - _Utils_chr('-')); - })), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - ':', - $elm$parser$Parser$Expecting(':'))), - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - '@', - $elm$parser$Parser$Expecting('@'))), - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - '\\', - $elm$parser$Parser$Expecting('\\'))), - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - '+', - $elm$parser$Parser$Expecting('+'))), - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - '.', - $elm$parser$Parser$Expecting('.'))) - ]))) - ])); -var $dillonkearns$elm_markdown$Markdown$Parser$parseAsParagraphInsteadOfHtmlBlock = $elm$parser$Parser$Advanced$backtrackable( - A2( - $elm$parser$Parser$Advanced$map, - function (rawLine) { - return $dillonkearns$elm_markdown$Markdown$RawBlock$Body( - $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines(rawLine)); - }, - $elm$parser$Parser$Advanced$getChompedString( - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0), - $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - '<', - $elm$parser$Parser$Expecting('<')))), - $dillonkearns$elm_markdown$Markdown$Parser$thisIsDefinitelyNotAnHtmlTag), - $dillonkearns$elm_markdown$Markdown$Parser$endOfLineOrFile)))); -var $elm$parser$Parser$Advanced$findSubString = _Parser_findSubString; -var $elm$parser$Parser$Advanced$fromInfo = F4( - function (row, col, x, context) { - return A2( - $elm$parser$Parser$Advanced$AddRight, - $elm$parser$Parser$Advanced$Empty, - A4($elm$parser$Parser$Advanced$DeadEnd, row, col, x, context)); - }); -var $elm$parser$Parser$Advanced$chompUntil = function (_v0) { - var str = _v0.a; - var expecting = _v0.b; - return $elm$parser$Parser$Advanced$Parser( - function (s) { - var _v1 = A5($elm$parser$Parser$Advanced$findSubString, str, s.offset, s.row, s.col, s.src); - var newOffset = _v1.a; - var newRow = _v1.b; - var newCol = _v1.c; - return _Utils_eq(newOffset, -1) ? A2( - $elm$parser$Parser$Advanced$Bad, - false, - A4($elm$parser$Parser$Advanced$fromInfo, newRow, newCol, expecting, s.context)) : A3( - $elm$parser$Parser$Advanced$Good, - _Utils_cmp(s.offset, newOffset) < 0, - _Utils_Tuple0, - {col: newCol, context: s.context, indent: s.indent, offset: newOffset, row: newRow, src: s.src}); - }); -}; -var $dillonkearns$elm_markdown$Helpers$isEmptyString = function (string) { - if (string === '') { - return true; - } else { - return false; - } -}; -var $dillonkearns$elm_markdown$Markdown$CodeBlock$parserHelp = function (delimeter) { - return A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed( - F2( - function (language, body) { - return { - body: body, - language: $dillonkearns$elm_markdown$Helpers$isEmptyString(language) ? $elm$core$Maybe$Nothing : $elm$core$Maybe$Just(language) - }; - })), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - delimeter, - $elm$parser$Parser$ExpectingSymbol(delimeter)))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntil( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$Problem('Expecting newline')))), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\n'))))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\n' + delimeter)), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n' + delimeter, - $elm$parser$Parser$ExpectingSymbol(delimeter))))); -}; -var $dillonkearns$elm_markdown$Markdown$CodeBlock$parser = $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$CodeBlock$parserHelp('```'), - $dillonkearns$elm_markdown$Markdown$CodeBlock$parserHelp('~~~') - ])); -var $dillonkearns$elm_markdown$Helpers$isGfmWhitespace = function (_char) { - switch (_char.valueOf()) { - case ' ': - return true; - case '\n': - return true; - case '\t': - return true; - case '\u000B': - return true; - case '\u000C': - return true; - case '\u000D': - return true; - default: - return false; - } -}; -var $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken = function (str) { - return A2( - $elm$parser$Parser$Advanced$Token, - str, - $elm$parser$Parser$Expecting(str)); -}; -var $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$destinationParser = A2( - $elm$parser$Parser$Advanced$inContext, - 'link destination', - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$url$Url$percentEncode), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken('<'))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('>')), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken('>')))), - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - F2( - function (first, second) { - return _Utils_ap(first, second); - })), - $elm$parser$Parser$Advanced$getChompedString( - A2( - $elm$parser$Parser$Advanced$chompIf, - function (c) { - return !$dillonkearns$elm_markdown$Helpers$isGfmWhitespace(c); - }, - $elm$parser$Parser$Expecting('non-whitespace character')))), - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompWhile( - function (c) { - return !$dillonkearns$elm_markdown$Helpers$isGfmWhitespace(c); - }))) - ]))); -var $dillonkearns$elm_markdown$LineEnding$CanHaveLineEnding = {$: 'CanHaveLineEnding'}; -var $dillonkearns$elm_markdown$LineEnding$CannotHaveLineEnding = {$: 'CannotHaveLineEnding'}; -var $dillonkearns$elm_markdown$LineEnding$carriageReturn = '\u000D'; -var $dillonkearns$elm_markdown$LineEnding$toToken = function (str) { - return A2( - $elm$parser$Parser$Advanced$Token, - str, - $elm$parser$Parser$Expecting(str)); -}; -var $dillonkearns$elm_markdown$LineEnding$lineEnding = $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$LineEnding$toToken('\n')), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$LineEnding$toToken($dillonkearns$elm_markdown$LineEnding$carriageReturn + '\n')), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$LineEnding$toToken($dillonkearns$elm_markdown$LineEnding$carriageReturn)) - ])); -var $dillonkearns$elm_markdown$LineEnding$statementsHelp = function (state) { - return $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$andThen, - function (_v0) { - if (state.$ === 'CanHaveLineEnding') { - return $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop($dillonkearns$elm_markdown$LineEnding$CannotHaveLineEnding)); - } else { - return $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Problem('Can\'t have more than one line ending character.')); - } - }, - $dillonkearns$elm_markdown$LineEnding$lineEnding), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop(state)), - A2( - $elm$parser$Parser$Advanced$chompIf, - $dillonkearns$elm_markdown$Helpers$isGfmWhitespace, - $elm$parser$Parser$Expecting('Whitespace'))), - $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Done(_Utils_Tuple0)) - ])); -}; -var $dillonkearns$elm_markdown$LineEnding$optionalWhitespaceUpToOneLineEnding = A2($elm$parser$Parser$Advanced$loop, $dillonkearns$elm_markdown$LineEnding$CanHaveLineEnding, $dillonkearns$elm_markdown$LineEnding$statementsHelp); -var $dillonkearns$elm_markdown$Helpers$requiredWhitespace = A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0), - A2( - $elm$parser$Parser$Advanced$chompIf, - $dillonkearns$elm_markdown$Helpers$isGfmWhitespace, - $elm$parser$Parser$Expecting('whitespace'))), - $elm$parser$Parser$Advanced$chompWhile($dillonkearns$elm_markdown$Helpers$isGfmWhitespace)); -var $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$titleParser = A2( - $elm$parser$Parser$Advanced$inContext, - 'title', - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $dillonkearns$elm_markdown$Helpers$requiredWhitespace), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Maybe$Just), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken('\"'))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\"')), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken('\"')))), - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Maybe$Just), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken('\''))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\'')), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken('\'')))), - $elm$parser$Parser$Advanced$succeed($elm$core$Maybe$Nothing) - ]))), - $elm$parser$Parser$Advanced$succeed($elm$core$Maybe$Nothing) - ]))); -var $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$parser = A2( - $elm$parser$Parser$Advanced$inContext, - 'link reference definition', - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed( - F3( - function (label, destination, title) { - return _Utils_Tuple2( - $dillonkearns$elm_markdown$Markdown$Helpers$prepareRefLabel(label), - {destination: destination, title: title}); - })), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken('['))), - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr(']')), - $elm$parser$Parser$Advanced$token( - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$toToken(']:'))), - $dillonkearns$elm_markdown$LineEnding$optionalWhitespaceUpToOneLineEnding)), - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$destinationParser), - $dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$titleParser)); -var $dillonkearns$elm_markdown$ThematicBreak$NoMatchYet = {$: 'NoMatchYet'}; -var $dillonkearns$elm_markdown$ThematicBreak$Asterisk = function (a) { - return {$: 'Asterisk', a: a}; -}; -var $dillonkearns$elm_markdown$ThematicBreak$Dash = {$: 'Dash'}; -var $dillonkearns$elm_markdown$ThematicBreak$Finished = {$: 'Finished'}; -var $dillonkearns$elm_markdown$ThematicBreak$Hyphen = function (a) { - return {$: 'Hyphen', a: a}; -}; -var $dillonkearns$elm_markdown$ThematicBreak$Star = {$: 'Star'}; -var $dillonkearns$elm_markdown$ThematicBreak$TokenUnderscore = {$: 'TokenUnderscore'}; -var $dillonkearns$elm_markdown$ThematicBreak$Underscore = function (a) { - return {$: 'Underscore', a: a}; -}; -var $dillonkearns$elm_markdown$ThematicBreak$Whitespace = {$: 'Whitespace'}; -var $dillonkearns$elm_markdown$ThematicBreak$ThematicBreak = {$: 'ThematicBreak'}; -var $dillonkearns$elm_markdown$ThematicBreak$succeedIfEnough = function (occurences) { - return (occurences > 2) ? $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Done($dillonkearns$elm_markdown$ThematicBreak$ThematicBreak)) : $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Expecting('...?')); -}; -var $elm$core$Debug$toString = _Debug_toString; -var $dillonkearns$elm_markdown$Parser$Extra$tokenHelp = function (_char) { - return $elm$parser$Parser$Advanced$token( - A2( - $elm$parser$Parser$Advanced$Token, - _char, - $elm$parser$Parser$Expecting(_char))); -}; -var $dillonkearns$elm_markdown$ThematicBreak$statementsHelp = function (state) { - return A2( - $elm$parser$Parser$Advanced$andThen, - function (thematicToken) { - var _v6 = _Utils_Tuple2(thematicToken, state); - _v6$11: - while (true) { - switch (_v6.a.$) { - case 'Finished': - switch (_v6.b.$) { - case 'NoMatchYet': - var _v7 = _v6.a; - var _v8 = _v6.b; - return $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Expecting('TODO')); - case 'Asterisk': - var _v9 = _v6.a; - var occurrences = _v6.b.a; - return $dillonkearns$elm_markdown$ThematicBreak$succeedIfEnough(occurrences); - case 'Hyphen': - var _v10 = _v6.a; - var occurrences = _v6.b.a; - return $dillonkearns$elm_markdown$ThematicBreak$succeedIfEnough(occurrences); - default: - var _v11 = _v6.a; - var occurrences = _v6.b.a; - return $dillonkearns$elm_markdown$ThematicBreak$succeedIfEnough(occurrences); - } - case 'TokenUnderscore': - switch (_v6.b.$) { - case 'Underscore': - var _v14 = _v6.a; - var occurrences = _v6.b.a; - return $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop( - $dillonkearns$elm_markdown$ThematicBreak$Underscore(occurrences + 1))); - case 'NoMatchYet': - var _v15 = _v6.a; - var _v16 = _v6.b; - return $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop( - $dillonkearns$elm_markdown$ThematicBreak$Underscore(1))); - default: - break _v6$11; - } - case 'Star': - switch (_v6.b.$) { - case 'Asterisk': - var _v12 = _v6.a; - var occurrences = _v6.b.a; - return $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop( - $dillonkearns$elm_markdown$ThematicBreak$Asterisk(occurrences + 1))); - case 'NoMatchYet': - var _v17 = _v6.a; - var _v18 = _v6.b; - return $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop( - $dillonkearns$elm_markdown$ThematicBreak$Asterisk(1))); - default: - break _v6$11; - } - case 'Dash': - switch (_v6.b.$) { - case 'Hyphen': - var _v13 = _v6.a; - var occurrences = _v6.b.a; - return $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop( - $dillonkearns$elm_markdown$ThematicBreak$Hyphen(occurrences + 1))); - case 'NoMatchYet': - var _v19 = _v6.a; - var _v20 = _v6.b; - return $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop( - $dillonkearns$elm_markdown$ThematicBreak$Hyphen(1))); - default: - break _v6$11; - } - default: - var _v21 = _v6.a; - return $elm$parser$Parser$Advanced$succeed( - $elm$parser$Parser$Advanced$Loop(state)); - } - } - return $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Expecting( - $elm$core$Debug$toString(state))); - }, - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$map, - function (_v0) { - return $dillonkearns$elm_markdown$ThematicBreak$Dash; - }, - $dillonkearns$elm_markdown$Parser$Extra$tokenHelp('-')), - A2( - $elm$parser$Parser$Advanced$map, - function (_v1) { - return $dillonkearns$elm_markdown$ThematicBreak$Star; - }, - $dillonkearns$elm_markdown$Parser$Extra$tokenHelp('*')), - A2( - $elm$parser$Parser$Advanced$map, - function (_v2) { - return $dillonkearns$elm_markdown$ThematicBreak$TokenUnderscore; - }, - $dillonkearns$elm_markdown$Parser$Extra$tokenHelp('_')), - A2( - $elm$parser$Parser$Advanced$map, - function (_v3) { - return $dillonkearns$elm_markdown$ThematicBreak$Finished; - }, - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Expecting('end'))), - A2( - $elm$parser$Parser$Advanced$map, - function (_v4) { - return $dillonkearns$elm_markdown$ThematicBreak$Finished; - }, - $dillonkearns$elm_markdown$Parser$Extra$tokenHelp('\n')), - A2( - $elm$parser$Parser$Advanced$map, - function (_v5) { - return $dillonkearns$elm_markdown$ThematicBreak$Whitespace; - }, - A2( - $elm$parser$Parser$Advanced$chompIf, - function (c) { - return _Utils_eq( - c, - _Utils_chr(' ')); - }, - $elm$parser$Parser$Expecting('Space'))) - ]))); -}; -var $dillonkearns$elm_markdown$ThematicBreak$parser = A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$chompIf, - function (c) { - return _Utils_eq( - c, - _Utils_chr(' ')); - }, - $elm$parser$Parser$Expecting('Space')), - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0) - ]))), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$chompIf, - function (c) { - return _Utils_eq( - c, - _Utils_chr(' ')); - }, - $elm$parser$Parser$Expecting('Space')), - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0) - ]))), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$chompIf, - function (c) { - return _Utils_eq( - c, - _Utils_chr(' ')); - }, - $elm$parser$Parser$Expecting('Space')), - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0) - ]))), - A2($elm$parser$Parser$Advanced$loop, $dillonkearns$elm_markdown$ThematicBreak$NoMatchYet, $dillonkearns$elm_markdown$ThematicBreak$statementsHelp)); -var $dillonkearns$elm_markdown$Markdown$Parser$innerParagraphParser = $elm$parser$Parser$Advanced$getChompedString( - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0), - A2( - $elm$parser$Parser$Advanced$chompIf, - function (c) { - return !$dillonkearns$elm_markdown$Helpers$isNewline(c); - }, - $elm$parser$Parser$Expecting('Not newline.'))), - $elm$parser$Parser$Advanced$chompUntilEndOr('\n'))); -var $dillonkearns$elm_markdown$Markdown$Parser$plainLine = A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - function (rawLine) { - return $dillonkearns$elm_markdown$Markdown$RawBlock$Body( - $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines(rawLine)); - }), - A2( - $elm$parser$Parser$Advanced$ignorer, - $dillonkearns$elm_markdown$Markdown$Parser$innerParagraphParser, - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$chompIf, - $dillonkearns$elm_markdown$Helpers$isNewline, - $elm$parser$Parser$Expecting('A single non-newline char.')), - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Expecting('End')) - ])))); -var $dillonkearns$elm_markdown$Markdown$RawBlock$UnorderedListBlock = function (a) { - return {$: 'UnorderedListBlock', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$UnorderedList$listMarkerParser = function () { - var markerOption = function (marker) { - return $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - marker, - $elm$parser$Parser$ExpectingSymbol(marker)))); - }; - return $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - markerOption('-'), - markerOption('+'), - markerOption('*') - ])); -}(); -var $dillonkearns$elm_markdown$Markdown$ListItem$PlainItem = function (a) { - return {$: 'PlainItem', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$ListItem$TaskItem = F2( - function (a, b) { - return {$: 'TaskItem', a: a, b: b}; - }); -var $dillonkearns$elm_markdown$Markdown$ListItem$Complete = {$: 'Complete'}; -var $dillonkearns$elm_markdown$Markdown$ListItem$Incomplete = {$: 'Incomplete'}; -var $dillonkearns$elm_markdown$Markdown$ListItem$taskItemParser = $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$ListItem$Complete), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '[x] ', - $elm$parser$Parser$ExpectingSymbol('[x] ')))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$ListItem$Complete), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '[X] ', - $elm$parser$Parser$ExpectingSymbol('[X] ')))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$ListItem$Incomplete), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '[ ] ', - $elm$parser$Parser$ExpectingSymbol('[ ] ')))) - ])); -var $dillonkearns$elm_markdown$Parser$Extra$zeroOrMore = function (condition) { - return $elm$parser$Parser$Advanced$chompWhile(condition); -}; -var $dillonkearns$elm_markdown$Markdown$ListItem$parser = $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$ListItem$TaskItem), - A2( - $elm$parser$Parser$Advanced$ignorer, - $dillonkearns$elm_markdown$Markdown$ListItem$taskItemParser, - $dillonkearns$elm_markdown$Parser$Extra$zeroOrMore($dillonkearns$elm_markdown$Helpers$isSpacebar))), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\n')), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\\n'))), - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Expecting('End of input')) - ])))), - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed($dillonkearns$elm_markdown$Markdown$ListItem$PlainItem), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$getChompedString( - $elm$parser$Parser$Advanced$chompUntilEndOr('\n')), - $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\\n'))), - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Expecting('End of input')) - ])))) - ])); -var $dillonkearns$elm_markdown$Markdown$UnorderedList$openingItemParser = A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed($elm$core$Tuple$pair), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$backtrackable($dillonkearns$elm_markdown$Markdown$UnorderedList$listMarkerParser), - $dillonkearns$elm_markdown$Parser$Extra$oneOrMore($dillonkearns$elm_markdown$Helpers$isSpacebar))), - $dillonkearns$elm_markdown$Markdown$ListItem$parser); -var $dillonkearns$elm_markdown$Markdown$UnorderedList$itemBody = $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $elm$parser$Parser$Advanced$backtrackable( - $dillonkearns$elm_markdown$Parser$Extra$oneOrMore($dillonkearns$elm_markdown$Helpers$isSpacebar))), - $elm$parser$Parser$Advanced$commit('')), - $dillonkearns$elm_markdown$Markdown$ListItem$parser), - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$Markdown$ListItem$PlainItem('')), - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - '\n', - $elm$parser$Parser$ExpectingSymbol('\\n')))) - ])); -var $dillonkearns$elm_markdown$Markdown$UnorderedList$singleItemParser = function (listMarker) { - return A2( - $elm$parser$Parser$Advanced$keeper, - A2( - $elm$parser$Parser$Advanced$ignorer, - $elm$parser$Parser$Advanced$succeed($elm$core$Basics$identity), - $elm$parser$Parser$Advanced$backtrackable( - $elm$parser$Parser$Advanced$symbol( - A2( - $elm$parser$Parser$Advanced$Token, - listMarker, - $elm$parser$Parser$ExpectingSymbol(listMarker))))), - $dillonkearns$elm_markdown$Markdown$UnorderedList$itemBody); -}; -var $dillonkearns$elm_markdown$Markdown$UnorderedList$statementsHelp = F3( - function (listMarker, firstItem, revStmts) { - return $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$keeper, - $elm$parser$Parser$Advanced$succeed( - function (stmt) { - return $elm$parser$Parser$Advanced$Loop( - A2($elm$core$List$cons, stmt, revStmts)); - }), - $dillonkearns$elm_markdown$Markdown$UnorderedList$singleItemParser(listMarker)), - A2( - $elm$parser$Parser$Advanced$map, - function (_v0) { - return $elm$parser$Parser$Advanced$Done( - A2( - $elm$core$List$cons, - firstItem, - $elm$core$List$reverse(revStmts))); - }, - $elm$parser$Parser$Advanced$succeed(_Utils_Tuple0)) - ])); - }); -var $dillonkearns$elm_markdown$Markdown$UnorderedList$parser = A2( - $elm$parser$Parser$Advanced$andThen, - function (_v0) { - var listMarker = _v0.a; - var firstItem = _v0.b; - return A2( - $elm$parser$Parser$Advanced$loop, - _List_Nil, - A2($dillonkearns$elm_markdown$Markdown$UnorderedList$statementsHelp, listMarker, firstItem)); - }, - $dillonkearns$elm_markdown$Markdown$UnorderedList$openingItemParser); -var $dillonkearns$elm_markdown$Markdown$Parser$unorderedListBlock = A2( - $elm$parser$Parser$Advanced$map, - $dillonkearns$elm_markdown$Markdown$RawBlock$UnorderedListBlock, - A2( - $elm$parser$Parser$Advanced$map, - $elm$core$List$map( - function (unparsedListItem) { - if (unparsedListItem.$ === 'TaskItem') { - var completion = unparsedListItem.a; - var body = unparsedListItem.b; - return { - body: $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines(body), - task: $elm$core$Maybe$Just( - function () { - if (completion.$ === 'Complete') { - return true; - } else { - return false; - } - }()) - }; - } else { - var body = unparsedListItem.a; - return { - body: $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines(body), - task: $elm$core$Maybe$Nothing - }; - } - }), - $dillonkearns$elm_markdown$Markdown$UnorderedList$parser)); -var $dillonkearns$elm_markdown$Markdown$Parser$updateRawBlocks = F2( - function (state, updatedRawBlocks) { - return _Utils_update( - state, - {rawBlocks: updatedRawBlocks}); - }); -var $elm$core$Result$withDefault = F2( - function (def, result) { - if (result.$ === 'Ok') { - var a = result.a; - return a; - } else { - return def; - } - }); -var $dillonkearns$elm_markdown$Markdown$Parser$childToParser = function (node) { - switch (node.$) { - case 'Element': - var tag = node.a; - var attributes = node.b; - var children = node.c; - return A2( - $elm$parser$Parser$Advanced$andThen, - function (childrenAsBlocks) { - return $elm$parser$Parser$Advanced$succeed( - _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$Block$HtmlBlock( - A3($dillonkearns$elm_markdown$Markdown$Block$HtmlElement, tag, attributes, childrenAsBlocks)) - ])); - }, - $dillonkearns$elm_markdown$Markdown$Parser$nodesToBlocksParser(children)); - case 'Text': - var innerText = node.a; - var _v24 = A2( - $elm$parser$Parser$Advanced$run, - $dillonkearns$elm_markdown$Markdown$Parser$cyclic$multiParser2(), - innerText); - if (_v24.$ === 'Ok') { - var value = _v24.a; - return $elm$parser$Parser$Advanced$succeed(value); - } else { - var error = _v24.a; - return $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Expecting( - A2( - $elm$core$String$join, - '\n', - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Parser$deadEndToString, error)))); - } - case 'Comment': - var string = node.a; - return $elm$parser$Parser$Advanced$succeed( - _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$Block$HtmlBlock( - $dillonkearns$elm_markdown$Markdown$Block$HtmlComment(string)) - ])); - case 'Cdata': - var string = node.a; - return $elm$parser$Parser$Advanced$succeed( - _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$Block$HtmlBlock( - $dillonkearns$elm_markdown$Markdown$Block$Cdata(string)) - ])); - case 'ProcessingInstruction': - var string = node.a; - return $elm$parser$Parser$Advanced$succeed( - _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$Block$HtmlBlock( - $dillonkearns$elm_markdown$Markdown$Block$ProcessingInstruction(string)) - ])); - default: - var declarationType = node.a; - var content = node.b; - return $elm$parser$Parser$Advanced$succeed( - _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$Block$HtmlBlock( - A2($dillonkearns$elm_markdown$Markdown$Block$HtmlDeclaration, declarationType, content)) - ])); - } -}; -var $dillonkearns$elm_markdown$Markdown$Parser$combineBlocks = F3( - function (linkReferences, rawBlock, soFar) { - return A2( - $elm$parser$Parser$Advanced$andThen, - function (parsedBlocks) { - return A2( - $elm$parser$Parser$Advanced$map, - function (maybeNewParsedBlock) { - if (maybeNewParsedBlock.$ === 'Just') { - var newParsedBlock = maybeNewParsedBlock.a; - return A2($elm$core$List$cons, newParsedBlock, parsedBlocks); - } else { - return parsedBlocks; - } - }, - A2($dillonkearns$elm_markdown$Markdown$Parser$parseInlines, linkReferences, rawBlock)); - }, - soFar); - }); -var $dillonkearns$elm_markdown$Markdown$Parser$inlineParseHelper = F2( - function (referencesDict, _v20) { - var unparsedInlines = _v20.a; - var referencesDict2 = $elm$core$Dict$fromList( - A2( - $elm$core$List$map, - $elm$core$Tuple$mapSecond( - function (_v21) { - var destination = _v21.destination; - var title = _v21.title; - return _Utils_Tuple2(destination, title); - }), - referencesDict)); - return A2( - $elm$core$List$map, - $dillonkearns$elm_markdown$Markdown$Parser$mapInline, - A2($dillonkearns$elm_markdown$Markdown$InlineParser$parse, referencesDict2, unparsedInlines)); - }); -var $dillonkearns$elm_markdown$Markdown$Parser$mapInline = function (inline) { - switch (inline.$) { - case 'Text': - var string = inline.a; - return $dillonkearns$elm_markdown$Markdown$Block$Text(string); - case 'HardLineBreak': - return $dillonkearns$elm_markdown$Markdown$Block$HardLineBreak; - case 'CodeInline': - var string = inline.a; - return $dillonkearns$elm_markdown$Markdown$Block$CodeSpan(string); - case 'Link': - var string = inline.a; - var maybeString = inline.b; - var inlines = inline.c; - return A3( - $dillonkearns$elm_markdown$Markdown$Block$Link, - string, - maybeString, - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Parser$mapInline, inlines)); - case 'Image': - var string = inline.a; - var maybeString = inline.b; - var inlines = inline.c; - return A3( - $dillonkearns$elm_markdown$Markdown$Block$Image, - string, - maybeString, - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Parser$mapInline, inlines)); - case 'HtmlInline': - var node = inline.a; - return $dillonkearns$elm_markdown$Markdown$Block$HtmlInline( - $dillonkearns$elm_markdown$Markdown$Parser$nodeToRawBlock(node)); - default: - var level = inline.a; - var inlines = inline.b; - switch (level) { - case 1: - return $dillonkearns$elm_markdown$Markdown$Block$Emphasis( - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Parser$mapInline, inlines)); - case 2: - return $dillonkearns$elm_markdown$Markdown$Block$Strong( - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Parser$mapInline, inlines)); - default: - return $dillonkearns$elm_markdown$Markdown$Block$Strong( - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Parser$mapInline, inlines)); - } - } -}; -var $dillonkearns$elm_markdown$Markdown$Parser$nodeToRawBlock = function (node) { - switch (node.$) { - case 'Text': - var innerText = node.a; - return $dillonkearns$elm_markdown$Markdown$Block$HtmlComment('TODO this never happens, but use types to drop this case.'); - case 'Element': - var tag = node.a; - var attributes = node.b; - var children = node.c; - var parsedChildren = $elm$core$List$concat( - A2( - $elm$core$List$map, - function (child) { - if (child.$ === 'Text') { - var text = child.a; - return $dillonkearns$elm_markdown$Markdown$Parser$textNodeToBlocks(text); - } else { - return _List_fromArray( - [ - $dillonkearns$elm_markdown$Markdown$Block$HtmlBlock( - $dillonkearns$elm_markdown$Markdown$Parser$nodeToRawBlock(child)) - ]); - } - }, - children)); - return A3($dillonkearns$elm_markdown$Markdown$Block$HtmlElement, tag, attributes, parsedChildren); - case 'Comment': - var string = node.a; - return $dillonkearns$elm_markdown$Markdown$Block$HtmlComment(string); - case 'Cdata': - var string = node.a; - return $dillonkearns$elm_markdown$Markdown$Block$Cdata(string); - case 'ProcessingInstruction': - var string = node.a; - return $dillonkearns$elm_markdown$Markdown$Block$ProcessingInstruction(string); - default: - var declarationType = node.a; - var content = node.b; - return A2($dillonkearns$elm_markdown$Markdown$Block$HtmlDeclaration, declarationType, content); - } -}; -var $dillonkearns$elm_markdown$Markdown$Parser$nodesToBlocksParser = function (children) { - return A2( - $elm$parser$Parser$Advanced$map, - $elm$core$List$concat, - $dillonkearns$elm_markdown$Markdown$Parser$combine( - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Parser$childToParser, children))); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$parseAllInlines = function (state) { - return A3( - $elm$core$List$foldl, - $dillonkearns$elm_markdown$Markdown$Parser$combineBlocks(state.linkReferenceDefinitions), - $elm$parser$Parser$Advanced$succeed(_List_Nil), - state.rawBlocks); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$parseInlines = F2( - function (linkReferences, rawBlock) { - switch (rawBlock.$) { - case 'Heading': - var level = rawBlock.a; - var unparsedInlines = rawBlock.b; - return A2( - $elm$parser$Parser$Advanced$andThen, - function (parsedLevel) { - return function (styledLine) { - return $dillonkearns$elm_markdown$Markdown$Parser$just( - A2($dillonkearns$elm_markdown$Markdown$Block$Heading, parsedLevel, styledLine)); - }( - A2($dillonkearns$elm_markdown$Markdown$Parser$inlineParseHelper, linkReferences, unparsedInlines)); - }, - $dillonkearns$elm_markdown$Markdown$Parser$levelParser(level)); - case 'Body': - var unparsedInlines = rawBlock.a; - return function (styledLine) { - return $dillonkearns$elm_markdown$Markdown$Parser$just( - $dillonkearns$elm_markdown$Markdown$Block$Paragraph(styledLine)); - }( - A2($dillonkearns$elm_markdown$Markdown$Parser$inlineParseHelper, linkReferences, unparsedInlines)); - case 'Html': - var html = rawBlock.a; - return $dillonkearns$elm_markdown$Markdown$Parser$just( - $dillonkearns$elm_markdown$Markdown$Block$HtmlBlock(html)); - case 'UnorderedListBlock': - var unparsedItems = rawBlock.a; - return A2( - $elm$parser$Parser$Advanced$map, - $elm$core$Maybe$Just, - A2( - $elm$parser$Parser$Advanced$map, - $dillonkearns$elm_markdown$Markdown$Block$UnorderedList, - $dillonkearns$elm_markdown$Markdown$Parser$combine( - A2( - $elm$core$List$map, - function (unparsedItem) { - return A2( - $elm$parser$Parser$Advanced$map, - function (parsedInlines) { - var task = function () { - var _v11 = unparsedItem.task; - if (_v11.$ === 'Just') { - if (!_v11.a) { - return $dillonkearns$elm_markdown$Markdown$Block$IncompleteTask; - } else { - return $dillonkearns$elm_markdown$Markdown$Block$CompletedTask; - } - } else { - return $dillonkearns$elm_markdown$Markdown$Block$NoTask; - } - }(); - return A2($dillonkearns$elm_markdown$Markdown$Block$ListItem, task, parsedInlines); - }, - A3($dillonkearns$elm_markdown$Markdown$Parser$parseRawInline, linkReferences, $elm$core$Basics$identity, unparsedItem.body)); - }, - unparsedItems)))); - case 'OrderedListBlock': - var startingIndex = rawBlock.a; - var unparsedInlines = rawBlock.b; - return A2( - $elm$parser$Parser$Advanced$map, - $elm$core$Maybe$Just, - A2( - $elm$parser$Parser$Advanced$map, - $dillonkearns$elm_markdown$Markdown$Block$OrderedList(startingIndex), - $dillonkearns$elm_markdown$Markdown$Parser$combine( - A2( - $elm$core$List$map, - A2($dillonkearns$elm_markdown$Markdown$Parser$parseRawInline, linkReferences, $elm$core$Basics$identity), - unparsedInlines)))); - case 'CodeBlock': - var codeBlock = rawBlock.a; - return $dillonkearns$elm_markdown$Markdown$Parser$just( - $dillonkearns$elm_markdown$Markdown$Block$CodeBlock(codeBlock)); - case 'ThematicBreak': - return $dillonkearns$elm_markdown$Markdown$Parser$just($dillonkearns$elm_markdown$Markdown$Block$ThematicBreak); - case 'BlankLine': - return $elm$parser$Parser$Advanced$succeed($elm$core$Maybe$Nothing); - case 'BlockQuote': - var rawBlocks = rawBlock.a; - var _v12 = A2( - $elm$parser$Parser$Advanced$run, - $dillonkearns$elm_markdown$Markdown$Parser$cyclic$rawBlockParser(), - rawBlocks); - if (_v12.$ === 'Ok') { - var value = _v12.a; - return A2( - $elm$parser$Parser$Advanced$map, - function (parsedBlocks) { - return $elm$core$Maybe$Just( - $dillonkearns$elm_markdown$Markdown$Block$BlockQuote(parsedBlocks)); - }, - $dillonkearns$elm_markdown$Markdown$Parser$parseAllInlines(value)); - } else { - var error = _v12.a; - return $elm$parser$Parser$Advanced$problem( - $elm$parser$Parser$Problem( - $dillonkearns$elm_markdown$Markdown$Parser$deadEndsToString(error))); - } - case 'IndentedCodeBlock': - var codeBlockBody = rawBlock.a; - return $dillonkearns$elm_markdown$Markdown$Parser$just( - $dillonkearns$elm_markdown$Markdown$Block$CodeBlock( - {body: codeBlockBody, language: $elm$core$Maybe$Nothing})); - default: - var _v13 = rawBlock.a; - var header = _v13.a; - var rows = _v13.b; - var parsedHeader = $dillonkearns$elm_markdown$Markdown$Parser$combine( - A2( - $elm$core$List$map, - function (_v14) { - var label = _v14.label; - var alignment = _v14.alignment; - return A3( - $dillonkearns$elm_markdown$Markdown$Parser$parseRawInline, - linkReferences, - function (parsedHeaderLabel) { - return {alignment: alignment, label: parsedHeaderLabel}; - }, - $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines(label)); - }, - header)); - return A2( - $elm$parser$Parser$Advanced$andThen, - function (headerThing) { - return $dillonkearns$elm_markdown$Markdown$Parser$just( - A2($dillonkearns$elm_markdown$Markdown$Block$Table, headerThing, _List_Nil)); - }, - parsedHeader); - } - }); -var $dillonkearns$elm_markdown$Markdown$Parser$parseRawInline = F3( - function (linkReferences, wrap, unparsedInlines) { - return $elm$parser$Parser$Advanced$succeed( - function (styledLine) { - return wrap(styledLine); - }( - A2($dillonkearns$elm_markdown$Markdown$Parser$inlineParseHelper, linkReferences, unparsedInlines))); - }); -var $dillonkearns$elm_markdown$Markdown$Parser$statementsHelp2 = function (revStmts) { - var keepLooping = function (parser) { - return A2( - $elm$parser$Parser$Advanced$map, - function (newRawBlock) { - var _v4 = _Utils_Tuple2(newRawBlock, revStmts.rawBlocks); - _v4$5: - while (true) { - if (_v4.b.b) { - switch (_v4.a.$) { - case 'CodeBlock': - if (_v4.b.a.$ === 'CodeBlock') { - var block1 = _v4.a.a; - var _v5 = _v4.b; - var block2 = _v5.a.a; - var rest = _v5.b; - return $elm$parser$Parser$Advanced$Loop( - A2( - $dillonkearns$elm_markdown$Markdown$Parser$updateRawBlocks, - revStmts, - A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$Markdown$RawBlock$CodeBlock( - { - body: A2($dillonkearns$elm_markdown$Markdown$Parser$joinStringsPreserveAll, block2.body, block1.body), - language: $elm$core$Maybe$Nothing - }), - rest))); - } else { - break _v4$5; - } - case 'IndentedCodeBlock': - if (_v4.b.a.$ === 'IndentedCodeBlock') { - var block1 = _v4.a.a; - var _v6 = _v4.b; - var block2 = _v6.a.a; - var rest = _v6.b; - return $elm$parser$Parser$Advanced$Loop( - A2( - $dillonkearns$elm_markdown$Markdown$Parser$updateRawBlocks, - revStmts, - A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$Markdown$RawBlock$IndentedCodeBlock( - A2($dillonkearns$elm_markdown$Markdown$Parser$joinStringsPreserveAll, block2, block1)), - rest))); - } else { - break _v4$5; - } - case 'BlockQuote': - if (_v4.b.a.$ === 'BlockQuote') { - var body1 = _v4.a.a; - var _v8 = _v4.b; - var body2 = _v8.a.a; - var rest = _v8.b; - return $elm$parser$Parser$Advanced$Loop( - A2( - $dillonkearns$elm_markdown$Markdown$Parser$updateRawBlocks, - revStmts, - A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$Markdown$RawBlock$BlockQuote( - A2($dillonkearns$elm_markdown$Markdown$Parser$joinStringsPreserveAll, body2, body1)), - rest))); - } else { - break _v4$5; - } - case 'Body': - switch (_v4.b.a.$) { - case 'BlockQuote': - var body1 = _v4.a.a.a; - var _v7 = _v4.b; - var body2 = _v7.a.a; - var rest = _v7.b; - return $elm$parser$Parser$Advanced$Loop( - A2( - $dillonkearns$elm_markdown$Markdown$Parser$updateRawBlocks, - revStmts, - A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$Markdown$RawBlock$BlockQuote( - A3($dillonkearns$elm_markdown$Markdown$Parser$joinRawStringsWith, '\n', body2, body1)), - rest))); - case 'Body': - var body1 = _v4.a.a.a; - var _v9 = _v4.b; - var body2 = _v9.a.a.a; - var rest = _v9.b; - return $elm$parser$Parser$Advanced$Loop( - A2( - $dillonkearns$elm_markdown$Markdown$Parser$updateRawBlocks, - revStmts, - A2( - $elm$core$List$cons, - $dillonkearns$elm_markdown$Markdown$RawBlock$Body( - $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines( - A3($dillonkearns$elm_markdown$Markdown$Parser$joinRawStringsWith, '\n', body2, body1))), - rest))); - default: - break _v4$5; - } - default: - break _v4$5; - } - } else { - break _v4$5; - } - } - return $elm$parser$Parser$Advanced$Loop( - A2( - $dillonkearns$elm_markdown$Markdown$Parser$updateRawBlocks, - revStmts, - A2($elm$core$List$cons, newRawBlock, revStmts.rawBlocks))); - }, - parser); - }; - var indentedCodeParser = function () { - var _v3 = revStmts.rawBlocks; - if (_v3.b && (_v3.a.$ === 'Body')) { - return $elm$parser$Parser$Advanced$oneOf(_List_Nil); - } else { - return keepLooping($dillonkearns$elm_markdown$Markdown$Parser$indentedCodeBlock); - } - }(); - return $elm$parser$Parser$Advanced$oneOf( - _List_fromArray( - [ - A2( - $elm$parser$Parser$Advanced$map, - function (_v1) { - return $elm$parser$Parser$Advanced$Done(revStmts); - }, - $elm$parser$Parser$Advanced$end( - $elm$parser$Parser$Expecting('End'))), - keepLooping($dillonkearns$elm_markdown$Markdown$Parser$parseAsParagraphInsteadOfHtmlBlock), - A2( - $elm$parser$Parser$Advanced$map, - function (linkReference) { - return $elm$parser$Parser$Advanced$Loop( - A2($dillonkearns$elm_markdown$Markdown$Parser$addReference, revStmts, linkReference)); - }, - $elm$parser$Parser$Advanced$backtrackable($dillonkearns$elm_markdown$Markdown$LinkReferenceDefinition$parser)), - keepLooping($dillonkearns$elm_markdown$Markdown$Parser$blankLine), - keepLooping($dillonkearns$elm_markdown$Markdown$Parser$blockQuote), - keepLooping( - A2( - $elm$parser$Parser$Advanced$map, - $dillonkearns$elm_markdown$Markdown$RawBlock$CodeBlock, - $elm$parser$Parser$Advanced$backtrackable($dillonkearns$elm_markdown$Markdown$CodeBlock$parser))), - indentedCodeParser, - keepLooping( - A2( - $elm$parser$Parser$Advanced$map, - function (_v2) { - return $dillonkearns$elm_markdown$Markdown$RawBlock$ThematicBreak; - }, - $elm$parser$Parser$Advanced$backtrackable($dillonkearns$elm_markdown$ThematicBreak$parser))), - keepLooping($dillonkearns$elm_markdown$Markdown$Parser$unorderedListBlock), - keepLooping( - $dillonkearns$elm_markdown$Markdown$Parser$orderedListBlock( - $elm$core$List$head(revStmts.rawBlocks))), - keepLooping( - $elm$parser$Parser$Advanced$backtrackable($dillonkearns$elm_markdown$Markdown$Parser$heading)), - keepLooping( - $dillonkearns$elm_markdown$Markdown$Parser$cyclic$htmlParser()), - keepLooping($dillonkearns$elm_markdown$Markdown$Parser$plainLine) - ])); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$textNodeToBlocks = function (textNodeValue) { - return A2( - $elm$core$Result$withDefault, - _List_Nil, - A2( - $elm$parser$Parser$Advanced$run, - $dillonkearns$elm_markdown$Markdown$Parser$cyclic$multiParser2(), - textNodeValue)); -}; -var $dillonkearns$elm_markdown$Markdown$Parser$xmlNodeToHtmlNode = function (parser) { - return A2( - $elm$parser$Parser$Advanced$andThen, - function (xmlNode) { - switch (xmlNode.$) { - case 'Text': - var innerText = xmlNode.a; - return $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$Markdown$RawBlock$Body( - $dillonkearns$elm_markdown$Markdown$RawBlock$UnparsedInlines(innerText))); - case 'Element': - var tag = xmlNode.a; - var attributes = xmlNode.b; - var children = xmlNode.c; - return A2( - $elm$parser$Parser$Advanced$andThen, - function (parsedChildren) { - return $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$Markdown$RawBlock$Html( - A3($dillonkearns$elm_markdown$Markdown$Block$HtmlElement, tag, attributes, parsedChildren))); - }, - $dillonkearns$elm_markdown$Markdown$Parser$nodesToBlocksParser(children)); - case 'Comment': - var string = xmlNode.a; - return $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$Markdown$RawBlock$Html( - $dillonkearns$elm_markdown$Markdown$Block$HtmlComment(string))); - case 'Cdata': - var string = xmlNode.a; - return $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$Markdown$RawBlock$Html( - $dillonkearns$elm_markdown$Markdown$Block$Cdata(string))); - case 'ProcessingInstruction': - var string = xmlNode.a; - return $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$Markdown$RawBlock$Html( - $dillonkearns$elm_markdown$Markdown$Block$ProcessingInstruction(string))); - default: - var declarationType = xmlNode.a; - var content = xmlNode.b; - return $elm$parser$Parser$Advanced$succeed( - $dillonkearns$elm_markdown$Markdown$RawBlock$Html( - A2($dillonkearns$elm_markdown$Markdown$Block$HtmlDeclaration, declarationType, content))); - } - }, - parser); -}; -function $dillonkearns$elm_markdown$Markdown$Parser$cyclic$htmlParser() { - return $dillonkearns$elm_markdown$Markdown$Parser$xmlNodeToHtmlNode($dillonkearns$elm_markdown$HtmlParser$html); -} -function $dillonkearns$elm_markdown$Markdown$Parser$cyclic$multiParser2() { - return A2( - $elm$parser$Parser$Advanced$map, - $elm$core$List$filter( - function (item) { - if ((item.$ === 'Paragraph') && (!item.a.b)) { - return false; - } else { - return true; - } - }), - A2( - $elm$parser$Parser$Advanced$andThen, - $dillonkearns$elm_markdown$Markdown$Parser$parseAllInlines, - A2( - $elm$parser$Parser$Advanced$ignorer, - $dillonkearns$elm_markdown$Markdown$Parser$cyclic$rawBlockParser(), - $elm$parser$Parser$Advanced$succeed($elm$parser$Parser$Advanced$end)))); -} -function $dillonkearns$elm_markdown$Markdown$Parser$cyclic$rawBlockParser() { - return A2( - $elm$parser$Parser$Advanced$loop, - {linkReferenceDefinitions: _List_Nil, rawBlocks: _List_Nil}, - $dillonkearns$elm_markdown$Markdown$Parser$statementsHelp2); -} -try { - var $dillonkearns$elm_markdown$Markdown$Parser$htmlParser = $dillonkearns$elm_markdown$Markdown$Parser$cyclic$htmlParser(); - $dillonkearns$elm_markdown$Markdown$Parser$cyclic$htmlParser = function () { - return $dillonkearns$elm_markdown$Markdown$Parser$htmlParser; - }; - var $dillonkearns$elm_markdown$Markdown$Parser$multiParser2 = $dillonkearns$elm_markdown$Markdown$Parser$cyclic$multiParser2(); - $dillonkearns$elm_markdown$Markdown$Parser$cyclic$multiParser2 = function () { - return $dillonkearns$elm_markdown$Markdown$Parser$multiParser2; - }; - var $dillonkearns$elm_markdown$Markdown$Parser$rawBlockParser = $dillonkearns$elm_markdown$Markdown$Parser$cyclic$rawBlockParser(); - $dillonkearns$elm_markdown$Markdown$Parser$cyclic$rawBlockParser = function () { - return $dillonkearns$elm_markdown$Markdown$Parser$rawBlockParser; - }; -} catch ($) { - throw 'Some top-level definitions from `Markdown.Parser` are causing infinite recursion:\n\n ┌─────┐\n │ childToParser\n │ ↓\n │ combineBlocks\n │ ↓\n │ htmlParser\n │ ↓\n │ inlineParseHelper\n │ ↓\n │ mapInline\n │ ↓\n │ multiParser2\n │ ↓\n │ nodeToRawBlock\n │ ↓\n │ nodesToBlocksParser\n │ ↓\n │ parseAllInlines\n │ ↓\n │ parseInlines\n │ ↓\n │ parseRawInline\n │ ↓\n │ rawBlockParser\n │ ↓\n │ statementsHelp2\n │ ↓\n │ textNodeToBlocks\n │ ↓\n │ xmlNodeToHtmlNode\n └─────┘\n\nThese errors are very tricky, so read https://elm-lang.org/0.19.1/bad-recursion to learn how to fix it!';} -var $dillonkearns$elm_markdown$Markdown$Parser$parse = function (input) { - return A2($elm$parser$Parser$Advanced$run, $dillonkearns$elm_markdown$Markdown$Parser$multiParser2, input); -}; -var $elm$core$Result$map2 = F3( - function (func, ra, rb) { - if (ra.$ === 'Err') { - var x = ra.a; - return $elm$core$Result$Err(x); - } else { - var a = ra.a; - if (rb.$ === 'Err') { - var x = rb.a; - return $elm$core$Result$Err(x); - } else { - var b = rb.a; - return $elm$core$Result$Ok( - A2(func, a, b)); - } - } - }); -var $dillonkearns$elm_markdown$Markdown$Renderer$combineResults = A2( - $elm$core$List$foldr, - $elm$core$Result$map2($elm$core$List$cons), - $elm$core$Result$Ok(_List_Nil)); -var $dillonkearns$elm_markdown$Markdown$Block$extractInlineBlockText = function (block) { - switch (block.$) { - case 'Paragraph': - var inlines = block.a; - return $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(inlines); - case 'HtmlBlock': - var html = block.a; - if (html.$ === 'HtmlElement') { - var blocks = html.c; - return A3( - $dillonkearns$elm_markdown$Markdown$Block$foldl, - F2( - function (nestedBlock, soFar) { - return _Utils_ap( - soFar, - $dillonkearns$elm_markdown$Markdown$Block$extractInlineBlockText(nestedBlock)); - }), - '', - blocks); - } else { - return ''; - } - case 'UnorderedList': - var items = block.a; - return A2( - $elm$core$String$join, - '\n', - A2( - $elm$core$List$map, - function (_v4) { - var task = _v4.a; - var inlines = _v4.b; - return $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(inlines); - }, - items)); - case 'OrderedList': - var _int = block.a; - var items = block.b; - return A2( - $elm$core$String$join, - '\n', - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Block$extractInlineText, items)); - case 'BlockQuote': - var blocks = block.a; - return A2( - $elm$core$String$join, - '\n', - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Block$extractInlineBlockText, blocks)); - case 'Heading': - var headingLevel = block.a; - var inlines = block.b; - return $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(inlines); - case 'Table': - var header = block.a; - var rows = block.b; - return A2( - $elm$core$String$join, - '\n', - $elm$core$List$concat( - _List_fromArray( - [ - A2( - $elm$core$List$map, - $dillonkearns$elm_markdown$Markdown$Block$extractInlineText, - A2( - $elm$core$List$map, - function ($) { - return $.label; - }, - header)), - A2($elm$core$List$map, $dillonkearns$elm_markdown$Markdown$Block$extractInlineText, rows) - ]))); - case 'CodeBlock': - var body = block.a.body; - return body; - default: - return ''; - } -}; -var $dillonkearns$elm_markdown$Markdown$Block$extractInlineText = function (inlines) { - return A3($elm$core$List$foldl, $dillonkearns$elm_markdown$Markdown$Block$extractTextHelp, '', inlines); -}; -var $dillonkearns$elm_markdown$Markdown$Block$extractTextHelp = F2( - function (inline, text) { - switch (inline.$) { - case 'Text': - var str = inline.a; - return _Utils_ap(text, str); - case 'HardLineBreak': - return text + ' '; - case 'CodeSpan': - var str = inline.a; - return _Utils_ap(text, str); - case 'Link': - var inlines = inline.c; - return _Utils_ap( - text, - $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(inlines)); - case 'Image': - var inlines = inline.c; - return _Utils_ap( - text, - $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(inlines)); - case 'HtmlInline': - var html = inline.a; - if (html.$ === 'HtmlElement') { - var blocks = html.c; - return A3( - $dillonkearns$elm_markdown$Markdown$Block$foldl, - F2( - function (block, soFar) { - return _Utils_ap( - soFar, - $dillonkearns$elm_markdown$Markdown$Block$extractInlineBlockText(block)); - }), - text, - blocks); - } else { - return text; - } - case 'Strong': - var inlines = inline.a; - return _Utils_ap( - text, - $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(inlines)); - default: - var inlines = inline.a; - return _Utils_ap( - text, - $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(inlines)); - } - }); -var $dillonkearns$elm_markdown$Markdown$Renderer$renderHtml = F5( - function (tagName, attributes, children, _v0, renderedChildren) { - var htmlRenderer = _v0.a; - return A2( - $elm$core$Result$andThen, - function (okChildren) { - return A2( - $elm$core$Result$map, - function (myRenderer) { - return myRenderer(okChildren); - }, - A3(htmlRenderer, tagName, attributes, children)); - }, - $dillonkearns$elm_markdown$Markdown$Renderer$combineResults(renderedChildren)); - }); -var $dillonkearns$elm_markdown$Markdown$Renderer$foldThing = F3( - function (renderer, topLevelInline, soFar) { - var _v7 = A2($dillonkearns$elm_markdown$Markdown$Renderer$renderSingleInline, renderer, topLevelInline); - if (_v7.$ === 'Just') { - var inline = _v7.a; - return A2($elm$core$List$cons, inline, soFar); - } else { - return soFar; - } - }); -var $dillonkearns$elm_markdown$Markdown$Renderer$renderHelper = F2( - function (renderer, blocks) { - return A2( - $elm$core$List$filterMap, - $dillonkearns$elm_markdown$Markdown$Renderer$renderHelperSingle(renderer), - blocks); - }); -var $dillonkearns$elm_markdown$Markdown$Renderer$renderHelperSingle = function (renderer) { - return function (block) { - switch (block.$) { - case 'Heading': - var level = block.a; - var content = block.b; - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$map, - function (children) { - return renderer.heading( - { - children: children, - level: level, - rawText: $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(content) - }); - }, - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderStyled, renderer, content))); - case 'Paragraph': - var content = block.a; - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$map, - renderer.paragraph, - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderStyled, renderer, content))); - case 'HtmlBlock': - var html = block.a; - if (html.$ === 'HtmlElement') { - var tag = html.a; - var attributes = html.b; - var children = html.c; - return $elm$core$Maybe$Just( - A4($dillonkearns$elm_markdown$Markdown$Renderer$renderHtmlNode, renderer, tag, attributes, children)); - } else { - return $elm$core$Maybe$Nothing; - } - case 'UnorderedList': - var items = block.a; - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$map, - renderer.unorderedList, - $dillonkearns$elm_markdown$Markdown$Renderer$combineResults( - A2( - $elm$core$List$map, - function (_v4) { - var task = _v4.a; - var children = _v4.b; - return A2( - $elm$core$Result$map, - function (renderedBody) { - return A2($dillonkearns$elm_markdown$Markdown$Block$ListItem, task, renderedBody); - }, - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderStyled, renderer, children)); - }, - items)))); - case 'OrderedList': - var startingIndex = block.a; - var items = block.b; - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$map, - renderer.orderedList(startingIndex), - $dillonkearns$elm_markdown$Markdown$Renderer$combineResults( - A2( - $elm$core$List$map, - $dillonkearns$elm_markdown$Markdown$Renderer$renderStyled(renderer), - items)))); - case 'CodeBlock': - var codeBlock = block.a; - return $elm$core$Maybe$Just( - $elm$core$Result$Ok( - renderer.codeBlock(codeBlock))); - case 'ThematicBreak': - return $elm$core$Maybe$Just( - $elm$core$Result$Ok(renderer.thematicBreak)); - case 'BlockQuote': - var nestedBlocks = block.a; - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$map, - renderer.blockQuote, - $dillonkearns$elm_markdown$Markdown$Renderer$combineResults( - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderHelper, renderer, nestedBlocks)))); - default: - var header = block.a; - var rows = block.b; - var renderedHeaderCells = $dillonkearns$elm_markdown$Markdown$Renderer$combineResults( - A2( - $elm$core$List$map, - function (_v6) { - var label = _v6.label; - var alignment = _v6.alignment; - return A2( - $elm$core$Result$map, - $elm$core$Tuple$pair(alignment), - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderStyled, renderer, label)); - }, - header)); - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$map, - function (h) { - return renderer.table( - _List_fromArray( - [h])); - }, - A2( - $elm$core$Result$map, - function (listListView) { - return renderer.tableHeader( - A2( - $elm$core$List$map, - function (_v5) { - var maybeAlignment = _v5.a; - var item = _v5.b; - return A2(renderer.tableHeaderCell, maybeAlignment, item); - }, - listListView)); - }, - renderedHeaderCells))); - } - }; -}; -var $dillonkearns$elm_markdown$Markdown$Renderer$renderHtmlNode = F4( - function (renderer, tag, attributes, children) { - return A5( - $dillonkearns$elm_markdown$Markdown$Renderer$renderHtml, - tag, - attributes, - children, - renderer.html, - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderHelper, renderer, children)); - }); -var $dillonkearns$elm_markdown$Markdown$Renderer$renderSingleInline = F2( - function (renderer, inline) { - switch (inline.$) { - case 'Strong': - var innerInlines = inline.a; - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$map, - renderer.strong, - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderStyled, renderer, innerInlines))); - case 'Emphasis': - var innerInlines = inline.a; - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$map, - renderer.emphasis, - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderStyled, renderer, innerInlines))); - case 'Image': - var src = inline.a; - var title = inline.b; - var children = inline.c; - return $elm$core$Maybe$Just( - $elm$core$Result$Ok( - renderer.image( - { - alt: $dillonkearns$elm_markdown$Markdown$Block$extractInlineText(children), - src: src, - title: title - }))); - case 'Text': - var string = inline.a; - return $elm$core$Maybe$Just( - $elm$core$Result$Ok( - renderer.text(string))); - case 'CodeSpan': - var string = inline.a; - return $elm$core$Maybe$Just( - $elm$core$Result$Ok( - renderer.codeSpan(string))); - case 'Link': - var destination = inline.a; - var title = inline.b; - var inlines = inline.c; - return $elm$core$Maybe$Just( - A2( - $elm$core$Result$andThen, - function (children) { - return $elm$core$Result$Ok( - A2( - renderer.link, - {destination: destination, title: title}, - children)); - }, - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderStyled, renderer, inlines))); - case 'HardLineBreak': - return $elm$core$Maybe$Just( - $elm$core$Result$Ok(renderer.hardLineBreak)); - default: - var html = inline.a; - if (html.$ === 'HtmlElement') { - var tag = html.a; - var attributes = html.b; - var children = html.c; - return $elm$core$Maybe$Just( - A4($dillonkearns$elm_markdown$Markdown$Renderer$renderHtmlNode, renderer, tag, attributes, children)); - } else { - return $elm$core$Maybe$Nothing; - } - } - }); -var $dillonkearns$elm_markdown$Markdown$Renderer$renderStyled = F2( - function (renderer, styledStrings) { - return $dillonkearns$elm_markdown$Markdown$Renderer$combineResults( - A3( - $elm$core$List$foldr, - $dillonkearns$elm_markdown$Markdown$Renderer$foldThing(renderer), - _List_Nil, - styledStrings)); - }); -var $dillonkearns$elm_markdown$Markdown$Renderer$render = F2( - function (renderer, ast) { - return $dillonkearns$elm_markdown$Markdown$Renderer$combineResults( - A2($dillonkearns$elm_markdown$Markdown$Renderer$renderHelper, renderer, ast)); - }); -var $mdgriffith$elm_ui$Internal$Model$AlignY = function (a) { - return {$: 'AlignY', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$Top = {$: 'Top'}; -var $mdgriffith$elm_ui$Element$alignTop = $mdgriffith$elm_ui$Internal$Model$AlignY($mdgriffith$elm_ui$Internal$Model$Top); -var $mdgriffith$elm_ui$Internal$Model$Class = F2( - function (a, b) { - return {$: 'Class', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Style$classes = {above: 'a', active: 'atv', alignBottom: 'ab', alignCenterX: 'cx', alignCenterY: 'cy', alignContainerBottom: 'acb', alignContainerCenterX: 'accx', alignContainerCenterY: 'accy', alignContainerRight: 'acr', alignLeft: 'al', alignRight: 'ar', alignTop: 'at', alignedHorizontally: 'ah', alignedVertically: 'av', any: 's', behind: 'bh', below: 'b', bold: 'w7', borderDashed: 'bd', borderDotted: 'bdt', borderNone: 'bn', borderSolid: 'bs', capturePointerEvents: 'cpe', clip: 'cp', clipX: 'cpx', clipY: 'cpy', column: 'c', container: 'ctr', contentBottom: 'cb', contentCenterX: 'ccx', contentCenterY: 'ccy', contentLeft: 'cl', contentRight: 'cr', contentTop: 'ct', cursorPointer: 'cptr', cursorText: 'ctxt', focus: 'fcs', focusedWithin: 'focus-within', fullSize: 'fs', grid: 'g', hasBehind: 'hbh', heightContent: 'hc', heightExact: 'he', heightFill: 'hf', heightFillPortion: 'hfp', hover: 'hv', imageContainer: 'ic', inFront: 'fr', inputLabel: 'lbl', inputMultiline: 'iml', inputMultilineFiller: 'imlf', inputMultilineParent: 'imlp', inputMultilineWrapper: 'implw', inputText: 'it', italic: 'i', link: 'lnk', nearby: 'nb', noTextSelection: 'notxt', onLeft: 'ol', onRight: 'or', opaque: 'oq', overflowHidden: 'oh', page: 'pg', paragraph: 'p', passPointerEvents: 'ppe', root: 'ui', row: 'r', scrollbars: 'sb', scrollbarsX: 'sbx', scrollbarsY: 'sby', seButton: 'sbt', single: 'e', sizeByCapital: 'cap', spaceEvenly: 'sev', strike: 'sk', text: 't', textCenter: 'tc', textExtraBold: 'w8', textExtraLight: 'w2', textHeavy: 'w9', textJustify: 'tj', textJustifyAll: 'tja', textLeft: 'tl', textLight: 'w3', textMedium: 'w5', textNormalWeight: 'w4', textRight: 'tr', textSemiBold: 'w6', textThin: 'w1', textUnitalicized: 'tun', transition: 'ts', transparent: 'clr', underline: 'u', widthContent: 'wc', widthExact: 'we', widthFill: 'wf', widthFillPortion: 'wfp', wrapped: 'wrp'}; -var $mdgriffith$elm_ui$Internal$Flag$Flag = function (a) { - return {$: 'Flag', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Flag$Second = function (a) { - return {$: 'Second', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Flag$flag = function (i) { - return (i > 31) ? $mdgriffith$elm_ui$Internal$Flag$Second(1 << (i - 32)) : $mdgriffith$elm_ui$Internal$Flag$Flag(1 << i); -}; -var $mdgriffith$elm_ui$Internal$Flag$fontWeight = $mdgriffith$elm_ui$Internal$Flag$flag(13); -var $mdgriffith$elm_ui$Element$Font$bold = A2($mdgriffith$elm_ui$Internal$Model$Class, $mdgriffith$elm_ui$Internal$Flag$fontWeight, $mdgriffith$elm_ui$Internal$Style$classes.bold); -var $elm$html$Html$br = _VirtualDom_node('br'); -var $mdgriffith$elm_ui$Internal$Flag$fontAlignment = $mdgriffith$elm_ui$Internal$Flag$flag(12); -var $mdgriffith$elm_ui$Element$Font$center = A2($mdgriffith$elm_ui$Internal$Model$Class, $mdgriffith$elm_ui$Internal$Flag$fontAlignment, $mdgriffith$elm_ui$Internal$Style$classes.textCenter); -var $mdgriffith$elm_ui$Internal$Model$AlignX = function (a) { - return {$: 'AlignX', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$CenterX = {$: 'CenterX'}; -var $mdgriffith$elm_ui$Element$centerX = $mdgriffith$elm_ui$Internal$Model$AlignX($mdgriffith$elm_ui$Internal$Model$CenterX); -var $mdgriffith$elm_ui$Internal$Model$Colored = F3( - function (a, b, c) { - return {$: 'Colored', a: a, b: b, c: c}; - }); -var $mdgriffith$elm_ui$Internal$Model$StyleClass = F2( - function (a, b) { - return {$: 'StyleClass', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Flag$bgColor = $mdgriffith$elm_ui$Internal$Flag$flag(8); -var $elm$core$Basics$round = _Basics_round; -var $mdgriffith$elm_ui$Internal$Model$floatClass = function (x) { - return $elm$core$String$fromInt( - $elm$core$Basics$round(x * 255)); -}; -var $mdgriffith$elm_ui$Internal$Model$formatColorClass = function (_v0) { - var red = _v0.a; - var green = _v0.b; - var blue = _v0.c; - var alpha = _v0.d; - return $mdgriffith$elm_ui$Internal$Model$floatClass(red) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(green) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(blue) + ('-' + $mdgriffith$elm_ui$Internal$Model$floatClass(alpha)))))); -}; -var $mdgriffith$elm_ui$Element$Background$color = function (clr) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$bgColor, - A3( - $mdgriffith$elm_ui$Internal$Model$Colored, - 'bg-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(clr), - 'background-color', - clr)); -}; -var $mdgriffith$elm_ui$Internal$Model$Unkeyed = function (a) { - return {$: 'Unkeyed', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$AsEl = {$: 'AsEl'}; -var $mdgriffith$elm_ui$Internal$Model$asEl = $mdgriffith$elm_ui$Internal$Model$AsEl; -var $mdgriffith$elm_ui$Internal$Model$Generic = {$: 'Generic'}; -var $mdgriffith$elm_ui$Internal$Model$div = $mdgriffith$elm_ui$Internal$Model$Generic; -var $mdgriffith$elm_ui$Internal$Model$NoNearbyChildren = {$: 'NoNearbyChildren'}; -var $mdgriffith$elm_ui$Internal$Model$columnClass = $mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.column); -var $mdgriffith$elm_ui$Internal$Model$gridClass = $mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.grid); -var $mdgriffith$elm_ui$Internal$Model$pageClass = $mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.page); -var $mdgriffith$elm_ui$Internal$Model$paragraphClass = $mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.paragraph); -var $mdgriffith$elm_ui$Internal$Model$rowClass = $mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.row); -var $mdgriffith$elm_ui$Internal$Model$singleClass = $mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.single); -var $mdgriffith$elm_ui$Internal$Model$contextClasses = function (context) { - switch (context.$) { - case 'AsRow': - return $mdgriffith$elm_ui$Internal$Model$rowClass; - case 'AsColumn': - return $mdgriffith$elm_ui$Internal$Model$columnClass; - case 'AsEl': - return $mdgriffith$elm_ui$Internal$Model$singleClass; - case 'AsGrid': - return $mdgriffith$elm_ui$Internal$Model$gridClass; - case 'AsParagraph': - return $mdgriffith$elm_ui$Internal$Model$paragraphClass; - default: - return $mdgriffith$elm_ui$Internal$Model$pageClass; - } -}; -var $mdgriffith$elm_ui$Internal$Model$Keyed = function (a) { - return {$: 'Keyed', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$NoStyleSheet = {$: 'NoStyleSheet'}; -var $mdgriffith$elm_ui$Internal$Model$Styled = function (a) { - return {$: 'Styled', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$Unstyled = function (a) { - return {$: 'Unstyled', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$addChildren = F2( - function (existing, nearbyChildren) { - switch (nearbyChildren.$) { - case 'NoNearbyChildren': - return existing; - case 'ChildrenBehind': - var behind = nearbyChildren.a; - return _Utils_ap(behind, existing); - case 'ChildrenInFront': - var inFront = nearbyChildren.a; - return _Utils_ap(existing, inFront); - default: - var behind = nearbyChildren.a; - var inFront = nearbyChildren.b; - return _Utils_ap( - behind, - _Utils_ap(existing, inFront)); - } - }); -var $mdgriffith$elm_ui$Internal$Model$addKeyedChildren = F3( - function (key, existing, nearbyChildren) { - switch (nearbyChildren.$) { - case 'NoNearbyChildren': - return existing; - case 'ChildrenBehind': - var behind = nearbyChildren.a; - return _Utils_ap( - A2( - $elm$core$List$map, - function (x) { - return _Utils_Tuple2(key, x); - }, - behind), - existing); - case 'ChildrenInFront': - var inFront = nearbyChildren.a; - return _Utils_ap( - existing, - A2( - $elm$core$List$map, - function (x) { - return _Utils_Tuple2(key, x); - }, - inFront)); - default: - var behind = nearbyChildren.a; - var inFront = nearbyChildren.b; - return _Utils_ap( - A2( - $elm$core$List$map, - function (x) { - return _Utils_Tuple2(key, x); - }, - behind), - _Utils_ap( - existing, - A2( - $elm$core$List$map, - function (x) { - return _Utils_Tuple2(key, x); - }, - inFront))); - } - }); -var $mdgriffith$elm_ui$Internal$Model$AsParagraph = {$: 'AsParagraph'}; -var $mdgriffith$elm_ui$Internal$Model$asParagraph = $mdgriffith$elm_ui$Internal$Model$AsParagraph; -var $mdgriffith$elm_ui$Internal$Flag$alignBottom = $mdgriffith$elm_ui$Internal$Flag$flag(41); -var $mdgriffith$elm_ui$Internal$Flag$alignRight = $mdgriffith$elm_ui$Internal$Flag$flag(40); -var $mdgriffith$elm_ui$Internal$Flag$centerX = $mdgriffith$elm_ui$Internal$Flag$flag(42); -var $mdgriffith$elm_ui$Internal$Flag$centerY = $mdgriffith$elm_ui$Internal$Flag$flag(43); -var $mdgriffith$elm_ui$Internal$Model$lengthClassName = function (x) { - switch (x.$) { - case 'Px': - var px = x.a; - return $elm$core$String$fromInt(px) + 'px'; - case 'Content': - return 'auto'; - case 'Fill': - var i = x.a; - return $elm$core$String$fromInt(i) + 'fr'; - case 'Min': - var min = x.a; - var len = x.b; - return 'min' + ($elm$core$String$fromInt(min) + $mdgriffith$elm_ui$Internal$Model$lengthClassName(len)); - default: - var max = x.a; - var len = x.b; - return 'max' + ($elm$core$String$fromInt(max) + $mdgriffith$elm_ui$Internal$Model$lengthClassName(len)); - } -}; -var $mdgriffith$elm_ui$Internal$Model$transformClass = function (transform) { - switch (transform.$) { - case 'Untransformed': - return $elm$core$Maybe$Nothing; - case 'Moved': - var _v1 = transform.a; - var x = _v1.a; - var y = _v1.b; - var z = _v1.c; - return $elm$core$Maybe$Just( - 'mv-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(x) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(y) + ('-' + $mdgriffith$elm_ui$Internal$Model$floatClass(z)))))); - default: - var _v2 = transform.a; - var tx = _v2.a; - var ty = _v2.b; - var tz = _v2.c; - var _v3 = transform.b; - var sx = _v3.a; - var sy = _v3.b; - var sz = _v3.c; - var _v4 = transform.c; - var ox = _v4.a; - var oy = _v4.b; - var oz = _v4.c; - var angle = transform.d; - return $elm$core$Maybe$Just( - 'tfrm-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(tx) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(ty) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(tz) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(sx) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(sy) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(sz) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(ox) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(oy) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(oz) + ('-' + $mdgriffith$elm_ui$Internal$Model$floatClass(angle)))))))))))))))))))); - } -}; -var $mdgriffith$elm_ui$Internal$Model$getStyleName = function (style) { - switch (style.$) { - case 'Shadows': - var name = style.a; - return name; - case 'Transparency': - var name = style.a; - var o = style.b; - return name; - case 'Style': - var _class = style.a; - return _class; - case 'FontFamily': - var name = style.a; - return name; - case 'FontSize': - var i = style.a; - return 'font-size-' + $elm$core$String$fromInt(i); - case 'Single': - var _class = style.a; - return _class; - case 'Colored': - var _class = style.a; - return _class; - case 'SpacingStyle': - var cls = style.a; - var x = style.b; - var y = style.c; - return cls; - case 'PaddingStyle': - var cls = style.a; - var top = style.b; - var right = style.c; - var bottom = style.d; - var left = style.e; - return cls; - case 'BorderWidth': - var cls = style.a; - var top = style.b; - var right = style.c; - var bottom = style.d; - var left = style.e; - return cls; - case 'GridTemplateStyle': - var template = style.a; - return 'grid-rows-' + (A2( - $elm$core$String$join, - '-', - A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$lengthClassName, template.rows)) + ('-cols-' + (A2( - $elm$core$String$join, - '-', - A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$lengthClassName, template.columns)) + ('-space-x-' + ($mdgriffith$elm_ui$Internal$Model$lengthClassName(template.spacing.a) + ('-space-y-' + $mdgriffith$elm_ui$Internal$Model$lengthClassName(template.spacing.b))))))); - case 'GridPosition': - var pos = style.a; - return 'gp grid-pos-' + ($elm$core$String$fromInt(pos.row) + ('-' + ($elm$core$String$fromInt(pos.col) + ('-' + ($elm$core$String$fromInt(pos.width) + ('-' + $elm$core$String$fromInt(pos.height))))))); - case 'PseudoSelector': - var selector = style.a; - var subStyle = style.b; - var name = function () { - switch (selector.$) { - case 'Focus': - return 'fs'; - case 'Hover': - return 'hv'; - default: - return 'act'; - } - }(); - return A2( - $elm$core$String$join, - ' ', - A2( - $elm$core$List$map, - function (sty) { - var _v1 = $mdgriffith$elm_ui$Internal$Model$getStyleName(sty); - if (_v1 === '') { - return ''; - } else { - var styleName = _v1; - return styleName + ('-' + name); - } - }, - subStyle)); - default: - var x = style.a; - return A2( - $elm$core$Maybe$withDefault, - '', - $mdgriffith$elm_ui$Internal$Model$transformClass(x)); - } -}; -var $mdgriffith$elm_ui$Internal$Model$reduceStyles = F2( - function (style, nevermind) { - var cache = nevermind.a; - var existing = nevermind.b; - var styleName = $mdgriffith$elm_ui$Internal$Model$getStyleName(style); - return A2($elm$core$Set$member, styleName, cache) ? nevermind : _Utils_Tuple2( - A2($elm$core$Set$insert, styleName, cache), - A2($elm$core$List$cons, style, existing)); - }); -var $mdgriffith$elm_ui$Internal$Model$Property = F2( - function (a, b) { - return {$: 'Property', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Model$Style = F2( - function (a, b) { - return {$: 'Style', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Style$dot = function (c) { - return '.' + c; -}; -var $mdgriffith$elm_ui$Internal$Model$formatColor = function (_v0) { - var red = _v0.a; - var green = _v0.b; - var blue = _v0.c; - var alpha = _v0.d; - return 'rgba(' + ($elm$core$String$fromInt( - $elm$core$Basics$round(red * 255)) + ((',' + $elm$core$String$fromInt( - $elm$core$Basics$round(green * 255))) + ((',' + $elm$core$String$fromInt( - $elm$core$Basics$round(blue * 255))) + (',' + ($elm$core$String$fromFloat(alpha) + ')'))))); -}; -var $mdgriffith$elm_ui$Internal$Model$formatBoxShadow = function (shadow) { - return A2( - $elm$core$String$join, - ' ', - A2( - $elm$core$List$filterMap, - $elm$core$Basics$identity, - _List_fromArray( - [ - shadow.inset ? $elm$core$Maybe$Just('inset') : $elm$core$Maybe$Nothing, - $elm$core$Maybe$Just( - $elm$core$String$fromFloat(shadow.offset.a) + 'px'), - $elm$core$Maybe$Just( - $elm$core$String$fromFloat(shadow.offset.b) + 'px'), - $elm$core$Maybe$Just( - $elm$core$String$fromFloat(shadow.blur) + 'px'), - $elm$core$Maybe$Just( - $elm$core$String$fromFloat(shadow.size) + 'px'), - $elm$core$Maybe$Just( - $mdgriffith$elm_ui$Internal$Model$formatColor(shadow.color)) - ]))); -}; -var $mdgriffith$elm_ui$Internal$Model$renderFocusStyle = function (focus) { - return _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Style, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.focusedWithin) + ':focus-within', - A2( - $elm$core$List$filterMap, - $elm$core$Basics$identity, - _List_fromArray( - [ - A2( - $elm$core$Maybe$map, - function (color) { - return A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'border-color', - $mdgriffith$elm_ui$Internal$Model$formatColor(color)); - }, - focus.borderColor), - A2( - $elm$core$Maybe$map, - function (color) { - return A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'background-color', - $mdgriffith$elm_ui$Internal$Model$formatColor(color)); - }, - focus.backgroundColor), - A2( - $elm$core$Maybe$map, - function (shadow) { - return A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'box-shadow', - $mdgriffith$elm_ui$Internal$Model$formatBoxShadow( - { - blur: shadow.blur, - color: shadow.color, - inset: false, - offset: A2( - $elm$core$Tuple$mapSecond, - $elm$core$Basics$toFloat, - A2($elm$core$Tuple$mapFirst, $elm$core$Basics$toFloat, shadow.offset)), - size: shadow.size - })); - }, - focus.shadow), - $elm$core$Maybe$Just( - A2($mdgriffith$elm_ui$Internal$Model$Property, 'outline', 'none')) - ]))), - A2( - $mdgriffith$elm_ui$Internal$Model$Style, - ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + ':focus .focusable, ') + (($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + '.focusable:focus, ') + ('.ui-slide-bar:focus + ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + ' .focusable-thumb'))), - A2( - $elm$core$List$filterMap, - $elm$core$Basics$identity, - _List_fromArray( - [ - A2( - $elm$core$Maybe$map, - function (color) { - return A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'border-color', - $mdgriffith$elm_ui$Internal$Model$formatColor(color)); - }, - focus.borderColor), - A2( - $elm$core$Maybe$map, - function (color) { - return A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'background-color', - $mdgriffith$elm_ui$Internal$Model$formatColor(color)); - }, - focus.backgroundColor), - A2( - $elm$core$Maybe$map, - function (shadow) { - return A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'box-shadow', - $mdgriffith$elm_ui$Internal$Model$formatBoxShadow( - { - blur: shadow.blur, - color: shadow.color, - inset: false, - offset: A2( - $elm$core$Tuple$mapSecond, - $elm$core$Basics$toFloat, - A2($elm$core$Tuple$mapFirst, $elm$core$Basics$toFloat, shadow.offset)), - size: shadow.size - })); - }, - focus.shadow), - $elm$core$Maybe$Just( - A2($mdgriffith$elm_ui$Internal$Model$Property, 'outline', 'none')) - ]))) - ]); -}; -var $elm$virtual_dom$VirtualDom$property = F2( - function (key, value) { - return A2( - _VirtualDom_property, - _VirtualDom_noInnerHtmlOrFormAction(key), - _VirtualDom_noJavaScriptOrHtmlUri(value)); - }); -var $mdgriffith$elm_ui$Internal$Style$AllChildren = F2( - function (a, b) { - return {$: 'AllChildren', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Style$Batch = function (a) { - return {$: 'Batch', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Style$Child = F2( - function (a, b) { - return {$: 'Child', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Style$Class = F2( - function (a, b) { - return {$: 'Class', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Style$Descriptor = F2( - function (a, b) { - return {$: 'Descriptor', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Style$Left = {$: 'Left'}; -var $mdgriffith$elm_ui$Internal$Style$Prop = F2( - function (a, b) { - return {$: 'Prop', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Style$Right = {$: 'Right'}; -var $mdgriffith$elm_ui$Internal$Style$Self = function (a) { - return {$: 'Self', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Style$Supports = F2( - function (a, b) { - return {$: 'Supports', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Style$Content = function (a) { - return {$: 'Content', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Style$Bottom = {$: 'Bottom'}; -var $mdgriffith$elm_ui$Internal$Style$CenterX = {$: 'CenterX'}; -var $mdgriffith$elm_ui$Internal$Style$CenterY = {$: 'CenterY'}; -var $mdgriffith$elm_ui$Internal$Style$Top = {$: 'Top'}; -var $mdgriffith$elm_ui$Internal$Style$alignments = _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$Top, $mdgriffith$elm_ui$Internal$Style$Bottom, $mdgriffith$elm_ui$Internal$Style$Right, $mdgriffith$elm_ui$Internal$Style$Left, $mdgriffith$elm_ui$Internal$Style$CenterX, $mdgriffith$elm_ui$Internal$Style$CenterY]); -var $mdgriffith$elm_ui$Internal$Style$contentName = function (desc) { - switch (desc.a.$) { - case 'Top': - var _v1 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.contentTop); - case 'Bottom': - var _v2 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.contentBottom); - case 'Right': - var _v3 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.contentRight); - case 'Left': - var _v4 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.contentLeft); - case 'CenterX': - var _v5 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.contentCenterX); - default: - var _v6 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.contentCenterY); - } -}; -var $mdgriffith$elm_ui$Internal$Style$selfName = function (desc) { - switch (desc.a.$) { - case 'Top': - var _v1 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignTop); - case 'Bottom': - var _v2 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignBottom); - case 'Right': - var _v3 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignRight); - case 'Left': - var _v4 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignLeft); - case 'CenterX': - var _v5 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignCenterX); - default: - var _v6 = desc.a; - return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignCenterY); - } -}; -var $mdgriffith$elm_ui$Internal$Style$describeAlignment = function (values) { - var createDescription = function (alignment) { - var _v0 = values(alignment); - var content = _v0.a; - var indiv = _v0.b; - return _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$contentName( - $mdgriffith$elm_ui$Internal$Style$Content(alignment)), - content), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$selfName( - $mdgriffith$elm_ui$Internal$Style$Self(alignment)), - indiv) - ])) - ]); - }; - return $mdgriffith$elm_ui$Internal$Style$Batch( - A2($elm$core$List$concatMap, createDescription, $mdgriffith$elm_ui$Internal$Style$alignments)); -}; -var $mdgriffith$elm_ui$Internal$Style$elDescription = _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'column'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.hasBehind), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '0'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.behind), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '-1') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.seButton), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.text), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'auto !important') - ])) - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightContent), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', 'auto') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '100000') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthFillPortion), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthContent), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start') - ])), - $mdgriffith$elm_ui$Internal$Style$describeAlignment( - function (alignment) { - switch (alignment.$) { - case 'Top': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-start') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', '0 !important') - ])); - case 'Bottom': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-end') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', '0 !important') - ])); - case 'Right': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-end') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-end') - ])); - case 'Left': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-start') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start') - ])); - case 'CenterX': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'center') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'center') - ])); - default: - return _Utils_Tuple2( - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto') - ])) - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important') - ])); - } - }) - ]); -var $mdgriffith$elm_ui$Internal$Style$gridAlignments = function (values) { - var createDescription = function (alignment) { - return _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$selfName( - $mdgriffith$elm_ui$Internal$Style$Self(alignment)), - values(alignment)) - ])) - ]); - }; - return $mdgriffith$elm_ui$Internal$Style$Batch( - A2($elm$core$List$concatMap, createDescription, $mdgriffith$elm_ui$Internal$Style$alignments)); -}; -var $mdgriffith$elm_ui$Internal$Style$Above = {$: 'Above'}; -var $mdgriffith$elm_ui$Internal$Style$Behind = {$: 'Behind'}; -var $mdgriffith$elm_ui$Internal$Style$Below = {$: 'Below'}; -var $mdgriffith$elm_ui$Internal$Style$OnLeft = {$: 'OnLeft'}; -var $mdgriffith$elm_ui$Internal$Style$OnRight = {$: 'OnRight'}; -var $mdgriffith$elm_ui$Internal$Style$Within = {$: 'Within'}; -var $mdgriffith$elm_ui$Internal$Style$locations = function () { - var loc = $mdgriffith$elm_ui$Internal$Style$Above; - var _v0 = function () { - switch (loc.$) { - case 'Above': - return _Utils_Tuple0; - case 'Below': - return _Utils_Tuple0; - case 'OnRight': - return _Utils_Tuple0; - case 'OnLeft': - return _Utils_Tuple0; - case 'Within': - return _Utils_Tuple0; - default: - return _Utils_Tuple0; - } - }(); - return _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$Above, $mdgriffith$elm_ui$Internal$Style$Below, $mdgriffith$elm_ui$Internal$Style$OnRight, $mdgriffith$elm_ui$Internal$Style$OnLeft, $mdgriffith$elm_ui$Internal$Style$Within, $mdgriffith$elm_ui$Internal$Style$Behind]); -}(); -var $mdgriffith$elm_ui$Internal$Style$baseSheet = _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - 'html,body', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'padding', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - _Utils_ap( - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - _Utils_ap( - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.single), - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.imageContainer))), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'block'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 'img', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'max-height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'object-fit', 'cover') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthFill), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 'img', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'max-width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'object-fit', 'cover') - ])) - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + ':focus', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'outline', 'none') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.root), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', 'auto'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'min-height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '0'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - _Utils_ap( - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inFront), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.nearby), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'fixed'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20') - ])) - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.nearby), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'relative'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border', 'none'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'row'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.single), - $mdgriffith$elm_ui$Internal$Style$elDescription), - $mdgriffith$elm_ui$Internal$Style$Batch( - function (fn) { - return A2($elm$core$List$map, fn, $mdgriffith$elm_ui$Internal$Style$locations); - }( - function (loc) { - switch (loc.$) { - case 'Above': - return A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.above), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'bottom', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', 'auto') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%') - ])), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - '*', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto') - ])) - ])); - case 'Below': - return A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.below), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'bottom', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - '*', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', 'auto') - ])) - ])); - case 'OnRight': - return A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.onRight), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - '*', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto') - ])) - ])); - case 'OnLeft': - return A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.onLeft), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'right', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - '*', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto') - ])) - ])); - case 'Within': - return A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inFront), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - '*', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto') - ])) - ])); - default: - return A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.behind), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - '*', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto') - ])) - ])); - } - })) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'relative'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border', 'none'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'row'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'resize', 'none'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-feature-settings', 'inherit'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'box-sizing', 'border-box'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'padding', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-width', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-style', 'solid'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-size', 'inherit'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'color', 'inherit'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-family', 'inherit'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'line-height', '1'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', 'inherit'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration', 'none'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-style', 'inherit'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.wrapped), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-wrap', 'wrap') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.noTextSelection), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, '-moz-user-select', 'none'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, '-webkit-user-select', 'none'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, '-ms-user-select', 'none'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'user-select', 'none') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.cursorPointer), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'cursor', 'pointer') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.cursorText), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'cursor', 'text') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.passPointerEvents), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none !important') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.capturePointerEvents), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto !important') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.transparent), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.opaque), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot( - _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.hover, $mdgriffith$elm_ui$Internal$Style$classes.transparent)) + ':hover', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot( - _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.hover, $mdgriffith$elm_ui$Internal$Style$classes.opaque)) + ':hover', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot( - _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.focus, $mdgriffith$elm_ui$Internal$Style$classes.transparent)) + ':focus', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot( - _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.focus, $mdgriffith$elm_ui$Internal$Style$classes.opaque)) + ':focus', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot( - _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.active, $mdgriffith$elm_ui$Internal$Style$classes.transparent)) + ':active', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot( - _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.active, $mdgriffith$elm_ui$Internal$Style$classes.opaque)) + ':active', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.transition), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Prop, - 'transition', - A2( - $elm$core$String$join, - ', ', - A2( - $elm$core$List$map, - function (x) { - return x + ' 160ms'; - }, - _List_fromArray( - ['transform', 'opacity', 'filter', 'background-color', 'color', 'font-size'])))) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.scrollbars), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow', 'auto'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.scrollbarsX), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-x', 'auto'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.row), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '1') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.scrollbarsY), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-y', 'auto'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.column), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.single), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '1') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.clip), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow', 'hidden') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.clipX), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-x', 'hidden') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.clipY), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-y', 'hidden') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthContent), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', 'auto') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.borderNone), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-width', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.borderDashed), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-style', 'dashed') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.borderDotted), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-style', 'dotted') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.borderSolid), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-style', 'solid') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.text), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline-block') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inputText), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'line-height', '1.05'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'background', 'transparent'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'inherit') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.single), - $mdgriffith$elm_ui$Internal$Style$elDescription), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.row), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'row'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', '0%'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthExact), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.link), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'stretch !important') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFillPortion), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'stretch !important') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '100000') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.container), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'stretch') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 'u:first-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerRight, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 's:first-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterX, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignCenterX), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-left', 'auto !important') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 's:last-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterX, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignCenterX), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-right', 'auto !important') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 's:only-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterX, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignCenterY), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 's:last-of-type.' + ($mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterX + ' ~ u'), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 'u:first-of-type.' + ($mdgriffith$elm_ui$Internal$Style$classes.alignContainerRight + (' ~ s.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterX)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0') - ])), - $mdgriffith$elm_ui$Internal$Style$describeAlignment( - function (alignment) { - switch (alignment.$) { - case 'Top': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-start') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start') - ])); - case 'Bottom': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-end') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-end') - ])); - case 'Right': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-end') - ]), - _List_Nil); - case 'Left': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-start') - ]), - _List_Nil); - case 'CenterX': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'center') - ]), - _List_Nil); - default: - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'center') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'center') - ])); - } - }), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.spaceEvenly), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'space-between') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inputLabel), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'baseline') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.column), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'column'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', '0px'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'min-height', 'min-content'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightExact), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.heightFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '100000') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthFill), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthFillPortion), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthContent), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 'u:first-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerBottom, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 's:first-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterY, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignCenterY), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', '0 !important') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 's:last-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterY, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignCenterY), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', '0 !important') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 's:only-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterY, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.alignCenterY), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 's:last-of-type.' + ($mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterY + ' ~ u'), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - 'u:first-of-type.' + ($mdgriffith$elm_ui$Internal$Style$classes.alignContainerBottom + (' ~ s.' + $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterY)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0') - ])), - $mdgriffith$elm_ui$Internal$Style$describeAlignment( - function (alignment) { - switch (alignment.$) { - case 'Top': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-start') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto') - ])); - case 'Bottom': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-end') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto') - ])); - case 'Right': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-end') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-end') - ])); - case 'Left': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-start') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start') - ])); - case 'CenterX': - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'center') - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'center') - ])); - default: - return _Utils_Tuple2( - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'center') - ]), - _List_Nil); - } - }), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.container), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'stretch !important') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.spaceEvenly), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'space-between') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.grid), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', '-ms-grid'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - '.gp', - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Supports, - _Utils_Tuple2('display', 'grid'), - _List_fromArray( - [ - _Utils_Tuple2('display', 'grid') - ])), - $mdgriffith$elm_ui$Internal$Style$gridAlignments( - function (alignment) { - switch (alignment.$) { - case 'Top': - return _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-start') - ]); - case 'Bottom': - return _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-end') - ]); - case 'Right': - return _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-end') - ]); - case 'Left': - return _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-start') - ]); - case 'CenterX': - return _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'center') - ]); - default: - return _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'center') - ]); - } - }) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.page), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'block'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any + ':first-child'), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot( - $mdgriffith$elm_ui$Internal$Style$classes.any + ($mdgriffith$elm_ui$Internal$Style$selfName( - $mdgriffith$elm_ui$Internal$Style$Self($mdgriffith$elm_ui$Internal$Style$Left)) + (':first-child + .' + $mdgriffith$elm_ui$Internal$Style$classes.any))), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot( - $mdgriffith$elm_ui$Internal$Style$classes.any + ($mdgriffith$elm_ui$Internal$Style$selfName( - $mdgriffith$elm_ui$Internal$Style$Self($mdgriffith$elm_ui$Internal$Style$Right)) + (':first-child + .' + $mdgriffith$elm_ui$Internal$Style$classes.any))), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important') - ])), - $mdgriffith$elm_ui$Internal$Style$describeAlignment( - function (alignment) { - switch (alignment.$) { - case 'Top': - return _Utils_Tuple2(_List_Nil, _List_Nil); - case 'Bottom': - return _Utils_Tuple2(_List_Nil, _List_Nil); - case 'Right': - return _Utils_Tuple2( - _List_Nil, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'float', 'right'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - '::after', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'content', '\"\"'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'table'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'clear', 'both') - ])) - ])); - case 'Left': - return _Utils_Tuple2( - _List_Nil, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'float', 'left'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - '::after', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'content', '\"\"'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'table'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'clear', 'both') - ])) - ])); - case 'CenterX': - return _Utils_Tuple2(_List_Nil, _List_Nil); - default: - return _Utils_Tuple2(_List_Nil, _List_Nil); - } - }) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inputMultiline), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre-wrap !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'background-color', 'transparent') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inputMultilineWrapper), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.single), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inputMultilineParent), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre-wrap !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'cursor', 'text'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inputMultilineFiller), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre-wrap !important'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'color', 'transparent') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.paragraph), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'block'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'normal'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-wrap', 'break-word'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.hasBehind), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '0'), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.behind), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '-1') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$AllChildren, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.text), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'normal') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$AllChildren, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.paragraph), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - '::after', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'content', 'none') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - '::before', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'content', 'none') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$AllChildren, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.single), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'normal'), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.widthExact), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline-block') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.inFront), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.behind), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.above), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.below), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.onRight), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.onLeft), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.text), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'normal') - ])) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.row), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.column), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline-flex') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Child, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.grid), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline-grid') - ])), - $mdgriffith$elm_ui$Internal$Style$describeAlignment( - function (alignment) { - switch (alignment.$) { - case 'Top': - return _Utils_Tuple2(_List_Nil, _List_Nil); - case 'Bottom': - return _Utils_Tuple2(_List_Nil, _List_Nil); - case 'Right': - return _Utils_Tuple2( - _List_Nil, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'float', 'right') - ])); - case 'Left': - return _Utils_Tuple2( - _List_Nil, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'float', 'left') - ])); - case 'CenterX': - return _Utils_Tuple2(_List_Nil, _List_Nil); - default: - return _Utils_Tuple2(_List_Nil, _List_Nil); - } - }) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - '.hidden', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'none') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textThin), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '100') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textExtraLight), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '200') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textLight), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '300') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textNormalWeight), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '400') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textMedium), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '500') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textSemiBold), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '600') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bold), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '700') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textExtraBold), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '800') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textHeavy), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '900') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.italic), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-style', 'italic') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.strike), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration', 'line-through') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.underline), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration', 'underline'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration-skip-ink', 'auto'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration-skip', 'ink') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - _Utils_ap( - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.underline), - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.strike)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration', 'line-through underline'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration-skip-ink', 'auto'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration-skip', 'ink') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textUnitalicized), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-style', 'normal') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textJustify), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'justify') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textJustifyAll), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'justify-all') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textCenter), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'center') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textRight), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'right') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.textLeft), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'left') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Descriptor, - '.modal', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'fixed'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'), - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none') - ])) - ])) - ]); -var $mdgriffith$elm_ui$Internal$Style$fontVariant = function (_var) { - return _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - '.v-' + _var, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-feature-settings', '\"' + (_var + '\"')) - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - '.v-' + (_var + '-off'), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-feature-settings', '\"' + (_var + '\" 0')) - ])) - ]); -}; -var $mdgriffith$elm_ui$Internal$Style$commonValues = $elm$core$List$concat( - _List_fromArray( - [ - A2( - $elm$core$List$map, - function (x) { - return A2( - $mdgriffith$elm_ui$Internal$Style$Class, - '.border-' + $elm$core$String$fromInt(x), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Prop, - 'border-width', - $elm$core$String$fromInt(x) + 'px') - ])); - }, - A2($elm$core$List$range, 0, 6)), - A2( - $elm$core$List$map, - function (i) { - return A2( - $mdgriffith$elm_ui$Internal$Style$Class, - '.font-size-' + $elm$core$String$fromInt(i), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Prop, - 'font-size', - $elm$core$String$fromInt(i) + 'px') - ])); - }, - A2($elm$core$List$range, 8, 32)), - A2( - $elm$core$List$map, - function (i) { - return A2( - $mdgriffith$elm_ui$Internal$Style$Class, - '.p-' + $elm$core$String$fromInt(i), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Prop, - 'padding', - $elm$core$String$fromInt(i) + 'px') - ])); - }, - A2($elm$core$List$range, 0, 24)), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - '.v-smcp', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-variant', 'small-caps') - ])), - A2( - $mdgriffith$elm_ui$Internal$Style$Class, - '.v-smcp-off', - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-variant', 'normal') - ])) - ]), - $mdgriffith$elm_ui$Internal$Style$fontVariant('zero'), - $mdgriffith$elm_ui$Internal$Style$fontVariant('onum'), - $mdgriffith$elm_ui$Internal$Style$fontVariant('liga'), - $mdgriffith$elm_ui$Internal$Style$fontVariant('dlig'), - $mdgriffith$elm_ui$Internal$Style$fontVariant('ordn'), - $mdgriffith$elm_ui$Internal$Style$fontVariant('tnum'), - $mdgriffith$elm_ui$Internal$Style$fontVariant('afrc'), - $mdgriffith$elm_ui$Internal$Style$fontVariant('frac') - ])); -var $mdgriffith$elm_ui$Internal$Style$explainer = '\n.explain {\n border: 6px solid rgb(174, 121, 15) !important;\n}\n.explain > .' + ($mdgriffith$elm_ui$Internal$Style$classes.any + (' {\n border: 4px dashed rgb(0, 151, 167) !important;\n}\n\n.ctr {\n border: none !important;\n}\n.explain > .ctr > .' + ($mdgriffith$elm_ui$Internal$Style$classes.any + ' {\n border: 4px dashed rgb(0, 151, 167) !important;\n}\n\n'))); -var $mdgriffith$elm_ui$Internal$Style$inputTextReset = '\ninput[type="search"],\ninput[type="search"]::-webkit-search-decoration,\ninput[type="search"]::-webkit-search-cancel-button,\ninput[type="search"]::-webkit-search-results-button,\ninput[type="search"]::-webkit-search-results-decoration {\n -webkit-appearance:none;\n}\n'; -var $mdgriffith$elm_ui$Internal$Style$sliderReset = '\ninput[type=range] {\n -webkit-appearance: none; \n background: transparent;\n position:absolute;\n left:0;\n top:0;\n z-index:10;\n width: 100%;\n outline: dashed 1px;\n height: 100%;\n opacity: 0;\n}\n'; -var $mdgriffith$elm_ui$Internal$Style$thumbReset = '\ninput[type=range]::-webkit-slider-thumb {\n -webkit-appearance: none;\n opacity: 0.5;\n width: 80px;\n height: 80px;\n background-color: black;\n border:none;\n border-radius: 5px;\n}\ninput[type=range]::-moz-range-thumb {\n opacity: 0.5;\n width: 80px;\n height: 80px;\n background-color: black;\n border:none;\n border-radius: 5px;\n}\ninput[type=range]::-ms-thumb {\n opacity: 0.5;\n width: 80px;\n height: 80px;\n background-color: black;\n border:none;\n border-radius: 5px;\n}\ninput[type=range][orient=vertical]{\n writing-mode: bt-lr; /* IE */\n -webkit-appearance: slider-vertical; /* WebKit */\n}\n'; -var $mdgriffith$elm_ui$Internal$Style$trackReset = '\ninput[type=range]::-moz-range-track {\n background: transparent;\n cursor: pointer;\n}\ninput[type=range]::-ms-track {\n background: transparent;\n cursor: pointer;\n}\ninput[type=range]::-webkit-slider-runnable-track {\n background: transparent;\n cursor: pointer;\n}\n'; -var $mdgriffith$elm_ui$Internal$Style$overrides = '@media screen and (-ms-high-contrast: active), (-ms-high-contrast: none) {' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.row) + (' > ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + (' { flex-basis: auto !important; } ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.row) + (' > ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.container) + (' { flex-basis: auto !important; }}' + ($mdgriffith$elm_ui$Internal$Style$inputTextReset + ($mdgriffith$elm_ui$Internal$Style$sliderReset + ($mdgriffith$elm_ui$Internal$Style$trackReset + ($mdgriffith$elm_ui$Internal$Style$thumbReset + $mdgriffith$elm_ui$Internal$Style$explainer))))))))))))))); -var $mdgriffith$elm_ui$Internal$Style$Intermediate = function (a) { - return {$: 'Intermediate', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Style$emptyIntermediate = F2( - function (selector, closing) { - return $mdgriffith$elm_ui$Internal$Style$Intermediate( - {closing: closing, others: _List_Nil, props: _List_Nil, selector: selector}); - }); -var $mdgriffith$elm_ui$Internal$Style$renderRules = F2( - function (_v0, rulesToRender) { - var parent = _v0.a; - var generateIntermediates = F2( - function (rule, rendered) { - switch (rule.$) { - case 'Prop': - var name = rule.a; - var val = rule.b; - return _Utils_update( - rendered, - { - props: A2( - $elm$core$List$cons, - _Utils_Tuple2(name, val), - rendered.props) - }); - case 'Supports': - var _v2 = rule.a; - var prop = _v2.a; - var value = _v2.b; - var props = rule.b; - return _Utils_update( - rendered, - { - others: A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Style$Intermediate( - {closing: '\n}', others: _List_Nil, props: props, selector: '@supports (' + (prop + (':' + (value + (') {' + parent.selector))))}), - rendered.others) - }); - case 'Adjacent': - var selector = rule.a; - var adjRules = rule.b; - return _Utils_update( - rendered, - { - others: A2( - $elm$core$List$cons, - A2( - $mdgriffith$elm_ui$Internal$Style$renderRules, - A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, parent.selector + (' + ' + selector), ''), - adjRules), - rendered.others) - }); - case 'Child': - var child = rule.a; - var childRules = rule.b; - return _Utils_update( - rendered, - { - others: A2( - $elm$core$List$cons, - A2( - $mdgriffith$elm_ui$Internal$Style$renderRules, - A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, parent.selector + (' > ' + child), ''), - childRules), - rendered.others) - }); - case 'AllChildren': - var child = rule.a; - var childRules = rule.b; - return _Utils_update( - rendered, - { - others: A2( - $elm$core$List$cons, - A2( - $mdgriffith$elm_ui$Internal$Style$renderRules, - A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, parent.selector + (' ' + child), ''), - childRules), - rendered.others) - }); - case 'Descriptor': - var descriptor = rule.a; - var descriptorRules = rule.b; - return _Utils_update( - rendered, - { - others: A2( - $elm$core$List$cons, - A2( - $mdgriffith$elm_ui$Internal$Style$renderRules, - A2( - $mdgriffith$elm_ui$Internal$Style$emptyIntermediate, - _Utils_ap(parent.selector, descriptor), - ''), - descriptorRules), - rendered.others) - }); - default: - var batched = rule.a; - return _Utils_update( - rendered, - { - others: A2( - $elm$core$List$cons, - A2( - $mdgriffith$elm_ui$Internal$Style$renderRules, - A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, parent.selector, ''), - batched), - rendered.others) - }); - } - }); - return $mdgriffith$elm_ui$Internal$Style$Intermediate( - A3($elm$core$List$foldr, generateIntermediates, parent, rulesToRender)); - }); -var $mdgriffith$elm_ui$Internal$Style$renderCompact = function (styleClasses) { - var renderValues = function (values) { - return $elm$core$String$concat( - A2( - $elm$core$List$map, - function (_v3) { - var x = _v3.a; - var y = _v3.b; - return x + (':' + (y + ';')); - }, - values)); - }; - var renderClass = function (rule) { - var _v2 = rule.props; - if (!_v2.b) { - return ''; - } else { - return rule.selector + ('{' + (renderValues(rule.props) + (rule.closing + '}'))); - } - }; - var renderIntermediate = function (_v0) { - var rule = _v0.a; - return _Utils_ap( - renderClass(rule), - $elm$core$String$concat( - A2($elm$core$List$map, renderIntermediate, rule.others))); - }; - return $elm$core$String$concat( - A2( - $elm$core$List$map, - renderIntermediate, - A3( - $elm$core$List$foldr, - F2( - function (_v1, existing) { - var name = _v1.a; - var styleRules = _v1.b; - return A2( - $elm$core$List$cons, - A2( - $mdgriffith$elm_ui$Internal$Style$renderRules, - A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, name, ''), - styleRules), - existing); - }), - _List_Nil, - styleClasses))); -}; -var $mdgriffith$elm_ui$Internal$Style$rules = _Utils_ap( - $mdgriffith$elm_ui$Internal$Style$overrides, - $mdgriffith$elm_ui$Internal$Style$renderCompact( - _Utils_ap($mdgriffith$elm_ui$Internal$Style$baseSheet, $mdgriffith$elm_ui$Internal$Style$commonValues))); -var $mdgriffith$elm_ui$Internal$Model$staticRoot = function (opts) { - var _v0 = opts.mode; - switch (_v0.$) { - case 'Layout': - return A3( - $elm$virtual_dom$VirtualDom$node, - 'div', - _List_Nil, - _List_fromArray( - [ - A3( - $elm$virtual_dom$VirtualDom$node, - 'style', - _List_Nil, - _List_fromArray( - [ - $elm$virtual_dom$VirtualDom$text($mdgriffith$elm_ui$Internal$Style$rules) - ])) - ])); - case 'NoStaticStyleSheet': - return $elm$virtual_dom$VirtualDom$text(''); - default: - return A3( - $elm$virtual_dom$VirtualDom$node, - 'elm-ui-static-rules', - _List_fromArray( - [ - A2( - $elm$virtual_dom$VirtualDom$property, - 'rules', - $elm$json$Json$Encode$string($mdgriffith$elm_ui$Internal$Style$rules)) - ]), - _List_Nil); - } -}; -var $elm$core$List$any = F2( - function (isOkay, list) { - any: - while (true) { - if (!list.b) { - return false; - } else { - var x = list.a; - var xs = list.b; - if (isOkay(x)) { - return true; - } else { - var $temp$isOkay = isOkay, - $temp$list = xs; - isOkay = $temp$isOkay; - list = $temp$list; - continue any; - } - } - } - }); -var $mdgriffith$elm_ui$Internal$Model$fontName = function (font) { - switch (font.$) { - case 'Serif': - return 'serif'; - case 'SansSerif': - return 'sans-serif'; - case 'Monospace': - return 'monospace'; - case 'Typeface': - var name = font.a; - return '\"' + (name + '\"'); - case 'ImportFont': - var name = font.a; - var url = font.b; - return '\"' + (name + '\"'); - default: - var name = font.a.name; - return '\"' + (name + '\"'); - } -}; -var $mdgriffith$elm_ui$Internal$Model$isSmallCaps = function (_var) { - switch (_var.$) { - case 'VariantActive': - var name = _var.a; - return name === 'smcp'; - case 'VariantOff': - var name = _var.a; - return false; - default: - var name = _var.a; - var index = _var.b; - return (name === 'smcp') && (index === 1); - } -}; -var $mdgriffith$elm_ui$Internal$Model$hasSmallCaps = function (typeface) { - if (typeface.$ === 'FontWith') { - var font = typeface.a; - return A2($elm$core$List$any, $mdgriffith$elm_ui$Internal$Model$isSmallCaps, font.variants); - } else { - return false; - } -}; -var $elm$core$Basics$min = F2( - function (x, y) { - return (_Utils_cmp(x, y) < 0) ? x : y; - }); -var $mdgriffith$elm_ui$Internal$Model$renderProps = F3( - function (force, _v0, existing) { - var key = _v0.a; - var val = _v0.b; - return force ? (existing + ('\n ' + (key + (': ' + (val + ' !important;'))))) : (existing + ('\n ' + (key + (': ' + (val + ';'))))); - }); -var $mdgriffith$elm_ui$Internal$Model$renderStyle = F4( - function (options, maybePseudo, selector, props) { - if (maybePseudo.$ === 'Nothing') { - return _List_fromArray( - [ - selector + ('{' + (A3( - $elm$core$List$foldl, - $mdgriffith$elm_ui$Internal$Model$renderProps(false), - '', - props) + '\n}')) - ]); - } else { - var pseudo = maybePseudo.a; - switch (pseudo.$) { - case 'Hover': - var _v2 = options.hover; - switch (_v2.$) { - case 'NoHover': - return _List_Nil; - case 'ForceHover': - return _List_fromArray( - [ - selector + ('-hv {' + (A3( - $elm$core$List$foldl, - $mdgriffith$elm_ui$Internal$Model$renderProps(true), - '', - props) + '\n}')) - ]); - default: - return _List_fromArray( - [ - selector + ('-hv:hover {' + (A3( - $elm$core$List$foldl, - $mdgriffith$elm_ui$Internal$Model$renderProps(false), - '', - props) + '\n}')) - ]); - } - case 'Focus': - var renderedProps = A3( - $elm$core$List$foldl, - $mdgriffith$elm_ui$Internal$Model$renderProps(false), - '', - props); - return _List_fromArray( - [ - selector + ('-fs:focus {' + (renderedProps + '\n}')), - ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.any + (':focus ' + (selector + '-fs {')))) + (renderedProps + '\n}'), - (selector + '-fs:focus-within {') + (renderedProps + '\n}'), - ('.ui-slide-bar:focus + ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.any) + (' .focusable-thumb' + (selector + '-fs {')))) + (renderedProps + '\n}') - ]); - default: - return _List_fromArray( - [ - selector + ('-act:active {' + (A3( - $elm$core$List$foldl, - $mdgriffith$elm_ui$Internal$Model$renderProps(false), - '', - props) + '\n}')) - ]); - } - } - }); -var $mdgriffith$elm_ui$Internal$Model$renderVariant = function (_var) { - switch (_var.$) { - case 'VariantActive': - var name = _var.a; - return '\"' + (name + '\"'); - case 'VariantOff': - var name = _var.a; - return '\"' + (name + '\" 0'); - default: - var name = _var.a; - var index = _var.b; - return '\"' + (name + ('\" ' + $elm$core$String$fromInt(index))); - } -}; -var $mdgriffith$elm_ui$Internal$Model$renderVariants = function (typeface) { - if (typeface.$ === 'FontWith') { - var font = typeface.a; - return $elm$core$Maybe$Just( - A2( - $elm$core$String$join, - ', ', - A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$renderVariant, font.variants))); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $mdgriffith$elm_ui$Internal$Model$transformValue = function (transform) { - switch (transform.$) { - case 'Untransformed': - return $elm$core$Maybe$Nothing; - case 'Moved': - var _v1 = transform.a; - var x = _v1.a; - var y = _v1.b; - var z = _v1.c; - return $elm$core$Maybe$Just( - 'translate3d(' + ($elm$core$String$fromFloat(x) + ('px, ' + ($elm$core$String$fromFloat(y) + ('px, ' + ($elm$core$String$fromFloat(z) + 'px)')))))); - default: - var _v2 = transform.a; - var tx = _v2.a; - var ty = _v2.b; - var tz = _v2.c; - var _v3 = transform.b; - var sx = _v3.a; - var sy = _v3.b; - var sz = _v3.c; - var _v4 = transform.c; - var ox = _v4.a; - var oy = _v4.b; - var oz = _v4.c; - var angle = transform.d; - var translate = 'translate3d(' + ($elm$core$String$fromFloat(tx) + ('px, ' + ($elm$core$String$fromFloat(ty) + ('px, ' + ($elm$core$String$fromFloat(tz) + 'px)'))))); - var scale = 'scale3d(' + ($elm$core$String$fromFloat(sx) + (', ' + ($elm$core$String$fromFloat(sy) + (', ' + ($elm$core$String$fromFloat(sz) + ')'))))); - var rotate = 'rotate3d(' + ($elm$core$String$fromFloat(ox) + (', ' + ($elm$core$String$fromFloat(oy) + (', ' + ($elm$core$String$fromFloat(oz) + (', ' + ($elm$core$String$fromFloat(angle) + 'rad)'))))))); - return $elm$core$Maybe$Just(translate + (' ' + (scale + (' ' + rotate)))); - } -}; -var $mdgriffith$elm_ui$Internal$Model$renderStyleRule = F3( - function (options, rule, maybePseudo) { - switch (rule.$) { - case 'Style': - var selector = rule.a; - var props = rule.b; - return A4($mdgriffith$elm_ui$Internal$Model$renderStyle, options, maybePseudo, selector, props); - case 'Shadows': - var name = rule.a; - var prop = rule.b; - return A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - '.' + name, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'box-shadow', prop) - ])); - case 'Transparency': - var name = rule.a; - var transparency = rule.b; - var opacity = A2( - $elm$core$Basics$max, - 0, - A2($elm$core$Basics$min, 1, 1 - transparency)); - return A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - '.' + name, - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'opacity', - $elm$core$String$fromFloat(opacity)) - ])); - case 'FontSize': - var i = rule.a; - return A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - '.font-size-' + $elm$core$String$fromInt(i), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'font-size', - $elm$core$String$fromInt(i) + 'px') - ])); - case 'FontFamily': - var name = rule.a; - var typefaces = rule.b; - var features = A2( - $elm$core$String$join, - ', ', - A2($elm$core$List$filterMap, $mdgriffith$elm_ui$Internal$Model$renderVariants, typefaces)); - var families = _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'font-family', - A2( - $elm$core$String$join, - ', ', - A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$fontName, typefaces))), - A2($mdgriffith$elm_ui$Internal$Model$Property, 'font-feature-settings', features), - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'font-variant', - A2($elm$core$List$any, $mdgriffith$elm_ui$Internal$Model$hasSmallCaps, typefaces) ? 'small-caps' : 'normal') - ]); - return A4($mdgriffith$elm_ui$Internal$Model$renderStyle, options, maybePseudo, '.' + name, families); - case 'Single': - var _class = rule.a; - var prop = rule.b; - var val = rule.c; - return A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - '.' + _class, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, prop, val) - ])); - case 'Colored': - var _class = rule.a; - var prop = rule.b; - var color = rule.c; - return A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - '.' + _class, - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - prop, - $mdgriffith$elm_ui$Internal$Model$formatColor(color)) - ])); - case 'SpacingStyle': - var cls = rule.a; - var x = rule.b; - var y = rule.c; - var yPx = $elm$core$String$fromInt(y) + 'px'; - var xPx = $elm$core$String$fromInt(x) + 'px'; - var single = '.' + $mdgriffith$elm_ui$Internal$Style$classes.single; - var row = '.' + $mdgriffith$elm_ui$Internal$Style$classes.row; - var wrappedRow = '.' + ($mdgriffith$elm_ui$Internal$Style$classes.wrapped + row); - var right = '.' + $mdgriffith$elm_ui$Internal$Style$classes.alignRight; - var paragraph = '.' + $mdgriffith$elm_ui$Internal$Style$classes.paragraph; - var page = '.' + $mdgriffith$elm_ui$Internal$Style$classes.page; - var left = '.' + $mdgriffith$elm_ui$Internal$Style$classes.alignLeft; - var halfY = $elm$core$String$fromFloat(y / 2) + 'px'; - var halfX = $elm$core$String$fromFloat(x / 2) + 'px'; - var column = '.' + $mdgriffith$elm_ui$Internal$Style$classes.column; - var _class = '.' + cls; - var any = '.' + $mdgriffith$elm_ui$Internal$Style$classes.any; - return $elm$core$List$concat( - _List_fromArray( - [ - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (row + (' > ' + (any + (' + ' + any)))), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-left', xPx) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (wrappedRow + (' > ' + any)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin', halfY + (' ' + halfX)) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (column + (' > ' + (any + (' + ' + any)))), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-top', yPx) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (page + (' > ' + (any + (' + ' + any)))), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-top', yPx) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (page + (' > ' + left)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-right', xPx) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (page + (' > ' + right)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-left', xPx) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _Utils_ap(_class, paragraph), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'line-height', - 'calc(1em + ' + ($elm$core$String$fromInt(y) + 'px)')) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - 'textarea' + (any + _class), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'line-height', - 'calc(1em + ' + ($elm$core$String$fromInt(y) + 'px)')), - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'height', - 'calc(100% + ' + ($elm$core$String$fromInt(y) + 'px)')) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (paragraph + (' > ' + left)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-right', xPx) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (paragraph + (' > ' + right)), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-left', xPx) - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (paragraph + '::after'), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'content', '\'\''), - A2($mdgriffith$elm_ui$Internal$Model$Property, 'display', 'block'), - A2($mdgriffith$elm_ui$Internal$Model$Property, 'height', '0'), - A2($mdgriffith$elm_ui$Internal$Model$Property, 'width', '0'), - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'margin-top', - $elm$core$String$fromInt((-1) * ((y / 2) | 0)) + 'px') - ])), - A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class + (paragraph + '::before'), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'content', '\'\''), - A2($mdgriffith$elm_ui$Internal$Model$Property, 'display', 'block'), - A2($mdgriffith$elm_ui$Internal$Model$Property, 'height', '0'), - A2($mdgriffith$elm_ui$Internal$Model$Property, 'width', '0'), - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'margin-bottom', - $elm$core$String$fromInt((-1) * ((y / 2) | 0)) + 'px') - ])) - ])); - case 'PaddingStyle': - var cls = rule.a; - var top = rule.b; - var right = rule.c; - var bottom = rule.d; - var left = rule.e; - var _class = '.' + cls; - return A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class, - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'padding', - $elm$core$String$fromFloat(top) + ('px ' + ($elm$core$String$fromFloat(right) + ('px ' + ($elm$core$String$fromFloat(bottom) + ('px ' + ($elm$core$String$fromFloat(left) + 'px'))))))) - ])); - case 'BorderWidth': - var cls = rule.a; - var top = rule.b; - var right = rule.c; - var bottom = rule.d; - var left = rule.e; - var _class = '.' + cls; - return A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - _class, - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$Property, - 'border-width', - $elm$core$String$fromInt(top) + ('px ' + ($elm$core$String$fromInt(right) + ('px ' + ($elm$core$String$fromInt(bottom) + ('px ' + ($elm$core$String$fromInt(left) + 'px'))))))) - ])); - case 'GridTemplateStyle': - var template = rule.a; - var toGridLengthHelper = F3( - function (minimum, maximum, x) { - toGridLengthHelper: - while (true) { - switch (x.$) { - case 'Px': - var px = x.a; - return $elm$core$String$fromInt(px) + 'px'; - case 'Content': - var _v2 = _Utils_Tuple2(minimum, maximum); - if (_v2.a.$ === 'Nothing') { - if (_v2.b.$ === 'Nothing') { - var _v3 = _v2.a; - var _v4 = _v2.b; - return 'max-content'; - } else { - var _v6 = _v2.a; - var maxSize = _v2.b.a; - return 'minmax(max-content, ' + ($elm$core$String$fromInt(maxSize) + 'px)'); - } - } else { - if (_v2.b.$ === 'Nothing') { - var minSize = _v2.a.a; - var _v5 = _v2.b; - return 'minmax(' + ($elm$core$String$fromInt(minSize) + ('px, ' + 'max-content)')); - } else { - var minSize = _v2.a.a; - var maxSize = _v2.b.a; - return 'minmax(' + ($elm$core$String$fromInt(minSize) + ('px, ' + ($elm$core$String$fromInt(maxSize) + 'px)'))); - } - } - case 'Fill': - var i = x.a; - var _v7 = _Utils_Tuple2(minimum, maximum); - if (_v7.a.$ === 'Nothing') { - if (_v7.b.$ === 'Nothing') { - var _v8 = _v7.a; - var _v9 = _v7.b; - return $elm$core$String$fromInt(i) + 'fr'; - } else { - var _v11 = _v7.a; - var maxSize = _v7.b.a; - return 'minmax(max-content, ' + ($elm$core$String$fromInt(maxSize) + 'px)'); - } - } else { - if (_v7.b.$ === 'Nothing') { - var minSize = _v7.a.a; - var _v10 = _v7.b; - return 'minmax(' + ($elm$core$String$fromInt(minSize) + ('px, ' + ($elm$core$String$fromInt(i) + ('fr' + 'fr)')))); - } else { - var minSize = _v7.a.a; - var maxSize = _v7.b.a; - return 'minmax(' + ($elm$core$String$fromInt(minSize) + ('px, ' + ($elm$core$String$fromInt(maxSize) + 'px)'))); - } - } - case 'Min': - var m = x.a; - var len = x.b; - var $temp$minimum = $elm$core$Maybe$Just(m), - $temp$maximum = maximum, - $temp$x = len; - minimum = $temp$minimum; - maximum = $temp$maximum; - x = $temp$x; - continue toGridLengthHelper; - default: - var m = x.a; - var len = x.b; - var $temp$minimum = minimum, - $temp$maximum = $elm$core$Maybe$Just(m), - $temp$x = len; - minimum = $temp$minimum; - maximum = $temp$maximum; - x = $temp$x; - continue toGridLengthHelper; - } - } - }); - var toGridLength = function (x) { - return A3(toGridLengthHelper, $elm$core$Maybe$Nothing, $elm$core$Maybe$Nothing, x); - }; - var xSpacing = toGridLength(template.spacing.a); - var ySpacing = toGridLength(template.spacing.b); - var rows = function (x) { - return 'grid-template-rows: ' + (x + ';'); - }( - A2( - $elm$core$String$join, - ' ', - A2($elm$core$List$map, toGridLength, template.rows))); - var msRows = function (x) { - return '-ms-grid-rows: ' + (x + ';'); - }( - A2( - $elm$core$String$join, - ySpacing, - A2($elm$core$List$map, toGridLength, template.columns))); - var msColumns = function (x) { - return '-ms-grid-columns: ' + (x + ';'); - }( - A2( - $elm$core$String$join, - ySpacing, - A2($elm$core$List$map, toGridLength, template.columns))); - var gapY = 'grid-row-gap:' + (toGridLength(template.spacing.b) + ';'); - var gapX = 'grid-column-gap:' + (toGridLength(template.spacing.a) + ';'); - var columns = function (x) { - return 'grid-template-columns: ' + (x + ';'); - }( - A2( - $elm$core$String$join, - ' ', - A2($elm$core$List$map, toGridLength, template.columns))); - var _class = '.grid-rows-' + (A2( - $elm$core$String$join, - '-', - A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$lengthClassName, template.rows)) + ('-cols-' + (A2( - $elm$core$String$join, - '-', - A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$lengthClassName, template.columns)) + ('-space-x-' + ($mdgriffith$elm_ui$Internal$Model$lengthClassName(template.spacing.a) + ('-space-y-' + $mdgriffith$elm_ui$Internal$Model$lengthClassName(template.spacing.b))))))); - var modernGrid = _class + ('{' + (columns + (rows + (gapX + (gapY + '}'))))); - var supports = '@supports (display:grid) {' + (modernGrid + '}'); - var base = _class + ('{' + (msColumns + (msRows + '}'))); - return _List_fromArray( - [base, supports]); - case 'GridPosition': - var position = rule.a; - var msPosition = A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [ - '-ms-grid-row: ' + ($elm$core$String$fromInt(position.row) + ';'), - '-ms-grid-row-span: ' + ($elm$core$String$fromInt(position.height) + ';'), - '-ms-grid-column: ' + ($elm$core$String$fromInt(position.col) + ';'), - '-ms-grid-column-span: ' + ($elm$core$String$fromInt(position.width) + ';') - ])); - var modernPosition = A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [ - 'grid-row: ' + ($elm$core$String$fromInt(position.row) + (' / ' + ($elm$core$String$fromInt(position.row + position.height) + ';'))), - 'grid-column: ' + ($elm$core$String$fromInt(position.col) + (' / ' + ($elm$core$String$fromInt(position.col + position.width) + ';'))) - ])); - var _class = '.grid-pos-' + ($elm$core$String$fromInt(position.row) + ('-' + ($elm$core$String$fromInt(position.col) + ('-' + ($elm$core$String$fromInt(position.width) + ('-' + $elm$core$String$fromInt(position.height))))))); - var modernGrid = _class + ('{' + (modernPosition + '}')); - var supports = '@supports (display:grid) {' + (modernGrid + '}'); - var base = _class + ('{' + (msPosition + '}')); - return _List_fromArray( - [base, supports]); - case 'PseudoSelector': - var _class = rule.a; - var styles = rule.b; - var renderPseudoRule = function (style) { - return A3( - $mdgriffith$elm_ui$Internal$Model$renderStyleRule, - options, - style, - $elm$core$Maybe$Just(_class)); - }; - return A2($elm$core$List$concatMap, renderPseudoRule, styles); - default: - var transform = rule.a; - var val = $mdgriffith$elm_ui$Internal$Model$transformValue(transform); - var _class = $mdgriffith$elm_ui$Internal$Model$transformClass(transform); - var _v12 = _Utils_Tuple2(_class, val); - if ((_v12.a.$ === 'Just') && (_v12.b.$ === 'Just')) { - var cls = _v12.a.a; - var v = _v12.b.a; - return A4( - $mdgriffith$elm_ui$Internal$Model$renderStyle, - options, - maybePseudo, - '.' + cls, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$Property, 'transform', v) - ])); - } else { - return _List_Nil; - } - } - }); -var $mdgriffith$elm_ui$Internal$Model$encodeStyles = F2( - function (options, stylesheet) { - return $elm$json$Json$Encode$object( - A2( - $elm$core$List$map, - function (style) { - var styled = A3($mdgriffith$elm_ui$Internal$Model$renderStyleRule, options, style, $elm$core$Maybe$Nothing); - return _Utils_Tuple2( - $mdgriffith$elm_ui$Internal$Model$getStyleName(style), - A2($elm$json$Json$Encode$list, $elm$json$Json$Encode$string, styled)); - }, - stylesheet)); - }); -var $mdgriffith$elm_ui$Internal$Model$bracket = F2( - function (selector, rules) { - var renderPair = function (_v0) { - var name = _v0.a; - var val = _v0.b; - return name + (': ' + (val + ';')); - }; - return selector + (' {' + (A2( - $elm$core$String$join, - '', - A2($elm$core$List$map, renderPair, rules)) + '}')); - }); -var $mdgriffith$elm_ui$Internal$Model$fontRule = F3( - function (name, modifier, _v0) { - var parentAdj = _v0.a; - var textAdjustment = _v0.b; - return _List_fromArray( - [ - A2($mdgriffith$elm_ui$Internal$Model$bracket, '.' + (name + ('.' + (modifier + (', ' + ('.' + (name + (' .' + modifier))))))), parentAdj), - A2($mdgriffith$elm_ui$Internal$Model$bracket, '.' + (name + ('.' + (modifier + ('> .' + ($mdgriffith$elm_ui$Internal$Style$classes.text + (', .' + (name + (' .' + (modifier + (' > .' + $mdgriffith$elm_ui$Internal$Style$classes.text)))))))))), textAdjustment) - ]); - }); -var $mdgriffith$elm_ui$Internal$Model$renderFontAdjustmentRule = F3( - function (fontToAdjust, _v0, otherFontName) { - var full = _v0.a; - var capital = _v0.b; - var name = _Utils_eq(fontToAdjust, otherFontName) ? fontToAdjust : (otherFontName + (' .' + fontToAdjust)); - return A2( - $elm$core$String$join, - ' ', - _Utils_ap( - A3($mdgriffith$elm_ui$Internal$Model$fontRule, name, $mdgriffith$elm_ui$Internal$Style$classes.sizeByCapital, capital), - A3($mdgriffith$elm_ui$Internal$Model$fontRule, name, $mdgriffith$elm_ui$Internal$Style$classes.fullSize, full))); - }); -var $mdgriffith$elm_ui$Internal$Model$renderNullAdjustmentRule = F2( - function (fontToAdjust, otherFontName) { - var name = _Utils_eq(fontToAdjust, otherFontName) ? fontToAdjust : (otherFontName + (' .' + fontToAdjust)); - return A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$bracket, - '.' + (name + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.sizeByCapital + (', ' + ('.' + (name + (' .' + $mdgriffith$elm_ui$Internal$Style$classes.sizeByCapital))))))), - _List_fromArray( - [ - _Utils_Tuple2('line-height', '1') - ])), - A2( - $mdgriffith$elm_ui$Internal$Model$bracket, - '.' + (name + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.sizeByCapital + ('> .' + ($mdgriffith$elm_ui$Internal$Style$classes.text + (', .' + (name + (' .' + ($mdgriffith$elm_ui$Internal$Style$classes.sizeByCapital + (' > .' + $mdgriffith$elm_ui$Internal$Style$classes.text)))))))))), - _List_fromArray( - [ - _Utils_Tuple2('vertical-align', '0'), - _Utils_Tuple2('line-height', '1') - ])) - ])); - }); -var $mdgriffith$elm_ui$Internal$Model$adjust = F3( - function (size, height, vertical) { - return {height: height / size, size: size, vertical: vertical}; - }); -var $elm$core$List$maximum = function (list) { - if (list.b) { - var x = list.a; - var xs = list.b; - return $elm$core$Maybe$Just( - A3($elm$core$List$foldl, $elm$core$Basics$max, x, xs)); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $elm$core$List$minimum = function (list) { - if (list.b) { - var x = list.a; - var xs = list.b; - return $elm$core$Maybe$Just( - A3($elm$core$List$foldl, $elm$core$Basics$min, x, xs)); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $mdgriffith$elm_ui$Internal$Model$convertAdjustment = function (adjustment) { - var lines = _List_fromArray( - [adjustment.capital, adjustment.baseline, adjustment.descender, adjustment.lowercase]); - var lineHeight = 1.5; - var normalDescender = (lineHeight - 1) / 2; - var oldMiddle = lineHeight / 2; - var descender = A2( - $elm$core$Maybe$withDefault, - adjustment.descender, - $elm$core$List$minimum(lines)); - var newBaseline = A2( - $elm$core$Maybe$withDefault, - adjustment.baseline, - $elm$core$List$minimum( - A2( - $elm$core$List$filter, - function (x) { - return !_Utils_eq(x, descender); - }, - lines))); - var base = lineHeight; - var ascender = A2( - $elm$core$Maybe$withDefault, - adjustment.capital, - $elm$core$List$maximum(lines)); - var capitalSize = 1 / (ascender - newBaseline); - var capitalVertical = 1 - ascender; - var fullSize = 1 / (ascender - descender); - var fullVertical = 1 - ascender; - var newCapitalMiddle = ((ascender - newBaseline) / 2) + newBaseline; - var newFullMiddle = ((ascender - descender) / 2) + descender; - return { - capital: A3($mdgriffith$elm_ui$Internal$Model$adjust, capitalSize, ascender - newBaseline, capitalVertical), - full: A3($mdgriffith$elm_ui$Internal$Model$adjust, fullSize, ascender - descender, fullVertical) - }; -}; -var $mdgriffith$elm_ui$Internal$Model$fontAdjustmentRules = function (converted) { - return _Utils_Tuple2( - _List_fromArray( - [ - _Utils_Tuple2('display', 'block') - ]), - _List_fromArray( - [ - _Utils_Tuple2('display', 'inline-block'), - _Utils_Tuple2( - 'line-height', - $elm$core$String$fromFloat(converted.height)), - _Utils_Tuple2( - 'vertical-align', - $elm$core$String$fromFloat(converted.vertical) + 'em'), - _Utils_Tuple2( - 'font-size', - $elm$core$String$fromFloat(converted.size) + 'em') - ])); -}; -var $mdgriffith$elm_ui$Internal$Model$typefaceAdjustment = function (typefaces) { - return A3( - $elm$core$List$foldl, - F2( - function (face, found) { - if (found.$ === 'Nothing') { - if (face.$ === 'FontWith') { - var _with = face.a; - var _v2 = _with.adjustment; - if (_v2.$ === 'Nothing') { - return found; - } else { - var adjustment = _v2.a; - return $elm$core$Maybe$Just( - _Utils_Tuple2( - $mdgriffith$elm_ui$Internal$Model$fontAdjustmentRules( - function ($) { - return $.full; - }( - $mdgriffith$elm_ui$Internal$Model$convertAdjustment(adjustment))), - $mdgriffith$elm_ui$Internal$Model$fontAdjustmentRules( - function ($) { - return $.capital; - }( - $mdgriffith$elm_ui$Internal$Model$convertAdjustment(adjustment))))); - } - } else { - return found; - } - } else { - return found; - } - }), - $elm$core$Maybe$Nothing, - typefaces); -}; -var $mdgriffith$elm_ui$Internal$Model$renderTopLevelValues = function (rules) { - var withImport = function (font) { - if (font.$ === 'ImportFont') { - var url = font.b; - return $elm$core$Maybe$Just('@import url(\'' + (url + '\');')); - } else { - return $elm$core$Maybe$Nothing; - } - }; - var fontImports = function (_v2) { - var name = _v2.a; - var typefaces = _v2.b; - var imports = A2( - $elm$core$String$join, - '\n', - A2($elm$core$List$filterMap, withImport, typefaces)); - return imports; - }; - var allNames = A2($elm$core$List$map, $elm$core$Tuple$first, rules); - var fontAdjustments = function (_v1) { - var name = _v1.a; - var typefaces = _v1.b; - var _v0 = $mdgriffith$elm_ui$Internal$Model$typefaceAdjustment(typefaces); - if (_v0.$ === 'Nothing') { - return A2( - $elm$core$String$join, - '', - A2( - $elm$core$List$map, - $mdgriffith$elm_ui$Internal$Model$renderNullAdjustmentRule(name), - allNames)); - } else { - var adjustment = _v0.a; - return A2( - $elm$core$String$join, - '', - A2( - $elm$core$List$map, - A2($mdgriffith$elm_ui$Internal$Model$renderFontAdjustmentRule, name, adjustment), - allNames)); - } - }; - return _Utils_ap( - A2( - $elm$core$String$join, - '\n', - A2($elm$core$List$map, fontImports, rules)), - A2( - $elm$core$String$join, - '\n', - A2($elm$core$List$map, fontAdjustments, rules))); -}; -var $mdgriffith$elm_ui$Internal$Model$topLevelValue = function (rule) { - if (rule.$ === 'FontFamily') { - var name = rule.a; - var typefaces = rule.b; - return $elm$core$Maybe$Just( - _Utils_Tuple2(name, typefaces)); - } else { - return $elm$core$Maybe$Nothing; - } -}; -var $mdgriffith$elm_ui$Internal$Model$toStyleSheetString = F2( - function (options, stylesheet) { - var combine = F2( - function (style, rendered) { - return { - rules: _Utils_ap( - rendered.rules, - A3($mdgriffith$elm_ui$Internal$Model$renderStyleRule, options, style, $elm$core$Maybe$Nothing)), - topLevel: function () { - var _v1 = $mdgriffith$elm_ui$Internal$Model$topLevelValue(style); - if (_v1.$ === 'Nothing') { - return rendered.topLevel; - } else { - var topLevel = _v1.a; - return A2($elm$core$List$cons, topLevel, rendered.topLevel); - } - }() - }; - }); - var _v0 = A3( - $elm$core$List$foldl, - combine, - {rules: _List_Nil, topLevel: _List_Nil}, - stylesheet); - var topLevel = _v0.topLevel; - var rules = _v0.rules; - return _Utils_ap( - $mdgriffith$elm_ui$Internal$Model$renderTopLevelValues(topLevel), - $elm$core$String$concat(rules)); - }); -var $mdgriffith$elm_ui$Internal$Model$toStyleSheet = F2( - function (options, styleSheet) { - var _v0 = options.mode; - switch (_v0.$) { - case 'Layout': - return A3( - $elm$virtual_dom$VirtualDom$node, - 'div', - _List_Nil, - _List_fromArray( - [ - A3( - $elm$virtual_dom$VirtualDom$node, - 'style', - _List_Nil, - _List_fromArray( - [ - $elm$virtual_dom$VirtualDom$text( - A2($mdgriffith$elm_ui$Internal$Model$toStyleSheetString, options, styleSheet)) - ])) - ])); - case 'NoStaticStyleSheet': - return A3( - $elm$virtual_dom$VirtualDom$node, - 'div', - _List_Nil, - _List_fromArray( - [ - A3( - $elm$virtual_dom$VirtualDom$node, - 'style', - _List_Nil, - _List_fromArray( - [ - $elm$virtual_dom$VirtualDom$text( - A2($mdgriffith$elm_ui$Internal$Model$toStyleSheetString, options, styleSheet)) - ])) - ])); - default: - return A3( - $elm$virtual_dom$VirtualDom$node, - 'elm-ui-rules', - _List_fromArray( - [ - A2( - $elm$virtual_dom$VirtualDom$property, - 'rules', - A2($mdgriffith$elm_ui$Internal$Model$encodeStyles, options, styleSheet)) - ]), - _List_Nil); - } - }); -var $mdgriffith$elm_ui$Internal$Model$embedKeyed = F4( - function (_static, opts, styles, children) { - var dynamicStyleSheet = A2( - $mdgriffith$elm_ui$Internal$Model$toStyleSheet, - opts, - A3( - $elm$core$List$foldl, - $mdgriffith$elm_ui$Internal$Model$reduceStyles, - _Utils_Tuple2( - $elm$core$Set$empty, - $mdgriffith$elm_ui$Internal$Model$renderFocusStyle(opts.focus)), - styles).b); - return _static ? A2( - $elm$core$List$cons, - _Utils_Tuple2( - 'static-stylesheet', - $mdgriffith$elm_ui$Internal$Model$staticRoot(opts)), - A2( - $elm$core$List$cons, - _Utils_Tuple2('dynamic-stylesheet', dynamicStyleSheet), - children)) : A2( - $elm$core$List$cons, - _Utils_Tuple2('dynamic-stylesheet', dynamicStyleSheet), - children); - }); -var $mdgriffith$elm_ui$Internal$Model$embedWith = F4( - function (_static, opts, styles, children) { - var dynamicStyleSheet = A2( - $mdgriffith$elm_ui$Internal$Model$toStyleSheet, - opts, - A3( - $elm$core$List$foldl, - $mdgriffith$elm_ui$Internal$Model$reduceStyles, - _Utils_Tuple2( - $elm$core$Set$empty, - $mdgriffith$elm_ui$Internal$Model$renderFocusStyle(opts.focus)), - styles).b); - return _static ? A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$staticRoot(opts), - A2($elm$core$List$cons, dynamicStyleSheet, children)) : A2($elm$core$List$cons, dynamicStyleSheet, children); - }); -var $mdgriffith$elm_ui$Internal$Flag$heightBetween = $mdgriffith$elm_ui$Internal$Flag$flag(45); -var $mdgriffith$elm_ui$Internal$Flag$heightFill = $mdgriffith$elm_ui$Internal$Flag$flag(37); -var $mdgriffith$elm_ui$Internal$Flag$present = F2( - function (myFlag, _v0) { - var fieldOne = _v0.a; - var fieldTwo = _v0.b; - if (myFlag.$ === 'Flag') { - var first = myFlag.a; - return _Utils_eq(first & fieldOne, first); - } else { - var second = myFlag.a; - return _Utils_eq(second & fieldTwo, second); - } - }); -var $elm$html$Html$s = _VirtualDom_node('s'); -var $elm$html$Html$u = _VirtualDom_node('u'); -var $mdgriffith$elm_ui$Internal$Flag$widthBetween = $mdgriffith$elm_ui$Internal$Flag$flag(44); -var $mdgriffith$elm_ui$Internal$Flag$widthFill = $mdgriffith$elm_ui$Internal$Flag$flag(39); -var $mdgriffith$elm_ui$Internal$Model$finalizeNode = F6( - function (has, node, attributes, children, embedMode, parentContext) { - var createNode = F2( - function (nodeName, attrs) { - if (children.$ === 'Keyed') { - var keyed = children.a; - return A3( - $elm$virtual_dom$VirtualDom$keyedNode, - nodeName, - attrs, - function () { - switch (embedMode.$) { - case 'NoStyleSheet': - return keyed; - case 'OnlyDynamic': - var opts = embedMode.a; - var styles = embedMode.b; - return A4($mdgriffith$elm_ui$Internal$Model$embedKeyed, false, opts, styles, keyed); - default: - var opts = embedMode.a; - var styles = embedMode.b; - return A4($mdgriffith$elm_ui$Internal$Model$embedKeyed, true, opts, styles, keyed); - } - }()); - } else { - var unkeyed = children.a; - return A2( - function () { - switch (nodeName) { - case 'div': - return $elm$html$Html$div; - case 'p': - return $elm$html$Html$p; - default: - return $elm$virtual_dom$VirtualDom$node(nodeName); - } - }(), - attrs, - function () { - switch (embedMode.$) { - case 'NoStyleSheet': - return unkeyed; - case 'OnlyDynamic': - var opts = embedMode.a; - var styles = embedMode.b; - return A4($mdgriffith$elm_ui$Internal$Model$embedWith, false, opts, styles, unkeyed); - default: - var opts = embedMode.a; - var styles = embedMode.b; - return A4($mdgriffith$elm_ui$Internal$Model$embedWith, true, opts, styles, unkeyed); - } - }()); - } - }); - var html = function () { - switch (node.$) { - case 'Generic': - return A2(createNode, 'div', attributes); - case 'NodeName': - var nodeName = node.a; - return A2(createNode, nodeName, attributes); - default: - var nodeName = node.a; - var internal = node.b; - return A3( - $elm$virtual_dom$VirtualDom$node, - nodeName, - attributes, - _List_fromArray( - [ - A2( - createNode, - internal, - _List_fromArray( - [ - $elm$html$Html$Attributes$class($mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.single)) - ])) - ])); - } - }(); - switch (parentContext.$) { - case 'AsRow': - return (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$widthFill, has) && (!A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$widthBetween, has))) ? html : (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$alignRight, has) ? A2( - $elm$html$Html$u, - _List_fromArray( - [ - $elm$html$Html$Attributes$class( - A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.any, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.container, $mdgriffith$elm_ui$Internal$Style$classes.contentCenterY, $mdgriffith$elm_ui$Internal$Style$classes.alignContainerRight]))) - ]), - _List_fromArray( - [html])) : (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$centerX, has) ? A2( - $elm$html$Html$s, - _List_fromArray( - [ - $elm$html$Html$Attributes$class( - A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.any, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.container, $mdgriffith$elm_ui$Internal$Style$classes.contentCenterY, $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterX]))) - ]), - _List_fromArray( - [html])) : html)); - case 'AsColumn': - return (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$heightFill, has) && (!A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$heightBetween, has))) ? html : (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$centerY, has) ? A2( - $elm$html$Html$s, - _List_fromArray( - [ - $elm$html$Html$Attributes$class( - A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.any, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.container, $mdgriffith$elm_ui$Internal$Style$classes.alignContainerCenterY]))) - ]), - _List_fromArray( - [html])) : (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$alignBottom, has) ? A2( - $elm$html$Html$u, - _List_fromArray( - [ - $elm$html$Html$Attributes$class( - A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.any, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.container, $mdgriffith$elm_ui$Internal$Style$classes.alignContainerBottom]))) - ]), - _List_fromArray( - [html])) : html)); - default: - return html; - } - }); -var $mdgriffith$elm_ui$Internal$Model$textElementClasses = $mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.text + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.widthContent + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.heightContent))))); -var $mdgriffith$elm_ui$Internal$Model$textElement = function (str) { - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$class($mdgriffith$elm_ui$Internal$Model$textElementClasses) - ]), - _List_fromArray( - [ - $elm$html$Html$text(str) - ])); -}; -var $mdgriffith$elm_ui$Internal$Model$textElementFillClasses = $mdgriffith$elm_ui$Internal$Style$classes.any + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.text + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.widthFill + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.heightFill))))); -var $mdgriffith$elm_ui$Internal$Model$textElementFill = function (str) { - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$class($mdgriffith$elm_ui$Internal$Model$textElementFillClasses) - ]), - _List_fromArray( - [ - $elm$html$Html$text(str) - ])); -}; -var $mdgriffith$elm_ui$Internal$Model$createElement = F3( - function (context, children, rendered) { - var gatherKeyed = F2( - function (_v8, _v9) { - var key = _v8.a; - var child = _v8.b; - var htmls = _v9.a; - var existingStyles = _v9.b; - switch (child.$) { - case 'Unstyled': - var html = child.a; - return _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asParagraph) ? _Utils_Tuple2( - A2( - $elm$core$List$cons, - _Utils_Tuple2( - key, - html(context)), - htmls), - existingStyles) : _Utils_Tuple2( - A2( - $elm$core$List$cons, - _Utils_Tuple2( - key, - html(context)), - htmls), - existingStyles); - case 'Styled': - var styled = child.a; - return _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asParagraph) ? _Utils_Tuple2( - A2( - $elm$core$List$cons, - _Utils_Tuple2( - key, - A2(styled.html, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, context)), - htmls), - $elm$core$List$isEmpty(existingStyles) ? styled.styles : _Utils_ap(styled.styles, existingStyles)) : _Utils_Tuple2( - A2( - $elm$core$List$cons, - _Utils_Tuple2( - key, - A2(styled.html, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, context)), - htmls), - $elm$core$List$isEmpty(existingStyles) ? styled.styles : _Utils_ap(styled.styles, existingStyles)); - case 'Text': - var str = child.a; - return _Utils_Tuple2( - A2( - $elm$core$List$cons, - _Utils_Tuple2( - key, - _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asEl) ? $mdgriffith$elm_ui$Internal$Model$textElementFill(str) : $mdgriffith$elm_ui$Internal$Model$textElement(str)), - htmls), - existingStyles); - default: - return _Utils_Tuple2(htmls, existingStyles); - } - }); - var gather = F2( - function (child, _v6) { - var htmls = _v6.a; - var existingStyles = _v6.b; - switch (child.$) { - case 'Unstyled': - var html = child.a; - return _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asParagraph) ? _Utils_Tuple2( - A2( - $elm$core$List$cons, - html(context), - htmls), - existingStyles) : _Utils_Tuple2( - A2( - $elm$core$List$cons, - html(context), - htmls), - existingStyles); - case 'Styled': - var styled = child.a; - return _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asParagraph) ? _Utils_Tuple2( - A2( - $elm$core$List$cons, - A2(styled.html, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, context), - htmls), - $elm$core$List$isEmpty(existingStyles) ? styled.styles : _Utils_ap(styled.styles, existingStyles)) : _Utils_Tuple2( - A2( - $elm$core$List$cons, - A2(styled.html, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, context), - htmls), - $elm$core$List$isEmpty(existingStyles) ? styled.styles : _Utils_ap(styled.styles, existingStyles)); - case 'Text': - var str = child.a; - return _Utils_Tuple2( - A2( - $elm$core$List$cons, - _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asEl) ? $mdgriffith$elm_ui$Internal$Model$textElementFill(str) : $mdgriffith$elm_ui$Internal$Model$textElement(str), - htmls), - existingStyles); - default: - return _Utils_Tuple2(htmls, existingStyles); - } - }); - if (children.$ === 'Keyed') { - var keyedChildren = children.a; - var _v1 = A3( - $elm$core$List$foldr, - gatherKeyed, - _Utils_Tuple2(_List_Nil, _List_Nil), - keyedChildren); - var keyed = _v1.a; - var styles = _v1.b; - var newStyles = $elm$core$List$isEmpty(styles) ? rendered.styles : _Utils_ap(rendered.styles, styles); - if (!newStyles.b) { - return $mdgriffith$elm_ui$Internal$Model$Unstyled( - A5( - $mdgriffith$elm_ui$Internal$Model$finalizeNode, - rendered.has, - rendered.node, - rendered.attributes, - $mdgriffith$elm_ui$Internal$Model$Keyed( - A3($mdgriffith$elm_ui$Internal$Model$addKeyedChildren, 'nearby-element-pls', keyed, rendered.children)), - $mdgriffith$elm_ui$Internal$Model$NoStyleSheet)); - } else { - var allStyles = newStyles; - return $mdgriffith$elm_ui$Internal$Model$Styled( - { - html: A4( - $mdgriffith$elm_ui$Internal$Model$finalizeNode, - rendered.has, - rendered.node, - rendered.attributes, - $mdgriffith$elm_ui$Internal$Model$Keyed( - A3($mdgriffith$elm_ui$Internal$Model$addKeyedChildren, 'nearby-element-pls', keyed, rendered.children))), - styles: allStyles - }); - } - } else { - var unkeyedChildren = children.a; - var _v3 = A3( - $elm$core$List$foldr, - gather, - _Utils_Tuple2(_List_Nil, _List_Nil), - unkeyedChildren); - var unkeyed = _v3.a; - var styles = _v3.b; - var newStyles = $elm$core$List$isEmpty(styles) ? rendered.styles : _Utils_ap(rendered.styles, styles); - if (!newStyles.b) { - return $mdgriffith$elm_ui$Internal$Model$Unstyled( - A5( - $mdgriffith$elm_ui$Internal$Model$finalizeNode, - rendered.has, - rendered.node, - rendered.attributes, - $mdgriffith$elm_ui$Internal$Model$Unkeyed( - A2($mdgriffith$elm_ui$Internal$Model$addChildren, unkeyed, rendered.children)), - $mdgriffith$elm_ui$Internal$Model$NoStyleSheet)); - } else { - var allStyles = newStyles; - return $mdgriffith$elm_ui$Internal$Model$Styled( - { - html: A4( - $mdgriffith$elm_ui$Internal$Model$finalizeNode, - rendered.has, - rendered.node, - rendered.attributes, - $mdgriffith$elm_ui$Internal$Model$Unkeyed( - A2($mdgriffith$elm_ui$Internal$Model$addChildren, unkeyed, rendered.children))), - styles: allStyles - }); - } - } - }); -var $mdgriffith$elm_ui$Internal$Model$Single = F3( - function (a, b, c) { - return {$: 'Single', a: a, b: b, c: c}; - }); -var $mdgriffith$elm_ui$Internal$Model$Transform = function (a) { - return {$: 'Transform', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Flag$Field = F2( - function (a, b) { - return {$: 'Field', a: a, b: b}; - }); -var $elm$core$Bitwise$or = _Bitwise_or; -var $mdgriffith$elm_ui$Internal$Flag$add = F2( - function (myFlag, _v0) { - var one = _v0.a; - var two = _v0.b; - if (myFlag.$ === 'Flag') { - var first = myFlag.a; - return A2($mdgriffith$elm_ui$Internal$Flag$Field, first | one, two); - } else { - var second = myFlag.a; - return A2($mdgriffith$elm_ui$Internal$Flag$Field, one, second | two); - } - }); -var $mdgriffith$elm_ui$Internal$Model$ChildrenBehind = function (a) { - return {$: 'ChildrenBehind', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront = F2( - function (a, b) { - return {$: 'ChildrenBehindAndInFront', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Model$ChildrenInFront = function (a) { - return {$: 'ChildrenInFront', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$nearbyElement = F2( - function (location, elem) { - return A2( - $elm$html$Html$div, - _List_fromArray( - [ - $elm$html$Html$Attributes$class( - function () { - switch (location.$) { - case 'Above': - return A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.nearby, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.above])); - case 'Below': - return A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.nearby, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.below])); - case 'OnRight': - return A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.nearby, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.onRight])); - case 'OnLeft': - return A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.nearby, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.onLeft])); - case 'InFront': - return A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.nearby, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.inFront])); - default: - return A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.nearby, $mdgriffith$elm_ui$Internal$Style$classes.single, $mdgriffith$elm_ui$Internal$Style$classes.behind])); - } - }()) - ]), - _List_fromArray( - [ - function () { - switch (elem.$) { - case 'Empty': - return $elm$virtual_dom$VirtualDom$text(''); - case 'Text': - var str = elem.a; - return $mdgriffith$elm_ui$Internal$Model$textElement(str); - case 'Unstyled': - var html = elem.a; - return html($mdgriffith$elm_ui$Internal$Model$asEl); - default: - var styled = elem.a; - return A2(styled.html, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, $mdgriffith$elm_ui$Internal$Model$asEl); - } - }() - ])); - }); -var $mdgriffith$elm_ui$Internal$Model$addNearbyElement = F3( - function (location, elem, existing) { - var nearby = A2($mdgriffith$elm_ui$Internal$Model$nearbyElement, location, elem); - switch (existing.$) { - case 'NoNearbyChildren': - if (location.$ === 'Behind') { - return $mdgriffith$elm_ui$Internal$Model$ChildrenBehind( - _List_fromArray( - [nearby])); - } else { - return $mdgriffith$elm_ui$Internal$Model$ChildrenInFront( - _List_fromArray( - [nearby])); - } - case 'ChildrenBehind': - var existingBehind = existing.a; - if (location.$ === 'Behind') { - return $mdgriffith$elm_ui$Internal$Model$ChildrenBehind( - A2($elm$core$List$cons, nearby, existingBehind)); - } else { - return A2( - $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront, - existingBehind, - _List_fromArray( - [nearby])); - } - case 'ChildrenInFront': - var existingInFront = existing.a; - if (location.$ === 'Behind') { - return A2( - $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront, - _List_fromArray( - [nearby]), - existingInFront); - } else { - return $mdgriffith$elm_ui$Internal$Model$ChildrenInFront( - A2($elm$core$List$cons, nearby, existingInFront)); - } - default: - var existingBehind = existing.a; - var existingInFront = existing.b; - if (location.$ === 'Behind') { - return A2( - $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront, - A2($elm$core$List$cons, nearby, existingBehind), - existingInFront); - } else { - return A2( - $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront, - existingBehind, - A2($elm$core$List$cons, nearby, existingInFront)); - } - } - }); -var $mdgriffith$elm_ui$Internal$Model$Embedded = F2( - function (a, b) { - return {$: 'Embedded', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Model$NodeName = function (a) { - return {$: 'NodeName', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$addNodeName = F2( - function (newNode, old) { - switch (old.$) { - case 'Generic': - return $mdgriffith$elm_ui$Internal$Model$NodeName(newNode); - case 'NodeName': - var name = old.a; - return A2($mdgriffith$elm_ui$Internal$Model$Embedded, name, newNode); - default: - var x = old.a; - var y = old.b; - return A2($mdgriffith$elm_ui$Internal$Model$Embedded, x, y); - } - }); -var $mdgriffith$elm_ui$Internal$Model$alignXName = function (align) { - switch (align.$) { - case 'Left': - return $mdgriffith$elm_ui$Internal$Style$classes.alignedHorizontally + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.alignLeft); - case 'Right': - return $mdgriffith$elm_ui$Internal$Style$classes.alignedHorizontally + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.alignRight); - default: - return $mdgriffith$elm_ui$Internal$Style$classes.alignedHorizontally + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.alignCenterX); - } -}; -var $mdgriffith$elm_ui$Internal$Model$alignYName = function (align) { - switch (align.$) { - case 'Top': - return $mdgriffith$elm_ui$Internal$Style$classes.alignedVertically + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.alignTop); - case 'Bottom': - return $mdgriffith$elm_ui$Internal$Style$classes.alignedVertically + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.alignBottom); - default: - return $mdgriffith$elm_ui$Internal$Style$classes.alignedVertically + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.alignCenterY); - } -}; -var $mdgriffith$elm_ui$Internal$Model$FullTransform = F4( - function (a, b, c, d) { - return {$: 'FullTransform', a: a, b: b, c: c, d: d}; - }); -var $mdgriffith$elm_ui$Internal$Model$Moved = function (a) { - return {$: 'Moved', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$composeTransformation = F2( - function (transform, component) { - switch (transform.$) { - case 'Untransformed': - switch (component.$) { - case 'MoveX': - var x = component.a; - return $mdgriffith$elm_ui$Internal$Model$Moved( - _Utils_Tuple3(x, 0, 0)); - case 'MoveY': - var y = component.a; - return $mdgriffith$elm_ui$Internal$Model$Moved( - _Utils_Tuple3(0, y, 0)); - case 'MoveZ': - var z = component.a; - return $mdgriffith$elm_ui$Internal$Model$Moved( - _Utils_Tuple3(0, 0, z)); - case 'MoveXYZ': - var xyz = component.a; - return $mdgriffith$elm_ui$Internal$Model$Moved(xyz); - case 'Rotate': - var xyz = component.a; - var angle = component.b; - return A4( - $mdgriffith$elm_ui$Internal$Model$FullTransform, - _Utils_Tuple3(0, 0, 0), - _Utils_Tuple3(1, 1, 1), - xyz, - angle); - default: - var xyz = component.a; - return A4( - $mdgriffith$elm_ui$Internal$Model$FullTransform, - _Utils_Tuple3(0, 0, 0), - xyz, - _Utils_Tuple3(0, 0, 1), - 0); - } - case 'Moved': - var moved = transform.a; - var x = moved.a; - var y = moved.b; - var z = moved.c; - switch (component.$) { - case 'MoveX': - var newX = component.a; - return $mdgriffith$elm_ui$Internal$Model$Moved( - _Utils_Tuple3(newX, y, z)); - case 'MoveY': - var newY = component.a; - return $mdgriffith$elm_ui$Internal$Model$Moved( - _Utils_Tuple3(x, newY, z)); - case 'MoveZ': - var newZ = component.a; - return $mdgriffith$elm_ui$Internal$Model$Moved( - _Utils_Tuple3(x, y, newZ)); - case 'MoveXYZ': - var xyz = component.a; - return $mdgriffith$elm_ui$Internal$Model$Moved(xyz); - case 'Rotate': - var xyz = component.a; - var angle = component.b; - return A4( - $mdgriffith$elm_ui$Internal$Model$FullTransform, - moved, - _Utils_Tuple3(1, 1, 1), - xyz, - angle); - default: - var scale = component.a; - return A4( - $mdgriffith$elm_ui$Internal$Model$FullTransform, - moved, - scale, - _Utils_Tuple3(0, 0, 1), - 0); - } - default: - var moved = transform.a; - var x = moved.a; - var y = moved.b; - var z = moved.c; - var scaled = transform.b; - var origin = transform.c; - var angle = transform.d; - switch (component.$) { - case 'MoveX': - var newX = component.a; - return A4( - $mdgriffith$elm_ui$Internal$Model$FullTransform, - _Utils_Tuple3(newX, y, z), - scaled, - origin, - angle); - case 'MoveY': - var newY = component.a; - return A4( - $mdgriffith$elm_ui$Internal$Model$FullTransform, - _Utils_Tuple3(x, newY, z), - scaled, - origin, - angle); - case 'MoveZ': - var newZ = component.a; - return A4( - $mdgriffith$elm_ui$Internal$Model$FullTransform, - _Utils_Tuple3(x, y, newZ), - scaled, - origin, - angle); - case 'MoveXYZ': - var newMove = component.a; - return A4($mdgriffith$elm_ui$Internal$Model$FullTransform, newMove, scaled, origin, angle); - case 'Rotate': - var newOrigin = component.a; - var newAngle = component.b; - return A4($mdgriffith$elm_ui$Internal$Model$FullTransform, moved, scaled, newOrigin, newAngle); - default: - var newScale = component.a; - return A4($mdgriffith$elm_ui$Internal$Model$FullTransform, moved, newScale, origin, angle); - } - } - }); -var $mdgriffith$elm_ui$Internal$Flag$height = $mdgriffith$elm_ui$Internal$Flag$flag(7); -var $mdgriffith$elm_ui$Internal$Flag$heightContent = $mdgriffith$elm_ui$Internal$Flag$flag(36); -var $mdgriffith$elm_ui$Internal$Flag$merge = F2( - function (_v0, _v1) { - var one = _v0.a; - var two = _v0.b; - var three = _v1.a; - var four = _v1.b; - return A2($mdgriffith$elm_ui$Internal$Flag$Field, one | three, two | four); - }); -var $mdgriffith$elm_ui$Internal$Flag$none = A2($mdgriffith$elm_ui$Internal$Flag$Field, 0, 0); -var $mdgriffith$elm_ui$Internal$Model$renderHeight = function (h) { - switch (h.$) { - case 'Px': - var px = h.a; - var val = $elm$core$String$fromInt(px); - var name = 'height-px-' + val; - return _Utils_Tuple3( - $mdgriffith$elm_ui$Internal$Flag$none, - $mdgriffith$elm_ui$Internal$Style$classes.heightExact + (' ' + name), - _List_fromArray( - [ - A3($mdgriffith$elm_ui$Internal$Model$Single, name, 'height', val + 'px') - ])); - case 'Content': - return _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightContent, $mdgriffith$elm_ui$Internal$Flag$none), - $mdgriffith$elm_ui$Internal$Style$classes.heightContent, - _List_Nil); - case 'Fill': - var portion = h.a; - return (portion === 1) ? _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightFill, $mdgriffith$elm_ui$Internal$Flag$none), - $mdgriffith$elm_ui$Internal$Style$classes.heightFill, - _List_Nil) : _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightFill, $mdgriffith$elm_ui$Internal$Flag$none), - $mdgriffith$elm_ui$Internal$Style$classes.heightFillPortion + (' height-fill-' + $elm$core$String$fromInt(portion)), - _List_fromArray( - [ - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - $mdgriffith$elm_ui$Internal$Style$classes.any + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.column + (' > ' + $mdgriffith$elm_ui$Internal$Style$dot( - 'height-fill-' + $elm$core$String$fromInt(portion))))), - 'flex-grow', - $elm$core$String$fromInt(portion * 100000)) - ])); - case 'Min': - var minSize = h.a; - var len = h.b; - var cls = 'min-height-' + $elm$core$String$fromInt(minSize); - var style = A3( - $mdgriffith$elm_ui$Internal$Model$Single, - cls, - 'min-height', - $elm$core$String$fromInt(minSize) + 'px !important'); - var _v1 = $mdgriffith$elm_ui$Internal$Model$renderHeight(len); - var newFlag = _v1.a; - var newAttrs = _v1.b; - var newStyle = _v1.c; - return _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightBetween, newFlag), - cls + (' ' + newAttrs), - A2($elm$core$List$cons, style, newStyle)); - default: - var maxSize = h.a; - var len = h.b; - var cls = 'max-height-' + $elm$core$String$fromInt(maxSize); - var style = A3( - $mdgriffith$elm_ui$Internal$Model$Single, - cls, - 'max-height', - $elm$core$String$fromInt(maxSize) + 'px'); - var _v2 = $mdgriffith$elm_ui$Internal$Model$renderHeight(len); - var newFlag = _v2.a; - var newAttrs = _v2.b; - var newStyle = _v2.c; - return _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightBetween, newFlag), - cls + (' ' + newAttrs), - A2($elm$core$List$cons, style, newStyle)); - } -}; -var $mdgriffith$elm_ui$Internal$Flag$widthContent = $mdgriffith$elm_ui$Internal$Flag$flag(38); -var $mdgriffith$elm_ui$Internal$Model$renderWidth = function (w) { - switch (w.$) { - case 'Px': - var px = w.a; - return _Utils_Tuple3( - $mdgriffith$elm_ui$Internal$Flag$none, - $mdgriffith$elm_ui$Internal$Style$classes.widthExact + (' width-px-' + $elm$core$String$fromInt(px)), - _List_fromArray( - [ - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - 'width-px-' + $elm$core$String$fromInt(px), - 'width', - $elm$core$String$fromInt(px) + 'px') - ])); - case 'Content': - return _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthContent, $mdgriffith$elm_ui$Internal$Flag$none), - $mdgriffith$elm_ui$Internal$Style$classes.widthContent, - _List_Nil); - case 'Fill': - var portion = w.a; - return (portion === 1) ? _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthFill, $mdgriffith$elm_ui$Internal$Flag$none), - $mdgriffith$elm_ui$Internal$Style$classes.widthFill, - _List_Nil) : _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthFill, $mdgriffith$elm_ui$Internal$Flag$none), - $mdgriffith$elm_ui$Internal$Style$classes.widthFillPortion + (' width-fill-' + $elm$core$String$fromInt(portion)), - _List_fromArray( - [ - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - $mdgriffith$elm_ui$Internal$Style$classes.any + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.row + (' > ' + $mdgriffith$elm_ui$Internal$Style$dot( - 'width-fill-' + $elm$core$String$fromInt(portion))))), - 'flex-grow', - $elm$core$String$fromInt(portion * 100000)) - ])); - case 'Min': - var minSize = w.a; - var len = w.b; - var cls = 'min-width-' + $elm$core$String$fromInt(minSize); - var style = A3( - $mdgriffith$elm_ui$Internal$Model$Single, - cls, - 'min-width', - $elm$core$String$fromInt(minSize) + 'px'); - var _v1 = $mdgriffith$elm_ui$Internal$Model$renderWidth(len); - var newFlag = _v1.a; - var newAttrs = _v1.b; - var newStyle = _v1.c; - return _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthBetween, newFlag), - cls + (' ' + newAttrs), - A2($elm$core$List$cons, style, newStyle)); - default: - var maxSize = w.a; - var len = w.b; - var cls = 'max-width-' + $elm$core$String$fromInt(maxSize); - var style = A3( - $mdgriffith$elm_ui$Internal$Model$Single, - cls, - 'max-width', - $elm$core$String$fromInt(maxSize) + 'px'); - var _v2 = $mdgriffith$elm_ui$Internal$Model$renderWidth(len); - var newFlag = _v2.a; - var newAttrs = _v2.b; - var newStyle = _v2.c; - return _Utils_Tuple3( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthBetween, newFlag), - cls + (' ' + newAttrs), - A2($elm$core$List$cons, style, newStyle)); - } -}; -var $mdgriffith$elm_ui$Internal$Flag$borderWidth = $mdgriffith$elm_ui$Internal$Flag$flag(27); -var $mdgriffith$elm_ui$Internal$Model$skippable = F2( - function (flag, style) { - if (_Utils_eq(flag, $mdgriffith$elm_ui$Internal$Flag$borderWidth)) { - if (style.$ === 'Single') { - var val = style.c; - switch (val) { - case '0px': - return true; - case '1px': - return true; - case '2px': - return true; - case '3px': - return true; - case '4px': - return true; - case '5px': - return true; - case '6px': - return true; - default: - return false; - } - } else { - return false; - } - } else { - switch (style.$) { - case 'FontSize': - var i = style.a; - return (i >= 8) && (i <= 32); - case 'PaddingStyle': - var name = style.a; - var t = style.b; - var r = style.c; - var b = style.d; - var l = style.e; - return _Utils_eq(t, b) && (_Utils_eq(t, r) && (_Utils_eq(t, l) && ((t >= 0) && (t <= 24)))); - default: - return false; - } - } - }); -var $mdgriffith$elm_ui$Internal$Flag$width = $mdgriffith$elm_ui$Internal$Flag$flag(6); -var $mdgriffith$elm_ui$Internal$Flag$xAlign = $mdgriffith$elm_ui$Internal$Flag$flag(30); -var $mdgriffith$elm_ui$Internal$Flag$yAlign = $mdgriffith$elm_ui$Internal$Flag$flag(29); -var $mdgriffith$elm_ui$Internal$Model$gatherAttrRecursive = F8( - function (classes, node, has, transform, styles, attrs, children, elementAttrs) { - gatherAttrRecursive: - while (true) { - if (!elementAttrs.b) { - var _v1 = $mdgriffith$elm_ui$Internal$Model$transformClass(transform); - if (_v1.$ === 'Nothing') { - return { - attributes: A2( - $elm$core$List$cons, - $elm$html$Html$Attributes$class(classes), - attrs), - children: children, - has: has, - node: node, - styles: styles - }; - } else { - var _class = _v1.a; - return { - attributes: A2( - $elm$core$List$cons, - $elm$html$Html$Attributes$class(classes + (' ' + _class)), - attrs), - children: children, - has: has, - node: node, - styles: A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$Transform(transform), - styles) - }; - } - } else { - var attribute = elementAttrs.a; - var remaining = elementAttrs.b; - switch (attribute.$) { - case 'NoAttribute': - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Class': - var flag = attribute.a; - var exactClassName = attribute.b; - if (A2($mdgriffith$elm_ui$Internal$Flag$present, flag, has)) { - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - var $temp$classes = exactClassName + (' ' + classes), - $temp$node = node, - $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, flag, has), - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - case 'Attr': - var actualAttribute = attribute.a; - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = A2($elm$core$List$cons, actualAttribute, attrs), - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'StyleClass': - var flag = attribute.a; - var style = attribute.b; - if (A2($mdgriffith$elm_ui$Internal$Flag$present, flag, has)) { - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - if (A2($mdgriffith$elm_ui$Internal$Model$skippable, flag, style)) { - var $temp$classes = $mdgriffith$elm_ui$Internal$Model$getStyleName(style) + (' ' + classes), - $temp$node = node, - $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, flag, has), - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - var $temp$classes = $mdgriffith$elm_ui$Internal$Model$getStyleName(style) + (' ' + classes), - $temp$node = node, - $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, flag, has), - $temp$transform = transform, - $temp$styles = A2($elm$core$List$cons, style, styles), - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - } - case 'TransformComponent': - var flag = attribute.a; - var component = attribute.b; - var $temp$classes = classes, - $temp$node = node, - $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, flag, has), - $temp$transform = A2($mdgriffith$elm_ui$Internal$Model$composeTransformation, transform, component), - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Width': - var width = attribute.a; - if (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$width, has)) { - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - switch (width.$) { - case 'Px': - var px = width.a; - var $temp$classes = ($mdgriffith$elm_ui$Internal$Style$classes.widthExact + (' width-px-' + $elm$core$String$fromInt(px))) + (' ' + classes), - $temp$node = node, - $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has), - $temp$transform = transform, - $temp$styles = A2( - $elm$core$List$cons, - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - 'width-px-' + $elm$core$String$fromInt(px), - 'width', - $elm$core$String$fromInt(px) + 'px'), - styles), - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Content': - var $temp$classes = classes + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.widthContent), - $temp$node = node, - $temp$has = A2( - $mdgriffith$elm_ui$Internal$Flag$add, - $mdgriffith$elm_ui$Internal$Flag$widthContent, - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has)), - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Fill': - var portion = width.a; - if (portion === 1) { - var $temp$classes = classes + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.widthFill), - $temp$node = node, - $temp$has = A2( - $mdgriffith$elm_ui$Internal$Flag$add, - $mdgriffith$elm_ui$Internal$Flag$widthFill, - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has)), - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - var $temp$classes = classes + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.widthFillPortion + (' width-fill-' + $elm$core$String$fromInt(portion)))), - $temp$node = node, - $temp$has = A2( - $mdgriffith$elm_ui$Internal$Flag$add, - $mdgriffith$elm_ui$Internal$Flag$widthFill, - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has)), - $temp$transform = transform, - $temp$styles = A2( - $elm$core$List$cons, - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - $mdgriffith$elm_ui$Internal$Style$classes.any + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.row + (' > ' + $mdgriffith$elm_ui$Internal$Style$dot( - 'width-fill-' + $elm$core$String$fromInt(portion))))), - 'flex-grow', - $elm$core$String$fromInt(portion * 100000)), - styles), - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - default: - var _v4 = $mdgriffith$elm_ui$Internal$Model$renderWidth(width); - var addToFlags = _v4.a; - var newClass = _v4.b; - var newStyles = _v4.c; - var $temp$classes = classes + (' ' + newClass), - $temp$node = node, - $temp$has = A2( - $mdgriffith$elm_ui$Internal$Flag$merge, - addToFlags, - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has)), - $temp$transform = transform, - $temp$styles = _Utils_ap(newStyles, styles), - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - } - case 'Height': - var height = attribute.a; - if (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$height, has)) { - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - switch (height.$) { - case 'Px': - var px = height.a; - var val = $elm$core$String$fromInt(px) + 'px'; - var name = 'height-px-' + val; - var $temp$classes = $mdgriffith$elm_ui$Internal$Style$classes.heightExact + (' ' + (name + (' ' + classes))), - $temp$node = node, - $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has), - $temp$transform = transform, - $temp$styles = A2( - $elm$core$List$cons, - A3($mdgriffith$elm_ui$Internal$Model$Single, name, 'height ', val), - styles), - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Content': - var $temp$classes = $mdgriffith$elm_ui$Internal$Style$classes.heightContent + (' ' + classes), - $temp$node = node, - $temp$has = A2( - $mdgriffith$elm_ui$Internal$Flag$add, - $mdgriffith$elm_ui$Internal$Flag$heightContent, - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has)), - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Fill': - var portion = height.a; - if (portion === 1) { - var $temp$classes = $mdgriffith$elm_ui$Internal$Style$classes.heightFill + (' ' + classes), - $temp$node = node, - $temp$has = A2( - $mdgriffith$elm_ui$Internal$Flag$add, - $mdgriffith$elm_ui$Internal$Flag$heightFill, - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has)), - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - var $temp$classes = classes + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.heightFillPortion + (' height-fill-' + $elm$core$String$fromInt(portion)))), - $temp$node = node, - $temp$has = A2( - $mdgriffith$elm_ui$Internal$Flag$add, - $mdgriffith$elm_ui$Internal$Flag$heightFill, - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has)), - $temp$transform = transform, - $temp$styles = A2( - $elm$core$List$cons, - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - $mdgriffith$elm_ui$Internal$Style$classes.any + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.column + (' > ' + $mdgriffith$elm_ui$Internal$Style$dot( - 'height-fill-' + $elm$core$String$fromInt(portion))))), - 'flex-grow', - $elm$core$String$fromInt(portion * 100000)), - styles), - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - default: - var _v6 = $mdgriffith$elm_ui$Internal$Model$renderHeight(height); - var addToFlags = _v6.a; - var newClass = _v6.b; - var newStyles = _v6.c; - var $temp$classes = classes + (' ' + newClass), - $temp$node = node, - $temp$has = A2( - $mdgriffith$elm_ui$Internal$Flag$merge, - addToFlags, - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has)), - $temp$transform = transform, - $temp$styles = _Utils_ap(newStyles, styles), - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - } - case 'Describe': - var description = attribute.a; - switch (description.$) { - case 'Main': - var $temp$classes = classes, - $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'main', node), - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Navigation': - var $temp$classes = classes, - $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'nav', node), - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'ContentInfo': - var $temp$classes = classes, - $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'footer', node), - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Complementary': - var $temp$classes = classes, - $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'aside', node), - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Heading': - var i = description.a; - if (i <= 1) { - var $temp$classes = classes, - $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'h1', node), - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - if (i < 7) { - var $temp$classes = classes, - $temp$node = A2( - $mdgriffith$elm_ui$Internal$Model$addNodeName, - 'h' + $elm$core$String$fromInt(i), - node), - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - var $temp$classes = classes, - $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'h6', node), - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - } - case 'Paragraph': - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Button': - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = A2( - $elm$core$List$cons, - A2($elm$virtual_dom$VirtualDom$attribute, 'role', 'button'), - attrs), - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'Label': - var label = description.a; - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = A2( - $elm$core$List$cons, - A2($elm$virtual_dom$VirtualDom$attribute, 'aria-label', label), - attrs), - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'LivePolite': - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = A2( - $elm$core$List$cons, - A2($elm$virtual_dom$VirtualDom$attribute, 'aria-live', 'polite'), - attrs), - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - default: - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = A2( - $elm$core$List$cons, - A2($elm$virtual_dom$VirtualDom$attribute, 'aria-live', 'assertive'), - attrs), - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - case 'Nearby': - var location = attribute.a; - var elem = attribute.b; - var newStyles = function () { - switch (elem.$) { - case 'Empty': - return styles; - case 'Text': - var str = elem.a; - return styles; - case 'Unstyled': - var html = elem.a; - return styles; - default: - var styled = elem.a; - return _Utils_ap(styles, styled.styles); - } - }(); - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = newStyles, - $temp$attrs = attrs, - $temp$children = A3($mdgriffith$elm_ui$Internal$Model$addNearbyElement, location, elem, children), - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - case 'AlignX': - var x = attribute.a; - if (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$xAlign, has)) { - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - var $temp$classes = $mdgriffith$elm_ui$Internal$Model$alignXName(x) + (' ' + classes), - $temp$node = node, - $temp$has = function (flags) { - switch (x.$) { - case 'CenterX': - return A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$centerX, flags); - case 'Right': - return A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$alignRight, flags); - default: - return flags; - } - }( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$xAlign, has)), - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - default: - var y = attribute.a; - if (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$yAlign, has)) { - var $temp$classes = classes, - $temp$node = node, - $temp$has = has, - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } else { - var $temp$classes = $mdgriffith$elm_ui$Internal$Model$alignYName(y) + (' ' + classes), - $temp$node = node, - $temp$has = function (flags) { - switch (y.$) { - case 'CenterY': - return A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$centerY, flags); - case 'Bottom': - return A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$alignBottom, flags); - default: - return flags; - } - }( - A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$yAlign, has)), - $temp$transform = transform, - $temp$styles = styles, - $temp$attrs = attrs, - $temp$children = children, - $temp$elementAttrs = remaining; - classes = $temp$classes; - node = $temp$node; - has = $temp$has; - transform = $temp$transform; - styles = $temp$styles; - attrs = $temp$attrs; - children = $temp$children; - elementAttrs = $temp$elementAttrs; - continue gatherAttrRecursive; - } - } - } - } - }); -var $mdgriffith$elm_ui$Internal$Model$Untransformed = {$: 'Untransformed'}; -var $mdgriffith$elm_ui$Internal$Model$untransformed = $mdgriffith$elm_ui$Internal$Model$Untransformed; -var $mdgriffith$elm_ui$Internal$Model$element = F4( - function (context, node, attributes, children) { - return A3( - $mdgriffith$elm_ui$Internal$Model$createElement, - context, - children, - A8( - $mdgriffith$elm_ui$Internal$Model$gatherAttrRecursive, - $mdgriffith$elm_ui$Internal$Model$contextClasses(context), - node, - $mdgriffith$elm_ui$Internal$Flag$none, - $mdgriffith$elm_ui$Internal$Model$untransformed, - _List_Nil, - _List_Nil, - $mdgriffith$elm_ui$Internal$Model$NoNearbyChildren, - $elm$core$List$reverse(attributes))); - }); -var $mdgriffith$elm_ui$Internal$Model$Height = function (a) { - return {$: 'Height', a: a}; -}; -var $mdgriffith$elm_ui$Element$height = $mdgriffith$elm_ui$Internal$Model$Height; -var $mdgriffith$elm_ui$Internal$Model$Content = {$: 'Content'}; -var $mdgriffith$elm_ui$Element$shrink = $mdgriffith$elm_ui$Internal$Model$Content; -var $mdgriffith$elm_ui$Internal$Model$Width = function (a) { - return {$: 'Width', a: a}; -}; -var $mdgriffith$elm_ui$Element$width = $mdgriffith$elm_ui$Internal$Model$Width; -var $mdgriffith$elm_ui$Element$el = F2( - function (attrs, child) { - return A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asEl, - $mdgriffith$elm_ui$Internal$Model$div, - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink), - attrs)), - $mdgriffith$elm_ui$Internal$Model$Unkeyed( - _List_fromArray( - [child]))); - }); -var $mdgriffith$elm_ui$Internal$Model$FontFamily = F2( - function (a, b) { - return {$: 'FontFamily', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Flag$fontFamily = $mdgriffith$elm_ui$Internal$Flag$flag(5); -var $elm$core$String$words = _String_words; -var $mdgriffith$elm_ui$Internal$Model$renderFontClassName = F2( - function (font, current) { - return _Utils_ap( - current, - function () { - switch (font.$) { - case 'Serif': - return 'serif'; - case 'SansSerif': - return 'sans-serif'; - case 'Monospace': - return 'monospace'; - case 'Typeface': - var name = font.a; - return A2( - $elm$core$String$join, - '-', - $elm$core$String$words( - $elm$core$String$toLower(name))); - case 'ImportFont': - var name = font.a; - var url = font.b; - return A2( - $elm$core$String$join, - '-', - $elm$core$String$words( - $elm$core$String$toLower(name))); - default: - var name = font.a.name; - return A2( - $elm$core$String$join, - '-', - $elm$core$String$words( - $elm$core$String$toLower(name))); - } - }()); - }); -var $mdgriffith$elm_ui$Element$Font$family = function (families) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$fontFamily, - A2( - $mdgriffith$elm_ui$Internal$Model$FontFamily, - A3($elm$core$List$foldl, $mdgriffith$elm_ui$Internal$Model$renderFontClassName, 'ff-', families), - families)); -}; -var $mdgriffith$elm_ui$Internal$Model$Monospace = {$: 'Monospace'}; -var $mdgriffith$elm_ui$Element$Font$monospace = $mdgriffith$elm_ui$Internal$Model$Monospace; -var $mdgriffith$elm_ui$Internal$Model$PaddingStyle = F5( - function (a, b, c, d, e) { - return {$: 'PaddingStyle', a: a, b: b, c: c, d: d, e: e}; - }); -var $mdgriffith$elm_ui$Internal$Flag$padding = $mdgriffith$elm_ui$Internal$Flag$flag(2); -var $mdgriffith$elm_ui$Element$paddingXY = F2( - function (x, y) { - if (_Utils_eq(x, y)) { - var f = x; - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$padding, - A5( - $mdgriffith$elm_ui$Internal$Model$PaddingStyle, - 'p-' + $elm$core$String$fromInt(x), - f, - f, - f, - f)); - } else { - var yFloat = y; - var xFloat = x; - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$padding, - A5( - $mdgriffith$elm_ui$Internal$Model$PaddingStyle, - 'p-' + ($elm$core$String$fromInt(x) + ('-' + $elm$core$String$fromInt(y))), - yFloat, - xFloat, - yFloat, - xFloat)); - } - }); -var $mdgriffith$elm_ui$Internal$Model$Rgba = F4( - function (a, b, c, d) { - return {$: 'Rgba', a: a, b: b, c: c, d: d}; - }); -var $mdgriffith$elm_ui$Element$rgba255 = F4( - function (red, green, blue, a) { - return A4($mdgriffith$elm_ui$Internal$Model$Rgba, red / 255, green / 255, blue / 255, a); - }); -var $mdgriffith$elm_ui$Internal$Flag$borderRound = $mdgriffith$elm_ui$Internal$Flag$flag(17); -var $mdgriffith$elm_ui$Element$Border$rounded = function (radius) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$borderRound, - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - 'br-' + $elm$core$String$fromInt(radius), - 'border-radius', - $elm$core$String$fromInt(radius) + 'px')); -}; -var $mdgriffith$elm_ui$Internal$Model$Text = function (a) { - return {$: 'Text', a: a}; -}; -var $mdgriffith$elm_ui$Element$text = function (content) { - return $mdgriffith$elm_ui$Internal$Model$Text(content); -}; -var $mdgriffith$elm_ui$Internal$Model$Typeface = function (a) { - return {$: 'Typeface', a: a}; -}; -var $mdgriffith$elm_ui$Element$Font$typeface = $mdgriffith$elm_ui$Internal$Model$Typeface; -var $author$project$MarkdownRenderer$code = function (snippet) { - return A2( - $mdgriffith$elm_ui$Element$el, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Background$color( - A4($mdgriffith$elm_ui$Element$rgba255, 50, 50, 50, 0.07)), - $mdgriffith$elm_ui$Element$Border$rounded(2), - A2($mdgriffith$elm_ui$Element$paddingXY, 5, 3), - $mdgriffith$elm_ui$Element$Font$family( - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$typeface('Roboto Mono'), - $mdgriffith$elm_ui$Element$Font$monospace - ])) - ]), - $mdgriffith$elm_ui$Element$text(snippet)); -}; -var $mdgriffith$elm_ui$Internal$Model$Describe = function (a) { - return {$: 'Describe', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$Paragraph = {$: 'Paragraph'}; -var $mdgriffith$elm_ui$Internal$Model$Fill = function (a) { - return {$: 'Fill', a: a}; -}; -var $mdgriffith$elm_ui$Element$fill = $mdgriffith$elm_ui$Internal$Model$Fill(1); -var $mdgriffith$elm_ui$Internal$Model$SpacingStyle = F3( - function (a, b, c) { - return {$: 'SpacingStyle', a: a, b: b, c: c}; - }); -var $mdgriffith$elm_ui$Internal$Flag$spacing = $mdgriffith$elm_ui$Internal$Flag$flag(3); -var $mdgriffith$elm_ui$Internal$Model$spacingName = F2( - function (x, y) { - return 'spacing-' + ($elm$core$String$fromInt(x) + ('-' + $elm$core$String$fromInt(y))); - }); -var $mdgriffith$elm_ui$Element$spacing = function (x) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$spacing, - A3( - $mdgriffith$elm_ui$Internal$Model$SpacingStyle, - A2($mdgriffith$elm_ui$Internal$Model$spacingName, x, x), - x, - x)); -}; -var $mdgriffith$elm_ui$Element$paragraph = F2( - function (attrs, children) { - return A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asParagraph, - $mdgriffith$elm_ui$Internal$Model$div, - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$Describe($mdgriffith$elm_ui$Internal$Model$Paragraph), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$spacing(5), - attrs))), - $mdgriffith$elm_ui$Internal$Model$Unkeyed(children)); - }); -var $author$project$MarkdownRenderer$codeBlock = function (details) { - return A2( - $mdgriffith$elm_ui$Element$paragraph, - _List_Nil, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$text(details.body) - ])); -}; -var $mdgriffith$elm_ui$Internal$Flag$borderColor = $mdgriffith$elm_ui$Internal$Flag$flag(28); -var $mdgriffith$elm_ui$Element$Border$color = function (clr) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$borderColor, - A3( - $mdgriffith$elm_ui$Internal$Model$Colored, - 'bc-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(clr), - 'border-color', - clr)); -}; -var $mdgriffith$elm_ui$Internal$Flag$fontColor = $mdgriffith$elm_ui$Internal$Flag$flag(14); -var $mdgriffith$elm_ui$Element$Font$color = function (fontColor) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$fontColor, - A3( - $mdgriffith$elm_ui$Internal$Model$Colored, - 'fc-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(fontColor), - 'color', - fontColor)); -}; -var $mdgriffith$elm_ui$Element$rgb255 = F3( - function (red, green, blue) { - return A4($mdgriffith$elm_ui$Internal$Model$Rgba, red / 255, green / 255, blue / 255, 1); - }); -var $author$project$Palette$color = { - primary: A3($mdgriffith$elm_ui$Element$rgb255, 0, 6, 255), - secondary: A3($mdgriffith$elm_ui$Element$rgb255, 0, 242, 96) -}; -var $mdgriffith$elm_ui$Internal$Model$AsColumn = {$: 'AsColumn'}; -var $mdgriffith$elm_ui$Internal$Model$asColumn = $mdgriffith$elm_ui$Internal$Model$AsColumn; -var $mdgriffith$elm_ui$Internal$Model$Attr = function (a) { - return {$: 'Attr', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$htmlClass = function (cls) { - return $mdgriffith$elm_ui$Internal$Model$Attr( - $elm$html$Html$Attributes$class(cls)); -}; -var $mdgriffith$elm_ui$Element$column = F2( - function (attrs, children) { - return A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asColumn, - $mdgriffith$elm_ui$Internal$Model$div, - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.contentTop + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.contentLeft)), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink), - attrs))), - $mdgriffith$elm_ui$Internal$Model$Unkeyed(children)); - }); -var $mdgriffith$elm_ui$Internal$Model$CenterY = {$: 'CenterY'}; -var $mdgriffith$elm_ui$Element$centerY = $mdgriffith$elm_ui$Internal$Model$AlignY($mdgriffith$elm_ui$Internal$Model$CenterY); -var $elm$core$Basics$pi = _Basics_pi; -var $elm$core$Basics$degrees = function (angleInDegrees) { - return (angleInDegrees * $elm$core$Basics$pi) / 180; -}; -var $mdgriffith$elm_ui$Internal$Model$InFront = {$: 'InFront'}; -var $mdgriffith$elm_ui$Internal$Model$Nearby = F2( - function (a, b) { - return {$: 'Nearby', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Model$NoAttribute = {$: 'NoAttribute'}; -var $mdgriffith$elm_ui$Element$createNearby = F2( - function (loc, element) { - if (element.$ === 'Empty') { - return $mdgriffith$elm_ui$Internal$Model$NoAttribute; - } else { - return A2($mdgriffith$elm_ui$Internal$Model$Nearby, loc, element); - } - }); -var $mdgriffith$elm_ui$Element$inFront = function (element) { - return A2($mdgriffith$elm_ui$Element$createNearby, $mdgriffith$elm_ui$Internal$Model$InFront, element); -}; -var $mdgriffith$elm_ui$Internal$Model$MoveY = function (a) { - return {$: 'MoveY', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Model$TransformComponent = F2( - function (a, b) { - return {$: 'TransformComponent', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Flag$moveY = $mdgriffith$elm_ui$Internal$Flag$flag(26); -var $mdgriffith$elm_ui$Element$moveUp = function (y) { - return A2( - $mdgriffith$elm_ui$Internal$Model$TransformComponent, - $mdgriffith$elm_ui$Internal$Flag$moveY, - $mdgriffith$elm_ui$Internal$Model$MoveY(-y)); -}; -var $mdgriffith$elm_ui$Internal$Model$Empty = {$: 'Empty'}; -var $mdgriffith$elm_ui$Element$none = $mdgriffith$elm_ui$Internal$Model$Empty; -var $mdgriffith$elm_ui$Internal$Model$Px = function (a) { - return {$: 'Px', a: a}; -}; -var $mdgriffith$elm_ui$Element$px = $mdgriffith$elm_ui$Internal$Model$Px; -var $mdgriffith$elm_ui$Element$rgb = F3( - function (r, g, b) { - return A4($mdgriffith$elm_ui$Internal$Model$Rgba, r, g, b, 1); - }); -var $mdgriffith$elm_ui$Element$rgba = $mdgriffith$elm_ui$Internal$Model$Rgba; -var $mdgriffith$elm_ui$Internal$Model$Rotate = F2( - function (a, b) { - return {$: 'Rotate', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Flag$rotate = $mdgriffith$elm_ui$Internal$Flag$flag(24); -var $mdgriffith$elm_ui$Element$rotate = function (angle) { - return A2( - $mdgriffith$elm_ui$Internal$Model$TransformComponent, - $mdgriffith$elm_ui$Internal$Flag$rotate, - A2( - $mdgriffith$elm_ui$Internal$Model$Rotate, - _Utils_Tuple3(0, 0, 1), - angle)); -}; -var $mdgriffith$elm_ui$Internal$Model$boxShadowClass = function (shadow) { - return $elm$core$String$concat( - _List_fromArray( - [ - shadow.inset ? 'box-inset' : 'box-', - $mdgriffith$elm_ui$Internal$Model$floatClass(shadow.offset.a) + 'px', - $mdgriffith$elm_ui$Internal$Model$floatClass(shadow.offset.b) + 'px', - $mdgriffith$elm_ui$Internal$Model$floatClass(shadow.blur) + 'px', - $mdgriffith$elm_ui$Internal$Model$floatClass(shadow.size) + 'px', - $mdgriffith$elm_ui$Internal$Model$formatColorClass(shadow.color) - ])); -}; -var $mdgriffith$elm_ui$Internal$Flag$shadows = $mdgriffith$elm_ui$Internal$Flag$flag(19); -var $mdgriffith$elm_ui$Element$Border$shadow = function (almostShade) { - var shade = {blur: almostShade.blur, color: almostShade.color, inset: false, offset: almostShade.offset, size: almostShade.size}; - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$shadows, - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - $mdgriffith$elm_ui$Internal$Model$boxShadowClass(shade), - 'box-shadow', - $mdgriffith$elm_ui$Internal$Model$formatBoxShadow(shade))); -}; -var $mdgriffith$elm_ui$Internal$Model$FontSize = function (a) { - return {$: 'FontSize', a: a}; -}; -var $mdgriffith$elm_ui$Internal$Flag$fontSize = $mdgriffith$elm_ui$Internal$Flag$flag(4); -var $mdgriffith$elm_ui$Element$Font$size = function (i) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$fontSize, - $mdgriffith$elm_ui$Internal$Model$FontSize(i)); -}; -var $mdgriffith$elm_ui$Internal$Model$Transparency = F2( - function (a, b) { - return {$: 'Transparency', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Flag$transparency = $mdgriffith$elm_ui$Internal$Flag$flag(0); -var $mdgriffith$elm_ui$Element$transparent = function (on) { - return on ? A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$transparency, - A2($mdgriffith$elm_ui$Internal$Model$Transparency, 'transparent', 1.0)) : A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$transparency, - A2($mdgriffith$elm_ui$Internal$Model$Transparency, 'visible', 0.0)); -}; -var $mdgriffith$elm_ui$Element$Input$white = A3($mdgriffith$elm_ui$Element$rgb, 1, 1, 1); -var $mdgriffith$elm_ui$Internal$Model$BorderWidth = F5( - function (a, b, c, d, e) { - return {$: 'BorderWidth', a: a, b: b, c: c, d: d, e: e}; - }); -var $mdgriffith$elm_ui$Element$Border$width = function (v) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$borderWidth, - A5( - $mdgriffith$elm_ui$Internal$Model$BorderWidth, - 'b-' + $elm$core$String$fromInt(v), - v, - v, - v, - v)); -}; -var $mdgriffith$elm_ui$Element$Border$widthXY = F2( - function (x, y) { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$borderWidth, - A5( - $mdgriffith$elm_ui$Internal$Model$BorderWidth, - 'b-' + ($elm$core$String$fromInt(x) + ('-' + $elm$core$String$fromInt(y))), - y, - x, - y, - x)); - }); -var $mdgriffith$elm_ui$Element$Border$widthEach = function (_v0) { - var bottom = _v0.bottom; - var top = _v0.top; - var left = _v0.left; - var right = _v0.right; - return (_Utils_eq(top, bottom) && _Utils_eq(left, right)) ? (_Utils_eq(top, right) ? $mdgriffith$elm_ui$Element$Border$width(top) : A2($mdgriffith$elm_ui$Element$Border$widthXY, left, top)) : A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$borderWidth, - A5( - $mdgriffith$elm_ui$Internal$Model$BorderWidth, - 'b-' + ($elm$core$String$fromInt(top) + ('-' + ($elm$core$String$fromInt(right) + ('-' + ($elm$core$String$fromInt(bottom) + ('-' + $elm$core$String$fromInt(left))))))), - top, - right, - bottom, - left)); -}; -var $mdgriffith$elm_ui$Element$Input$defaultCheckbox = function (checked) { - return A2( - $mdgriffith$elm_ui$Element$el, - _List_fromArray( - [ - $mdgriffith$elm_ui$Internal$Model$htmlClass('focusable'), - $mdgriffith$elm_ui$Element$width( - $mdgriffith$elm_ui$Element$px(14)), - $mdgriffith$elm_ui$Element$height( - $mdgriffith$elm_ui$Element$px(14)), - $mdgriffith$elm_ui$Element$Font$color($mdgriffith$elm_ui$Element$Input$white), - $mdgriffith$elm_ui$Element$centerY, - $mdgriffith$elm_ui$Element$Font$size(9), - $mdgriffith$elm_ui$Element$Font$center, - $mdgriffith$elm_ui$Element$Border$rounded(3), - $mdgriffith$elm_ui$Element$Border$color( - checked ? A3($mdgriffith$elm_ui$Element$rgb, 59 / 255, 153 / 255, 252 / 255) : A3($mdgriffith$elm_ui$Element$rgb, 211 / 255, 211 / 255, 211 / 255)), - $mdgriffith$elm_ui$Element$Border$shadow( - { - blur: 1, - color: checked ? A4($mdgriffith$elm_ui$Element$rgba, 238 / 255, 238 / 255, 238 / 255, 0) : A3($mdgriffith$elm_ui$Element$rgb, 238 / 255, 238 / 255, 238 / 255), - offset: _Utils_Tuple2(0, 0), - size: 1 - }), - $mdgriffith$elm_ui$Element$Background$color( - checked ? A3($mdgriffith$elm_ui$Element$rgb, 59 / 255, 153 / 255, 252 / 255) : $mdgriffith$elm_ui$Element$Input$white), - $mdgriffith$elm_ui$Element$Border$width( - checked ? 0 : 1), - $mdgriffith$elm_ui$Element$inFront( - A2( - $mdgriffith$elm_ui$Element$el, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Border$color($mdgriffith$elm_ui$Element$Input$white), - $mdgriffith$elm_ui$Element$height( - $mdgriffith$elm_ui$Element$px(6)), - $mdgriffith$elm_ui$Element$width( - $mdgriffith$elm_ui$Element$px(9)), - $mdgriffith$elm_ui$Element$rotate( - $elm$core$Basics$degrees(-45)), - $mdgriffith$elm_ui$Element$centerX, - $mdgriffith$elm_ui$Element$centerY, - $mdgriffith$elm_ui$Element$moveUp(1), - $mdgriffith$elm_ui$Element$transparent(!checked), - $mdgriffith$elm_ui$Element$Border$widthEach( - {bottom: 2, left: 2, right: 0, top: 0}) - ]), - $mdgriffith$elm_ui$Element$none)) - ]), - $mdgriffith$elm_ui$Element$none); -}; -var $mdgriffith$elm_ui$Internal$Model$Heading = function (a) { - return {$: 'Heading', a: a}; -}; -var $mdgriffith$elm_ui$Element$Region$heading = A2($elm$core$Basics$composeL, $mdgriffith$elm_ui$Internal$Model$Describe, $mdgriffith$elm_ui$Internal$Model$Heading); -var $dillonkearns$elm_markdown$Markdown$Block$headingLevelToInt = function (headingLevel) { - switch (headingLevel.$) { - case 'H1': - return 1; - case 'H2': - return 2; - case 'H3': - return 3; - case 'H4': - return 4; - case 'H5': - return 5; - default: - return 6; - } -}; -var $mdgriffith$elm_ui$Element$htmlAttribute = $mdgriffith$elm_ui$Internal$Model$Attr; -var $author$project$MarkdownRenderer$rawTextToId = function (rawText) { - return $elm$core$String$toLower( - A2( - $elm$core$String$join, - '-', - A2($elm$core$String$split, ' ', rawText))); -}; -var $author$project$MarkdownRenderer$heading = function (_v0) { - var level = _v0.level; - var rawText = _v0.rawText; - var children = _v0.children; - return A2( - $mdgriffith$elm_ui$Element$paragraph, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$size( - function () { - switch (level.$) { - case 'H1': - return 36; - case 'H2': - return 24; - default: - return 20; - } - }()), - $mdgriffith$elm_ui$Element$Font$bold, - $mdgriffith$elm_ui$Element$Font$family( - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$typeface('Montserrat') - ])), - $mdgriffith$elm_ui$Element$Region$heading( - $dillonkearns$elm_markdown$Markdown$Block$headingLevelToInt(level)), - $mdgriffith$elm_ui$Element$htmlAttribute( - A2( - $elm$html$Html$Attributes$attribute, - 'name', - $author$project$MarkdownRenderer$rawTextToId(rawText))), - $mdgriffith$elm_ui$Element$htmlAttribute( - $elm$html$Html$Attributes$id( - $author$project$MarkdownRenderer$rawTextToId(rawText))) - ]), - children); -}; -var $mdgriffith$elm_ui$Internal$Model$unstyled = A2($elm$core$Basics$composeL, $mdgriffith$elm_ui$Internal$Model$Unstyled, $elm$core$Basics$always); -var $mdgriffith$elm_ui$Element$html = $mdgriffith$elm_ui$Internal$Model$unstyled; -var $elm$html$Html$Attributes$alt = $elm$html$Html$Attributes$stringProperty('alt'); -var $elm$html$Html$Attributes$src = function (url) { - return A2( - $elm$html$Html$Attributes$stringProperty, - 'src', - _VirtualDom_noJavaScriptOrHtmlUri(url)); -}; -var $mdgriffith$elm_ui$Element$image = F2( - function (attrs, _v0) { - var src = _v0.src; - var description = _v0.description; - var imageAttributes = A2( - $elm$core$List$filter, - function (a) { - switch (a.$) { - case 'Width': - return true; - case 'Height': - return true; - default: - return false; - } - }, - attrs); - return A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asEl, - $mdgriffith$elm_ui$Internal$Model$div, - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.imageContainer), - attrs), - $mdgriffith$elm_ui$Internal$Model$Unkeyed( - _List_fromArray( - [ - A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asEl, - $mdgriffith$elm_ui$Internal$Model$NodeName('img'), - _Utils_ap( - _List_fromArray( - [ - $mdgriffith$elm_ui$Internal$Model$Attr( - $elm$html$Html$Attributes$src(src)), - $mdgriffith$elm_ui$Internal$Model$Attr( - $elm$html$Html$Attributes$alt(description)) - ]), - imageAttributes), - $mdgriffith$elm_ui$Internal$Model$Unkeyed(_List_Nil)) - ]))); - }); -var $mdgriffith$elm_ui$Element$Font$italic = $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.italic); -var $elm$svg$Svg$Attributes$class = _VirtualDom_attribute('class'); -var $elm$svg$Svg$Attributes$d = _VirtualDom_attribute('d'); -var $elm$svg$Svg$Attributes$height = _VirtualDom_attribute('height'); -var $elm$svg$Svg$trustedNode = _VirtualDom_nodeNS('http://www.w3.org/2000/svg'); -var $elm$svg$Svg$path = $elm$svg$Svg$trustedNode('path'); -var $elm$svg$Svg$Attributes$stroke = _VirtualDom_attribute('stroke'); -var $elm$svg$Svg$Attributes$strokeDasharray = _VirtualDom_attribute('stroke-dasharray'); -var $elm$svg$Svg$Attributes$strokeLinecap = _VirtualDom_attribute('stroke-linecap'); -var $elm$svg$Svg$Attributes$strokeWidth = _VirtualDom_attribute('stroke-width'); -var $elm$svg$Svg$svg = $elm$svg$Svg$trustedNode('svg'); -var $elm$svg$Svg$Attributes$viewBox = _VirtualDom_attribute('viewBox'); -var $elm$svg$Svg$Attributes$width = _VirtualDom_attribute('width'); -var $author$project$Dotted$lines = A2( - $mdgriffith$elm_ui$Element$el, - _List_fromArray( - [$mdgriffith$elm_ui$Element$centerX]), - $mdgriffith$elm_ui$Element$html( - A2( - $elm$svg$Svg$svg, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$width('20'), - $elm$svg$Svg$Attributes$height('30'), - $elm$svg$Svg$Attributes$viewBox('0 0 20 30') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$path, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$stroke('#2a75ff'), - $elm$svg$Svg$Attributes$strokeWidth('4'), - $elm$svg$Svg$Attributes$strokeLinecap('round'), - $elm$svg$Svg$Attributes$strokeDasharray('0.5 10'), - $elm$svg$Svg$Attributes$d('M10 40 L10 -10'), - $elm$svg$Svg$Attributes$class('dotted-line') - ]), - _List_Nil) - ])))); -var $elm$html$Html$Attributes$rel = _VirtualDom_attribute('rel'); -var $elm$html$Html$Attributes$target = $elm$html$Html$Attributes$stringProperty('target'); -var $mdgriffith$elm_ui$Element$newTabLink = F2( - function (attrs, _v0) { - var url = _v0.url; - var label = _v0.label; - return A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asEl, - $mdgriffith$elm_ui$Internal$Model$NodeName('a'), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$Attr( - $elm$html$Html$Attributes$href(url)), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$Attr( - $elm$html$Html$Attributes$rel('noopener noreferrer')), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$Attr( - $elm$html$Html$Attributes$target('_blank')), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.contentCenterX + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.contentCenterY + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.link)))), - attrs)))))), - $mdgriffith$elm_ui$Internal$Model$Unkeyed( - _List_fromArray( - [label]))); - }); -var $dillonkearns$elm_markdown$Markdown$HtmlRenderer$HtmlRenderer = function (a) { - return {$: 'HtmlRenderer', a: a}; -}; -var $dillonkearns$elm_markdown$Markdown$Html$resultOr = F2( - function (ra, rb) { - if (ra.$ === 'Err') { - var singleError = ra.a; - if (rb.$ === 'Ok') { - var okValue = rb.a; - return $elm$core$Result$Ok(okValue); - } else { - var errorsSoFar = rb.a; - return $elm$core$Result$Err( - A2($elm$core$List$cons, singleError, errorsSoFar)); - } - } else { - var okValue = ra.a; - return $elm$core$Result$Ok(okValue); - } - }); -var $dillonkearns$elm_markdown$Markdown$Html$attributesToString = function (attributes) { - return A2( - $elm$core$String$join, - ' ', - A2( - $elm$core$List$map, - function (_v0) { - var name = _v0.name; - var value = _v0.value; - return name + ('=\"' + (value + '\"')); - }, - attributes)); -}; -var $dillonkearns$elm_markdown$Markdown$Html$tagToString = F2( - function (tagName, attributes) { - return $elm$core$List$isEmpty(attributes) ? ('<' + (tagName + '>')) : ('<' + (tagName + (' ' + ($dillonkearns$elm_markdown$Markdown$Html$attributesToString(attributes) + '>')))); - }); -var $dillonkearns$elm_markdown$Markdown$Html$oneOf = function (decoders) { - var unwrappedDecoders = A2( - $elm$core$List$map, - function (_v1) { - var rawDecoder = _v1.a; - return rawDecoder; - }, - decoders); - return function (rawDecoder) { - return $dillonkearns$elm_markdown$Markdown$HtmlRenderer$HtmlRenderer( - F3( - function (tagName, attributes, innerBlocks) { - return A2( - $elm$core$Result$mapError, - function (errors) { - if (!errors.b) { - return 'Ran into a oneOf with no possibilities!'; - } else { - if (!errors.b.b) { - var singleError = errors.a; - return 'Problem with the given value:\n\n' + (A2($dillonkearns$elm_markdown$Markdown$Html$tagToString, tagName, attributes) + ('\n\n' + (singleError + '\n'))); - } else { - return 'oneOf failed parsing this value:\n ' + (A2($dillonkearns$elm_markdown$Markdown$Html$tagToString, tagName, attributes) + ('\n\nParsing failed in the following 2 ways:\n\n\n' + (A2( - $elm$core$String$join, - '\n\n', - A2( - $elm$core$List$indexedMap, - F2( - function (index, error) { - return '(' + ($elm$core$String$fromInt(index + 1) + (') ' + error)); - }), - errors)) + '\n'))); - } - } - }, - A3(rawDecoder, tagName, attributes, innerBlocks)); - })); - }( - A3( - $elm$core$List$foldl, - F2( - function (decoder, soFar) { - return F3( - function (tagName, attributes, children) { - return A2( - $dillonkearns$elm_markdown$Markdown$Html$resultOr, - A3(decoder, tagName, attributes, children), - A3(soFar, tagName, attributes, children)); - }); - }), - F3( - function (tagName, attributes, children) { - return $elm$core$Result$Err(_List_Nil); - }), - unwrappedDecoders)); -}; -var $elm$html$Html$iframe = _VirtualDom_node('iframe'); -var $author$project$Ellie$outputTab = function (ellieId) { - return A2( - $mdgriffith$elm_ui$Element$el, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill) - ]), - $mdgriffith$elm_ui$Element$html( - A2( - $elm$html$Html$iframe, - _List_fromArray( - [ - $elm$html$Html$Attributes$src('https://ellie-app.com/embed/' + (ellieId + '?panel=output')), - A2($elm$html$Html$Attributes$style, 'width', '100%'), - A2($elm$html$Html$Attributes$style, 'height', '400px'), - A2($elm$html$Html$Attributes$style, 'border', '0'), - A2($elm$html$Html$Attributes$style, 'overflow', 'hidden'), - A2($elm$html$Html$Attributes$attribute, 'sandbox', 'allow-modals allow-forms allow-popups allow-scripts allow-same-origin') - ]), - _List_Nil))); -}; -var $mdgriffith$elm_ui$Element$padding = function (x) { - var f = x; - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$padding, - A5( - $mdgriffith$elm_ui$Internal$Model$PaddingStyle, - 'p-' + $elm$core$String$fromInt(x), - f, - f, - f, - f)); -}; -var $mdgriffith$elm_ui$Internal$Model$AsRow = {$: 'AsRow'}; -var $mdgriffith$elm_ui$Internal$Model$asRow = $mdgriffith$elm_ui$Internal$Model$AsRow; -var $mdgriffith$elm_ui$Element$row = F2( - function (attrs, children) { - return A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asRow, - $mdgriffith$elm_ui$Internal$Model$div, - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.contentLeft + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.contentCenterY)), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink), - attrs))), - $mdgriffith$elm_ui$Internal$Model$Unkeyed(children)); - }); -var $dillonkearns$elm_markdown$Markdown$Html$tag = F2( - function (expectedTag, a) { - return $dillonkearns$elm_markdown$Markdown$HtmlRenderer$HtmlRenderer( - F3( - function (tagName, attributes, children) { - return _Utils_eq(tagName, expectedTag) ? $elm$core$Result$Ok(a) : $elm$core$Result$Err('Expected ' + (expectedTag + (' but was ' + tagName))); - })); - }); -var $mdgriffith$elm_ui$Internal$Model$AsTextColumn = {$: 'AsTextColumn'}; -var $mdgriffith$elm_ui$Internal$Model$asTextColumn = $mdgriffith$elm_ui$Internal$Model$AsTextColumn; -var $mdgriffith$elm_ui$Internal$Model$Max = F2( - function (a, b) { - return {$: 'Max', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Element$maximum = F2( - function (i, l) { - return A2($mdgriffith$elm_ui$Internal$Model$Max, i, l); - }); -var $mdgriffith$elm_ui$Internal$Model$Min = F2( - function (a, b) { - return {$: 'Min', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Element$minimum = F2( - function (i, l) { - return A2($mdgriffith$elm_ui$Internal$Model$Min, i, l); - }); -var $mdgriffith$elm_ui$Element$textColumn = F2( - function (attrs, children) { - return A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asTextColumn, - $mdgriffith$elm_ui$Internal$Model$div, - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$width( - A2( - $mdgriffith$elm_ui$Element$maximum, - 750, - A2($mdgriffith$elm_ui$Element$minimum, 500, $mdgriffith$elm_ui$Element$fill))), - attrs), - $mdgriffith$elm_ui$Internal$Model$Unkeyed(children)); - }); -var $dillonkearns$elm_oembed$Oembed$Provider$regex = function (string) { - return A2( - $elm$core$Maybe$withDefault, - $elm$regex$Regex$never, - $elm$regex$Regex$fromString(string)); -}; -var $dillonkearns$elm_oembed$Oembed$Provider$all = _List_fromArray( - [ - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.23hq\\.com/.*/photo/.*') - ]), - url: 'http://www.23hq.com/23/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://play\\.adpaths\\.com/experience/.*') - ]), - url: 'http://play.adpaths.com/oembed/*' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://alpha\\.app\\.net/.*/post/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://photos\\.app\\.net/.*/.*') - ]), - url: 'https://alpha-api.app.net/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://app\\.altrulabs\\.com/.*/.*\\?answer_id=.*') - ]), - url: 'https://api.altrulabs.com/social/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://live\\.amcharts\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://live\\.amcharts\\.com/.*') - ]), - url: 'https://live.amcharts.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.animatron\\.com/project/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://animatron\\.com/project/.*') - ]), - url: 'https://animatron.com/oembed/json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://animoto\\.com/play/.*') - ]), - url: 'http://animoto.com/oembeds/create' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://renderer\\.apester\\.com/v2/.*\\?preview=true&iframe_preview=true') - ]), - url: 'https://display.apester.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://app\\.archivos\\.digital/app/view/.*') - ]), - url: 'https://app.archivos.digital/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://audioclip\\.naver\\.com/channels/.*/clips/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://audioclip\\.naver\\.com/audiobooks/.*') - ]), - url: 'https://audioclip.naver.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.audiomack\\.com/song/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.audiomack\\.com/album/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.audiomack\\.com/playlist/.*') - ]), - url: 'https://www.audiomack.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://audiosnaps\\.com/k/.*') - ]), - url: 'http://audiosnaps.com/service/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://backtracks\\.fm/.*/.*/e/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://backtracks\\.fm/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://backtracks\\.fm/.*') - ]), - url: 'https://backtracks.fm/oembed' - }, - {schemes: _List_Nil, url: 'https://www.beautiful.ai/api/oembed'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://blackfire\\.io/profiles/.*/graph'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://blackfire\\.io/profiles/compare/.*/graph') - ]), - url: 'https://blackfire.io/oembed' - }, - {schemes: _List_Nil, url: 'http://boxofficebuz.com/oembed'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://view\\.briovr\\.com/api/v1/worlds/oembed/.*') - ]), - url: 'https://view.briovr.com/api/v1/worlds/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://buttondown\\.email/.*') - ]), - url: 'https://buttondown.email/embed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://cmc\\.byzart\\.eu/files/.*') - ]), - url: 'https://cmc.byzart.eu/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://cacoo\\.com/diagrams/.*') - ]), - url: 'http://cacoo.com/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://carbonhealth\\.com/practice/.*') - ]), - url: 'http://carbonhealth.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://img\\.catbo\\.at/.*') - ]), - url: 'http://img.catbo.at/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://view\\.ceros\\.com/.*') - ]), - url: 'http://view.ceros.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://public\\.chartblocks\\.com/c/.*') - ]), - url: 'http://embed.chartblocks.com/1.0/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://chirb\\.it/.*') - ]), - url: 'http://chirb.it/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.circuitlab\\.com/circuit/.*') - ]), - url: 'https://www.circuitlab.com/circuit/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.clipland\\.com/v/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.clipland\\.com/v/.*') - ]), - url: 'https://www.clipland.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://clyp\\.it/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://clyp\\.it/playlist/.*') - ]), - url: 'http://api.clyp.it/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://codehs\\.com/editor/share_abacus/.*') - ]), - url: 'https://codehs.com/api/sharedprogram/*/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://codepen\\.io/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://codepen\\.io/.*') - ]), - url: 'http://codepen.io/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://codepoints\\.net/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://codepoints\\.net/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.codepoints\\.net/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.codepoints\\.net/.*') - ]), - url: 'https://codepoints.net/api/v1/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://codesandbox\\.io/s/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://codesandbox\\.io/embed/.*') - ]), - url: 'https://codesandbox.io/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.collegehumor\\.com/video/.*') - ]), - url: 'http://www.collegehumor.com/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://commaful\\.com/play/.*') - ]), - url: 'https://commaful.com/api/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://coub\\.com/view/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://coub\\.com/embed/.*') - ]), - url: 'http://coub.com/api/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://crowdranking\\.com/.*/.*') - ]), - url: 'http://crowdranking.com/api/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://staging\\.cyranosystems\\.com/msg/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://app\\.cyranosystems\\.com/msg/.*') - ]), - url: 'https://staging.cyranosystems.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.dailymile\\.com/people/.*/entries/.*') - ]), - url: 'http://api.dailymile.com/oembed?format=json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.dailymotion\\.com/video/.*') - ]), - url: 'https://www.dailymotion.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.deseretnews\\.com/.*') - ]), - url: 'https://embed.deseretnews.com/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.deviantart\\.com/art/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.deviantart\\.com/.*#/d.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://fav\\.me/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://sta\\.sh/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.deviantart\\.com/art/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.deviantart\\.com/.*/art/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://sta\\.sh/.*\",'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.deviantart\\.com/.*#/d.*\"') - ]), - url: 'http://backend.deviantart.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.didacte\\.com/a/course/.*') - ]), - url: 'https://*.didacte.com/cards/oembed\'' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.ultimedia\\.com/central/video/edit/id/.*/topic_id/.*/'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.ultimedia\\.com/default/index/videogeneric/id/.*/showtitle/1/viewnc/1'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.ultimedia\\.com/default/index/videogeneric/id/.*') - ]), - url: 'https://www.ultimedia.com/api/search/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.dipity\\.com/.*/.*/') - ]), - url: 'http://www.dipity.com/oembed/timeline/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.docdroid\\.net/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.docdroid\\.net/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://docdro\\.id/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://docdro\\.id/.*') - ]), - url: 'https://www.docdroid.net/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://dotsub\\.com/view/.*') - ]), - url: 'http://dotsub.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://d\\.tube/v/.*') - ]), - url: 'https://api.d.tube/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://edocr\\.com/docs/.*') - ]), - url: 'http://edocr.com/api/oembed' - }, - {schemes: _List_Nil, url: 'https://www.edumedia-sciences.com/oembed.json'}, - {schemes: _List_Nil, url: 'https://www.edumedia-sciences.com/oembed.xml'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://egliseinfo\\.catholique\\.fr/.*') - ]), - url: 'http://egliseinfo.catholique.fr/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://embedarticles\\.com/.*') - ]), - url: 'http://embedarticles.com/oembed/' - }, - {schemes: _List_Nil, url: 'http://api.embed.ly/1/oembed'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://ethfiddle\\.com/.*') - ]), - url: 'https://ethfiddle.com/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://eyrie\\.io/board/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://eyrie\\.io/sparkfun/.*') - ]), - url: 'https://eyrie.io/v1/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/.*/posts/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/photos/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/.*/photos/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/photo\\.php.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/photo\\.php'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/.*/activity/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/permalink\\.php'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/media/set\\?set=.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/questions/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/notes/.*/.*/.*') - ]), - url: 'https://www.facebook.com/plugins/post/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/.*/videos/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.facebook\\.com/video\\.php') - ]), - url: 'https://www.facebook.com/plugins/video/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://app\\.getfader\\.com/projects/.*/publish') - ]), - url: 'https://app.getfader.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://faithlifetv\\.com/items/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://faithlifetv\\.com/items/resource/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://faithlifetv\\.com/media/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://faithlifetv\\.com/media/assets/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://faithlifetv\\.com/media/resource/.*/.*') - ]), - url: 'https://faithlifetv.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.fite\\.tv/watch/.*') - ]), - url: 'https://www.fite.tv/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://flat\\.io/score/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.flat\\.io/score/.*') - ]), - url: 'https://flat.io/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.flickr\\.com/photos/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://flic\\.kr/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.flickr\\.com/photos/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://flic\\.kr/p/.*') - ]), - url: 'https://www.flickr.com/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://public\\.flourish\\.studio/visualisation/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://public\\.flourish\\.studio/story/.*') - ]), - url: 'https://app.flourish.studio/api/v1/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://catapult\\.fontself\\.com/.*') - ]), - url: 'https://oembed.fontself.com/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://fiso\\.foxsports\\.com\\.au/isomorphic-widget/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://fiso\\.foxsports\\.com\\.au/isomorphic-widget/.*') - ]), - url: 'https://fiso.foxsports.com.au/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://framebuzz\\.com/v/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://framebuzz\\.com/v/.*') - ]), - url: 'https://framebuzz.com/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.funnyordie\\.com/videos/.*') - ]), - url: 'http://www.funnyordie.com/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.geograph\\.org\\.uk/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.geograph\\.co\\.uk/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.geograph\\.ie/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.wikimedia\\.org/.*_geograph\\.org\\.uk_.*') - ]), - url: 'http://api.geograph.org.uk/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.geograph\\.org\\.gg/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.geograph\\.org\\.je/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://channel-islands\\.geograph\\.org/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://channel-islands\\.geographs\\.org/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.channel\\.geographs\\.org/.*') - ]), - url: 'http://www.geograph.org.gg/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://geo-en\\.hlipp\\.de/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://geo\\.hlipp\\.de/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://germany\\.geograph\\.org/.*') - ]), - url: 'http://geo.hlipp.de/restapi.php/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://gty\\.im/.*') - ]), - url: 'http://embed.gettyimages.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://gfycat\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.gfycat\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://gfycat\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.gfycat\\.com/.*') - ]), - url: 'https://api.gfycat.com/v1/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.gifnote\\.com/play/.*') - ]), - url: 'https://www.gifnote.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://giphy\\.com/gifs/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://gph\\.is/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://media\\.giphy\\.com/media/.*/giphy\\.gif') - ]), - url: 'https://giphy.com/services/oembed' - }, - {schemes: _List_Nil, url: 'https://gloria.tv/oembed/'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://gtchannel\\.com/watch/.*') - ]), - url: 'https://api.luminery.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://gyazo\\.com/.*') - ]), - url: 'https://api.gyazo.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://hearthis\\.at/.*/.*/') - ]), - url: 'https://hearthis.at/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://huffduffer\\.com/.*/.*') - ]), - url: 'http://huffduffer.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.hulu\\.com/watch/.*') - ]), - url: 'http://www.hulu.com/api/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.ifixit\\.com/Guide/View/.*') - ]), - url: 'http://www.ifixit.com/Embed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://ifttt\\.com/recipes/.*') - ]), - url: 'http://www.ifttt.com/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://player\\.indacolive\\.com/player/jwp/clients/.*') - ]), - url: 'https://player.indacolive.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://infogr\\.am/.*') - ]), - url: 'https://infogr.am/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.infoveave\\.net/E/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.infoveave\\.net/P/.*') - ]), - url: 'https://infoveave.net/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.injurymap\\.com/exercises/.*') - ]), - url: 'https://www.injurymap.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.inoreader\\.com/oembed/') - ]), - url: 'https://www.inoreader.com/oembed/api/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.inphood\\.com/.*') - ]), - url: 'http://api.inphood.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://instagram\\.com/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://instagr\\.am/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.instagram\\.com/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.instagr\\.am/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://instagram\\.com/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://instagr\\.am/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.instagram\\.com/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.instagr\\.am/p/.*') - ]), - url: 'https://api.instagram.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.isnare\\.com/.*') - ]), - url: 'https://www.isnare.com/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://issuu\\.com/.*/docs/.*') - ]), - url: 'https://issuu.com/oembed' - }, - {schemes: _List_Nil, url: 'https://music.ivlis.kr/oembed'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://tv\\.kakao\\.com/channel/.*/cliplink/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://tv\\.kakao\\.com/channel/v/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://tv\\.kakao\\.com/channel/.*/livelink/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://tv\\.kakao\\.com/channel/l/.*') - ]), - url: 'https://tv.kakao.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.kickstarter\\.com/projects/.*') - ]), - url: 'http://www.kickstarter.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.kidoju\\.com/en/x/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.kidoju\\.com/fr/x/.*/.*') - ]), - url: 'https://www.kidoju.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://kit\\.com/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://kit\\.com/.*/.*') - ]), - url: 'https://embed.kit.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.kitchenbowl\\.com/recipe/.*') - ]), - url: 'http://www.kitchenbowl.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://jdr\\.knacki\\.info/meuh/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://jdr\\.knacki\\.info/meuh/.*') - ]), - url: 'https://jdr.knacki.info/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://learningapps\\.org/.*') - ]), - url: 'http://learningapps.org/oembed.php' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://pod\\.univ-lille\\.fr/video/.*') - ]), - url: 'https://pod.univ-lille.fr/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://livestream\\.com/accounts/.*/events/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://livestream\\.com/accounts/.*/events/.*/videos/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://livestream\\.com/.*/events/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://livestream\\.com/.*/events/.*/videos/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://livestream\\.com/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://livestream\\.com/.*/.*/videos/.*') - ]), - url: 'https://livestream.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://app\\.ludus\\.one/.*') - ]), - url: 'https://app.ludus.one/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://mathembed\\.com/latex\\?inputText=.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://mathembed\\.com/latex\\?inputText=.*') - ]), - url: 'http://mathembed.com/oembed' - }, - {schemes: _List_Nil, url: 'https://my.matterport.com/api/v1/models/oembed/'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://me\\.me/i/.*') - ]), - url: 'https://me.me/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://medienarchiv\\.zhdk\\.ch/entries/.*') - ]), - url: 'https://medienarchiv.zhdk.ch/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://meetup\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.meetup\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://meetup\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://meetu\\.ps/.*') - ]), - url: 'https://api.meetup.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.mixcloud\\.com/.*/.*/'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.mixcloud\\.com/.*/.*/') - ]), - url: 'https://www.mixcloud.com/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.mobypicture\\.com/user/.*/view/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://moby\\.to/.*') - ]), - url: 'http://api.mobypicture.com/oEmbed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://beta\\.modelo\\.io/embedded/.*') - ]), - url: 'https://portal.modelo.io/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://m-roll\\.morphcast\\.com/mroll/.*') - ]), - url: 'https://m-roll.morphcast.com/service/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://musicboxmaniacs\\.com/explore/melody/.*') - ]), - url: 'https://musicboxmaniacs.com/embed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://mybeweeg\\.com/w/.*') - ]), - url: 'https://mybeweeg.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://namchey\\.com/embeds/.*') - ]), - url: 'https://namchey.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.nanoo\\.tv/link/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://nanoo\\.tv/link/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.nanoo\\.pro/link/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://nanoo\\.pro/link/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.nanoo\\.tv/link/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://nanoo\\.tv/link/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.nanoo\\.pro/link/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://nanoo\\.pro/link/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://media\\.zhdk\\.ch/signatur/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://new\\.media\\.zhdk\\.ch/signatur/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://media\\.zhdk\\.ch/signatur/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://new\\.media\\.zhdk\\.ch/signatur/.*') - ]), - url: 'https://www.nanoo.tv/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.nb\\.no/items/.*') - ]), - url: 'https://api.nb.no/catalog/v1/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://naturalatlas\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://naturalatlas\\.com/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://naturalatlas\\.com/.*/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://naturalatlas\\.com/.*/.*/.*/.*') - ]), - url: 'https://naturalatlas.com/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.nfb\\.ca/film/.*') - ]), - url: 'http://www.nfb.ca/remote/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.odds\\.com\\.au/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://odds\\.com\\.au/.*') - ]), - url: 'https://www.odds.com.au/api/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://official\\.fm/tracks/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://official\\.fm/playlists/.*') - ]), - url: 'http://official.fm/services/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://omniscope\\.me/.*') - ]), - url: 'https://omniscope.me/_global_/oembed/json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://on\\.aol\\.com/video/.*') - ]), - url: 'http://on.aol.com/api' - }, - {schemes: _List_Nil, url: 'https://www.ora.tv/oembed/*?format=json'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://orbitvu\\.co/001/.*/ov3601/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://orbitvu\\.co/001/.*/ov3601/.*/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://orbitvu\\.co/001/.*/ov3602/.*/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://orbitvu\\.co/001/.*/2/orbittour/.*/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://orbitvu\\.co/001/.*/1/2/orbittour/.*/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://orbitvu\\.co/001/.*/ov3601/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://orbitvu\\.co/001/.*/ov3601/.*/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://orbitvu\\.co/001/.*/ov3602/.*/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://orbitvu\\.co/001/.*/2/orbittour/.*/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://orbitvu\\.co/001/.*/1/2/orbittour/.*/view') - ]), - url: 'http://orbitvu.co/service/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.oumy\\.com/v/.*') - ]), - url: 'https://www.oumy.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://outplayed\\.tv/media/.*') - ]), - url: 'https://outplayed.tv/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://overflow\\.io/s/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://overflow\\.io/embed/.*') - ]), - url: 'https://overflow.io/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://pastery\\.net/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://pastery\\.net/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.pastery\\.net/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.pastery\\.net/.*') - ]), - url: 'https://www.pastery.net/oembed' - }, - {schemes: _List_Nil, url: 'https://beta.pingvp.com.kpnis.nl/p/oembed.php'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://store\\.pixdor\\.com/place-marker-widget/.*/show'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://store\\.pixdor\\.com/map/.*/show') - ]), - url: 'https://store.pixdor.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.podbean\\.com/e/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.podbean\\.com/e/.*') - ]), - url: 'https://api.podbean.com/v1/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.polldaddy\\.com/s/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.polldaddy\\.com/poll/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.polldaddy\\.com/ratings/.*') - ]), - url: 'http://polldaddy.com/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://app\\.sellwithport\\.com/#/buyer/.*') - ]), - url: 'https://api.sellwithport.com/v1.0/buyer/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://portfolium\\.com/entry/.*') - ]), - url: 'https://api.portfolium.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://posixion\\.com/question/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://posixion\\.com/.*/question/.*') - ]), - url: 'http://posixion.com/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.quiz\\.biz/quizz-.*\\.html') - ]), - url: 'http://www.quiz.biz/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.quizz\\.biz/quizz-.*\\.html') - ]), - url: 'http://www.quizz.biz/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://rapidengage\\.com/s/.*') - ]), - url: 'https://rapidengage.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://reddit\\.com/r/.*/comments/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.reddit\\.com/r/.*/comments/.*/.*') - ]), - url: 'https://www.reddit.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://rwire\\.com/.*') - ]), - url: 'http://publisher.releasewire.com/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://repl\\.it/@.*/.*') - ]), - url: 'https://repl.it/data/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://repubhub\\.icopyright\\.net/freePost\\.act\\?.*') - ]), - url: 'http://repubhub.icopyright.net/oembed.act' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.reverbnation\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.reverbnation\\.com/.*/songs/.*') - ]), - url: 'https://www.reverbnation.com/oembed' - }, - {schemes: _List_Nil, url: 'https://www.riffreporter.de/service/oembed'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://roomshare\\.jp/post/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://roomshare\\.jp/en/post/.*') - ]), - url: 'http://roomshare.jp/en/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://roosterteeth\\.com/.*') - ]), - url: 'https://roosterteeth.com/oembed' - }, - {schemes: _List_Nil, url: 'https://rumble.com/api/Media/oembed.json'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://videos\\.sapo\\.pt/.*') - ]), - url: 'http://videos.sapo.pt/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://console\\.screen9\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.screen9\\.tv/.*') - ]), - url: 'https://api.screen9.com/oembed' - }, - {schemes: _List_Nil, url: 'https://api.screencast.com/external/oembed'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.screenr\\.com/.*/') - ]), - url: 'http://www.screenr.com/api/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.scribblemaps\\.com/maps/view/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.scribblemaps\\.com/maps/view/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://scribblemaps\\.com/maps/view/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://scribblemaps\\.com/maps/view/.*') - ]), - url: 'https://scribblemaps.com/api/services/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.scribd\\.com/doc/.*') - ]), - url: 'http://www.scribd.com/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://embed\\.sendtonews\\.com/oembed/.*') - ]), - url: 'https://embed.sendtonews.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.shortnote\\.jp/view/notes/.*') - ]), - url: 'https://www.shortnote.jp/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://shoudio\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://shoud\\.io/.*') - ]), - url: 'http://shoudio.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://showtheway\\.io/to/.*') - ]), - url: 'https://showtheway.io/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://simplecast\\.com/s/.*') - ]), - url: 'https://simplecast.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://onsizzle\\.com/i/.*') - ]), - url: 'https://onsizzle.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://sketchfab\\.com/models/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://sketchfab\\.com/models/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://sketchfab\\.com/.*/folders/.*') - ]), - url: 'http://sketchfab.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.slideshare\\.net/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://fr\\.slideshare\\.net/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://de\\.slideshare\\.net/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://es\\.slideshare\\.net/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://pt\\.slideshare\\.net/.*/.*') - ]), - url: 'http://www.slideshare.net/api/oembed/2' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://smashnotes\\.com/p/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://smashnotes\\.com/p/.*/e/.* - https://smashnotes\\.com/p/.*/e/.*/s/.*') - ]), - url: 'https://smashnotes.com/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.smugmug\\.com/.*') - ]), - url: 'http://api.smugmug.com/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.socialexplorer\\.com/.*/explore'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.socialexplorer\\.com/.*/view'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.socialexplorer\\.com/.*/edit'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.socialexplorer\\.com/.*/embed') - ]), - url: 'https://www.socialexplorer.com/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://song\\.link/.*') - ]), - url: 'https://song.link/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://soundcloud\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://soundcloud\\.com/.*') - ]), - url: 'https://soundcloud.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://play\\.soundsgood\\.co/playlist/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://soundsgood\\.co/playlist/.*') - ]), - url: 'https://play.soundsgood.co/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://speakerdeck\\.com/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://speakerdeck\\.com/.*/.*') - ]), - url: 'https://speakerdeck.com/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://play\\.bespotful\\.com/.*') - ]), - url: 'https://api.bespotful.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.spotify\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('spotify:.*') - ]), - url: 'https://embed.spotify.com/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.spreaker\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.spreaker\\.com/.*') - ]), - url: 'https://api.spreaker.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://purl\\.stanford\\.edu/.*') - ]), - url: 'https://purl.stanford.edu/embed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://streamable\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://streamable\\.com/.*') - ]), - url: 'https://api.streamable.com/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://content\\.streamonecloud\\.net/embed/.*') - ]), - url: 'https://content.streamonecloud.net/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.sutori\\.com/story/.*') - ]), - url: 'https://www.sutori.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://sway\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.sway\\.com/.*') - ]), - url: 'https://sway.com/api/v1.0/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://ted\\.com/talks/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://ted\\.com/talks/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.ted\\.com/talks/.*') - ]), - url: 'https://www.ted.com/talks/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.nytimes\\.com/svc/oembed'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://nytimes\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.nytimes\\.com/.*') - ]), - url: 'https://www.nytimes.com/svc/oembed/json/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://theysaidso\\.com/image/.*') - ]), - url: 'https://theysaidso.com/extensions/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.tickcounter\\.com/countdown/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.tickcounter\\.com/countup/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.tickcounter\\.com/ticker/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.tickcounter\\.com/worldclock/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.tickcounter\\.com/countdown/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.tickcounter\\.com/countup/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.tickcounter\\.com/ticker/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.tickcounter\\.com/worldclock/.*') - ]), - url: 'https://www.tickcounter.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.toornament\\.com/tournaments/.*/information'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.toornament\\.com/tournaments/.*/registration/'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.toornament\\.com/tournaments/.*/matches/schedule'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.toornament\\.com/tournaments/.*/stages/.*/') - ]), - url: 'https://widget.toornament.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.topy\\.se/image/.*') - ]), - url: 'http://www.topy.se/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.tuxx\\.be/.*') - ]), - url: 'https://www.tuxx.be/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.tvcf\\.co\\.kr/v/.*') - ]), - url: 'http://www.tvcf.co.kr/services/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://clips\\.twitch\\.tv/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://clips\\.twitch\\.tv/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.twitch\\.tv/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.twitch\\.tv/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://twitch\\.tv/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://twitch\\.tv/.*') - ]), - url: 'https://api.twitch.tv/v4/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://twitter\\.com/.*/status/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.twitter\\.com/.*/status/.*') - ]), - url: 'https://publish.twitter.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://play\\.typecast\\.ai/s/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://play\\.typecast\\.ai/e/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://play\\.typecast\\.ai/.*') - ]), - url: 'https://play.typecast.ai/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://player\\.ubideo\\.com/.*') - ]), - url: 'https://player.ubideo.com/api/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://map\\.cam\\.ac\\.uk/.*') - ]), - url: 'https://map.cam.ac.uk/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.uol\\.com\\.br/view/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.uol\\.com\\.br/video/.*') - ]), - url: 'https://mais.uol.com.br/apiuol/v3/oembed/view' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.ustream\\.tv/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.ustream\\.com/.*') - ]), - url: 'http://www.ustream.tv/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.utposts\\.com/products/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.utposts\\.com/products/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://utposts\\.com/products/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://utposts\\.com/products/.*') - ]), - url: 'https://www.utposts.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://uttles\\.com/uttle/.*') - ]), - url: 'http://uttles.com/api/reply/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://veer\\.tv/videos/.*') - ]), - url: 'https://api.veer.tv/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://veervr\\.tv/videos/.*') - ]), - url: 'https://api.veervr.tv/oembed' - }, - {schemes: _List_Nil, url: 'http://verse.com/services/oembed/'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.vevo\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.vevo\\.com/.*') - ]), - url: 'https://www.vevo.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.videojug\\.com/film/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.videojug\\.com/interview/.*') - ]), - url: 'http://www.videojug.com/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://vidl\\.it/.*') - ]), - url: 'https://api.vidl.it/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://players\\.vidmizer\\.com/.*') - ]), - url: 'https://app-v2.vidmizer.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://embed\\.vidyard\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://play\\.vidyard\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://share\\.vidyard\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.hubs\\.vidyard\\.com/.*') - ]), - url: 'https://api.vidyard.com/dashboard/v1.1/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://vimeo\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://vimeo\\.com/album/.*/video/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://vimeo\\.com/channels/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://vimeo\\.com/groups/.*/videos/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://vimeo\\.com/ondemand/.*/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://player\\.vimeo\\.com/video/.*') - ]), - url: 'https://vimeo.com/api/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://viziosphere\\.com/3dphoto.*') - ]), - url: 'http://viziosphere.com/services/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://vlipsy\\.com/.*') - ]), - url: 'https://vlipsy.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://www\\.vlive\\.tv/video/.*') - ]), - url: 'https://www.vlive.tv/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://vlurb\\.co/video/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://vlurb\\.co/video/.*') - ]), - url: 'https://vlurb.co/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://article\\.voxsnap\\.com/.*/.*') - ]), - url: 'https://data.voxsnap.com/oembed' - }, - {schemes: _List_Nil, url: 'http://play.wecandeo.com/oembed'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.wiredrive\\.com/.*') - ]), - url: 'http://*.wiredrive.com/present-oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://fast\\.wistia\\.com/embed/iframe/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://fast\\.wistia\\.com/embed/playlists/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.wistia\\.com/medias/.*') - ]), - url: 'https://fast.wistia.com/oembed.json' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.wizer\\.me/learn/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.wizer\\.me/learn/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.wizer\\.me/preview/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.wizer\\.me/preview/.*') - ]), - url: 'http://app.wizer.me/api/oembed.json' - }, - {schemes: _List_Nil, url: 'http://www.wootled.com/oembed'}, - {schemes: _List_Nil, url: 'http://public-api.wordpress.com/oembed/'}, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://yesik\\.it/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://www\\.yesik\\.it/.*') - ]), - url: 'http://yesik.it/s/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://.*\\.yfrog\\.com/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('http://yfrog\\.us/.*') - ]), - url: 'http://www.yfrog.com/api/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.youtube\\.com/watch.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.youtube\\.com/v/.*'), - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://youtu\\.be/.*') - ]), - url: 'https://www.youtube.com/oembed' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://.*\\.znipe\\.tv/.*') - ]), - url: 'https://api.znipe.tv/v3/oembed/' - }, - { - schemes: _List_fromArray( - [ - $dillonkearns$elm_oembed$Oembed$Provider$regex('https://reports\\.zoho\\.com/ZDBDataSheetView\\.cc\\?OBJID=1432535000000003002&STANDALONE=true&INTERVAL=120&DATATYPESYMBOL=false&REMTOOLBAR=false&SEARCHBOX=true&INCLUDETITLE=true&INCLUDEDESC=true&SHOWHIDEOPT=true') - ]), - url: 'http://api.provider.com/oembed.json' - } - ]); -var $elm_community$list_extra$List$Extra$find = F2( - function (predicate, list) { - find: - while (true) { - if (!list.b) { - return $elm$core$Maybe$Nothing; - } else { - var first = list.a; - var rest = list.b; - if (predicate(first)) { - return $elm$core$Maybe$Just(first); - } else { - var $temp$predicate = predicate, - $temp$list = rest; - predicate = $temp$predicate; - list = $temp$list; - continue find; - } - } - } - }); -var $dillonkearns$elm_oembed$Oembed$Provider$lookup = F2( - function (customProviders, inputUrl) { - return A2( - $elm$core$Maybe$map, - function ($) { - return $.url; - }, - A2( - $elm_community$list_extra$List$Extra$find, - function (provider) { - return A2( - $elm$core$List$any, - function (scheme) { - return A2($elm$regex$Regex$contains, scheme, inputUrl); - }, - provider.schemes); - }, - _Utils_ap(customProviders, $dillonkearns$elm_oembed$Oembed$Provider$all))); - }); -var $dillonkearns$elm_oembed$Oembed$urlToIframe = F3( - function (options, resourceUrl, oembedProviderUrl) { - return A3( - $elm$html$Html$node, - 'oembed-element', - A2( - $elm$core$List$filterMap, - $elm$core$Basics$identity, - _List_fromArray( - [ - $elm$core$Maybe$Just( - A2($elm$html$Html$Attributes$attribute, 'url', oembedProviderUrl + ('?url=' + resourceUrl))), - A2( - $elm$core$Maybe$map, - $elm$html$Html$Attributes$attribute('maxwidth'), - A2( - $elm$core$Maybe$map, - $elm$core$String$fromInt, - A2( - $elm$core$Maybe$map, - function ($) { - return $.maxWidth; - }, - options))), - A2( - $elm$core$Maybe$map, - $elm$html$Html$Attributes$attribute('maxheight'), - A2( - $elm$core$Maybe$map, - $elm$core$String$fromInt, - A2( - $elm$core$Maybe$map, - function ($) { - return $.maxHeight; - }, - options))) - ])), - _List_Nil); - }); -var $dillonkearns$elm_oembed$Oembed$view = F3( - function (customProviders, options, resourceUrl) { - return A2( - $elm$core$Maybe$map, - A2($dillonkearns$elm_oembed$Oembed$urlToIframe, options, resourceUrl), - A2($dillonkearns$elm_oembed$Oembed$Provider$lookup, customProviders, resourceUrl)); - }); -var $dillonkearns$elm_markdown$List$Helpers$find = F2( - function (predicate, list) { - find: - while (true) { - if (!list.b) { - return $elm$core$Maybe$Nothing; - } else { - var first = list.a; - var rest = list.b; - if (predicate(first)) { - return $elm$core$Maybe$Just(first); - } else { - var $temp$predicate = predicate, - $temp$list = rest; - predicate = $temp$predicate; - list = $temp$list; - continue find; - } - } - } - }); -var $dillonkearns$elm_markdown$Markdown$Html$withAttribute = F2( - function (attributeName, _v0) { - var renderer = _v0.a; - return $dillonkearns$elm_markdown$Markdown$HtmlRenderer$HtmlRenderer( - F3( - function (tagName, attributes, innerBlocks) { - return function () { - var _v1 = A2( - $dillonkearns$elm_markdown$List$Helpers$find, - function (_v2) { - var name = _v2.name; - var value = _v2.value; - return _Utils_eq(name, attributeName); - }, - attributes); - if (_v1.$ === 'Just') { - var value = _v1.a.value; - return $elm$core$Result$map( - $elm$core$Basics$apR(value)); - } else { - return function (_v3) { - return $elm$core$Result$Err('Expecting attribute \"' + (attributeName + '\".')); - }; - } - }()( - A3(renderer, tagName, attributes, innerBlocks)); - })); - }); -var $author$project$MarkdownRenderer$renderer = { - blockQuote: function (children) { - return A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Border$widthEach( - {bottom: 0, left: 10, right: 0, top: 0}), - $mdgriffith$elm_ui$Element$padding(10), - $mdgriffith$elm_ui$Element$Border$color( - A3($mdgriffith$elm_ui$Element$rgb255, 145, 145, 145)), - $mdgriffith$elm_ui$Element$Background$color( - A3($mdgriffith$elm_ui$Element$rgb255, 245, 245, 245)) - ]), - children); - }, - codeBlock: $author$project$MarkdownRenderer$codeBlock, - codeSpan: $author$project$MarkdownRenderer$code, - emphasis: function (content) { - return A2( - $mdgriffith$elm_ui$Element$paragraph, - _List_fromArray( - [$mdgriffith$elm_ui$Element$Font$italic]), - content); - }, - hardLineBreak: $mdgriffith$elm_ui$Element$html( - A2($elm$html$Html$br, _List_Nil, _List_Nil)), - heading: $author$project$MarkdownRenderer$heading, - html: $dillonkearns$elm_markdown$Markdown$Html$oneOf( - _List_fromArray( - [ - A2( - $dillonkearns$elm_markdown$Markdown$Html$tag, - 'banner', - function (children) { - return A2( - $mdgriffith$elm_ui$Element$paragraph, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$center, - $mdgriffith$elm_ui$Element$Font$size(47), - $mdgriffith$elm_ui$Element$Font$family( - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$typeface('Montserrat') - ])), - $mdgriffith$elm_ui$Element$Font$color($author$project$Palette$color.primary) - ]), - children); - }), - A2( - $dillonkearns$elm_markdown$Markdown$Html$tag, - 'boxes', - function (children) { - return A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [$mdgriffith$elm_ui$Element$centerX]), - $elm$core$List$reverse( - $elm$core$List$concat( - A2( - $elm$core$List$indexedMap, - F2( - function (index, aBox) { - var isLast = _Utils_eq( - index, - $elm$core$List$length(children) - 1); - return A2( - $elm$core$List$filterMap, - $elm$core$Basics$identity, - _List_fromArray( - [ - $elm$core$Maybe$Just(aBox), - isLast ? $elm$core$Maybe$Nothing : $elm$core$Maybe$Just($author$project$Dotted$lines) - ])); - }), - children)))); - }), - A2( - $dillonkearns$elm_markdown$Markdown$Html$tag, - 'box', - function (children) { - return A2( - $mdgriffith$elm_ui$Element$textColumn, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$centerX, - $mdgriffith$elm_ui$Element$Font$center, - $mdgriffith$elm_ui$Element$padding(30), - $mdgriffith$elm_ui$Element$Border$shadow( - { - blur: 3, - color: A4($mdgriffith$elm_ui$Element$rgba255, 40, 80, 80, 0.1), - offset: _Utils_Tuple2(2, 2), - size: 3 - }), - $mdgriffith$elm_ui$Element$spacing(15) - ]), - children); - }), - A2( - $dillonkearns$elm_markdown$Markdown$Html$tag, - 'values', - function (children) { - return A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$spacing(30), - $mdgriffith$elm_ui$Element$htmlAttribute( - A2($elm$html$Html$Attributes$style, 'flex-wrap', 'wrap')) - ]), - children); - }), - A2( - $dillonkearns$elm_markdown$Markdown$Html$tag, - 'value', - function (children) { - return A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$padding(20), - $mdgriffith$elm_ui$Element$spacing(20), - $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$centerX - ]), - children); - }), - A2( - $dillonkearns$elm_markdown$Markdown$Html$withAttribute, - 'url', - A2( - $dillonkearns$elm_markdown$Markdown$Html$tag, - 'oembed', - F2( - function (url, _v0) { - return A2( - $mdgriffith$elm_ui$Element$el, - _List_fromArray( - [$mdgriffith$elm_ui$Element$centerX]), - A2( - $elm$core$Maybe$withDefault, - $mdgriffith$elm_ui$Element$none, - A2( - $elm$core$Maybe$map, - $mdgriffith$elm_ui$Element$html, - A3($dillonkearns$elm_oembed$Oembed$view, _List_Nil, $elm$core$Maybe$Nothing, url)))); - }))), - A2( - $dillonkearns$elm_markdown$Markdown$Html$withAttribute, - 'id', - A2( - $dillonkearns$elm_markdown$Markdown$Html$tag, - 'ellie-output', - F2( - function (ellieId, _v1) { - return $author$project$Ellie$outputTab(ellieId); - }))) - ])), - image: function (image) { - var _v2 = image.title; - if (_v2.$ === 'Just') { - return A2( - $mdgriffith$elm_ui$Element$image, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill) - ]), - {description: image.alt, src: image.src}); - } else { - return A2( - $mdgriffith$elm_ui$Element$image, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill) - ]), - {description: image.alt, src: image.src}); - } - }, - link: F2( - function (_v3, body) { - var destination = _v3.destination; - return A2( - $mdgriffith$elm_ui$Element$newTabLink, - _List_Nil, - { - label: A2( - $mdgriffith$elm_ui$Element$paragraph, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$color( - A3($mdgriffith$elm_ui$Element$rgb255, 0, 0, 255)), - $mdgriffith$elm_ui$Element$htmlAttribute( - A2($elm$html$Html$Attributes$style, 'overflow-wrap', 'break-word')), - $mdgriffith$elm_ui$Element$htmlAttribute( - A2($elm$html$Html$Attributes$style, 'word-break', 'break-word')) - ]), - body), - url: destination - }); - }), - orderedList: F2( - function (startingIndex, items) { - return A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$spacing(15) - ]), - A2( - $elm$core$List$indexedMap, - F2( - function (index, itemBlocks) { - return A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$spacing(5) - ]), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [$mdgriffith$elm_ui$Element$alignTop]), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$text( - $elm$core$String$fromInt(index + startingIndex) + ' '), - itemBlocks)) - ])); - }), - items)); - }), - paragraph: $mdgriffith$elm_ui$Element$paragraph( - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$spacing(15) - ])), - strong: function (content) { - return A2( - $mdgriffith$elm_ui$Element$paragraph, - _List_fromArray( - [$mdgriffith$elm_ui$Element$Font$bold]), - content); - }, - table: $mdgriffith$elm_ui$Element$column(_List_Nil), - tableBody: $mdgriffith$elm_ui$Element$column(_List_Nil), - tableCell: $mdgriffith$elm_ui$Element$paragraph(_List_Nil), - tableHeader: $mdgriffith$elm_ui$Element$column(_List_Nil), - tableHeaderCell: F2( - function (_v4, children) { - return A2($mdgriffith$elm_ui$Element$paragraph, _List_Nil, children); - }), - tableRow: $mdgriffith$elm_ui$Element$row(_List_Nil), - text: function (value) { - return A2( - $mdgriffith$elm_ui$Element$paragraph, - _List_Nil, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$text(value) - ])); - }, - thematicBreak: $mdgriffith$elm_ui$Element$none, - unorderedList: function (items) { - return A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$spacing(15) - ]), - A2( - $elm$core$List$map, - function (_v5) { - var task = _v5.a; - var children = _v5.b; - return A2( - $mdgriffith$elm_ui$Element$paragraph, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$spacing(5) - ]), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [$mdgriffith$elm_ui$Element$alignTop]), - A2( - $elm$core$List$cons, - function () { - switch (task.$) { - case 'IncompleteTask': - return $mdgriffith$elm_ui$Element$Input$defaultCheckbox(false); - case 'CompletedTask': - return $mdgriffith$elm_ui$Element$Input$defaultCheckbox(true); - default: - return $mdgriffith$elm_ui$Element$text('•'); - } - }(), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$text(' '), - children))) - ])); - }, - items)); - } -}; -var $author$project$Pages$Internal$StaticHttpBody$EmptyBody = {$: 'EmptyBody'}; -var $author$project$Pages$StaticHttp$emptyBody = $author$project$Pages$Internal$StaticHttpBody$EmptyBody; -var $author$project$Secrets$Value = function (a) { - return {$: 'Value', a: a}; -}; -var $author$project$Secrets$map = F2( - function (mapFunction, _v0) { - var lookupSecrets = _v0.a; - return $author$project$Secrets$Value( - function (secrets) { - return A2( - $elm$core$Result$map, - mapFunction, - lookupSecrets(secrets)); - }); - }); -var $author$project$Pages$StaticHttp$ExpectJson = function (a) { - return {$: 'ExpectJson', a: a}; -}; -var $author$project$Pages$StaticHttpRequest$DecoderError = function (a) { - return {$: 'DecoderError', a: a}; -}; -var $author$project$Pages$StaticHttpRequest$MissingHttpResponse = function (a) { - return {$: 'MissingHttpResponse', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$BadJson = {$: 'BadJson'}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Errors = function (a) { - return {$: 'Errors', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Success = function (a) { - return {$: 'Success', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$WithWarnings = F2( - function (a, b) { - return {$: 'WithWarnings', a: a, b: b}; - }); -var $elm$json$Json$Decode$lazy = function (thunk) { - return A2( - $elm$json$Json$Decode$andThen, - thunk, - $elm$json$Json$Decode$succeed(_Utils_Tuple0)); -}; -var $elm$json$Json$Decode$null = _Json_decodeNull; -var $elm$json$Json$Decode$oneOf = _Json_oneOf; -function $zwilias$json_decode_exploration$Json$Decode$Exploration$cyclic$annotatedDecoder() { - return $elm$json$Json$Decode$oneOf( - _List_fromArray( - [ - A2( - $elm$json$Json$Decode$map, - $zwilias$json_decode_exploration$Json$Decode$Exploration$String(false), - $elm$json$Json$Decode$string), - A2( - $elm$json$Json$Decode$map, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Number(false), - $elm$json$Json$Decode$float), - A2( - $elm$json$Json$Decode$map, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Bool(false), - $elm$json$Json$Decode$bool), - $elm$json$Json$Decode$null( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Null(false)), - A2( - $elm$json$Json$Decode$map, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Array(false), - $elm$json$Json$Decode$list( - A2( - $elm$json$Json$Decode$map, - $elm$core$Tuple$pair(false), - $elm$json$Json$Decode$lazy( - function (_v0) { - return $zwilias$json_decode_exploration$Json$Decode$Exploration$cyclic$annotatedDecoder(); - })))), - A2( - $elm$json$Json$Decode$map, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Object(false), - A2( - $elm$json$Json$Decode$map, - $elm$core$List$map( - function (_v1) { - var k = _v1.a; - var v = _v1.b; - return _Utils_Tuple3(false, k, v); - }), - $elm$json$Json$Decode$keyValuePairs( - $elm$json$Json$Decode$lazy( - function (_v2) { - return $zwilias$json_decode_exploration$Json$Decode$Exploration$cyclic$annotatedDecoder(); - })))) - ])); -} -try { - var $zwilias$json_decode_exploration$Json$Decode$Exploration$annotatedDecoder = $zwilias$json_decode_exploration$Json$Decode$Exploration$cyclic$annotatedDecoder(); - $zwilias$json_decode_exploration$Json$Decode$Exploration$cyclic$annotatedDecoder = function () { - return $zwilias$json_decode_exploration$Json$Decode$Exploration$annotatedDecoder; - }; -} catch ($) { - throw 'Some top-level definitions from `Json.Decode.Exploration` are causing infinite recursion:\n\n ┌─────┐\n │ annotatedDecoder\n └─────┘\n\nThese errors are very tricky, so read https://elm-lang.org/0.19.1/bad-recursion to learn how to fix it!';} -var $zwilias$json_decode_exploration$Json$Decode$Exploration$decode = $elm$json$Json$Decode$decodeValue($zwilias$json_decode_exploration$Json$Decode$Exploration$annotatedDecoder); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$AtIndex = F2( - function (a, b) { - return {$: 'AtIndex', a: a, b: b}; - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedField = function (a) { - return {$: 'UnusedField', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedIndex = function (a) { - return {$: 'UnusedIndex', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedValue = function (a) { - return {$: 'UnusedValue', a: a}; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$gatherWarnings = function (json) { - _v0$8: - while (true) { - switch (json.$) { - case 'String': - if (!json.a) { - return _List_fromArray( - [ - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedValue( - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(json))) - ]); - } else { - break _v0$8; - } - case 'Number': - if (!json.a) { - return _List_fromArray( - [ - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedValue( - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(json))) - ]); - } else { - break _v0$8; - } - case 'Bool': - if (!json.a) { - return _List_fromArray( - [ - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedValue( - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(json))) - ]); - } else { - break _v0$8; - } - case 'Null': - if (!json.a) { - return _List_fromArray( - [ - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedValue( - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(json))) - ]); - } else { - break _v0$8; - } - case 'Array': - if (!json.a) { - return _List_fromArray( - [ - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedValue( - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(json))) - ]); - } else { - var values = json.b; - return $elm$core$List$concat( - A2( - $elm$core$List$indexedMap, - F2( - function (idx, _v1) { - var used = _v1.a; - var val = _v1.b; - if (used) { - var _v2 = $zwilias$json_decode_exploration$Json$Decode$Exploration$gatherWarnings(val); - if (!_v2.b) { - return _List_Nil; - } else { - var x = _v2.a; - var xs = _v2.b; - return _List_fromArray( - [ - A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$AtIndex, - idx, - A2($mgold$elm_nonempty_list$List$Nonempty$Nonempty, x, xs)) - ]); - } - } else { - return _List_fromArray( - [ - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedIndex(idx)) - ]); - } - }), - values)); - } - default: - if (!json.a) { - return _List_fromArray( - [ - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedValue( - $zwilias$json_decode_exploration$Json$Decode$Exploration$encode(json))) - ]); - } else { - var kvPairs = json.b; - return A2( - $elm$core$List$concatMap, - function (_v3) { - var used = _v3.a; - var key = _v3.b; - var val = _v3.c; - if (used) { - var _v4 = $zwilias$json_decode_exploration$Json$Decode$Exploration$gatherWarnings(val); - if (!_v4.b) { - return _List_Nil; - } else { - var x = _v4.a; - var xs = _v4.b; - return _List_fromArray( - [ - A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$InField, - key, - A2($mgold$elm_nonempty_list$List$Nonempty$Nonempty, x, xs)) - ]); - } - } else { - return _List_fromArray( - [ - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - $zwilias$json_decode_exploration$Json$Decode$Exploration$UnusedField(key)) - ]); - } - }, - kvPairs); - } - } - } - return _List_Nil; -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$decodeValue = F2( - function (_v0, val) { - var decoderFn = _v0.a; - var _v1 = $zwilias$json_decode_exploration$Json$Decode$Exploration$decode(val); - if (_v1.$ === 'Err') { - return $zwilias$json_decode_exploration$Json$Decode$Exploration$BadJson; - } else { - var json = _v1.a; - var _v2 = decoderFn(json); - if (_v2.b.$ === 'Err') { - var errors = _v2.b.a; - return $zwilias$json_decode_exploration$Json$Decode$Exploration$Errors(errors); - } else { - var annVal = _v2.a; - var acc = _v2.b.a; - var _v3 = _Utils_ap( - acc.warnings, - $zwilias$json_decode_exploration$Json$Decode$Exploration$gatherWarnings(annVal)); - if (!_v3.b) { - return $zwilias$json_decode_exploration$Json$Decode$Exploration$Success(acc.value); - } else { - var x = _v3.a; - var xs = _v3.b; - return A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$WithWarnings, - A2($mgold$elm_nonempty_list$List$Nonempty$Nonempty, x, xs), - acc.value); - } - } - } - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$decodeString = F2( - function (decoder, jsonString) { - var _v0 = A2($elm$json$Json$Decode$decodeString, $elm$json$Json$Decode$value, jsonString); - if (_v0.$ === 'Err') { - return $zwilias$json_decode_exploration$Json$Decode$Exploration$BadJson; - } else { - var json = _v0.a; - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$decodeValue, decoder, json); - } - }); -var $author$project$OptimizedDecoder$errorToString = $elm$json$Json$Decode$errorToString; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$expectedTypeToString = function (expectedType) { - switch (expectedType.$) { - case 'TString': - return 'a string'; - case 'TInt': - return 'an integer number'; - case 'TNumber': - return 'a number'; - case 'TNull': - return 'null'; - case 'TBool': - return 'a boolean'; - case 'TArray': - return 'an array'; - case 'TObject': - return 'an object'; - case 'TArrayIndex': - var idx = expectedType.a; - return 'an array with index ' + $elm$core$String$fromInt(idx); - default: - var aField = expectedType.a; - return 'an object with a field \'' + (aField + '\''); - } -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$indent = $elm$core$List$map( - $elm$core$Basics$append(' ')); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$intercalateMap = F3( - function (sep, toList, xs) { - return $elm$core$List$concat( - A2( - $elm$core$List$intersperse, - _List_fromArray( - [sep]), - A2($elm$core$List$map, toList, xs))); - }); -var $elm$core$String$lines = _String_lines; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$jsonLines = A2( - $elm$core$Basics$composeR, - $elm$json$Json$Encode$encode(2), - $elm$core$String$lines); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$flatten = function (located) { - switch (located.$) { - case 'Here': - var v = located.a; - return _List_fromArray( - [ - _Utils_Tuple2( - '', - _List_fromArray( - [v])) - ]); - case 'InField': - var s = located.a; - var vals = located.b; - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Located$gather, '/' + s, vals); - default: - var i = located.a; - var vals = located.b; - return A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$gather, - '/' + $elm$core$String$fromInt(i), - vals); - } -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$gather = F2( - function (prefix, _v0) { - var first = _v0.a; - var rest = _v0.b; - return A2( - $elm$core$List$map, - $elm$core$Tuple$mapFirst( - $elm$core$Basics$append(prefix)), - A2( - $elm$core$List$concatMap, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$flatten, - A2($elm$core$List$cons, first, rest))); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$intercalate = F2( - function (sep, lists) { - return $elm$core$List$concat( - A2( - $elm$core$List$intersperse, - _List_fromArray( - [sep]), - lists)); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$indent = $elm$core$Basics$append(' '); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$render = F3( - function (itemToString, path, errors) { - var formattedErrors = A2( - $elm$core$List$map, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$indent, - A2($elm$core$List$concatMap, itemToString, errors)); - return $elm$core$String$isEmpty(path) ? formattedErrors : A2( - $elm$core$List$cons, - 'At path ' + path, - A2($elm$core$List$cons, '', formattedErrors)); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$toString = F2( - function (itemToString, locatedItems) { - return A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$intercalate, - '', - A2( - $elm$core$List$map, - function (_v0) { - var x = _v0.a; - var vals = _v0.b; - return A3($zwilias$json_decode_exploration$Json$Decode$Exploration$Located$render, itemToString, x, vals); - }, - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Located$gather, '', locatedItems))); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$errorToString = function (error) { - switch (error.$) { - case 'Failure': - var failure = error.a; - var json = error.b; - if (json.$ === 'Just') { - var val = json.a; - return A2( - $elm$core$List$cons, - failure, - A2( - $elm$core$List$cons, - '', - $zwilias$json_decode_exploration$Json$Decode$Exploration$indent( - $zwilias$json_decode_exploration$Json$Decode$Exploration$jsonLines(val)))); - } else { - return _List_fromArray( - [failure]); - } - case 'Expected': - var expectedType = error.a; - var actualValue = error.b; - return A2( - $elm$core$List$cons, - 'I expected ' + ($zwilias$json_decode_exploration$Json$Decode$Exploration$expectedTypeToString(expectedType) + ' here, but instead found this value:'), - A2( - $elm$core$List$cons, - '', - $zwilias$json_decode_exploration$Json$Decode$Exploration$indent( - $zwilias$json_decode_exploration$Json$Decode$Exploration$jsonLines(actualValue)))); - default: - var errors = error.a; - if (!errors.b) { - return _List_fromArray( - ['I encountered a `oneOf` without any options.']); - } else { - return A2( - $elm$core$List$cons, - 'I encountered multiple issues:', - A2( - $elm$core$List$cons, - '', - A3($zwilias$json_decode_exploration$Json$Decode$Exploration$intercalateMap, '', $zwilias$json_decode_exploration$Json$Decode$Exploration$errorsToStrings, errors))); - } - } -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$errorsToStrings = function (errors) { - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Located$toString, $zwilias$json_decode_exploration$Json$Decode$Exploration$errorToString, errors); -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$errorsToString = function (errors) { - return A2( - $elm$core$String$join, - '\n', - A2( - $elm$core$List$map, - $elm$core$String$trimRight, - A2( - $elm$core$List$cons, - 'I encountered some errors while decoding this JSON:', - A2( - $elm$core$List$cons, - '', - $zwilias$json_decode_exploration$Json$Decode$Exploration$errorsToStrings(errors))))); -}; -var $author$project$RequestsAndPending$get = F2( - function (key, requestsAndPending) { - return A2( - $elm$core$Maybe$andThen, - $elm$core$Basics$identity, - A2($elm$core$Dict$get, key, requestsAndPending)); - }); -var $author$project$Pages$Internal$StaticHttpBody$encodeWithType = F2( - function (typeName, otherFields) { - return $elm$json$Json$Encode$object( - A2( - $elm$core$List$cons, - _Utils_Tuple2( - 'type', - $elm$json$Json$Encode$string(typeName)), - otherFields)); - }); -var $author$project$Pages$Internal$StaticHttpBody$encode = function (body) { - switch (body.$) { - case 'EmptyBody': - return A2($author$project$Pages$Internal$StaticHttpBody$encodeWithType, 'empty', _List_Nil); - case 'StringBody': - var content = body.b; - return A2( - $author$project$Pages$Internal$StaticHttpBody$encodeWithType, - 'string', - _List_fromArray( - [ - _Utils_Tuple2( - 'content', - $elm$json$Json$Encode$string(content)) - ])); - default: - var content = body.a; - return A2( - $author$project$Pages$Internal$StaticHttpBody$encodeWithType, - 'json', - _List_fromArray( - [ - _Utils_Tuple2('content', content) - ])); - } -}; -var $author$project$Pages$StaticHttp$Request$hashHeader = function (_v0) { - var name = _v0.a; - var value = _v0.b; - return $elm$json$Json$Encode$string(name + (': ' + value)); -}; -var $author$project$Pages$StaticHttp$Request$hash = function (requestDetails) { - return A2( - $elm$json$Json$Encode$encode, - 0, - $elm$json$Json$Encode$object( - _List_fromArray( - [ - _Utils_Tuple2( - 'method', - $elm$json$Json$Encode$string(requestDetails.method)), - _Utils_Tuple2( - 'url', - $elm$json$Json$Encode$string(requestDetails.url)), - _Utils_Tuple2( - 'headers', - A2($elm$json$Json$Encode$list, $author$project$Pages$StaticHttp$Request$hashHeader, requestDetails.headers)), - _Utils_Tuple2( - 'body', - $author$project$Pages$Internal$StaticHttpBody$encode(requestDetails.body)) - ]))); -}; -var $author$project$SecretsDict$Masked = {$: 'Masked'}; -var $author$project$SecretsDict$masked = $author$project$SecretsDict$Masked; -var $author$project$Secrets$maskedLookup = function (_v0) { - maskedLookup: - while (true) { - var lookupSecrets = _v0.a; - var _v1 = lookupSecrets($author$project$SecretsDict$masked); - if (_v1.$ === 'Ok') { - var value = _v1.a; - return value; - } else { - var $temp$_v0 = $author$project$Secrets$Value(lookupSecrets); - _v0 = $temp$_v0; - continue maskedLookup; - } - } -}; -var $author$project$Pages$StaticHttp$requestToString = function (requestDetails) { - return requestDetails.url; -}; -var $elm$core$Dict$singleton = F2( - function (key, value) { - return A5($elm$core$Dict$RBNode_elm_builtin, $elm$core$Dict$Black, key, value, $elm$core$Dict$RBEmpty_elm_builtin, $elm$core$Dict$RBEmpty_elm_builtin); - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$minifyArray = function (entries) { - return A2( - $elm$json$Json$Encode$list, - $elm$core$Basics$identity, - A2( - $elm$core$List$filterMap, - function (_v2) { - var used = _v2.a; - var entry = _v2.b; - return used ? $elm$core$Maybe$Just( - $zwilias$json_decode_exploration$Json$Decode$Exploration$stripAnnotatedValue(entry)) : $elm$core$Maybe$Nothing; - }, - entries)); -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$minifyObject = function (entries) { - return $elm$json$Json$Encode$object( - A2( - $elm$core$List$filterMap, - function (_v1) { - var used = _v1.a; - var f = _v1.b; - var entry = _v1.c; - return used ? $elm$core$Maybe$Just( - _Utils_Tuple2( - f, - $zwilias$json_decode_exploration$Json$Decode$Exploration$stripAnnotatedValue(entry))) : $elm$core$Maybe$Nothing; - }, - entries)); -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$stripAnnotatedValue = function (annVal) { - switch (annVal.$) { - case 'String': - if (annVal.a) { - var v = annVal.b; - return $elm$json$Json$Encode$string(v); - } else { - return $elm$json$Json$Encode$string(''); - } - case 'Number': - if (annVal.a) { - var v = annVal.b; - return $elm$json$Json$Encode$float(v); - } else { - return $elm$json$Json$Encode$float(0); - } - case 'Bool': - var v = annVal.b; - return $elm$json$Json$Encode$bool(v); - case 'Null': - return $elm$json$Json$Encode$null; - case 'Array': - if (annVal.a) { - var entries = annVal.b; - return $zwilias$json_decode_exploration$Json$Decode$Exploration$minifyArray(entries); - } else { - return A2($elm$json$Json$Encode$list, $elm$core$Basics$identity, _List_Nil); - } - default: - if (annVal.a) { - var entries = annVal.b; - return $zwilias$json_decode_exploration$Json$Decode$Exploration$minifyObject(entries); - } else { - return $elm$json$Json$Encode$object(_List_Nil); - } - } -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$stripValue = F2( - function (_v0, val) { - var decoderFn = _v0.a; - var _v1 = $zwilias$json_decode_exploration$Json$Decode$Exploration$decode(val); - if (_v1.$ === 'Err') { - return $elm$core$Result$Err( - A2( - $mgold$elm_nonempty_list$List$Nonempty$Nonempty, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Failure, 'Bad json', $elm$core$Maybe$Nothing)), - _List_Nil)); - } else { - var json = _v1.a; - var _v2 = decoderFn(json); - if (_v2.b.$ === 'Ok') { - var annVal = _v2.a; - return $elm$core$Result$Ok( - $zwilias$json_decode_exploration$Json$Decode$Exploration$stripAnnotatedValue(annVal)); - } else { - var e = _v2.b.a; - return $elm$core$Result$Err(e); - } - } - }); -var $zwilias$json_decode_exploration$Json$Decode$Exploration$stripString = F2( - function (decoder, jsonString) { - var _v0 = A2($elm$json$Json$Decode$decodeString, $elm$json$Json$Decode$value, jsonString); - if (_v0.$ === 'Err') { - return $elm$core$Result$Err( - A2( - $mgold$elm_nonempty_list$List$Nonempty$Nonempty, - $zwilias$json_decode_exploration$Json$Decode$Exploration$Located$Here( - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$Failure, 'Bad json', $elm$core$Maybe$Nothing)), - _List_Nil)); - } else { - var v = _v0.a; - return A2( - $elm$core$Result$map, - $elm$json$Json$Encode$encode(0), - A2($zwilias$json_decode_exploration$Json$Decode$Exploration$stripValue, decoder, v)); - } - }); -var $author$project$Pages$StaticHttp$unoptimizedRequest = F2( - function (requestWithSecrets, expect) { - switch (expect.$) { - case 'ExpectJson': - var decoder = expect.a; - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - _List_fromArray( - [requestWithSecrets]), - F2( - function (appType, rawResponseDict) { - if (appType.$ === 'Cli') { - return A2( - $elm$core$Result$andThen, - function (_v3) { - var strippedResponses = _v3.a; - var rawResponse = _v3.b; - var reduced = A2( - $elm$core$Result$withDefault, - 'TODO', - A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$stripString, - $author$project$Internal$OptimizedDecoder$jde(decoder), - rawResponse)); - return A2( - $elm$core$Result$map, - function (finalRequest) { - return _Utils_Tuple2( - A3( - $elm$core$Dict$insert, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - reduced, - strippedResponses), - finalRequest); - }, - A2( - $elm$core$Result$map, - $author$project$Pages$StaticHttpRequest$Done, - function (decodeResult) { - switch (decodeResult.$) { - case 'BadJson': - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$DecoderError('Payload sent back invalid JSON')); - case 'Errors': - var errors = decodeResult.a; - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$DecoderError( - $zwilias$json_decode_exploration$Json$Decode$Exploration$errorsToString(errors))); - case 'WithWarnings': - var a = decodeResult.b; - return $elm$core$Result$Ok(a); - default: - var a = decodeResult.a; - return $elm$core$Result$Ok(a); - } - }( - A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$decodeString, - $author$project$Internal$OptimizedDecoder$jde(decoder), - rawResponse)))); - }, - function (maybeResponse) { - if (maybeResponse.$ === 'Just') { - var rawResponse = maybeResponse.a; - return $elm$core$Result$Ok( - _Utils_Tuple2( - A2( - $elm$core$Dict$singleton, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponse), - rawResponse)); - } else { - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$MissingHttpResponse( - $author$project$Pages$StaticHttp$requestToString( - $author$project$Secrets$maskedLookup(requestWithSecrets)))); - } - }( - A2( - $author$project$RequestsAndPending$get, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponseDict))); - } else { - return A2( - $elm$core$Result$andThen, - function (_v6) { - var strippedResponses = _v6.a; - var rawResponse = _v6.b; - return A2( - $elm$core$Result$map, - function (finalRequest) { - return _Utils_Tuple2(strippedResponses, finalRequest); - }, - A2( - $elm$core$Result$map, - $author$project$Pages$StaticHttpRequest$Done, - function (decodeResult) { - if (decodeResult.$ === 'Err') { - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$DecoderError('Payload sent back invalid JSON')); - } else { - var a = decodeResult.a; - return $elm$core$Result$Ok(a); - } - }( - A2( - $elm$json$Json$Decode$decodeString, - $author$project$Internal$OptimizedDecoder$jd(decoder), - rawResponse)))); - }, - function (maybeResponse) { - if (maybeResponse.$ === 'Just') { - var rawResponse = maybeResponse.a; - return $elm$core$Result$Ok( - _Utils_Tuple2( - A2( - $elm$core$Dict$singleton, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponse), - rawResponse)); - } else { - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$MissingHttpResponse( - $author$project$Pages$StaticHttp$requestToString( - $author$project$Secrets$maskedLookup(requestWithSecrets)))); - } - }( - A2( - $author$project$RequestsAndPending$get, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponseDict))); - } - }))); - case 'ExpectUnoptimizedJson': - var decoder = expect.a; - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - _List_fromArray( - [requestWithSecrets]), - F2( - function (_v8, rawResponseDict) { - return A2( - $elm$core$Result$andThen, - function (_v10) { - var strippedResponses = _v10.a; - var rawResponse = _v10.b; - return A2( - $elm$core$Result$map, - function (finalRequest) { - return _Utils_Tuple2( - A3( - $elm$core$Dict$insert, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponse, - strippedResponses), - finalRequest); - }, - A2( - $elm$core$Result$map, - $author$project$Pages$StaticHttpRequest$Done, - function (decodeResult) { - if (decodeResult.$ === 'Err') { - var error = decodeResult.a; - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$DecoderError( - $author$project$OptimizedDecoder$errorToString(error))); - } else { - var a = decodeResult.a; - return $elm$core$Result$Ok(a); - } - }( - A2($elm$json$Json$Decode$decodeString, decoder, rawResponse)))); - }, - function (maybeResponse) { - if (maybeResponse.$ === 'Just') { - var rawResponse = maybeResponse.a; - return $elm$core$Result$Ok( - _Utils_Tuple2( - A2( - $elm$core$Dict$singleton, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponse), - rawResponse)); - } else { - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$MissingHttpResponse( - $author$project$Pages$StaticHttp$requestToString( - $author$project$Secrets$maskedLookup(requestWithSecrets)))); - } - }( - A2( - $author$project$RequestsAndPending$get, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponseDict))); - }))); - default: - var mapStringFn = expect.a; - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - _List_fromArray( - [requestWithSecrets]), - F2( - function (_v12, rawResponseDict) { - return A2( - $elm$core$Result$andThen, - function (_v14) { - var strippedResponses = _v14.a; - var rawResponse = _v14.b; - return A2( - $elm$core$Result$map, - function (finalRequest) { - return _Utils_Tuple2( - A3( - $elm$core$Dict$insert, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponse, - strippedResponses), - finalRequest); - }, - A2( - $elm$core$Result$map, - $author$project$Pages$StaticHttpRequest$Done, - A2( - $elm$core$Result$mapError, - $author$project$Pages$StaticHttpRequest$DecoderError, - mapStringFn(rawResponse)))); - }, - function (maybeResponse) { - if (maybeResponse.$ === 'Just') { - var rawResponse = maybeResponse.a; - return $elm$core$Result$Ok( - _Utils_Tuple2( - A2( - $elm$core$Dict$singleton, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponse), - rawResponse)); - } else { - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$MissingHttpResponse( - $author$project$Pages$StaticHttp$requestToString( - $author$project$Secrets$maskedLookup(requestWithSecrets)))); - } - }( - A2( - $author$project$RequestsAndPending$get, - $author$project$Pages$StaticHttp$Request$hash( - $author$project$Secrets$maskedLookup(requestWithSecrets)), - rawResponseDict))); - }))); - } - }); -var $author$project$Pages$StaticHttp$request = F2( - function (urlWithSecrets, decoder) { - return A2( - $author$project$Pages$StaticHttp$unoptimizedRequest, - urlWithSecrets, - $author$project$Pages$StaticHttp$ExpectJson(decoder)); - }); -var $author$project$Pages$StaticHttp$get = F2( - function (url, decoder) { - return A2( - $author$project$Pages$StaticHttp$request, - A2( - $author$project$Secrets$map, - function (okUrl) { - return {body: $author$project$Pages$StaticHttp$emptyBody, headers: _List_Nil, method: 'GET', url: okUrl}; - }, - url), - decoder); - }); -var $author$project$Secrets$succeed = function (value) { - return $author$project$Secrets$Value( - function (_v0) { - return $elm$core$Result$Ok(value); - }); -}; -var $author$project$Pages$StaticFile$request = function (filePath) { - return $author$project$Pages$StaticHttp$get( - $author$project$Secrets$succeed('file://' + filePath)); -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$succeed = function (val) { - return $zwilias$json_decode_exploration$Json$Decode$Exploration$Decoder( - function (json) { - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$ok, json, val); - }); -}; -var $author$project$OptimizedDecoder$succeed = function (a) { - return A2( - $author$project$Internal$OptimizedDecoder$OptimizedDecoder, - $elm$json$Json$Decode$succeed(a), - $zwilias$json_decode_exploration$Json$Decode$Exploration$succeed(a)); -}; -var $author$project$Template$Slide$Number_$staticData = function (route) { - return A2( - $author$project$Pages$StaticFile$request, - 'slides.md', - A2( - $author$project$OptimizedDecoder$andThen, - function (rawBody) { - var _v0 = $dillonkearns$elm_markdown$Markdown$Parser$parse(rawBody); - if (_v0.$ === 'Ok') { - var okBlocks = _v0.a; - var _v1 = A2( - $dillonkearns$elm_markdown$Markdown$Renderer$render, - $author$project$MarkdownRenderer$renderer, - A2( - $author$project$Template$Slide$Number_$markdownIndexedByHeading, - A2( - $elm$core$Maybe$withDefault, - 1, - $elm$core$String$toInt(route.number)), - okBlocks)); - if (_v1.$ === 'Ok') { - var renderedBody = _v1.a; - return $author$project$OptimizedDecoder$succeed(renderedBody); - } else { - var error = _v1.a; - return $author$project$OptimizedDecoder$fail(error); - } - } else { - return $author$project$OptimizedDecoder$fail(''); - } - }, - $author$project$Pages$StaticFile$body)); -}; -var $author$project$Template$Slide$Number_$view = function (_static) { - return { - body: _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$padding(40) - ]), - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$text(_static.routeParams.number), - A2($mdgriffith$elm_ui$Element$column, _List_Nil, _static._static) - ])) - ]), - title: 'TODO title' - }; -}; -var $author$project$Template$WithStaticData = function (a) { - return {$: 'WithStaticData', a: a}; -}; -var $author$project$Template$withStaticData = function (_v0) { - var staticData = _v0.staticData; - var head = _v0.head; - var staticRoutes = _v0.staticRoutes; - return $author$project$Template$WithStaticData( - {head: head, staticData: staticData, staticRoutes: staticRoutes}); -}; -var $author$project$Template$Slide$Number_$template = A2( - $author$project$Template$buildNoState, - {view: $author$project$Template$Slide$Number_$view}, - $author$project$Template$withStaticData( - { - head: $author$project$Template$Slide$Number_$head, - staticData: $author$project$Template$Slide$Number_$staticData, - staticRoutes: $author$project$Pages$StaticHttp$succeed( - _List_fromArray( - [ - {number: '1'} - ])) - })); -var $author$project$TemplateModulesBeta$getStaticRoutes = A2( - $author$project$Pages$StaticHttp$map, - $elm$core$List$map($elm$core$Maybe$Just), - A2( - $author$project$Pages$StaticHttp$map, - $elm$core$List$concat, - $author$project$Pages$StaticHttp$combine( - _List_fromArray( - [ - $author$project$Pages$StaticHttp$succeed(_List_Nil), - A2( - $author$project$Pages$StaticHttp$map, - $elm$core$List$map($author$project$Route$Slide__Number_), - $author$project$Template$Slide$Number_$template.staticRoutes) - ])))); -var $author$project$TemplateModulesBeta$ModelSlide__Number_ = function (a) { - return {$: 'ModelSlide__Number_', a: a}; -}; -var $author$project$TemplateModulesBeta$MsgSlide__Number_ = function (a) { - return {$: 'MsgSlide__Number_', a: a}; -}; -var $author$project$TemplateModulesBeta$NotFound = {$: 'NotFound'}; -var $elm$core$Tuple$mapBoth = F3( - function (funcA, funcB, _v0) { - var x = _v0.a; - var y = _v0.b; - return _Utils_Tuple2( - funcA(x), - funcB(y)); - }); -var $author$project$Shared$OnPageChange = function (a) { - return {$: 'OnPageChange', a: a}; -}; -var $author$project$Shared$init = function (maybePagePath) { - return _Utils_Tuple2( - {counter: 0, showMobileMenu: false}, - $elm$core$Platform$Cmd$none); -}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$TInt = {$: 'TInt'}; -var $zwilias$json_decode_exploration$Json$Decode$Exploration$int = $zwilias$json_decode_exploration$Json$Decode$Exploration$Decoder( - function (json) { - if (json.$ === 'Number') { - var val = json.b; - return _Utils_eq( - $elm$core$Basics$round(val), - val) ? A2( - $zwilias$json_decode_exploration$Json$Decode$Exploration$ok, - $zwilias$json_decode_exploration$Json$Decode$Exploration$markUsed(json), - $elm$core$Basics$round(val)) : A2($zwilias$json_decode_exploration$Json$Decode$Exploration$expected, $zwilias$json_decode_exploration$Json$Decode$Exploration$TInt, json); - } else { - return A2($zwilias$json_decode_exploration$Json$Decode$Exploration$expected, $zwilias$json_decode_exploration$Json$Decode$Exploration$TInt, json); - } - }); -var $author$project$OptimizedDecoder$int = A2($author$project$Internal$OptimizedDecoder$OptimizedDecoder, $elm$json$Json$Decode$int, $zwilias$json_decode_exploration$Json$Decode$Exploration$int); -var $author$project$Shared$staticData = A2( - $author$project$Pages$StaticHttp$get, - $author$project$Secrets$succeed('https://api.github.com/repos/dillonkearns/elm-pages'), - A2($author$project$OptimizedDecoder$field, 'stargazers_count', $author$project$OptimizedDecoder$int)); -var $author$project$Shared$subscriptions = F2( - function (_v0, _v1) { - return $elm$core$Platform$Sub$none; - }); -var $author$project$Shared$update = F2( - function (msg, model) { - switch (msg.$) { - case 'OnPageChange': - return _Utils_Tuple2( - _Utils_update( - model, - {showMobileMenu: false}), - $elm$core$Platform$Cmd$none); - case 'ToggleMobileMenu': - return _Utils_Tuple2( - _Utils_update( - model, - {showMobileMenu: !model.showMobileMenu}), - $elm$core$Platform$Cmd$none); - case 'Increment': - return _Utils_Tuple2( - _Utils_update( - model, - {counter: model.counter + 1}), - $elm$core$Platform$Cmd$none); - default: - var globalMsg = msg.a; - return _Utils_Tuple2( - _Utils_update( - model, - {counter: model.counter + 1}), - $elm$core$Platform$Cmd$none); - } - }); -var $author$project$Shared$ToggleMobileMenu = {$: 'ToggleMobileMenu'}; -var $mdgriffith$elm_ui$Internal$Flag$bgGradient = $mdgriffith$elm_ui$Internal$Flag$flag(10); -var $mdgriffith$elm_ui$Element$Background$gradient = function (_v0) { - var angle = _v0.angle; - var steps = _v0.steps; - if (!steps.b) { - return $mdgriffith$elm_ui$Internal$Model$NoAttribute; - } else { - if (!steps.b.b) { - var clr = steps.a; - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$bgColor, - A3( - $mdgriffith$elm_ui$Internal$Model$Colored, - 'bg-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(clr), - 'background-color', - clr)); - } else { - return A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$bgGradient, - A3( - $mdgriffith$elm_ui$Internal$Model$Single, - 'bg-grad-' + A2( - $elm$core$String$join, - '-', - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$floatClass(angle), - A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$formatColorClass, steps))), - 'background-image', - 'linear-gradient(' + (A2( - $elm$core$String$join, - ', ', - A2( - $elm$core$List$cons, - $elm$core$String$fromFloat(angle) + 'rad', - A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$formatColor, steps))) + ')'))); - } - } -}; -var $mdgriffith$elm_ui$Element$link = F2( - function (attrs, _v0) { - var url = _v0.url; - var label = _v0.label; - return A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asEl, - $mdgriffith$elm_ui$Internal$Model$NodeName('a'), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$Attr( - $elm$html$Html$Attributes$href(url)), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$Attr( - $elm$html$Html$Attributes$rel('noopener noreferrer')), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink), - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.contentCenterX + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.contentCenterY + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.link)))), - attrs))))), - $mdgriffith$elm_ui$Internal$Model$Unkeyed( - _List_fromArray( - [label]))); - }); -var $elm$svg$Svg$defs = $elm$svg$Svg$trustedNode('defs'); -var $elm$svg$Svg$Attributes$fill = _VirtualDom_attribute('fill'); -var $author$project$DocumentSvg$fillColor = 'url(#grad1)'; -var $elm$svg$Svg$Attributes$id = _VirtualDom_attribute('id'); -var $elm$svg$Svg$linearGradient = $elm$svg$Svg$trustedNode('linearGradient'); -var $elm$svg$Svg$Attributes$offset = _VirtualDom_attribute('offset'); -var $elm$svg$Svg$stop = $elm$svg$Svg$trustedNode('stop'); -var $elm$svg$Svg$Attributes$style = _VirtualDom_attribute('style'); -var $avh4$elm_color$Color$toCssString = function (_v0) { - var r = _v0.a; - var g = _v0.b; - var b = _v0.c; - var a = _v0.d; - var roundTo = function (x) { - return $elm$core$Basics$round(x * 1000) / 1000; - }; - var pct = function (x) { - return $elm$core$Basics$round(x * 10000) / 100; - }; - return $elm$core$String$concat( - _List_fromArray( - [ - 'rgba(', - $elm$core$String$fromFloat( - pct(r)), - '%,', - $elm$core$String$fromFloat( - pct(g)), - '%,', - $elm$core$String$fromFloat( - pct(b)), - '%,', - $elm$core$String$fromFloat( - roundTo(a)), - ')' - ])); -}; -var $elm$svg$Svg$Attributes$x1 = _VirtualDom_attribute('x1'); -var $elm$svg$Svg$Attributes$x2 = _VirtualDom_attribute('x2'); -var $elm$svg$Svg$Attributes$y1 = _VirtualDom_attribute('y1'); -var $elm$svg$Svg$Attributes$y2 = _VirtualDom_attribute('y2'); -var $author$project$DocumentSvg$gradient = F2( - function (color1, color2) { - return A2( - $elm$svg$Svg$linearGradient, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('grad1'), - $elm$svg$Svg$Attributes$x1('0%'), - $elm$svg$Svg$Attributes$y1('0%'), - $elm$svg$Svg$Attributes$x2('100%'), - $elm$svg$Svg$Attributes$y2('0%') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$stop, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$offset('10%'), - $elm$svg$Svg$Attributes$style( - 'stop-color:' + ($avh4$elm_color$Color$toCssString(color1) + ';stop-opacity:1')) - ]), - _List_Nil), - A2( - $elm$svg$Svg$stop, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$offset('100%'), - $elm$svg$Svg$Attributes$style( - 'stop-color:' + ($avh4$elm_color$Color$toCssString(color2) + ';stop-opacity:1')) - ]), - _List_Nil) - ])); - }); -var $avh4$elm_color$Color$scaleFrom255 = function (c) { - return c / 255; -}; -var $avh4$elm_color$Color$rgb255 = F3( - function (r, g, b) { - return A4( - $avh4$elm_color$Color$RgbaSpace, - $avh4$elm_color$Color$scaleFrom255(r), - $avh4$elm_color$Color$scaleFrom255(g), - $avh4$elm_color$Color$scaleFrom255(b), - 1.0); - }); -var $author$project$DocumentSvg$fillGradient = A2( - $author$project$DocumentSvg$gradient, - A3($avh4$elm_color$Color$rgb255, 5, 117, 230), - A3($avh4$elm_color$Color$rgb255, 0, 242, 96)); -var $elm$svg$Svg$Attributes$fillOpacity = _VirtualDom_attribute('fill-opacity'); -var $elm$svg$Svg$g = $elm$svg$Svg$trustedNode('g'); -var $elm$svg$Svg$line = $elm$svg$Svg$trustedNode('line'); -var $elm$svg$Svg$metadata = $elm$svg$Svg$trustedNode('metadata'); -var $author$project$DocumentSvg$pageTextColor = 'black'; -var $author$project$DocumentSvg$strokeColor = 'black'; -var $elm$svg$Svg$Attributes$strokeLinejoin = _VirtualDom_attribute('stroke-linejoin'); -var $elm$svg$Svg$Attributes$strokeOpacity = _VirtualDom_attribute('stroke-opacity'); -var $elm$svg$Svg$Attributes$version = _VirtualDom_attribute('version'); -var $author$project$DocumentSvg$view = A2( - $mdgriffith$elm_ui$Element$el, - _List_Nil, - $mdgriffith$elm_ui$Element$html( - A2( - $elm$svg$Svg$svg, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$version('1.1'), - $elm$svg$Svg$Attributes$viewBox('251.0485 144.52063 56.114286 74.5'), - $elm$svg$Svg$Attributes$width('56.114286'), - $elm$svg$Svg$Attributes$height('74.5'), - $elm$svg$Svg$Attributes$width('30px') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$defs, - _List_Nil, - _List_fromArray( - [$author$project$DocumentSvg$fillGradient])), - A2($elm$svg$Svg$metadata, _List_Nil, _List_Nil), - A2( - $elm$svg$Svg$g, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('Canvas_11'), - $elm$svg$Svg$Attributes$stroke('none'), - $elm$svg$Svg$Attributes$fill($author$project$DocumentSvg$fillColor), - $elm$svg$Svg$Attributes$strokeOpacity('1'), - $elm$svg$Svg$Attributes$fillOpacity('1'), - $elm$svg$Svg$Attributes$strokeDasharray('none') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$g, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('Canvas_11: Layer 1') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$g, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('Group_38') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$g, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('Graphic_32') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$path, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$d('M 252.5485 146.02063 L 252.5485 217.52063 L 305.66277 217.52063 L 305.66277 161.68254 L 290.00087 146.02063 Z'), - $elm$svg$Svg$Attributes$stroke($author$project$DocumentSvg$strokeColor), - $elm$svg$Svg$Attributes$strokeLinecap('round'), - $elm$svg$Svg$Attributes$strokeLinejoin('round'), - $elm$svg$Svg$Attributes$strokeWidth('3') - ]), - _List_Nil) - ])), - A2( - $elm$svg$Svg$g, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('Line_34') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$line, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$x1('266.07286'), - $elm$svg$Svg$Attributes$y1('182.8279'), - $elm$svg$Svg$Attributes$x2('290.75465'), - $elm$svg$Svg$Attributes$y2('183.00997'), - $elm$svg$Svg$Attributes$stroke($author$project$DocumentSvg$pageTextColor), - $elm$svg$Svg$Attributes$strokeLinecap('round'), - $elm$svg$Svg$Attributes$strokeLinejoin('round'), - $elm$svg$Svg$Attributes$strokeWidth('2') - ]), - _List_Nil) - ])), - A2( - $elm$svg$Svg$g, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('Line_35') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$line, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$x1('266.07286'), - $elm$svg$Svg$Attributes$y1('191.84156'), - $elm$svg$Svg$Attributes$x2('290.75465'), - $elm$svg$Svg$Attributes$y2('192.02363'), - $elm$svg$Svg$Attributes$stroke($author$project$DocumentSvg$pageTextColor), - $elm$svg$Svg$Attributes$strokeLinecap('round'), - $elm$svg$Svg$Attributes$strokeLinejoin('round'), - $elm$svg$Svg$Attributes$strokeWidth('2') - ]), - _List_Nil) - ])), - A2( - $elm$svg$Svg$g, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('Line_36') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$line, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$x1('266.07286'), - $elm$svg$Svg$Attributes$y1('200.85522'), - $elm$svg$Svg$Attributes$x2('290.75465'), - $elm$svg$Svg$Attributes$y2('201.0373'), - $elm$svg$Svg$Attributes$stroke($author$project$DocumentSvg$pageTextColor), - $elm$svg$Svg$Attributes$strokeLinecap('round'), - $elm$svg$Svg$Attributes$strokeLinejoin('round'), - $elm$svg$Svg$Attributes$strokeWidth('2') - ]), - _List_Nil) - ])), - A2( - $elm$svg$Svg$g, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$id('Line_37') - ]), - _List_fromArray( - [ - A2( - $elm$svg$Svg$line, - _List_fromArray( - [ - $elm$svg$Svg$Attributes$x1('266.07286'), - $elm$svg$Svg$Attributes$y1('164.80058'), - $elm$svg$Svg$Attributes$x2('278.3874'), - $elm$svg$Svg$Attributes$y2('164.94049'), - $elm$svg$Svg$Attributes$stroke($author$project$DocumentSvg$pageTextColor), - $elm$svg$Svg$Attributes$strokeLinecap('round'), - $elm$svg$Svg$Attributes$strokeLinejoin('round'), - $elm$svg$Svg$Attributes$strokeWidth('2') - ]), - _List_Nil) - ])) - ])) - ])) - ])) - ])))); -var $author$project$Shared$logoLink = A2( - $mdgriffith$elm_ui$Element$link, - _List_Nil, - { - label: A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$size(30), - $mdgriffith$elm_ui$Element$spacing(16), - $mdgriffith$elm_ui$Element$htmlAttribute( - $elm$html$Html$Attributes$class('navbar-title')) - ]), - _List_fromArray( - [ - $author$project$DocumentSvg$view, - $mdgriffith$elm_ui$Element$text('elm-pages') - ])), - url: '/' - }); -var $author$project$Shared$elmDocsLink = A2( - $mdgriffith$elm_ui$Element$newTabLink, - _List_Nil, - { - label: A2( - $mdgriffith$elm_ui$Element$image, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width( - $mdgriffith$elm_ui$Element$px(22)), - $mdgriffith$elm_ui$Element$Font$color($author$project$Palette$color.primary) - ]), - {description: 'Elm Package Docs', src: '/images/elm-logo.svg'}), - url: 'https://package.elm-lang.org/packages/dillonkearns/elm-pages/latest/' - }); -var $author$project$Shared$githubRepoLink = function (starCount) { - return A2( - $mdgriffith$elm_ui$Element$newTabLink, - _List_Nil, - { - label: A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$spacing(5) - ]), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Element$image, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width( - $mdgriffith$elm_ui$Element$px(22)), - $mdgriffith$elm_ui$Element$Font$color($author$project$Palette$color.primary) - ]), - {description: 'Github repo', src: '/images/github.svg'}), - $mdgriffith$elm_ui$Element$text( - $elm$core$String$fromInt(starCount)) - ])), - url: 'https://github.com/dillonkearns/elm-pages' - }); -}; -var $author$project$Pages$PagePath$toPath = function (path) { - if (path.$ === 'Internal') { - var rawPath = path.a; - return rawPath; - } else { - return _List_Nil; - } -}; -var $mdgriffith$elm_ui$Element$Font$underline = $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.underline); -var $author$project$Shared$highlightableLink = F3( - function (currentPath, linkDirectory, displayName) { - var isHighlighted = _Utils_eq( - $author$project$Pages$PagePath$toPath(currentPath), - linkDirectory) || _Utils_eq( - $elm$core$List$reverse( - A2( - $elm$core$List$drop, - 1, - $elm$core$List$reverse( - $author$project$Pages$PagePath$toPath(currentPath)))), - linkDirectory); - return A2( - $mdgriffith$elm_ui$Element$link, - isHighlighted ? _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$underline, - $mdgriffith$elm_ui$Element$Font$color($author$project$Palette$color.primary) - ]) : _List_Nil, - { - label: $mdgriffith$elm_ui$Element$text(displayName), - url: A2($elm$core$String$join, '/', linkDirectory) - }); - }); -var $author$project$Shared$navbarLinks = F2( - function (stars, currentPath) { - return _List_fromArray( - [ - $author$project$Shared$elmDocsLink, - $author$project$Shared$githubRepoLink(stars), - A3( - $author$project$Shared$highlightableLink, - currentPath, - _List_fromArray( - ['docs']), - 'Docs'), - A3( - $author$project$Shared$highlightableLink, - currentPath, - _List_fromArray( - ['showcase']), - 'Showcase'), - A3( - $author$project$Shared$highlightableLink, - currentPath, - _List_fromArray( - ['blog']), - 'Blog') - ]); - }); -var $mdgriffith$elm_ui$Internal$Model$Navigation = {$: 'Navigation'}; -var $mdgriffith$elm_ui$Element$Region$navigation = $mdgriffith$elm_ui$Internal$Model$Describe($mdgriffith$elm_ui$Internal$Model$Navigation); -var $mdgriffith$elm_ui$Internal$Model$Right = {$: 'Right'}; -var $mdgriffith$elm_ui$Element$alignRight = $mdgriffith$elm_ui$Internal$Model$AlignX($mdgriffith$elm_ui$Internal$Model$Right); -var $elm$html$Html$i = _VirtualDom_node('i'); -var $author$project$FontAwesome$icon = function (classString) { - return $mdgriffith$elm_ui$Element$html( - A2( - $elm$html$Html$i, - _List_fromArray( - [ - $elm$html$Html$Attributes$class(classString) - ]), - _List_Nil)); -}; -var $author$project$Shared$logoLinkMobile = A2( - $mdgriffith$elm_ui$Element$link, - _List_Nil, - { - label: A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$size(30), - $mdgriffith$elm_ui$Element$spacing(16), - $mdgriffith$elm_ui$Element$htmlAttribute( - $elm$html$Html$Attributes$class('navbar-title')) - ]), - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$text('elm-pages') - ])), - url: '/' - }); -var $mdgriffith$elm_ui$Element$Events$onClick = A2($elm$core$Basics$composeL, $mdgriffith$elm_ui$Internal$Model$Attr, $elm$html$Html$Events$onClick); -var $mdgriffith$elm_ui$Element$spaceEvenly = A2($mdgriffith$elm_ui$Internal$Model$Class, $mdgriffith$elm_ui$Internal$Flag$spacing, $mdgriffith$elm_ui$Internal$Style$classes.spaceEvenly); -var $author$project$Shared$responsiveHeader = A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$spaceEvenly, - $mdgriffith$elm_ui$Element$htmlAttribute( - $elm$html$Html$Attributes$class('responsive-mobile')), - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$padding(20) - ]), - _List_fromArray( - [ - $author$project$Shared$logoLinkMobile, - A2( - $mdgriffith$elm_ui$Element$el, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$alignRight, - $mdgriffith$elm_ui$Element$Events$onClick($author$project$Shared$ToggleMobileMenu) - ]), - $author$project$FontAwesome$icon('fas fa-bars')) - ])); -var $author$project$Shared$header = F2( - function (stars, currentPath) { - return A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill) - ]), - _List_fromArray( - [ - $author$project$Shared$responsiveHeader, - A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$htmlAttribute( - $elm$html$Html$Attributes$class('responsive-desktop')) - ]), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Element$el, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$height( - $mdgriffith$elm_ui$Element$px(4)), - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$Background$gradient( - { - angle: 0.2, - steps: _List_fromArray( - [ - A3($mdgriffith$elm_ui$Element$rgb255, 0, 242, 96), - A3($mdgriffith$elm_ui$Element$rgb255, 5, 117, 230) - ]) - }) - ]), - $mdgriffith$elm_ui$Element$none), - A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Element$paddingXY, 25, 4), - $mdgriffith$elm_ui$Element$spaceEvenly, - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$Region$navigation, - $mdgriffith$elm_ui$Element$Border$widthEach( - {bottom: 1, left: 0, right: 0, top: 0}), - $mdgriffith$elm_ui$Element$Border$color( - A4($mdgriffith$elm_ui$Element$rgba255, 40, 80, 40, 0.4)) - ]), - _List_fromArray( - [ - $author$project$Shared$logoLink, - A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$spacing(15) - ]), - A2($author$project$Shared$navbarLinks, stars, currentPath)) - ])) - ])) - ])); - }); -var $mdgriffith$elm_ui$Internal$Model$OnlyDynamic = F2( - function (a, b) { - return {$: 'OnlyDynamic', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Model$StaticRootAndDynamic = F2( - function (a, b) { - return {$: 'StaticRootAndDynamic', a: a, b: b}; - }); -var $mdgriffith$elm_ui$Internal$Model$AllowHover = {$: 'AllowHover'}; -var $mdgriffith$elm_ui$Internal$Model$Layout = {$: 'Layout'}; -var $mdgriffith$elm_ui$Internal$Model$focusDefaultStyle = { - backgroundColor: $elm$core$Maybe$Nothing, - borderColor: $elm$core$Maybe$Nothing, - shadow: $elm$core$Maybe$Just( - { - blur: 0, - color: A4($mdgriffith$elm_ui$Internal$Model$Rgba, 155 / 255, 203 / 255, 1, 1), - offset: _Utils_Tuple2(0, 0), - size: 3 - }) -}; -var $mdgriffith$elm_ui$Internal$Model$optionsToRecord = function (options) { - var combine = F2( - function (opt, record) { - switch (opt.$) { - case 'HoverOption': - var hoverable = opt.a; - var _v4 = record.hover; - if (_v4.$ === 'Nothing') { - return _Utils_update( - record, - { - hover: $elm$core$Maybe$Just(hoverable) - }); - } else { - return record; - } - case 'FocusStyleOption': - var focusStyle = opt.a; - var _v5 = record.focus; - if (_v5.$ === 'Nothing') { - return _Utils_update( - record, - { - focus: $elm$core$Maybe$Just(focusStyle) - }); - } else { - return record; - } - default: - var renderMode = opt.a; - var _v6 = record.mode; - if (_v6.$ === 'Nothing') { - return _Utils_update( - record, - { - mode: $elm$core$Maybe$Just(renderMode) - }); - } else { - return record; - } - } - }); - var andFinally = function (record) { - return { - focus: function () { - var _v0 = record.focus; - if (_v0.$ === 'Nothing') { - return $mdgriffith$elm_ui$Internal$Model$focusDefaultStyle; - } else { - var focusable = _v0.a; - return focusable; - } - }(), - hover: function () { - var _v1 = record.hover; - if (_v1.$ === 'Nothing') { - return $mdgriffith$elm_ui$Internal$Model$AllowHover; - } else { - var hoverable = _v1.a; - return hoverable; - } - }(), - mode: function () { - var _v2 = record.mode; - if (_v2.$ === 'Nothing') { - return $mdgriffith$elm_ui$Internal$Model$Layout; - } else { - var actualMode = _v2.a; - return actualMode; - } - }() - }; - }; - return andFinally( - A3( - $elm$core$List$foldr, - combine, - {focus: $elm$core$Maybe$Nothing, hover: $elm$core$Maybe$Nothing, mode: $elm$core$Maybe$Nothing}, - options)); -}; -var $mdgriffith$elm_ui$Internal$Model$toHtml = F2( - function (mode, el) { - switch (el.$) { - case 'Unstyled': - var html = el.a; - return html($mdgriffith$elm_ui$Internal$Model$asEl); - case 'Styled': - var styles = el.a.styles; - var html = el.a.html; - return A2( - html, - mode(styles), - $mdgriffith$elm_ui$Internal$Model$asEl); - case 'Text': - var text = el.a; - return $mdgriffith$elm_ui$Internal$Model$textElement(text); - default: - return $mdgriffith$elm_ui$Internal$Model$textElement(''); - } - }); -var $mdgriffith$elm_ui$Internal$Model$renderRoot = F3( - function (optionList, attributes, child) { - var options = $mdgriffith$elm_ui$Internal$Model$optionsToRecord(optionList); - var embedStyle = function () { - var _v0 = options.mode; - if (_v0.$ === 'NoStaticStyleSheet') { - return $mdgriffith$elm_ui$Internal$Model$OnlyDynamic(options); - } else { - return $mdgriffith$elm_ui$Internal$Model$StaticRootAndDynamic(options); - } - }(); - return A2( - $mdgriffith$elm_ui$Internal$Model$toHtml, - embedStyle, - A4( - $mdgriffith$elm_ui$Internal$Model$element, - $mdgriffith$elm_ui$Internal$Model$asEl, - $mdgriffith$elm_ui$Internal$Model$div, - attributes, - $mdgriffith$elm_ui$Internal$Model$Unkeyed( - _List_fromArray( - [child])))); - }); -var $mdgriffith$elm_ui$Internal$Model$SansSerif = {$: 'SansSerif'}; -var $mdgriffith$elm_ui$Internal$Model$rootStyle = function () { - var families = _List_fromArray( - [ - $mdgriffith$elm_ui$Internal$Model$Typeface('Open Sans'), - $mdgriffith$elm_ui$Internal$Model$Typeface('Helvetica'), - $mdgriffith$elm_ui$Internal$Model$Typeface('Verdana'), - $mdgriffith$elm_ui$Internal$Model$SansSerif - ]); - return _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$bgColor, - A3( - $mdgriffith$elm_ui$Internal$Model$Colored, - 'bg-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass( - A4($mdgriffith$elm_ui$Internal$Model$Rgba, 1, 1, 1, 0)), - 'background-color', - A4($mdgriffith$elm_ui$Internal$Model$Rgba, 1, 1, 1, 0))), - A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$fontColor, - A3( - $mdgriffith$elm_ui$Internal$Model$Colored, - 'fc-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass( - A4($mdgriffith$elm_ui$Internal$Model$Rgba, 0, 0, 0, 1)), - 'color', - A4($mdgriffith$elm_ui$Internal$Model$Rgba, 0, 0, 0, 1))), - A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$fontSize, - $mdgriffith$elm_ui$Internal$Model$FontSize(20)), - A2( - $mdgriffith$elm_ui$Internal$Model$StyleClass, - $mdgriffith$elm_ui$Internal$Flag$fontFamily, - A2( - $mdgriffith$elm_ui$Internal$Model$FontFamily, - A3($elm$core$List$foldl, $mdgriffith$elm_ui$Internal$Model$renderFontClassName, 'font-', families), - families)) - ]); -}(); -var $mdgriffith$elm_ui$Element$layoutWith = F3( - function (_v0, attrs, child) { - var options = _v0.options; - return A3( - $mdgriffith$elm_ui$Internal$Model$renderRoot, - options, - A2( - $elm$core$List$cons, - $mdgriffith$elm_ui$Internal$Model$htmlClass( - A2( - $elm$core$String$join, - ' ', - _List_fromArray( - [$mdgriffith$elm_ui$Internal$Style$classes.root, $mdgriffith$elm_ui$Internal$Style$classes.any, $mdgriffith$elm_ui$Internal$Style$classes.single]))), - _Utils_ap($mdgriffith$elm_ui$Internal$Model$rootStyle, attrs)), - child); - }); -var $mdgriffith$elm_ui$Element$layout = $mdgriffith$elm_ui$Element$layoutWith( - {options: _List_Nil}); -var $mdgriffith$elm_ui$Internal$Model$map = F2( - function (fn, el) { - switch (el.$) { - case 'Styled': - var styled = el.a; - return $mdgriffith$elm_ui$Internal$Model$Styled( - { - html: F2( - function (add, context) { - return A2( - $elm$virtual_dom$VirtualDom$map, - fn, - A2(styled.html, add, context)); - }), - styles: styled.styles - }); - case 'Unstyled': - var html = el.a; - return $mdgriffith$elm_ui$Internal$Model$Unstyled( - A2( - $elm$core$Basics$composeL, - $elm$virtual_dom$VirtualDom$map(fn), - html)); - case 'Text': - var str = el.a; - return $mdgriffith$elm_ui$Internal$Model$Text(str); - default: - return $mdgriffith$elm_ui$Internal$Model$Empty; - } - }); -var $mdgriffith$elm_ui$Element$map = $mdgriffith$elm_ui$Internal$Model$map; -var $author$project$FontAwesome$styledIcon = F2( - function (classString, styles) { - return A2( - $mdgriffith$elm_ui$Element$el, - styles, - $mdgriffith$elm_ui$Element$html( - A2( - $elm$html$Html$i, - _List_fromArray( - [ - $elm$html$Html$Attributes$class(classString) - ]), - _List_Nil))); - }); -var $author$project$Shared$view = F5( - function (stars, page, model, toMsg, pageView) { - return { - body: A2( - $mdgriffith$elm_ui$Element$layout, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$Font$size(20), - $mdgriffith$elm_ui$Element$Font$family( - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Font$typeface('Roboto') - ])), - $mdgriffith$elm_ui$Element$Font$color( - A4($mdgriffith$elm_ui$Element$rgba255, 0, 0, 0, 0.8)) - ]), - model.showMobileMenu ? A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$padding(20) - ]), - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Element$row, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill), - $mdgriffith$elm_ui$Element$spaceEvenly - ]), - _List_fromArray( - [ - A2($mdgriffith$elm_ui$Element$map, toMsg, $author$project$Shared$logoLinkMobile), - A2( - $mdgriffith$elm_ui$Element$map, - toMsg, - A2( - $author$project$FontAwesome$styledIcon, - 'fas fa-bars', - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$Events$onClick($author$project$Shared$ToggleMobileMenu) - ]))) - ])), - A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$centerX, - $mdgriffith$elm_ui$Element$spacing(20) - ]), - A2($author$project$Shared$navbarLinks, stars, page.path)) - ])) : A2( - $mdgriffith$elm_ui$Element$column, - _List_fromArray( - [ - $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill) - ]), - $elm$core$List$concat( - _List_fromArray( - [ - _List_fromArray( - [ - A2( - $mdgriffith$elm_ui$Element$map, - toMsg, - A2($author$project$Shared$header, stars, page.path)) - ]), - pageView.body - ])))), - title: pageView.title - }; - }); -var $author$project$Shared$template = { - init: $author$project$Shared$init, - onPageChange: $elm$core$Maybe$Just($author$project$Shared$OnPageChange), - staticData: $author$project$Shared$staticData, - subscriptions: $author$project$Shared$subscriptions, - update: $author$project$Shared$update, - view: $author$project$Shared$view -}; -var $author$project$TemplateModulesBeta$init = F2( - function (currentGlobalModel, maybePagePath) { - var _v0 = function () { - var _v1 = A2( - $elm$core$Maybe$andThen, - function ($) { - return $.metadata; - }, - maybePagePath); - if (_v1.$ === 'Nothing') { - return _Utils_Tuple2($author$project$TemplateModulesBeta$NotFound, $elm$core$Platform$Cmd$none); - } else { - var routeParams = _v1.a.a; - return A3( - $elm$core$Tuple$mapBoth, - $author$project$TemplateModulesBeta$ModelSlide__Number_, - $elm$core$Platform$Cmd$map($author$project$TemplateModulesBeta$MsgSlide__Number_), - $author$project$Template$Slide$Number_$template.init(routeParams)); - } - }(); - var templateModel = _v0.a; - var templateCmd = _v0.b; - var _v2 = A2( - $elm$core$Maybe$withDefault, - $author$project$Shared$template.init(maybePagePath), - A2( - $elm$core$Maybe$map, - function (m) { - return _Utils_Tuple2(m, $elm$core$Platform$Cmd$none); - }, - currentGlobalModel)); - var sharedModel = _v2.a; - var globalCmd = _v2.b; - return _Utils_Tuple2( - {current: maybePagePath, global: sharedModel, page: templateModel}, - $elm$core$Platform$Cmd$batch( - _List_fromArray( - [ - templateCmd, - A2($elm$core$Platform$Cmd$map, $author$project$TemplateModulesBeta$MsgGlobal, globalCmd) - ]))); - }); -var $elm$core$String$padLeft = F3( - function (n, _char, string) { - return _Utils_ap( - A2( - $elm$core$String$repeat, - n - $elm$core$String$length(string), - $elm$core$String$fromChar(_char)), - string); - }); -var $noahzgordon$elm_color_extra$Color$Convert$toRadix = function (n) { - var getChr = function (c) { - return (c < 10) ? $elm$core$String$fromInt(c) : $elm$core$String$fromChar( - $elm$core$Char$fromCode(87 + c)); - }; - return (n < 16) ? getChr(n) : _Utils_ap( - $noahzgordon$elm_color_extra$Color$Convert$toRadix((n / 16) | 0), - getChr( - A2($elm$core$Basics$modBy, 16, n))); -}; -var $noahzgordon$elm_color_extra$Color$Convert$toHex = A2( - $elm$core$Basics$composeR, - $noahzgordon$elm_color_extra$Color$Convert$toRadix, - A2( - $elm$core$String$padLeft, - 2, - _Utils_chr('0'))); -var $avh4$elm_color$Color$toRgba = function (_v0) { - var r = _v0.a; - var g = _v0.b; - var b = _v0.c; - var a = _v0.d; - return {alpha: a, blue: b, green: g, red: r}; -}; -var $noahzgordon$elm_color_extra$Color$Convert$colorToHex = function (cl) { - var _v0 = $avh4$elm_color$Color$toRgba(cl); - var red = _v0.red; - var green = _v0.green; - var blue = _v0.blue; - return A2( - $elm$core$String$join, - '', - A2( - $elm$core$List$cons, - '#', - A2( - $elm$core$List$map, - A2($elm$core$Basics$composeR, $elm$core$Basics$round, $noahzgordon$elm_color_extra$Color$Convert$toHex), - _List_fromArray( - [red * 255, green * 255, blue * 255])))); -}; -var $author$project$Pages$Manifest$displayModeToAttribute = function (displayMode) { - switch (displayMode.$) { - case 'Fullscreen': - return 'fullscreen'; - case 'Standalone': - return 'standalone'; - case 'MinimalUi': - return 'minimal-ui'; - default: - return 'browser'; - } -}; -var $author$project$Pages$Manifest$encodeMaybeObject = function (list) { - return $elm$json$Json$Encode$object( - A2( - $elm$core$List$filterMap, - function (_v0) { - var key = _v0.a; - var maybeValue = _v0.b; - if (maybeValue.$ === 'Just') { - var value = maybeValue.a; - return $elm$core$Maybe$Just( - _Utils_Tuple2(key, value)); - } else { - return $elm$core$Maybe$Nothing; - } - }, - list)); -}; -var $author$project$Pages$Manifest$nonEmptyList = function (list) { - return $elm$core$List$isEmpty(list) ? $elm$core$Maybe$Nothing : $elm$core$Maybe$Just(list); -}; -var $author$project$Pages$Manifest$purposeToString = function (purpose) { - switch (purpose.$) { - case 'IconPurposeMonochrome': - return 'monochrome'; - case 'IconPurposeMaskable': - return 'maskable'; - default: - return 'any'; - } -}; -var $author$project$Pages$Manifest$purposesString = function (purposes) { - return A2( - $elm$core$String$join, - ' ', - A2($elm$core$List$map, $author$project$Pages$Manifest$purposeToString, purposes)); -}; -var $author$project$Pages$Manifest$sizesString = function (sizes) { - return A2( - $elm$core$String$join, - ' ', - A2( - $elm$core$List$map, - function (_v0) { - var x = _v0.a; - var y = _v0.b; - return $elm$core$String$fromInt(x) + ('x' + $elm$core$String$fromInt(y)); - }, - sizes)); -}; -var $author$project$Path$join = F2( - function (base, path) { - return A2($author$project$Pages$Internal$String$chopEnd, '/', base) + ('/' + A2($author$project$Pages$Internal$String$chopStart, '/', path)); - }); -var $author$project$Pages$ImagePath$toAbsoluteUrl = F2( - function (canonicalSiteUrl, path) { - if (path.$ === 'Internal') { - var rawPath = path.a; - return A2( - $author$project$Path$join, - canonicalSiteUrl, - A2($elm$core$String$join, '/', rawPath)); - } else { - var url = path.a; - return url; - } - }); -var $author$project$Pages$Manifest$encodeIcon = F2( - function (canonicalSiteUrl, icon) { - return $author$project$Pages$Manifest$encodeMaybeObject( - _List_fromArray( - [ - _Utils_Tuple2( - 'src', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string( - A2($author$project$Pages$ImagePath$toAbsoluteUrl, canonicalSiteUrl, icon.src)))), - _Utils_Tuple2( - 'type', - A2( - $elm$core$Maybe$map, - $elm$json$Json$Encode$string, - A2( - $elm$core$Maybe$map, - $danyx23$elm_mimetype$MimeType$toString, - A2($elm$core$Maybe$map, $danyx23$elm_mimetype$MimeType$Image, icon.mimeType)))), - _Utils_Tuple2( - 'sizes', - A2( - $elm$core$Maybe$map, - $elm$json$Json$Encode$string, - A2( - $elm$core$Maybe$map, - $author$project$Pages$Manifest$sizesString, - $author$project$Pages$Manifest$nonEmptyList(icon.sizes)))), - _Utils_Tuple2( - 'purpose', - A2( - $elm$core$Maybe$map, - $elm$json$Json$Encode$string, - A2( - $elm$core$Maybe$map, - $author$project$Pages$Manifest$purposesString, - $author$project$Pages$Manifest$nonEmptyList(icon.purposes)))) - ])); - }); -var $author$project$Pages$Manifest$orientationToString = function (orientation) { - switch (orientation.$) { - case 'Any': - return 'any'; - case 'Natural': - return 'natural'; - case 'Landscape': - return 'landscape'; - case 'LandscapePrimary': - return 'landscape-primary'; - case 'LandscapeSecondary': - return 'landscape-secondary'; - case 'Portrait': - return 'portrait'; - case 'PortraitPrimary': - return 'portrait-primary'; - default: - return 'portrait-secondary'; - } -}; -var $author$project$Pages$ImagePath$toString = function (path) { - if (path.$ === 'Internal') { - var rawPath = path.a; - return A2($elm$core$String$join, '/', rawPath); - } else { - var url = path.a; - return url; - } -}; -var $author$project$Pages$Manifest$Category$toString = function (_v0) { - var raw = _v0.a; - return raw; -}; -var $author$project$Pages$Manifest$toJson = F2( - function (canonicalSiteUrl, config) { - return $author$project$Pages$Manifest$encodeMaybeObject( - _List_fromArray( - [ - _Utils_Tuple2( - 'sourceIcon', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string( - $author$project$Pages$ImagePath$toString(config.sourceIcon)))), - _Utils_Tuple2( - 'dir', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string('auto'))), - _Utils_Tuple2( - 'lang', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string('en-US'))), - _Utils_Tuple2( - 'icons', - $elm$core$Maybe$Just( - A2( - $elm$json$Json$Encode$list, - $author$project$Pages$Manifest$encodeIcon(canonicalSiteUrl), - config.icons))), - _Utils_Tuple2( - 'background_color', - A2( - $elm$core$Maybe$map, - $elm$json$Json$Encode$string, - A2($elm$core$Maybe$map, $noahzgordon$elm_color_extra$Color$Convert$colorToHex, config.backgroundColor))), - _Utils_Tuple2( - 'orientation', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string( - $author$project$Pages$Manifest$orientationToString(config.orientation)))), - _Utils_Tuple2( - 'display', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string( - $author$project$Pages$Manifest$displayModeToAttribute(config.displayMode)))), - _Utils_Tuple2( - 'categories', - $elm$core$Maybe$Just( - A2( - $elm$json$Json$Encode$list, - $elm$json$Json$Encode$string, - A2($elm$core$List$map, $author$project$Pages$Manifest$Category$toString, config.categories)))), - _Utils_Tuple2( - 'description', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string(config.description))), - _Utils_Tuple2( - 'iarc_rating_id', - A2($elm$core$Maybe$map, $elm$json$Json$Encode$string, config.iarcRatingId)), - _Utils_Tuple2( - 'name', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string(config.name))), - _Utils_Tuple2( - 'prefer_related_applications', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$bool(false))), - _Utils_Tuple2( - 'related_applications', - $elm$core$Maybe$Just( - A2( - $elm$json$Json$Encode$list, - function (_v0) { - return $elm$json$Json$Encode$object(_List_Nil); - }, - _List_Nil))), - _Utils_Tuple2( - 'theme_color', - A2( - $elm$core$Maybe$map, - $elm$json$Json$Encode$string, - A2($elm$core$Maybe$map, $noahzgordon$elm_color_extra$Color$Convert$colorToHex, config.themeColor))), - _Utils_Tuple2( - 'start_url', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string( - '/' + $author$project$Pages$PagePath$toString(config.startUrl)))), - _Utils_Tuple2( - 'short_name', - A2($elm$core$Maybe$map, $elm$json$Json$Encode$string, config.shortName)), - _Utils_Tuple2( - 'scope', - $elm$core$Maybe$Just( - $elm$json$Json$Encode$string('/'))) - ])); - }); -var $author$project$TemplateModulesBeta$manifestToFile = F2( - function (resolvedCanonicalUrl, manifestConfig) { - return function (manifestJsonValue) { - return $elm$core$Result$Ok( - { - content: A2($elm$json$Json$Encode$encode, 0, manifestJsonValue), - path: _List_fromArray( - ['manifest.json']) - }); - }( - A2($author$project$Pages$Manifest$toJson, resolvedCanonicalUrl, manifestConfig)); - }); -var $author$project$TemplateModulesBeta$manifestGenerator = function (resolvedRoutes) { - return A2( - $author$project$Pages$StaticHttp$map, - function (data) { - return A2( - $author$project$TemplateModulesBeta$manifestToFile, - $author$project$Site$config(resolvedRoutes).canonicalUrl(data), - $author$project$Site$config(resolvedRoutes).manifest(data)); - }, - $author$project$Site$config(resolvedRoutes).staticData); -}; -var $author$project$TemplateModulesBeta$toJsPort = _Platform_outgoingPort('toJsPort', $elm$core$Basics$identity); -var $author$project$Shared$SharedMsg = function (a) { - return {$: 'SharedMsg', a: a}; -}; -var $author$project$TemplateModulesBeta$mapBoth = F3( - function (fnA, fnB, _v0) { - var a = _v0.a; - var b = _v0.b; - var c = _v0.c; - return _Utils_Tuple3( - fnA(a), - fnB(b), - c); - }); -var $author$project$TemplateModulesBeta$update = F2( - function (msg, model) { - switch (msg.$) { - case 'MsgGlobal': - var msg_ = msg.a; - var _v1 = A2($author$project$Shared$template.update, msg_, model.global); - var sharedModel = _v1.a; - var globalCmd = _v1.b; - return _Utils_Tuple2( - _Utils_update( - model, - {global: sharedModel}), - A2($elm$core$Platform$Cmd$map, $author$project$TemplateModulesBeta$MsgGlobal, globalCmd)); - case 'OnPageChange': - var record = msg.a; - return function (_v2) { - var updatedModel = _v2.a; - var cmd = _v2.b; - var _v3 = $author$project$Shared$template.onPageChange; - if (_v3.$ === 'Nothing') { - return _Utils_Tuple2(updatedModel, cmd); - } else { - var thingy = _v3.a; - var _v4 = A2( - $author$project$Shared$template.update, - thingy( - {fragment: record.fragment, path: record.path, query: record.query}), - model.global); - var updatedGlobalModel = _v4.a; - var globalCmd = _v4.b; - return _Utils_Tuple2( - _Utils_update( - updatedModel, - {global: updatedGlobalModel}), - $elm$core$Platform$Cmd$batch( - _List_fromArray( - [ - cmd, - A2($elm$core$Platform$Cmd$map, $author$project$TemplateModulesBeta$MsgGlobal, globalCmd) - ]))); - } - }( - A2( - $author$project$TemplateModulesBeta$init, - $elm$core$Maybe$Just(model.global), - $elm$core$Maybe$Just( - { - metadata: record.metadata, - path: {fragment: record.fragment, path: record.path, query: record.query} - }))); - default: - var msg_ = msg.a; - var _v5 = function () { - var _v7 = _Utils_Tuple2( - model.page, - A2( - $elm$core$Maybe$andThen, - function ($) { - return $.metadata; - }, - model.current)); - if ((_v7.a.$ === 'ModelSlide__Number_') && (_v7.b.$ === 'Just')) { - var pageModel = _v7.a.a; - var routeParams = _v7.b.a.a; - return function (_v8) { - var a = _v8.a; - var b = _v8.b; - var c = _v8.c; - if (c.$ === 'Just') { - var sharedMsg = c.a; - return _Utils_Tuple3( - a, - b, - A2( - $author$project$Shared$template.update, - $author$project$Shared$SharedMsg(sharedMsg), - model.global)); - } else { - return _Utils_Tuple3( - a, - b, - _Utils_Tuple2(model.global, $elm$core$Platform$Cmd$none)); - } - }( - A3( - $author$project$TemplateModulesBeta$mapBoth, - $author$project$TemplateModulesBeta$ModelSlide__Number_, - $elm$core$Platform$Cmd$map($author$project$TemplateModulesBeta$MsgSlide__Number_), - A4($author$project$Template$Slide$Number_$template.update, routeParams, msg_, pageModel, model.global))); - } else { - return _Utils_Tuple3( - model.page, - $elm$core$Platform$Cmd$none, - _Utils_Tuple2(model.global, $elm$core$Platform$Cmd$none)); - } - }(); - var updatedPageModel = _v5.a; - var pageCmd = _v5.b; - var _v6 = _v5.c; - var newGlobalModel = _v6.a; - var newGlobalCmd = _v6.b; - return _Utils_Tuple2( - _Utils_update( - model, - {global: newGlobalModel, page: updatedPageModel}), - $elm$core$Platform$Cmd$batch( - _List_fromArray( - [ - pageCmd, - A2($elm$core$Platform$Cmd$map, $author$project$TemplateModulesBeta$MsgGlobal, newGlobalCmd) - ]))); - } - }); -var $elm$url$Url$Parser$Parser = function (a) { - return {$: 'Parser', a: a}; -}; -var $elm$url$Url$Parser$oneOf = function (parsers) { - return $elm$url$Url$Parser$Parser( - function (state) { - return A2( - $elm$core$List$concatMap, - function (_v0) { - var parser = _v0.a; - return parser(state); - }, - parsers); - }); -}; -var $elm$url$Url$Parser$State = F5( - function (visited, unvisited, params, frag, value) { - return {frag: frag, params: params, unvisited: unvisited, value: value, visited: visited}; - }); -var $elm$url$Url$Parser$getFirstMatch = function (states) { - getFirstMatch: - while (true) { - if (!states.b) { - return $elm$core$Maybe$Nothing; - } else { - var state = states.a; - var rest = states.b; - var _v1 = state.unvisited; - if (!_v1.b) { - return $elm$core$Maybe$Just(state.value); - } else { - if ((_v1.a === '') && (!_v1.b.b)) { - return $elm$core$Maybe$Just(state.value); - } else { - var $temp$states = rest; - states = $temp$states; - continue getFirstMatch; - } - } - } - } -}; -var $elm$url$Url$Parser$removeFinalEmpty = function (segments) { - if (!segments.b) { - return _List_Nil; - } else { - if ((segments.a === '') && (!segments.b.b)) { - return _List_Nil; - } else { - var segment = segments.a; - var rest = segments.b; - return A2( - $elm$core$List$cons, - segment, - $elm$url$Url$Parser$removeFinalEmpty(rest)); - } - } -}; -var $elm$url$Url$Parser$preparePath = function (path) { - var _v0 = A2($elm$core$String$split, '/', path); - if (_v0.b && (_v0.a === '')) { - var segments = _v0.b; - return $elm$url$Url$Parser$removeFinalEmpty(segments); - } else { - var segments = _v0; - return $elm$url$Url$Parser$removeFinalEmpty(segments); - } -}; -var $elm$url$Url$Parser$addToParametersHelp = F2( - function (value, maybeList) { - if (maybeList.$ === 'Nothing') { - return $elm$core$Maybe$Just( - _List_fromArray( - [value])); - } else { - var list = maybeList.a; - return $elm$core$Maybe$Just( - A2($elm$core$List$cons, value, list)); - } - }); -var $elm$url$Url$Parser$addParam = F2( - function (segment, dict) { - var _v0 = A2($elm$core$String$split, '=', segment); - if ((_v0.b && _v0.b.b) && (!_v0.b.b.b)) { - var rawKey = _v0.a; - var _v1 = _v0.b; - var rawValue = _v1.a; - var _v2 = $elm$url$Url$percentDecode(rawKey); - if (_v2.$ === 'Nothing') { - return dict; - } else { - var key = _v2.a; - var _v3 = $elm$url$Url$percentDecode(rawValue); - if (_v3.$ === 'Nothing') { - return dict; - } else { - var value = _v3.a; - return A3( - $elm$core$Dict$update, - key, - $elm$url$Url$Parser$addToParametersHelp(value), - dict); - } - } - } else { - return dict; - } - }); -var $elm$url$Url$Parser$prepareQuery = function (maybeQuery) { - if (maybeQuery.$ === 'Nothing') { - return $elm$core$Dict$empty; - } else { - var qry = maybeQuery.a; - return A3( - $elm$core$List$foldr, - $elm$url$Url$Parser$addParam, - $elm$core$Dict$empty, - A2($elm$core$String$split, '&', qry)); - } -}; -var $elm$url$Url$Parser$parse = F2( - function (_v0, url) { - var parser = _v0.a; - return $elm$url$Url$Parser$getFirstMatch( - parser( - A5( - $elm$url$Url$Parser$State, - _List_Nil, - $elm$url$Url$Parser$preparePath(url.path), - $elm$url$Url$Parser$prepareQuery(url.query), - url.fragment, - $elm$core$Basics$identity))); - }); -var $elm$url$Url$Parser$mapState = F2( - function (func, _v0) { - var visited = _v0.visited; - var unvisited = _v0.unvisited; - var params = _v0.params; - var frag = _v0.frag; - var value = _v0.value; - return A5( - $elm$url$Url$Parser$State, - visited, - unvisited, - params, - frag, - func(value)); - }); -var $elm$url$Url$Parser$map = F2( - function (subValue, _v0) { - var parseArg = _v0.a; - return $elm$url$Url$Parser$Parser( - function (_v1) { - var visited = _v1.visited; - var unvisited = _v1.unvisited; - var params = _v1.params; - var frag = _v1.frag; - var value = _v1.value; - return A2( - $elm$core$List$map, - $elm$url$Url$Parser$mapState(value), - parseArg( - A5($elm$url$Url$Parser$State, visited, unvisited, params, frag, subValue))); - }); - }); -var $elm$url$Url$Parser$s = function (str) { - return $elm$url$Url$Parser$Parser( - function (_v0) { - var visited = _v0.visited; - var unvisited = _v0.unvisited; - var params = _v0.params; - var frag = _v0.frag; - var value = _v0.value; - if (!unvisited.b) { - return _List_Nil; - } else { - var next = unvisited.a; - var rest = unvisited.b; - return _Utils_eq(next, str) ? _List_fromArray( - [ - A5( - $elm$url$Url$Parser$State, - A2($elm$core$List$cons, next, visited), - rest, - params, - frag, - value) - ]) : _List_Nil; - } - }); -}; -var $elm$url$Url$Parser$slash = F2( - function (_v0, _v1) { - var parseBefore = _v0.a; - var parseAfter = _v1.a; - return $elm$url$Url$Parser$Parser( - function (state) { - return A2( - $elm$core$List$concatMap, - parseAfter, - parseBefore(state)); - }); - }); -var $elm$url$Url$Parser$custom = F2( - function (tipe, stringToSomething) { - return $elm$url$Url$Parser$Parser( - function (_v0) { - var visited = _v0.visited; - var unvisited = _v0.unvisited; - var params = _v0.params; - var frag = _v0.frag; - var value = _v0.value; - if (!unvisited.b) { - return _List_Nil; - } else { - var next = unvisited.a; - var rest = unvisited.b; - var _v2 = stringToSomething(next); - if (_v2.$ === 'Just') { - var nextValue = _v2.a; - return _List_fromArray( - [ - A5( - $elm$url$Url$Parser$State, - A2($elm$core$List$cons, next, visited), - rest, - params, - frag, - value(nextValue)) - ]); - } else { - return _List_Nil; - } - } - }); - }); -var $elm$url$Url$Parser$string = A2($elm$url$Url$Parser$custom, 'STRING', $elm$core$Maybe$Just); -var $author$project$Route$routes = _List_fromArray( - [ - A2( - $elm$url$Url$Parser$map, - function (number) { - return $author$project$Route$Slide__Number_( - {number: number}); - }, - A2( - $elm$url$Url$Parser$slash, - $elm$url$Url$Parser$s('slide'), - $elm$url$Url$Parser$string)) - ]); -var $author$project$Route$urlToRoute = function (url) { - return A2( - $elm$url$Url$Parser$parse, - $elm$url$Url$Parser$oneOf($author$project$Route$routes), - url); -}; -var $author$project$Pages$StaticHttpRequest$UserCalledStaticHttpFail = function (a) { - return {$: 'UserCalledStaticHttpFail', a: a}; -}; -var $author$project$Pages$StaticHttp$fail = function (errorMessage) { - return $author$project$Pages$StaticHttpRequest$Request( - _Utils_Tuple2( - _List_Nil, - F2( - function (_v0, _v1) { - return $elm$core$Result$Err( - $author$project$Pages$StaticHttpRequest$UserCalledStaticHttpFail(errorMessage)); - }))); -}; -var $author$project$Document$map = F2( - function (fn, doc) { - return { - body: A2( - $elm$core$List$map, - $mdgriffith$elm_ui$Element$map(fn), - doc.body), - title: doc.title - }; - }); -var $author$project$TemplateModulesBeta$view = function (page) { - var _v0 = page.frontmatter; - if (_v0.$ === 'Nothing') { - return $author$project$Pages$StaticHttp$fail( - 'Page not found: ' + $author$project$Pages$PagePath$toString(page.path)); - } else { - var s = _v0.a.a; - return A3( - $author$project$Pages$StaticHttp$map2, - F2( - function (data, globalData) { - return { - head: $author$project$Template$Slide$Number_$template.head( - {path: page.path, routeParams: s, sharedStatic: globalData, _static: data}), - view: function (model) { - var _v1 = model.page; - if (_v1.$ === 'ModelSlide__Number_') { - var subModel = _v1.a; - return function (_v2) { - var title = _v2.title; - var body = _v2.body; - return A5( - $author$project$Shared$template.view, - globalData, - page, - model.global, - $author$project$TemplateModulesBeta$MsgGlobal, - A2( - $author$project$Document$map, - $author$project$TemplateModulesBeta$MsgSlide__Number_, - {body: body, title: title})); - }( - A3( - $author$project$Template$Slide$Number_$template.view, - subModel, - model.global, - {path: page.path, routeParams: s, sharedStatic: globalData, _static: data})); - } else { - return { - body: $elm$html$Html$text('Model mismatch'), - title: 'Model mismatch' - }; - } - } - }; - }), - $author$project$Template$Slide$Number_$template.staticData(s), - $author$project$Shared$template.staticData); - } -}; -var $author$project$TemplateModulesBeta$main = $author$project$Pages$Internal$Platform$application( - { - canonicalSiteUrl: 'TODO', - fromJsPort: $author$project$TemplateModulesBeta$fromJsPort($elm$core$Basics$identity), - generateFiles: A2( - $author$project$Pages$StaticHttp$andThen, - function (resolvedStaticRoutes) { - return A3( - $author$project$Pages$StaticHttp$map2, - $elm$core$List$cons, - $author$project$TemplateModulesBeta$manifestGenerator(resolvedStaticRoutes), - $author$project$Site$config(resolvedStaticRoutes).generateFiles); - }, - $author$project$TemplateModulesBeta$getStaticRoutes), - getStaticRoutes: $author$project$TemplateModulesBeta$getStaticRoutes, - init: $author$project$TemplateModulesBeta$init($elm$core$Maybe$Nothing), - onPageChange: $elm$core$Maybe$Just($author$project$TemplateModulesBeta$OnPageChange), - routeToPath: $author$project$Route$routeToPath, - site: $author$project$Site$config, - subscriptions: F2( - function (path, model) { - return $elm$core$Platform$Sub$batch( - _List_fromArray( - [ - A2( - $elm$core$Platform$Sub$map, - $author$project$TemplateModulesBeta$MsgGlobal, - A2($author$project$Shared$template.subscriptions, path, model.global)) - ])); - }), - toJsPort: $author$project$TemplateModulesBeta$toJsPort, - update: $author$project$TemplateModulesBeta$update, - urlToRoute: $author$project$Route$urlToRoute, - view: $author$project$TemplateModulesBeta$view - }); -_Platform_export({'TemplateModulesBeta':{'init':$author$project$TemplateModulesBeta$main($elm$json$Json$Decode$value)({"versions":{"elm":"0.19.1"},"types":{"message":"Pages.Internal.Platform.Msg TemplateModulesBeta.Msg","aliases":{"Template.Slide.Number_.Msg":{"args":[],"type":"Basics.Never"},"Pages.StaticHttp.Body":{"args":[],"type":"Pages.Internal.StaticHttpBody.Body"},"BuildError.BuildError":{"args":[],"type":"{ title : String.String, path : String.String, message : List.List TerminalText.Text, fatal : Basics.Bool }"},"Pages.ContentCache.ContentCache":{"args":[],"type":"Result.Result Pages.ContentCache.Errors (Dict.Dict Pages.ContentCache.Path Pages.ContentCache.Entry)"},"Pages.Internal.Platform.ContentJson":{"args":[],"type":"{ staticData : RequestsAndPending.RequestsAndPending }"},"Pages.ContentCache.Errors":{"args":[],"type":"List.List ( Html.Html Basics.Never, BuildError.BuildError )"},"Html.Html":{"args":["msg"],"type":"VirtualDom.Node msg"},"Pages.ContentCache.Path":{"args":[],"type":"List.List String.String"},"Pages.StaticHttp.RequestDetails":{"args":[],"type":"{ url : String.String, method : String.String, headers : List.List ( String.String, String.String ), body : Pages.StaticHttp.Body }"},"RequestsAndPending.RequestsAndPending":{"args":[],"type":"Dict.Dict String.String (Maybe.Maybe String.String)"},"Url.Url":{"args":[],"type":"{ protocol : Url.Protocol, host : String.String, port_ : Maybe.Maybe Basics.Int, path : String.String, query : Maybe.Maybe String.String, fragment : Maybe.Maybe String.String }"},"Json.Decode.Value":{"args":[],"type":"Json.Encode.Value"},"Pages.ContentCache.ContentJson":{"args":[],"type":"{ staticData : RequestsAndPending.RequestsAndPending }"},"Http.Metadata":{"args":[],"type":"{ url : String.String, statusCode : Basics.Int, statusText : String.String, headers : Dict.Dict String.String String.String }"}},"unions":{"Pages.Internal.Platform.Msg":{"args":["userMsg"],"tags":{"AppMsg":["Pages.Internal.Platform.AppMsg userMsg"],"CliMsg":["Pages.Internal.Platform.Cli.Msg"]}},"TemplateModulesBeta.Msg":{"args":[],"tags":{"MsgGlobal":["Shared.Msg"],"OnPageChange":["{ path : Pages.PagePath.PagePath, query : Maybe.Maybe String.String, fragment : Maybe.Maybe String.String, metadata : Maybe.Maybe Route.Route }"],"MsgSlide__Number_":["Template.Slide.Number_.Msg"]}},"Pages.Internal.Platform.AppMsg":{"args":["userMsg"],"tags":{"LinkClicked":["Browser.UrlRequest"],"UrlChanged":["Url.Url"],"UserMsg":["userMsg"],"UpdateCache":["Result.Result Http.Error Pages.ContentCache.ContentCache"],"UpdateCacheAndUrl":["Url.Url","Result.Result Http.Error Pages.ContentCache.ContentCache"],"PageScrollComplete":[],"HotReloadComplete":["Pages.Internal.Platform.ContentJson"],"StartingHotReload":[]}},"Maybe.Maybe":{"args":["a"],"tags":{"Just":["a"],"Nothing":[]}},"Pages.Internal.Platform.Cli.Msg":{"args":[],"tags":{"GotStaticHttpResponse":["{ request : { masked : Pages.StaticHttp.RequestDetails, unmasked : Pages.StaticHttp.RequestDetails }, response : Result.Result Pages.Http.Error String.String }"],"GotStaticFile":["( String.String, Json.Decode.Value )"],"GotGlob":["( String.String, Json.Decode.Value )"],"Continue":[]}},"Shared.Msg":{"args":[],"tags":{"OnPageChange":["{ path : Pages.PagePath.PagePath, query : Maybe.Maybe String.String, fragment : Maybe.Maybe String.String }"],"ToggleMobileMenu":[],"Increment":[],"SharedMsg":["Shared.SharedMsg"]}},"Basics.Never":{"args":[],"tags":{"JustOneMore":["Basics.Never"]}},"Pages.PagePath.PagePath":{"args":[],"tags":{"Internal":["List.List String.String"],"External":["String.String"]}},"Route.Route":{"args":[],"tags":{"Slide__Number_":["{ number : String.String }"]}},"String.String":{"args":[],"tags":{"String":[]}},"Pages.Internal.StaticHttpBody.Body":{"args":[],"tags":{"EmptyBody":[],"StringBody":["String.String","String.String"],"JsonBody":["Json.Encode.Value"]}},"Basics.Bool":{"args":[],"tags":{"True":[],"False":[]}},"Dict.Dict":{"args":["k","v"],"tags":{"RBNode_elm_builtin":["Dict.NColor","k","v","Dict.Dict k v","Dict.Dict k v"],"RBEmpty_elm_builtin":[]}},"Pages.ContentCache.Entry":{"args":[],"tags":{"NeedContent":[],"Parsed":["Pages.ContentCache.ContentJson"]}},"Http.Error":{"args":[],"tags":{"BadUrl":["String.String"],"Timeout":[],"NetworkError":[],"BadStatus":["Basics.Int"],"BadBody":["String.String"]}},"Pages.Http.Error":{"args":[],"tags":{"BadUrl":["String.String"],"Timeout":[],"NetworkError":[],"BadStatus":["Http.Metadata","String.String"]}},"Basics.Int":{"args":[],"tags":{"Int":[]}},"List.List":{"args":["a"],"tags":{}},"VirtualDom.Node":{"args":["msg"],"tags":{"Node":[]}},"Url.Protocol":{"args":[],"tags":{"Http":[],"Https":[]}},"Result.Result":{"args":["error","value"],"tags":{"Ok":["value"],"Err":["error"]}},"Shared.SharedMsg":{"args":[],"tags":{"IncrementFromChild":[]}},"TerminalText.Text":{"args":[],"tags":{"RawText":["String.String"],"Style":["TerminalText.Color","TerminalText.Text"]}},"Browser.UrlRequest":{"args":[],"tags":{"Internal":["Url.Url"],"External":["String.String"]}},"Json.Encode.Value":{"args":[],"tags":{"Value":[]}},"TerminalText.Color":{"args":[],"tags":{"Red":[],"Blue":[],"Green":[],"Yellow":[],"Cyan":[]}},"Dict.NColor":{"args":[],"tags":{"Red":[],"Black":[]}}}}})}});}(this)); \ No newline at end of file diff --git a/examples/slides/gen/Pages.elm b/examples/slides/gen/Pages.elm deleted file mode 100644 index f1183865..00000000 --- a/examples/slides/gen/Pages.elm +++ /dev/null @@ -1,8 +0,0 @@ -module Pages exposing (builtAt) - -import Time - - -builtAt : Time.Posix -builtAt = - Time.millisToPosix 1618410729151 diff --git a/examples/slides/gen/Route.elm b/examples/slides/gen/Route.elm deleted file mode 100644 index 6e542af7..00000000 --- a/examples/slides/gen/Route.elm +++ /dev/null @@ -1,29 +0,0 @@ -module Route exposing (..) - -import Url -import Url.Parser as Parser exposing ((), Parser) - - -type Route - = Slide__Number_ { number : String } - - -urlToRoute : Url.Url -> Maybe Route -urlToRoute url = - Parser.parse (Parser.oneOf routes) url - - -routes : List (Parser (Route -> a) a) -routes = - [ Parser.map (\number -> Slide__Number_ { number = number }) (Parser.s "slide" Parser.string) - - ] - - -routeToPath : Maybe Route -> List String -routeToPath maybeRoute = - case maybeRoute of - Nothing -> - [] - Just (Slide__Number_ params) -> - [ "slide", params.number ] diff --git a/examples/slides/gen/Template.elm b/examples/slides/gen/Template.elm deleted file mode 100644 index 51e4a4bf..00000000 --- a/examples/slides/gen/Template.elm +++ /dev/null @@ -1,206 +0,0 @@ -module Template exposing - ( Builder(..) - , StaticPayload - , withStaticData, noStaticData - , Template, buildNoState - , TemplateWithState, buildWithLocalState, buildWithSharedState - ) - -{-| - - -## Building a Template - -@docs Builder - - -## Static Data - -Every template will have access to a `StaticPayload`. - -@docs StaticPayload - -Since this data is _static_, you have access to it before the user has loaded the page, including at build time. -An example of dynamic data would be keyboard input from the user, query params, or any other data that comes from the app running in the browser. - -But before the user even requests the page, we have the following data: - - - `path` - these paths are static. In other words, we know every single path when we build an elm-pages site. - - `metadata` - we have a decoded Elm value for the page's metadata. - - `sharedStatic` - we can access any shared data between pages. For example, you may have fetched the name of a blog ("Jane's Blog") from the API for a Content Management System (CMS). - - `static` - this is the static data for this specific page. If you use `noStaticData`, then this will be `()`, meaning there is no page-specific static data. - -@docs withStaticData, noStaticData - - -## Stateless Templates - -@docs Template, buildNoState - - -## Stateful Templates - -@docs TemplateWithState, buildWithLocalState, buildWithSharedState - --} - -import Document exposing (Document) -import Head -import Pages.PagePath exposing (PagePath) -import Pages.StaticHttp as StaticHttp -import Shared - - -{-| -} -type alias TemplateWithState routeParams templateStaticData templateModel templateMsg = - { staticData : routeParams -> StaticHttp.Request templateStaticData - , staticRoutes : StaticHttp.Request (List routeParams) - , view : - templateModel - -> Shared.Model - -> StaticPayload templateStaticData routeParams - -> Document templateMsg - , head : - StaticPayload templateStaticData routeParams - -> List Head.Tag - , init : routeParams -> ( templateModel, Cmd templateMsg ) - , update : routeParams -> templateMsg -> templateModel -> Shared.Model -> ( templateModel, Cmd templateMsg, Maybe Shared.SharedMsg ) - , subscriptions : routeParams -> PagePath -> templateModel -> Shared.Model -> Sub templateMsg - } - - -{-| -} -type alias Template routeParams staticData = - TemplateWithState routeParams staticData () Never - - -{-| -} -type alias StaticPayload staticData routeParams = - { static : staticData -- local - , sharedStatic : Shared.StaticData -- share - , routeParams : routeParams - , path : PagePath - } - - -{-| -} -type Builder routeParams templateStaticData - = WithStaticData - { staticData : routeParams -> StaticHttp.Request templateStaticData - , staticRoutes : StaticHttp.Request (List routeParams) - , head : - StaticPayload templateStaticData routeParams - -> List Head.Tag - } - - -{-| -} -buildNoState : - { view : - StaticPayload templateStaticData routeParams - -> Document Never - } - -> Builder routeParams templateStaticData - -> TemplateWithState routeParams templateStaticData () Never -buildNoState { view } builderState = - case builderState of - WithStaticData record -> - { view = \() _ -> view - , head = record.head - , staticData = record.staticData - , staticRoutes = record.staticRoutes - , init = \_ -> ( (), Cmd.none ) - , update = \_ _ _ _ -> ( (), Cmd.none, Nothing ) - , subscriptions = \_ _ _ _ -> Sub.none - } - - -{-| -} -buildWithLocalState : - { view : - templateModel - -> Shared.Model - -> StaticPayload templateStaticData routeParams - -> Document templateMsg - , init : routeParams -> ( templateModel, Cmd templateMsg ) - , update : Shared.Model -> routeParams -> templateMsg -> templateModel -> ( templateModel, Cmd templateMsg ) - , subscriptions : routeParams -> PagePath -> templateModel -> Sub templateMsg - } - -> Builder routeParams templateStaticData - -> TemplateWithState routeParams templateStaticData templateModel templateMsg -buildWithLocalState config builderState = - case builderState of - WithStaticData record -> - { view = - \model sharedModel staticPayload -> - config.view model sharedModel staticPayload - , head = record.head - , staticData = record.staticData - , staticRoutes = record.staticRoutes - , init = config.init - , update = - \metadata msg templateModel sharedModel -> - let - ( updatedModel, cmd ) = - config.update sharedModel metadata msg templateModel - in - ( updatedModel, cmd, Nothing ) - , subscriptions = - \routeParams path templateModel sharedModel -> - config.subscriptions routeParams path templateModel - } - - -{-| -} -buildWithSharedState : - { view : - templateModel - -> Shared.Model - -> StaticPayload templateStaticData routeParams - -> Document templateMsg - , init : routeParams -> ( templateModel, Cmd templateMsg ) - , update : routeParams -> templateMsg -> templateModel -> Shared.Model -> ( templateModel, Cmd templateMsg, Maybe Shared.SharedMsg ) - , subscriptions : routeParams -> PagePath -> templateModel -> Shared.Model -> Sub templateMsg - } - -> Builder routeParams templateStaticData - -> TemplateWithState routeParams templateStaticData templateModel templateMsg -buildWithSharedState config builderState = - case builderState of - WithStaticData record -> - { view = config.view - , head = record.head - , staticData = record.staticData - , staticRoutes = record.staticRoutes - , init = config.init - , update = config.update - , subscriptions = config.subscriptions - } - - -{-| -} -withStaticData : - { staticData : routeParams -> StaticHttp.Request templateStaticData - , staticRoutes : StaticHttp.Request (List routeParams) - , head : StaticPayload templateStaticData routeParams -> List Head.Tag - } - -> Builder routeParams templateStaticData -withStaticData { staticData, head, staticRoutes } = - WithStaticData - { staticData = staticData - , staticRoutes = staticRoutes - , head = head - } - - -{-| -} -noStaticData : - { head : StaticPayload () routeParams -> List Head.Tag - , staticRoutes : StaticHttp.Request (List routeParams) - } - -> Builder routeParams () -noStaticData { head, staticRoutes } = - WithStaticData - { staticData = \_ -> StaticHttp.succeed () - , staticRoutes = staticRoutes - , head = head - } diff --git a/examples/slides/gen/TemplateModulesBeta.elm b/examples/slides/gen/TemplateModulesBeta.elm deleted file mode 100644 index e41ee511..00000000 --- a/examples/slides/gen/TemplateModulesBeta.elm +++ /dev/null @@ -1,337 +0,0 @@ -port module TemplateModulesBeta exposing (..) - -import Browser -import Route exposing (Route) -import Document -import Json.Decode -import Json.Encode -import Pages.Internal.Platform -import Pages.Internal.Platform.ToJsPayload -import Pages.Manifest as Manifest -import Shared -import Site -import Head -import Html exposing (Html) -import Pages.PagePath exposing (PagePath) -import Url -import Url.Parser as Parser exposing ((), Parser) -import Pages.StaticHttp as StaticHttp - -import Template.Slide.Number_ - - -type alias Model = - { global : Shared.Model - , page : TemplateModel - , current : - Maybe - { path : - { path : PagePath - , query : Maybe String - , fragment : Maybe String - } - , metadata : Maybe Route - } - } - - -type TemplateModel - = ModelSlide__Number_ Template.Slide.Number_.Model - - | NotFound - - - - -type Msg - = MsgGlobal Shared.Msg - | OnPageChange - { path : PagePath - , query : Maybe String - , fragment : Maybe String - , metadata : Maybe Route - } - | MsgSlide__Number_ Template.Slide.Number_.Msg - - - -view : - { path : PagePath - , frontmatter : Maybe Route - } - -> - StaticHttp.Request - { view : Model -> { title : String, body : Html Msg } - , head : List Head.Tag - } -view page = - case page.frontmatter of - Nothing -> - StaticHttp.fail <| "Page not found: " ++ Pages.PagePath.toString page.path - Just (Route.Slide__Number_ s) -> - StaticHttp.map2 - (\data globalData -> - { view = - \model -> - case model.page of - ModelSlide__Number_ subModel -> - Template.Slide.Number_.template.view - subModel - model.global - { static = data - , sharedStatic = globalData - , routeParams = s - , path = page.path - } - |> (\{ title, body } -> - Shared.template.view - globalData - page - model.global - MsgGlobal - ({ title = title, body = body } - |> Document.map MsgSlide__Number_ - ) - ) - - _ -> - { title = "Model mismatch", body = Html.text <| "Model mismatch" } - , head = Template.Slide.Number_.template.head - { static = data - , sharedStatic = globalData - , routeParams = s - , path = page.path - } - } - ) - (Template.Slide.Number_.template.staticData s) - (Shared.template.staticData) - - - -init : - Maybe Shared.Model - -> - Maybe - { path : - { path : PagePath - , query : Maybe String - , fragment : Maybe String - } - , metadata : Maybe Route - } - -> ( Model, Cmd Msg ) -init currentGlobalModel maybePagePath = - let - ( sharedModel, globalCmd ) = - currentGlobalModel |> Maybe.map (\m -> ( m, Cmd.none )) |> Maybe.withDefault (Shared.template.init maybePagePath) - - ( templateModel, templateCmd ) = - case maybePagePath |> Maybe.andThen .metadata of - Nothing -> - ( NotFound, Cmd.none ) - - Just (Route.Slide__Number_ routeParams) -> - Template.Slide.Number_.template.init routeParams - |> Tuple.mapBoth ModelSlide__Number_ (Cmd.map MsgSlide__Number_) - - - in - ( { global = sharedModel - , page = templateModel - , current = maybePagePath - } - , Cmd.batch - [ templateCmd - , globalCmd |> Cmd.map MsgGlobal - ] - ) - - - -update : Msg -> Model -> ( Model, Cmd Msg ) -update msg model = - case msg of - MsgGlobal msg_ -> - let - ( sharedModel, globalCmd ) = - Shared.template.update msg_ model.global - in - ( { model | global = sharedModel } - , globalCmd |> Cmd.map MsgGlobal - ) - - OnPageChange record -> - (init (Just model.global) <| - Just - { path = - { path = record.path - , query = record.query - , fragment = record.fragment - } - , metadata = record.metadata - } - ) - |> (\( updatedModel, cmd ) -> - case Shared.template.onPageChange of - Nothing -> - ( updatedModel, cmd ) - - Just thingy -> - let - ( updatedGlobalModel, globalCmd ) = - Shared.template.update - (thingy - { path = record.path - , query = record.query - , fragment = record.fragment - } - ) - model.global - in - ( { updatedModel - | global = updatedGlobalModel - } - , Cmd.batch [ cmd, Cmd.map MsgGlobal globalCmd ] - ) - ) - - - - MsgSlide__Number_ msg_ -> - let - ( updatedPageModel, pageCmd, ( newGlobalModel, newGlobalCmd ) ) = - case ( model.page, model.current |> Maybe.andThen .metadata ) of - ( ModelSlide__Number_ pageModel, Just (Route.Slide__Number_ routeParams) ) -> - Template.Slide.Number_.template.update - routeParams - msg_ - pageModel - model.global - |> mapBoth ModelSlide__Number_ (Cmd.map MsgSlide__Number_) - |> (\( a, b, c ) -> - case c of - Just sharedMsg -> - ( a, b, Shared.template.update (Shared.SharedMsg sharedMsg) model.global ) - - Nothing -> - ( a, b, ( model.global, Cmd.none ) ) - ) - - _ -> - ( model.page, Cmd.none, ( model.global, Cmd.none ) ) - in - ( { model | page = updatedPageModel, global = newGlobalModel } - , Cmd.batch [ pageCmd, newGlobalCmd |> Cmd.map MsgGlobal ] - ) - - - -type alias SiteConfig = - { canonicalUrl : String - , manifest : Manifest.Config - } - -templateSubscriptions : Route -> PagePath -> Model -> Sub Msg -templateSubscriptions route path model = - case ( model.page, route ) of - - ( ModelSlide__Number_ templateModel, Route.Slide__Number_ routeParams ) -> - Template.Slide.Number_.template.subscriptions - routeParams - path - templateModel - model.global - |> Sub.map MsgSlide__Number_ - - - - _ -> - Sub.none - - -main : Pages.Internal.Platform.Program Model Msg (Maybe Route) -main = - Pages.Internal.Platform.application - { init = init Nothing - , urlToRoute = Route.urlToRoute - , routeToPath = Route.routeToPath - , site = Site.config - , getStaticRoutes = getStaticRoutes - , view = view - , update = update - , subscriptions = - \path model -> - Sub.batch - [ Shared.template.subscriptions path model.global |> Sub.map MsgGlobal - -- , templateSubscriptions (Route.Blog {}) path model - ] - , onPageChange = Just OnPageChange - , canonicalSiteUrl = "TODO" - , toJsPort = toJsPort - , fromJsPort = fromJsPort identity - , generateFiles = - getStaticRoutes - |> StaticHttp.andThen - (\resolvedStaticRoutes -> - StaticHttp.map2 (::) - (manifestGenerator - resolvedStaticRoutes - ) - (Site.config - resolvedStaticRoutes - |> .generateFiles - ) - ) - } - - -getStaticRoutes = - StaticHttp.combine - [ StaticHttp.succeed - [ - ] - , Template.Slide.Number_.template.staticRoutes |> StaticHttp.map (List.map Route.Slide__Number_) - ] - |> StaticHttp.map List.concat - |> StaticHttp.map (List.map Just) - - -manifestGenerator : List ( Maybe Route ) -> StaticHttp.Request (Result anyError { path : List String, content : String }) -manifestGenerator resolvedRoutes = - Site.config resolvedRoutes - |> .staticData - |> StaticHttp.map - (\data -> - (Site.config resolvedRoutes |> .manifest) data - |> manifestToFile ((Site.config resolvedRoutes |> .canonicalUrl) data) - ) - - -manifestToFile : String -> Manifest.Config -> Result anyError { path : List String, content : String } -manifestToFile resolvedCanonicalUrl manifestConfig = - manifestConfig - |> Manifest.toJson resolvedCanonicalUrl - |> (\manifestJsonValue -> - Ok - { path = [ "manifest.json" ] - , content = Json.Encode.encode 0 manifestJsonValue - } - ) - - - -port toJsPort : Json.Encode.Value -> Cmd msg - -port fromJsPort : (Json.Decode.Value -> msg) -> Sub msg - - -mapDocument : Browser.Document Never -> Browser.Document mapped -mapDocument document = - { title = document.title - , body = document.body |> List.map (Html.map never) - } - - -mapBoth fnA fnB ( a, b, c ) = - ( fnA a, fnB b, c )