PascalLeMerrer/File-organizer-Tauri
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
File-organizer-Tauri/src-elm/index.html

11645 lines
No EOL
306 KiB
HTML
Raw Blame History

<!DOCTYPE HTML>
<html>
<head>
<meta charset="UTF-8">
<title>Main</title>
<style>body { padding: 0; margin: 0; }</style>
</head>
<body>
<pre id="elm"></pre>
<script>
try {
(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 DEV mode. Follow the advice at https://elm-lang.org/0.19.1/optimize for better performance and smaller assets.');
// 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;
}));
});
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 '<internals>';
}
function _Debug_toString(value)
{
return _Debug_toAnsiString(false, value);
}
function _Debug_toAnsiString(ansi, value)
{
if (typeof value === 'function')
{
return _Debug_internalColor(ansi, '<function>');
}
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, '<internals>');
}
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, '<internals>');
}
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;
}
// 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 (Object.prototype.hasOwnProperty.call(value, 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)
{
var unwrapped = _Json_unwrap(value);
if (!(key === 'toJSON' && typeof unwrapped === 'function'))
{
object[key] = unwrapped;
}
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
//
// For some reason, tabs can appear in href protocols and it still works.
// So '\tjava\tSCRIPT:alert("!!!")' and 'javascript:alert("!!!")' are the same
// in practice. That is why _VirtualDom_RE_js and _VirtualDom_RE_js_html look
// so freaky.
//
// Pulling the regular expressions out to the top level gives a slight speed
// boost in small benchmarks (4-10%) but hoisting values to reduce allocation
// can be unpredictable in large programs where JIT may have a harder time with
// functions are not fully self-contained. The benefit is more that the js and
// js_html ones are so weird that I prefer to see them near each other.
var _VirtualDom_RE_script = /^script$/i;
var _VirtualDom_RE_on_formAction = /^(on|formAction$)/i;
var _VirtualDom_RE_js = /^\s*j\s*a\s*v\s*a\s*s\s*c\s*r\s*i\s*p\s*t\s*:/i;
var _VirtualDom_RE_js_html = /^\s*(j\s*a\s*v\s*a\s*s\s*c\s*r\s*i\s*p\s*t\s*:|d\s*a\s*t\s*a\s*:\s*t\s*e\s*x\s*t\s*\/\s*h\s*t\s*m\s*l\s*(,|;))/i;
function _VirtualDom_noScript(tag)
{
return _VirtualDom_RE_script.test(tag) ? 'p' : tag;
}
function _VirtualDom_noOnOrFormAction(key)
{
return _VirtualDom_RE_on_formAction.test(key) ? 'data-' + key : key;
}
function _VirtualDom_noInnerHtmlOrFormAction(key)
{
return key == 'innerHTML' || key == 'outerHTML' || key == 'formAction' ? 'data-' + key : key;
}
function _VirtualDom_noJavaScriptUri(value)
{
return _VirtualDom_RE_js.test(value)
? /**_UNUSED/''//*//**/'javascript:alert("This is an XSS vector. Please use ports or web components instead.")'//*/
: value;
}
function _VirtualDom_noJavaScriptOrHtmlUri(value)
{
return _VirtualDom_RE_js_html.test(value)
? /**_UNUSED/''//*//**/'javascript:alert("This is an XSS vector. Please use ports or web components instead.")'//*/
: value;
}
function _VirtualDom_noJavaScriptOrHtmlJson(value)
{
return (
(typeof _Json_unwrap(value) === 'string' && _VirtualDom_RE_js_html.test(_Json_unwrap(value)))
||
(Array.isArray(_Json_unwrap(value)) && _VirtualDom_RE_js_html.test(String(_Json_unwrap(value))))
)
? _Json_wrap(
/**_UNUSED/''//*//**/'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
};
}
// 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);
}
}));
}
function _Time_now(millisToPosix)
{
return _Scheduler_binding(function(callback)
{
callback(_Scheduler_succeed(millisToPosix(Date.now())));
});
}
var _Time_setInterval = F2(function(interval, task)
{
return _Scheduler_binding(function(callback)
{
var id = setInterval(function() { _Scheduler_rawSpawn(task); }, interval);
return function() { clearInterval(id); };
});
});
function _Time_here()
{
return _Scheduler_binding(function(callback)
{
callback(_Scheduler_succeed(
A2($elm$time$Time$customZone, -(new Date().getTimezoneOffset()), _List_Nil)
));
});
}
function _Time_getZoneName()
{
return _Scheduler_binding(function(callback)
{
try
{
var name = $elm$time$Time$Name(Intl.DateTimeFormat().resolvedOptions().timeZone);
}
catch (e)
{
var name = $elm$time$Time$Offset(new Date().getTimezoneOffset());
}
callback(_Scheduler_succeed(name));
});
}
// 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;
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;
});
var $elm$core$Basics$EQ = {$: 'EQ'};
var $elm$core$Basics$GT = {$: 'GT'};
var $elm$core$Basics$LT = {$: 'LT'};
var $elm$core$List$cons = _List_cons;
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$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$Result$Err = function (a) {
return {$: 'Err', 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$core$Result$Ok = function (a) {
return {$: 'Ok', a: a};
};
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$Maybe$Just = function (a) {
return {$: 'Just', a: a};
};
var $elm$core$Maybe$Nothing = {$: 'Nothing'};
var $elm$core$String$all = _String_all;
var $elm$core$Basics$and = _Basics_and;
var $elm$core$Basics$append = _Utils_append;
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$apR = F2(
function (x, f) {
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$Browser$External = function (a) {
return {$: 'External', a: a};
};
var $elm$browser$Browser$Internal = function (a) {
return {$: 'Internal', a: a};
};
var $elm$core$Basics$identity = function (x) {
return x;
};
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$contains = _String_contains;
var $elm$core$String$length = _String_length;
var $elm$core$String$slice = _String_slice;
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$core$String$left = F2(
function (n, string) {
return (n < 1) ? '' : A3($elm$core$String$slice, 0, n, string);
});
var $elm$core$String$toInt = _String_toInt;
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$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$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$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$Browser$element = _Browser_element;
var $author$project$Main$AdjustTimeZone = function (a) {
return {$: 'AdjustTimeZone', a: a};
};
var $elm$core$Platform$Cmd$batch = _Platform_batch;
var $author$project$Main$LeftSide = {$: 'LeftSide'};
var $author$project$Main$unixPathSep = '/';
var $elm$time$Time$Zone = F2(
function (a, b) {
return {$: 'Zone', a: a, b: b};
});
var $elm$time$Time$utc = A2($elm$time$Time$Zone, 0, _List_Nil);
var $author$project$Main$defaultModel = {applySourceFilterToDestinationDirectories: false, applySourceFilterToDestinationFiles: false, debug: _List_Nil, destinationDirectoryFilter: '', destinationDirectoryPath: '', destinationFiles: _List_Nil, destinationFilesFilter: '', destinationNavigationHistory: _List_Nil, destinationSubdirectories: _List_Nil, editedDirName: '', editedFile: $elm$core$Maybe$Nothing, editedFileName: '', error: $elm$core$Maybe$Nothing, filesToDelete: _List_Nil, focusedZone: $author$project$Main$LeftSide, history: _List_Nil, isControlPressed: false, isCreatingDirectory: false, isDebugVisible: false, isDestinationLoadingInProgress: true, isShiftPressed: false, isSourceLoadingInProgress: true, isUndoing: false, minSimilarity: 8, pathSeparator: $author$project$Main$unixPathSep, previousFocusedZone: $author$project$Main$LeftSide, referenceFile: $elm$core$Maybe$Nothing, sourceDirectoryPath: '.', sourceFiles: _List_Nil, sourceFilter: '', sourceNavigationHistory: _List_Nil, sourceReplace: '', sourceSearch: '', sourceSubDirectories: _List_Nil, timezone: $elm$time$Time$utc};
var $elm$json$Json$Encode$null = _Json_encodeNull;
var $author$project$Main$getCurrentDirectoryPath = _Platform_outgoingPort(
'getCurrentDirectoryPath',
function ($) {
return $elm$json$Json$Encode$null;
});
var $elm$time$Time$Name = function (a) {
return {$: 'Name', a: a};
};
var $elm$time$Time$Offset = function (a) {
return {$: 'Offset', a: a};
};
var $elm$time$Time$customZone = $elm$time$Time$Zone;
var $elm$time$Time$here = _Time_here(_Utils_Tuple0);
var $author$project$Main$init = function (_v0) {
return _Utils_Tuple2(
$author$project$Main$defaultModel,
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
A2($elm$core$Task$perform, $author$project$Main$AdjustTimeZone, $elm$time$Time$here),
$author$project$Main$getCurrentDirectoryPath(_Utils_Tuple0)
])));
};
var $author$project$Main$BackendReturnedCreatedDirectory = function (a) {
return {$: 'BackendReturnedCreatedDirectory', a: a};
};
var $author$project$Main$BackendReturnedCurrentDirPath = function (a) {
return {$: 'BackendReturnedCurrentDirPath', a: a};
};
var $author$project$Main$BackendReturnedDestinationDirectories = function (a) {
return {$: 'BackendReturnedDestinationDirectories', a: a};
};
var $author$project$Main$BackendReturnedDestinationDirectoryPath = function (a) {
return {$: 'BackendReturnedDestinationDirectoryPath', a: a};
};
var $author$project$Main$BackendReturnedDestinationFiles = function (a) {
return {$: 'BackendReturnedDestinationFiles', a: a};
};
var $author$project$Main$BackendReturnedError = function (a) {
return {$: 'BackendReturnedError', a: a};
};
var $author$project$Main$BackendReturnedMovedFiles = function (a) {
return {$: 'BackendReturnedMovedFiles', a: a};
};
var $author$project$Main$BackendReturnedRemovedFile = {$: 'BackendReturnedRemovedFile'};
var $author$project$Main$BackendReturnedRenamedFiles = F2(
function (a, b) {
return {$: 'BackendReturnedRenamedFiles', a: a, b: b};
});
var $author$project$Main$BackendReturnedSourceDirectoryContent = function (a) {
return {$: 'BackendReturnedSourceDirectoryContent', a: a};
};
var $author$project$Main$BackendReturnedSourceDirectoryPath = function (a) {
return {$: 'BackendReturnedSourceDirectoryPath', a: a};
};
var $elm$core$Platform$Sub$batch = _Platform_batch;
var $elm$json$Json$Decode$decodeValue = _Json_run;
var $author$project$File$File = F8(
function (isDir, mode, modTime, name, parentPath, satisfiesFilter, size, status) {
return {isDir: isDir, modTime: modTime, mode: mode, name: name, parentPath: parentPath, satisfiesFilter: satisfiesFilter, size: size, status: status};
});
var $author$project$File$Unselected = {$: 'Unselected'};
var $elm$json$Json$Decode$bool = _Json_decodeBool;
var $elm$json$Json$Decode$andThen = _Json_andThen;
var $elm$core$String$concat = function (strings) {
return A2($elm$core$String$join, '', strings);
};
var $rtfeldman$elm_iso8601_date_strings$DeadEnds$problemToString = function (p) {
switch (p.$) {
case 'Expecting':
var s = p.a;
return 'expecting \'' + (s + '\'');
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 s = p.a;
return 'expecting symbol \'' + (s + '\'');
case 'ExpectingKeyword':
var s = p.a;
return 'expecting keyword \'' + (s + '\'');
case 'ExpectingEnd':
return 'expecting end';
case 'UnexpectedChar':
return 'unexpected char';
case 'Problem':
var s = p.a;
return 'problem ' + s;
default:
return 'bad repeat';
}
};
var $rtfeldman$elm_iso8601_date_strings$DeadEnds$deadEndToString = function (deadend) {
return $rtfeldman$elm_iso8601_date_strings$DeadEnds$problemToString(deadend.problem) + (' at row ' + ($elm$core$String$fromInt(deadend.row) + (', col ' + $elm$core$String$fromInt(deadend.col))));
};
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 $rtfeldman$elm_iso8601_date_strings$DeadEnds$deadEndsToString = function (deadEnds) {
return $elm$core$String$concat(
A2(
$elm$core$List$intersperse,
'; ',
A2($elm$core$List$map, $rtfeldman$elm_iso8601_date_strings$DeadEnds$deadEndToString, deadEnds)));
};
var $elm$json$Json$Decode$fail = _Json_fail;
var $elm$json$Json$Decode$string = _Json_decodeString;
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$andThen = $elm$parser$Parser$Advanced$andThen;
var $elm$parser$Parser$ExpectingEnd = {$: 'ExpectingEnd'};
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$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$end = $elm$parser$Parser$Advanced$end($elm$parser$Parser$ExpectingEnd);
var $elm$parser$Parser$Advanced$isSubChar = _Parser_isSubChar;
var $elm$core$Basics$negate = function (n) {
return -n;
};
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$chompWhile = $elm$parser$Parser$Advanced$chompWhile;
var $elm$core$Basics$always = F2(
function (a, _v0) {
return a;
});
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 $elm$parser$Parser$getChompedString = $elm$parser$Parser$Advanced$getChompedString;
var $elm$parser$Parser$Problem = function (a) {
return {$: 'Problem', a: a};
};
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 $elm$parser$Parser$problem = function (msg) {
return $elm$parser$Parser$Advanced$problem(
$elm$parser$Parser$Problem(msg));
};
var $elm$core$Basics$round = _Basics_round;
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$succeed = $elm$parser$Parser$Advanced$succeed;
var $elm$core$String$toFloat = _String_toFloat;
var $rtfeldman$elm_iso8601_date_strings$Iso8601$fractionsOfASecondInMs = A2(
$elm$parser$Parser$andThen,
function (str) {
if ($elm$core$String$length(str) <= 9) {
var _v0 = $elm$core$String$toFloat('0.' + str);
if (_v0.$ === 'Just') {
var floatVal = _v0.a;
return $elm$parser$Parser$succeed(
$elm$core$Basics$round(floatVal * 1000));
} else {
return $elm$parser$Parser$problem('Invalid float: \"' + (str + '\"'));
}
} else {
return $elm$parser$Parser$problem(
'Expected at most 9 digits, but got ' + $elm$core$String$fromInt(
$elm$core$String$length(str)));
}
},
$elm$parser$Parser$getChompedString(
$elm$parser$Parser$chompWhile($elm$core$Char$isDigit)));
var $elm$time$Time$Posix = function (a) {
return {$: 'Posix', a: a};
};
var $elm$time$Time$millisToPosix = $elm$time$Time$Posix;
var $rtfeldman$elm_iso8601_date_strings$Iso8601$fromParts = F6(
function (monthYearDayMs, hour, minute, second, ms, utcOffsetMinutes) {
return $elm$time$Time$millisToPosix((((monthYearDayMs + (((hour * 60) * 60) * 1000)) + (((minute - utcOffsetMinutes) * 60) * 1000)) + (second * 1000)) + ms);
});
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 $elm$parser$Parser$ignorer = $elm$parser$Parser$Advanced$ignorer;
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$keeper = $elm$parser$Parser$Advanced$keeper;
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$oneOf = $elm$parser$Parser$Advanced$oneOf;
var $elm$parser$Parser$Done = function (a) {
return {$: 'Done', a: a};
};
var $elm$parser$Parser$Loop = function (a) {
return {$: 'Loop', a: a};
};
var $elm$core$String$append = _String_append;
var $elm$parser$Parser$UnexpectedChar = {$: 'UnexpectedChar'};
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$chompIf = function (isGood) {
return A2($elm$parser$Parser$Advanced$chompIf, isGood, $elm$parser$Parser$UnexpectedChar);
};
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 $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$map = $elm$parser$Parser$Advanced$map;
var $elm$parser$Parser$Advanced$Done = function (a) {
return {$: 'Done', a: a};
};
var $elm$parser$Parser$Advanced$Loop = function (a) {
return {$: 'Loop', a: a};
};
var $elm$parser$Parser$toAdvancedStep = function (step) {
if (step.$ === 'Loop') {
var s = step.a;
return $elm$parser$Parser$Advanced$Loop(s);
} else {
var a = step.a;
return $elm$parser$Parser$Advanced$Done(a);
}
};
var $elm$parser$Parser$loop = F2(
function (state, callback) {
return A2(
$elm$parser$Parser$Advanced$loop,
state,
function (s) {
return A2(
$elm$parser$Parser$map,
$elm$parser$Parser$toAdvancedStep,
callback(s));
});
});
var $rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt = function (quantity) {
var helper = function (str) {
if (_Utils_eq(
$elm$core$String$length(str),
quantity)) {
var _v0 = $elm$core$String$toInt(str);
if (_v0.$ === 'Just') {
var intVal = _v0.a;
return A2(
$elm$parser$Parser$map,
$elm$parser$Parser$Done,
$elm$parser$Parser$succeed(intVal));
} else {
return $elm$parser$Parser$problem('Invalid integer: \"' + (str + '\"'));
}
} else {
return A2(
$elm$parser$Parser$map,
function (nextChar) {
return $elm$parser$Parser$Loop(
A2($elm$core$String$append, str, nextChar));
},
$elm$parser$Parser$getChompedString(
$elm$parser$Parser$chompIf($elm$core$Char$isDigit)));
}
};
return A2($elm$parser$Parser$loop, '', helper);
};
var $elm$parser$Parser$ExpectingSymbol = function (a) {
return {$: 'ExpectingSymbol', a: a};
};
var $elm$parser$Parser$Advanced$Token = F2(
function (a, b) {
return {$: 'Token', a: a, b: b};
});
var $elm$parser$Parser$Advanced$isSubString = _Parser_isSubString;
var $elm$core$Basics$not = _Basics_not;
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 $elm$parser$Parser$Advanced$symbol = $elm$parser$Parser$Advanced$token;
var $elm$parser$Parser$symbol = function (str) {
return $elm$parser$Parser$Advanced$symbol(
A2(
$elm$parser$Parser$Advanced$Token,
str,
$elm$parser$Parser$ExpectingSymbol(str)));
};
var $rtfeldman$elm_iso8601_date_strings$Iso8601$epochYear = 1970;
var $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay = function (day) {
return $elm$parser$Parser$problem(
'Invalid day: ' + $elm$core$String$fromInt(day));
};
var $elm$core$Basics$modBy = _Basics_modBy;
var $elm$core$Basics$neq = _Utils_notEqual;
var $rtfeldman$elm_iso8601_date_strings$Iso8601$isLeapYear = function (year) {
return (!A2($elm$core$Basics$modBy, 4, year)) && ((!(!A2($elm$core$Basics$modBy, 100, year))) || (!A2($elm$core$Basics$modBy, 400, year)));
};
var $rtfeldman$elm_iso8601_date_strings$Iso8601$leapYearsBefore = function (y1) {
var y = y1 - 1;
return (((y / 4) | 0) - ((y / 100) | 0)) + ((y / 400) | 0);
};
var $rtfeldman$elm_iso8601_date_strings$Iso8601$msPerDay = 86400000;
var $rtfeldman$elm_iso8601_date_strings$Iso8601$msPerYear = 31536000000;
var $rtfeldman$elm_iso8601_date_strings$Iso8601$yearMonthDay = function (_v0) {
var year = _v0.a;
var month = _v0.b;
var dayInMonth = _v0.c;
if (dayInMonth < 0) {
return $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth);
} else {
var succeedWith = function (extraMs) {
var yearMs = $rtfeldman$elm_iso8601_date_strings$Iso8601$msPerYear * (year - $rtfeldman$elm_iso8601_date_strings$Iso8601$epochYear);
var days = ((month < 3) || (!$rtfeldman$elm_iso8601_date_strings$Iso8601$isLeapYear(year))) ? (dayInMonth - 1) : dayInMonth;
var dayMs = $rtfeldman$elm_iso8601_date_strings$Iso8601$msPerDay * (days + ($rtfeldman$elm_iso8601_date_strings$Iso8601$leapYearsBefore(year) - $rtfeldman$elm_iso8601_date_strings$Iso8601$leapYearsBefore($rtfeldman$elm_iso8601_date_strings$Iso8601$epochYear)));
return $elm$parser$Parser$succeed((extraMs + yearMs) + dayMs);
};
switch (month) {
case 1:
return (dayInMonth > 31) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(0);
case 2:
return ((dayInMonth > 29) || ((dayInMonth === 29) && (!$rtfeldman$elm_iso8601_date_strings$Iso8601$isLeapYear(year)))) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(2678400000);
case 3:
return (dayInMonth > 31) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(5097600000);
case 4:
return (dayInMonth > 30) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(7776000000);
case 5:
return (dayInMonth > 31) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(10368000000);
case 6:
return (dayInMonth > 30) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(13046400000);
case 7:
return (dayInMonth > 31) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(15638400000);
case 8:
return (dayInMonth > 31) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(18316800000);
case 9:
return (dayInMonth > 30) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(20995200000);
case 10:
return (dayInMonth > 31) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(23587200000);
case 11:
return (dayInMonth > 30) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(26265600000);
case 12:
return (dayInMonth > 31) ? $rtfeldman$elm_iso8601_date_strings$Iso8601$invalidDay(dayInMonth) : succeedWith(28857600000);
default:
return $elm$parser$Parser$problem(
'Invalid month: \"' + ($elm$core$String$fromInt(month) + '\"'));
}
}
};
var $rtfeldman$elm_iso8601_date_strings$Iso8601$monthYearDayInMs = A2(
$elm$parser$Parser$andThen,
$rtfeldman$elm_iso8601_date_strings$Iso8601$yearMonthDay,
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$keeper,
$elm$parser$Parser$succeed(
F3(
function (year, month, day) {
return _Utils_Tuple3(year, month, day);
})),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(4)),
$elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed($elm$core$Basics$identity),
$elm$parser$Parser$symbol('-')),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)
]))),
$elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed($elm$core$Basics$identity),
$elm$parser$Parser$symbol('-')),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)
]))));
var $rtfeldman$elm_iso8601_date_strings$Iso8601$utcOffsetInMinutes = function () {
var utcOffsetMinutesFromParts = F3(
function (multiplier, hours, minutes) {
return (multiplier * (hours * 60)) + minutes;
});
return A2(
$elm$parser$Parser$keeper,
$elm$parser$Parser$succeed($elm$core$Basics$identity),
$elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$map,
function (_v0) {
return 0;
},
$elm$parser$Parser$symbol('Z')),
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$keeper,
$elm$parser$Parser$succeed(utcOffsetMinutesFromParts),
$elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$map,
function (_v1) {
return 1;
},
$elm$parser$Parser$symbol('+')),
A2(
$elm$parser$Parser$map,
function (_v2) {
return -1;
},
$elm$parser$Parser$symbol('-'))
]))),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)),
$elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed($elm$core$Basics$identity),
$elm$parser$Parser$symbol(':')),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2),
$elm$parser$Parser$succeed(0)
]))),
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed(0),
$elm$parser$Parser$end)
])));
}();
var $rtfeldman$elm_iso8601_date_strings$Iso8601$iso8601 = A2(
$elm$parser$Parser$andThen,
function (datePart) {
return $elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed(
$rtfeldman$elm_iso8601_date_strings$Iso8601$fromParts(datePart)),
$elm$parser$Parser$symbol('T')),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)),
$elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed($elm$core$Basics$identity),
$elm$parser$Parser$symbol(':')),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)
]))),
$elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed($elm$core$Basics$identity),
$elm$parser$Parser$symbol(':')),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2)),
$rtfeldman$elm_iso8601_date_strings$Iso8601$paddedInt(2),
$elm$parser$Parser$succeed(0)
]))),
$elm$parser$Parser$oneOf(
_List_fromArray(
[
A2(
$elm$parser$Parser$keeper,
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed($elm$core$Basics$identity),
$elm$parser$Parser$symbol('.')),
$rtfeldman$elm_iso8601_date_strings$Iso8601$fractionsOfASecondInMs),
$elm$parser$Parser$succeed(0)
]))),
A2($elm$parser$Parser$ignorer, $rtfeldman$elm_iso8601_date_strings$Iso8601$utcOffsetInMinutes, $elm$parser$Parser$end)),
A2(
$elm$parser$Parser$ignorer,
$elm$parser$Parser$succeed(
A6($rtfeldman$elm_iso8601_date_strings$Iso8601$fromParts, datePart, 0, 0, 0, 0, 0)),
$elm$parser$Parser$end)
]));
},
$rtfeldman$elm_iso8601_date_strings$Iso8601$monthYearDayInMs);
var $elm$parser$Parser$DeadEnd = F3(
function (row, col, problem) {
return {col: col, problem: problem, row: row};
});
var $elm$parser$Parser$problemToDeadEnd = function (p) {
return A3($elm$parser$Parser$DeadEnd, p.row, p.col, p.problem);
};
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 $elm$parser$Parser$run = F2(
function (parser, source) {
var _v0 = A2($elm$parser$Parser$Advanced$run, parser, source);
if (_v0.$ === 'Ok') {
var a = _v0.a;
return $elm$core$Result$Ok(a);
} else {
var problems = _v0.a;
return $elm$core$Result$Err(
A2($elm$core$List$map, $elm$parser$Parser$problemToDeadEnd, problems));
}
});
var $rtfeldman$elm_iso8601_date_strings$Iso8601$toTime = function (str) {
return A2($elm$parser$Parser$run, $rtfeldman$elm_iso8601_date_strings$Iso8601$iso8601, str);
};
var $rtfeldman$elm_iso8601_date_strings$Iso8601$decoder = A2(
$elm$json$Json$Decode$andThen,
function (str) {
var _v0 = $rtfeldman$elm_iso8601_date_strings$Iso8601$toTime(str);
if (_v0.$ === 'Err') {
var deadEnds = _v0.a;
return $elm$json$Json$Decode$fail(
$rtfeldman$elm_iso8601_date_strings$DeadEnds$deadEndsToString(deadEnds));
} else {
var time = _v0.a;
return $elm$json$Json$Decode$succeed(time);
}
},
$elm$json$Json$Decode$string);
var $elm$core$Basics$composeR = F3(
function (f, g, x) {
return g(
f(x));
});
var $NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$custom = $elm$json$Json$Decode$map2($elm$core$Basics$apR);
var $NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$hardcoded = A2($elm$core$Basics$composeR, $elm$json$Json$Decode$succeed, $NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$custom);
var $elm$json$Json$Decode$int = _Json_decodeInt;
var $elm$json$Json$Decode$field = _Json_decodeField;
var $NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$required = F3(
function (key, valDecoder, decoder) {
return A2(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$custom,
A2($elm$json$Json$Decode$field, key, valDecoder),
decoder);
});
var $author$project$File$fileDecoder = A2(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$hardcoded,
$author$project$File$Unselected,
A3(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$required,
'Size',
$elm$json$Json$Decode$int,
A2(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$hardcoded,
false,
A3(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$required,
'DirPath',
$elm$json$Json$Decode$string,
A3(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$required,
'Name',
$elm$json$Json$Decode$string,
A3(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$required,
'ModTime',
$rtfeldman$elm_iso8601_date_strings$Iso8601$decoder,
A3(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$required,
'Mode',
$elm$json$Json$Decode$int,
A3(
$NoRedInk$elm_json_decode_pipeline$Json$Decode$Pipeline$required,
'IsDir',
$elm$json$Json$Decode$bool,
$elm$json$Json$Decode$succeed($author$project$File$File)))))))));
var $author$project$Main$decodeFile = F2(
function (msg, value) {
var decodedFile = A2($elm$json$Json$Decode$decodeValue, $author$project$File$fileDecoder, value);
if (decodedFile.$ === 'Ok') {
var file = decodedFile.a;
return msg(file);
} else {
var error = decodedFile.a;
return $author$project$Main$BackendReturnedError(
$elm$json$Json$Decode$errorToString(error));
}
});
var $elm$json$Json$Decode$list = _Json_decodeList;
var $author$project$Main$decodeFileList = F2(
function (msg, value) {
var decodedFiles = A2(
$elm$json$Json$Decode$decodeValue,
$elm$json$Json$Decode$list($author$project$File$fileDecoder),
value);
if (decodedFiles.$ === 'Ok') {
var fileList = decodedFiles.a;
return msg(fileList);
} else {
var error = decodedFiles.a;
return $author$project$Main$BackendReturnedError(
$elm$json$Json$Decode$errorToString(error));
}
});
var $author$project$Main$decodeFileWithPreviousName = F2(
function (msg, value) {
var decodedFile = A2($elm$json$Json$Decode$decodeValue, $author$project$File$fileDecoder, value);
if (decodedFile.$ === 'Ok') {
return msg;
} else {
var error = decodedFile.a;
return $author$project$Main$BackendReturnedError(
$elm$json$Json$Decode$errorToString(error));
}
});
var $author$project$Main$decodeRenamingList = F2(
function (msg, value) {
var decodedOriginalPaths = A2(
$elm$json$Json$Decode$decodeValue,
$elm$json$Json$Decode$list(
A2($elm$json$Json$Decode$field, 'PreviousName', $elm$json$Json$Decode$string)),
value);
var decodedFiles = A2(
$elm$json$Json$Decode$decodeValue,
$elm$json$Json$Decode$list($author$project$File$fileDecoder),
value);
var _v0 = _Utils_Tuple2(decodedFiles, decodedOriginalPaths);
if (_v0.a.$ === 'Ok') {
if (_v0.b.$ === 'Ok') {
var fileList = _v0.a.a;
var originalPaths = _v0.b.a;
return A2(msg, fileList, originalPaths);
} else {
var error = _v0.b.a;
return $author$project$Main$BackendReturnedError(
$elm$json$Json$Decode$errorToString(error));
}
} else {
var error = _v0.a.a;
return $author$project$Main$BackendReturnedError(
$elm$json$Json$Decode$errorToString(error));
}
});
var $elm$json$Json$Decode$value = _Json_decodeValue;
var $author$project$Main$fileRemoved = _Platform_incomingPort('fileRemoved', $elm$json$Json$Decode$value);
var $author$project$Main$filesRenamed = _Platform_incomingPort('filesRenamed', $elm$json$Json$Decode$value);
var $author$project$Main$receiveCreatedDirectory = _Platform_incomingPort('receiveCreatedDirectory', $elm$json$Json$Decode$value);
var $author$project$Main$receiveCurrentDirectoryPath = _Platform_incomingPort('receiveCurrentDirectoryPath', $elm$json$Json$Decode$string);
var $author$project$Main$receiveDestinationDirectoryFiles = _Platform_incomingPort('receiveDestinationDirectoryFiles', $elm$json$Json$Decode$value);
var $author$project$Main$receiveError = _Platform_incomingPort('receiveError', $elm$json$Json$Decode$string);
var $author$project$Main$receiveMovedFiles = _Platform_incomingPort('receiveMovedFiles', $elm$json$Json$Decode$value);
var $author$project$Main$receiveSelectedDestinationDirectory = _Platform_incomingPort('receiveSelectedDestinationDirectory', $elm$json$Json$Decode$string);
var $author$project$Main$receiveSelectedSourceDirectory = _Platform_incomingPort('receiveSelectedSourceDirectory', $elm$json$Json$Decode$string);
var $author$project$Main$receiveSourceDirectoryContent = _Platform_incomingPort('receiveSourceDirectoryContent', $elm$json$Json$Decode$value);
var $author$project$Main$receiveSubDirectories = _Platform_incomingPort('receiveSubDirectories', $elm$json$Json$Decode$value);
var $author$project$Main$subscriptions = function (_v0) {
return $elm$core$Platform$Sub$batch(
_List_fromArray(
[
$author$project$Main$fileRemoved(
$author$project$Main$decodeFileWithPreviousName($author$project$Main$BackendReturnedRemovedFile)),
$author$project$Main$filesRenamed(
$author$project$Main$decodeRenamingList($author$project$Main$BackendReturnedRenamedFiles)),
$author$project$Main$receiveCreatedDirectory(
$author$project$Main$decodeFile($author$project$Main$BackendReturnedCreatedDirectory)),
$author$project$Main$receiveCurrentDirectoryPath($author$project$Main$BackendReturnedCurrentDirPath),
$author$project$Main$receiveSourceDirectoryContent(
$author$project$Main$decodeFileList($author$project$Main$BackendReturnedSourceDirectoryContent)),
$author$project$Main$receiveDestinationDirectoryFiles(
$author$project$Main$decodeFileList($author$project$Main$BackendReturnedDestinationFiles)),
$author$project$Main$receiveError($author$project$Main$BackendReturnedError),
$author$project$Main$receiveMovedFiles(
$author$project$Main$decodeFileList($author$project$Main$BackendReturnedMovedFiles)),
$author$project$Main$receiveSelectedDestinationDirectory($author$project$Main$BackendReturnedDestinationDirectoryPath),
$author$project$Main$receiveSelectedSourceDirectory($author$project$Main$BackendReturnedSourceDirectoryPath),
$author$project$Main$receiveSubDirectories(
$author$project$Main$decodeFileList($author$project$Main$BackendReturnedDestinationDirectories))
]));
};
var $author$project$Main$Destination = {$: 'Destination'};
var $author$project$File$Edited = {$: 'Edited'};
var $author$project$Main$ErrorMessage = {$: 'ErrorMessage'};
var $author$project$Main$Move = {$: 'Move'};
var $author$project$Main$NoOp = {$: 'NoOp'};
var $author$project$Main$Rename = {$: 'Rename'};
var $author$project$Main$RightSide = {$: 'RightSide'};
var $author$project$File$Selected = {$: 'Selected'};
var $author$project$File$SelectedForDeletion = {$: 'SelectedForDeletion'};
var $author$project$Main$Source = {$: 'Source'};
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 $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$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 $author$project$Main$renameFiles = _Platform_outgoingPort(
'renameFiles',
$elm$json$Json$Encode$list($elm$core$Basics$identity));
var $elm$json$Json$Encode$string = _Json_wrap;
var $author$project$Main$applyRenaming = F2(
function (model, renamings) {
var encodedRenamings = A2(
$elm$core$List$map,
function (renaming) {
return $elm$json$Json$Encode$object(
_List_fromArray(
[
_Utils_Tuple2(
'oldName',
$elm$json$Json$Encode$string(
_Utils_ap(
renaming.file.parentPath,
_Utils_ap(model.pathSeparator, renaming.originalPath)))),
_Utils_Tuple2(
'newName',
$elm$json$Json$Encode$string(
_Utils_ap(
renaming.file.parentPath,
_Utils_ap(model.pathSeparator, renaming.file.name))))
]));
},
renamings);
return $author$project$Main$renameFiles(encodedRenamings);
});
var $author$project$Main$changeDestinationDirectory = F2(
function (path, model) {
return _Utils_update(
model,
{
destinationDirectoryPath: path,
destinationNavigationHistory: A2($elm$core$List$cons, model.destinationDirectoryPath, model.destinationNavigationHistory),
isDestinationLoadingInProgress: true,
isSourceLoadingInProgress: true
});
});
var $author$project$Main$changeSourceDirectory = F2(
function (path, model) {
return _Utils_update(
model,
{
isSourceLoadingInProgress: true,
sourceDirectoryPath: path,
sourceNavigationHistory: A2($elm$core$List$cons, model.sourceDirectoryPath, model.sourceNavigationHistory)
});
});
var $author$project$Main$createDirectory = _Platform_outgoingPort('createDirectory', $elm$json$Json$Encode$string);
var $author$project$Main$createNewDirectory = function (model) {
var dirPath = _Utils_ap(
model.destinationDirectoryPath,
_Utils_ap(model.pathSeparator, model.editedDirName));
return _Utils_Tuple2(
model,
$author$project$Main$createDirectory(dirPath));
};
var $elm$core$Basics$composeL = F3(
function (g, f, x) {
return g(
f(x));
});
var $elm$core$List$all = F2(
function (isOkay, list) {
return !A2(
$elm$core$List$any,
A2($elm$core$Basics$composeL, $elm$core$Basics$not, isOkay),
list);
});
var $elm$core$String$toLower = _String_toLower;
var $author$project$Main$filterByName = F2(
function (filters, file) {
if (file.name === '..') {
return true;
} else {
var lowerCaseFilename = $elm$core$String$toLower(file.name);
return A2(
$elm$core$List$all,
function (word) {
return A2(
$elm$core$String$contains,
$elm$core$String$toLower(word),
lowerCaseFilename);
},
filters);
}
});
var $author$project$Main$filterByParentPath = F2(
function (filters, file) {
if (file.name === '..') {
return true;
} else {
var lowerCaseParentPath = $elm$core$String$toLower(file.parentPath);
return A2(
$elm$core$List$all,
function (word) {
return A2(
$elm$core$String$contains,
$elm$core$String$toLower(word),
lowerCaseParentPath);
},
filters);
}
});
var $elm$core$String$words = _String_words;
var $author$project$Main$filterDestinationDirectories = function (model) {
var words = $elm$core$String$words(model.destinationDirectoryFilter);
if (!words.b) {
return _Utils_update(
model,
{
destinationSubdirectories: A2(
$elm$core$List$map,
function (f) {
return _Utils_update(
f,
{satisfiesFilter: true});
},
model.destinationSubdirectories)
});
} else {
return _Utils_update(
model,
{
destinationSubdirectories: A2(
$elm$core$List$map,
function (f) {
return _Utils_update(
f,
{
satisfiesFilter: A2($author$project$Main$filterByName, words, f) || A2($author$project$Main$filterByParentPath, words, f)
});
},
model.destinationSubdirectories)
});
}
};
var $author$project$Main$filterDestinationFiles = function (model) {
var words = $elm$core$String$words(model.destinationFilesFilter);
if (!words.b) {
return _Utils_update(
model,
{
destinationFiles: A2(
$elm$core$List$map,
function (f) {
return _Utils_update(
f,
{satisfiesFilter: true});
},
model.destinationFiles)
});
} else {
return _Utils_update(
model,
{
destinationFiles: A2(
$elm$core$List$map,
function (f) {
return _Utils_update(
f,
{
satisfiesFilter: A2($author$project$Main$filterByName, words, f)
});
},
model.destinationFiles)
});
}
};
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 $author$project$Main$filterSourceFiles = function (model) {
var words = $elm$core$String$words(model.sourceFilter);
if (!words.b) {
return _Utils_update(
model,
{
sourceFiles: A2(
$elm$core$List$map,
function (f) {
return _Utils_update(
f,
{satisfiesFilter: true});
},
model.sourceFiles)
});
} else {
return _Utils_update(
model,
{
sourceFiles: A2(
$elm$core$List$map,
function (f) {
return _Utils_update(
f,
{
satisfiesFilter: A2($author$project$Main$filterByName, words, f)
});
},
model.sourceFiles)
});
}
};
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$browser$Browser$Dom$focus = _Browser_call('focus');
var $author$project$Main$focusOn = F2(
function (elementId, msg) {
return A2(
$elm$core$Task$attempt,
function (_v0) {
return msg;
},
$elm$browser$Browser$Dom$focus(elementId));
});
var $author$project$Main$getDestinationDirectoryFiles = _Platform_outgoingPort('getDestinationDirectoryFiles', $elm$json$Json$Encode$string);
var $author$project$Main$getDestinationSubdirectories = _Platform_outgoingPort('getDestinationSubdirectories', $elm$json$Json$Encode$string);
var $author$project$Main$getSourceDirectoryContent = _Platform_outgoingPort('getSourceDirectoryContent', $elm$json$Json$Encode$string);
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$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 $elm$core$Platform$Cmd$none = $elm$core$Platform$Cmd$batch(_List_Nil);
var $elm$core$Maybe$withDefault = F2(
function (_default, maybe) {
if (maybe.$ === 'Just') {
var value = maybe.a;
return value;
} else {
return _default;
}
});
var $author$project$Main$goBack = F2(
function (model, target) {
if (target.$ === 'Source') {
var previousDir = A2(
$elm$core$Maybe$withDefault,
'',
$elm$core$List$head(model.sourceNavigationHistory));
if ($elm$core$String$isEmpty(previousDir)) {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
} else {
var history = A2($elm$core$List$drop, 1, model.sourceNavigationHistory);
return _Utils_Tuple2(
_Utils_update(
model,
{sourceDirectoryPath: previousDir, sourceNavigationHistory: history}),
$author$project$Main$getSourceDirectoryContent(previousDir));
}
} else {
var previousDir = A2(
$elm$core$Maybe$withDefault,
'',
$elm$core$List$head(model.destinationNavigationHistory));
if ($elm$core$String$isEmpty(previousDir)) {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
} else {
var history = A2($elm$core$List$drop, 1, model.destinationNavigationHistory);
return _Utils_Tuple2(
_Utils_update(
model,
{destinationDirectoryPath: previousDir, destinationNavigationHistory: history}),
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getDestinationSubdirectories(previousDir),
$author$project$Main$getDestinationDirectoryFiles(previousDir)
])));
}
}
});
var $author$project$Main$isFileNotFoundError = F3(
function (model, target, errorMsg) {
var dir = function () {
if (target.$ === 'Source') {
return model.sourceDirectoryPath;
} else {
return model.destinationDirectoryPath;
}
}();
return _Utils_eq(errorMsg, 'open ' + (dir + ': no such file or directory'));
});
var $elm$core$Debug$log = _Debug_log;
var $author$project$Pattern$Joker = {$: 'Joker'};
var $author$project$Pattern$RawString = function (a) {
return {$: 'RawString', a: a};
};
var $elm$core$String$replace = F3(
function (before, after, string) {
return A2(
$elm$core$String$join,
after,
A2($elm$core$String$split, before, string));
});
var $author$project$Pattern$escapeSpecialChars = function (string) {
return A3(
$elm$core$String$replace,
')',
'\\)',
A3(
$elm$core$String$replace,
'(',
'\\(',
A3(
$elm$core$String$replace,
']',
'\\]',
A3(
$elm$core$String$replace,
'[',
'\\[',
A3($elm$core$String$replace, '.', '\\.', string)))));
};
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$Pattern$fromString = function (string) {
return A2(
$elm$core$List$filter,
function (t) {
return !_Utils_eq(
t,
$author$project$Pattern$RawString(''));
},
A2(
$elm$core$List$intersperse,
$author$project$Pattern$Joker,
A2(
$elm$core$List$map,
$author$project$Pattern$RawString,
A2(
$elm$core$List$map,
$author$project$Pattern$escapeSpecialChars,
A2($elm$core$String$split, '*', string)))));
};
var $elm$regex$Regex$Match = F4(
function (match, index, number, submatches) {
return {index: index, match: match, number: number, submatches: submatches};
});
var $elm$regex$Regex$replace = _Regex_replaceAtMost(_Regex_infinity);
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 $author$project$Pattern$toRegexp = function (pattern) {
return $elm$regex$Regex$fromString(
$elm$core$String$concat(
A2(
$elm$core$List$map,
function (token) {
if (token.$ === 'RawString') {
var string = token.a;
return '(' + (string + ')');
} else {
return '(.*?)';
}
},
pattern)));
};
var $author$project$Main$replace = F2(
function (model, originalString) {
var maybeRegex = $author$project$Pattern$toRegexp(
$author$project$Pattern$fromString(model.sourceSearch));
if (maybeRegex.$ === 'Just') {
var regex = maybeRegex.a;
return A3(
$elm$regex$Regex$replace,
regex,
function (_v1) {
return model.sourceReplace;
},
originalString);
} else {
return originalString;
}
});
var $author$project$Main$nameReplacement = F2(
function (model, file) {
var newName = A2($author$project$Main$replace, model, file.name);
return (file.satisfiesFilter && (!_Utils_eq(newName, file.name))) ? $elm$core$Maybe$Just(
{
file: _Utils_update(
file,
{name: newName}),
originalPath: file.name
}) : $elm$core$Maybe$Nothing;
});
var $elm_community$list_extra$List$Extra$last = function (items) {
last:
while (true) {
if (!items.b) {
return $elm$core$Maybe$Nothing;
} else {
if (!items.b.b) {
var x = items.a;
return $elm$core$Maybe$Just(x);
} else {
var rest = items.b;
var $temp$items = rest;
items = $temp$items;
continue last;
}
}
}
};
var $author$project$Main$parentDir = F2(
function (model, path) {
var index = A2(
$elm$core$Maybe$withDefault,
$elm$core$String$length(path),
$elm_community$list_extra$List$Extra$last(
A2($elm$core$String$indexes, model.pathSeparator, path)));
return A3($elm$core$String$slice, 0, index, path);
});
var $elm$core$List$partition = F2(
function (pred, list) {
var step = F2(
function (x, _v0) {
var trues = _v0.a;
var falses = _v0.b;
return pred(x) ? _Utils_Tuple2(
A2($elm$core$List$cons, x, trues),
falses) : _Utils_Tuple2(
trues,
A2($elm$core$List$cons, x, falses));
});
return A3(
$elm$core$List$foldr,
step,
_Utils_Tuple2(_List_Nil, _List_Nil),
list);
});
var $author$project$Main$removeFile = _Platform_outgoingPort('removeFile', $elm$core$Basics$identity);
var $author$project$Main$removeSelectedFiles = function (model) {
var commands = A2(
$elm$core$List$map,
function (file) {
return $author$project$Main$removeFile(
$elm$json$Json$Encode$string(
_Utils_ap(
file.parentPath,
_Utils_ap(model.pathSeparator, file.name))));
},
model.filesToDelete);
return _Utils_Tuple2(
_Utils_update(
model,
{filesToDelete: _List_Nil, focusedZone: $author$project$Main$LeftSide}),
$elm$core$Platform$Cmd$batch(
A2(
$elm$core$List$cons,
A2($author$project$Main$focusOn, 'container-left', $author$project$Main$NoOp),
commands)));
};
var $author$project$Main$changeStatusOfDestinationFiles = F3(
function (fromStatus, toStatus, model) {
return _Utils_update(
model,
{
destinationFiles: A2(
$elm$core$List$map,
function (file) {
return _Utils_eq(file.status, fromStatus) ? _Utils_update(
file,
{status: toStatus}) : file;
},
model.destinationFiles)
});
});
var $author$project$Main$changeStatusOfSourceFiles = F3(
function (fromStatus, toStatus, model) {
return $author$project$Main$filterSourceFiles(
_Utils_update(
model,
{
sourceFiles: A2(
$elm$core$List$map,
function (file) {
return (file.satisfiesFilter && _Utils_eq(file.status, fromStatus)) ? _Utils_update(
file,
{status: toStatus}) : file;
},
model.sourceFiles)
}));
});
var $author$project$Main$unmarkFilesForDeletion = function (model) {
return A3(
$author$project$Main$changeStatusOfSourceFiles,
$author$project$File$SelectedForDeletion,
$author$project$File$Selected,
A3($author$project$Main$changeStatusOfDestinationFiles, $author$project$File$SelectedForDeletion, $author$project$File$Selected, model));
};
var $author$project$Main$processConfirmationShortcuts = F2(
function (model, event) {
var _v0 = _Utils_Tuple3(event.keyCode, event.ctrlKey, event.metaKey);
_v0$2:
while (true) {
if ((!_v0.b) && (!_v0.c)) {
switch (_v0.a.$) {
case 'Escape':
var _v1 = _v0.a;
return _Utils_Tuple2(
$author$project$Main$unmarkFilesForDeletion(
_Utils_update(
model,
{filesToDelete: _List_Nil, focusedZone: $author$project$Main$LeftSide})),
A2($author$project$Main$focusOn, 'container-left', $author$project$Main$NoOp));
case 'Enter':
var _v2 = _v0.a;
return $author$project$Main$removeSelectedFiles(model);
default:
break _v0$2;
}
} else {
break _v0$2;
}
}
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
});
var $author$project$Main$changeAllFileStatus = F3(
function (model, target, status) {
if (target.$ === 'Source') {
var updatedFiles = A2(
$elm$core$List$map,
function (f) {
return f.satisfiesFilter ? _Utils_update(
f,
{status: status}) : f;
},
model.sourceFiles);
return _Utils_Tuple2(
$author$project$Main$filterSourceFiles(
_Utils_update(
model,
{sourceFiles: updatedFiles})),
$elm$core$Platform$Cmd$none);
} else {
var updatedFiles = A2(
$elm$core$List$map,
function (f) {
return _Utils_update(
f,
{status: status});
},
model.destinationFiles);
return _Utils_Tuple2(
_Utils_update(
model,
{destinationFiles: updatedFiles}),
$elm$core$Platform$Cmd$none);
}
});
var $author$project$File$extendSelection = F2(
function (visit, files) {
var initialAccumulator = {isPreviousSelected: false, selectedCount: 0};
var _v0 = A3(
visit,
F2(
function (acc, file) {
var newAcc = _Utils_update(
acc,
{
isPreviousSelected: _Utils_eq(file.status, $author$project$File$Selected)
});
return acc.isPreviousSelected ? _Utils_Tuple2(
_Utils_update(
newAcc,
{selectedCount: acc.selectedCount + 1}),
_Utils_update(
file,
{status: $author$project$File$Selected})) : _Utils_Tuple2(newAcc, file);
}),
initialAccumulator,
files);
var finalAccumulator = _v0.a;
var updatedFiles = _v0.b;
var isAtLeastOneFileSelected = finalAccumulator.selectedCount > 0;
return _Utils_Tuple2(isAtLeastOneFileSelected, updatedFiles);
});
var $elm_community$list_extra$List$Extra$mapAccuml = F3(
function (f, acc0, list) {
var _v0 = A3(
$elm$core$List$foldl,
F2(
function (x, _v1) {
var acc1 = _v1.a;
var ys = _v1.b;
var _v2 = A2(f, acc1, x);
var acc2 = _v2.a;
var y = _v2.b;
return _Utils_Tuple2(
acc2,
A2($elm$core$List$cons, y, ys));
}),
_Utils_Tuple2(acc0, _List_Nil),
list);
var accFinal = _v0.a;
var generatedList = _v0.b;
return _Utils_Tuple2(
accFinal,
$elm$core$List$reverse(generatedList));
});
var $elm$core$List$takeReverse = F3(
function (n, list, kept) {
takeReverse:
while (true) {
if (n <= 0) {
return kept;
} else {
if (!list.b) {
return kept;
} else {
var x = list.a;
var xs = list.b;
var $temp$n = n - 1,
$temp$list = xs,
$temp$kept = A2($elm$core$List$cons, x, kept);
n = $temp$n;
list = $temp$list;
kept = $temp$kept;
continue takeReverse;
}
}
}
});
var $elm$core$List$takeTailRec = F2(
function (n, list) {
return $elm$core$List$reverse(
A3($elm$core$List$takeReverse, n, list, _List_Nil));
});
var $elm$core$List$takeFast = F3(
function (ctr, n, list) {
if (n <= 0) {
return _List_Nil;
} else {
var _v0 = _Utils_Tuple2(n, list);
_v0$1:
while (true) {
_v0$5:
while (true) {
if (!_v0.b.b) {
return list;
} else {
if (_v0.b.b.b) {
switch (_v0.a) {
case 1:
break _v0$1;
case 2:
var _v2 = _v0.b;
var x = _v2.a;
var _v3 = _v2.b;
var y = _v3.a;
return _List_fromArray(
[x, y]);
case 3:
if (_v0.b.b.b.b) {
var _v4 = _v0.b;
var x = _v4.a;
var _v5 = _v4.b;
var y = _v5.a;
var _v6 = _v5.b;
var z = _v6.a;
return _List_fromArray(
[x, y, z]);
} else {
break _v0$5;
}
default:
if (_v0.b.b.b.b && _v0.b.b.b.b.b) {
var _v7 = _v0.b;
var x = _v7.a;
var _v8 = _v7.b;
var y = _v8.a;
var _v9 = _v8.b;
var z = _v9.a;
var _v10 = _v9.b;
var w = _v10.a;
var tl = _v10.b;
return (ctr > 1000) ? A2(
$elm$core$List$cons,
x,
A2(
$elm$core$List$cons,
y,
A2(
$elm$core$List$cons,
z,
A2(
$elm$core$List$cons,
w,
A2($elm$core$List$takeTailRec, n - 4, tl))))) : A2(
$elm$core$List$cons,
x,
A2(
$elm$core$List$cons,
y,
A2(
$elm$core$List$cons,
z,
A2(
$elm$core$List$cons,
w,
A3($elm$core$List$takeFast, ctr + 1, n - 4, tl)))));
} else {
break _v0$5;
}
}
} else {
if (_v0.a === 1) {
break _v0$1;
} else {
break _v0$5;
}
}
}
}
return list;
}
var _v1 = _v0.b;
var x = _v1.a;
return _List_fromArray(
[x]);
}
});
var $elm$core$List$take = F2(
function (n, list) {
return A3($elm$core$List$takeFast, 0, n, list);
});
var $elm_community$list_extra$List$Extra$updateAt = F3(
function (index, fn, list) {
if (index < 0) {
return list;
} else {
var tail = A2($elm$core$List$drop, index, list);
if (tail.b) {
var x = tail.a;
var xs = tail.b;
return _Utils_ap(
A2($elm$core$List$take, index, list),
A2(
$elm$core$List$cons,
fn(x),
xs));
} else {
return list;
}
}
});
var $author$project$File$selectLast = function (files) {
return A3(
$elm_community$list_extra$List$Extra$updateAt,
$elm$core$List$length(files) - 1,
function (f) {
return _Utils_update(
f,
{status: $author$project$File$Selected});
},
files);
};
var $author$project$File$extendSelectionToNext = function (files) {
var _v0 = A2($author$project$File$extendSelection, $elm_community$list_extra$List$Extra$mapAccuml, files);
var isAtLeastOneFileSelected = _v0.a;
var updatedFiles = _v0.b;
return isAtLeastOneFileSelected ? updatedFiles : $author$project$File$selectLast(updatedFiles);
};
var $elm_community$list_extra$List$Extra$mapAccumr = F3(
function (f, acc0, list) {
return A3(
$elm$core$List$foldr,
F2(
function (x, _v0) {
var acc1 = _v0.a;
var ys = _v0.b;
var _v1 = A2(f, acc1, x);
var acc2 = _v1.a;
var y = _v1.b;
return _Utils_Tuple2(
acc2,
A2($elm$core$List$cons, y, ys));
}),
_Utils_Tuple2(acc0, _List_Nil),
list);
});
var $author$project$File$extendSelectionToPrevious = function (files) {
var _v0 = A2($author$project$File$extendSelection, $elm_community$list_extra$List$Extra$mapAccumr, files);
var isAtLeastOneFileSelected = _v0.a;
var updatedFiles = _v0.b;
return isAtLeastOneFileSelected ? updatedFiles : $author$project$File$selectLast(updatedFiles);
};
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 $author$project$Main$maxSimilarity = 30;
var $elm$core$Basics$min = F2(
function (x, y) {
return (_Utils_cmp(x, y) < 0) ? x : y;
});
var $author$project$Main$filterSelectedFiles = function (files) {
return A2(
$elm$core$List$filter,
function (f) {
return f.satisfiesFilter && _Utils_eq(f.status, $author$project$File$Selected);
},
files);
};
var $author$project$Main$moveFiles = _Platform_outgoingPort(
'moveFiles',
function ($) {
var a = $.a;
var b = $.b;
return A2(
$elm$json$Json$Encode$list,
$elm$core$Basics$identity,
_List_fromArray(
[
$elm$json$Json$Encode$list($elm$json$Json$Encode$string)(a),
$elm$json$Json$Encode$string(b)
]));
});
var $author$project$Main$moveSelectedFiles = function (model) {
var _v0 = function () {
var _v1 = model.focusedZone;
if (_v1.$ === 'RightSide') {
return _Utils_Tuple2(
A2(
$elm$core$List$map,
function (file) {
return _Utils_ap(
file.parentPath,
_Utils_ap(model.pathSeparator, file.name));
},
A2(
$elm$core$List$filter,
function (f) {
return _Utils_eq(f.status, $author$project$File$Selected);
},
model.destinationFiles)),
model.sourceDirectoryPath);
} else {
return _Utils_Tuple2(
A2(
$elm$core$List$map,
function (file) {
return _Utils_ap(
file.parentPath,
_Utils_ap(model.pathSeparator, file.name));
},
$author$project$Main$filterSelectedFiles(model.sourceFiles)),
model.destinationDirectoryPath);
}
}();
var filesToMove = _v0.a;
var destination = _v0.b;
return _Utils_Tuple2(
model,
$author$project$Main$moveFiles(
_Utils_Tuple2(filesToMove, destination)));
};
var $author$project$Main$openFile = _Platform_outgoingPort('openFile', $elm$json$Json$Encode$string);
var $author$project$Main$openSelectedFile = F2(
function (model, target) {
var fileToOpen = function () {
if (target.$ === 'Source') {
return A2(
$elm_community$list_extra$List$Extra$find,
function (f) {
return f.satisfiesFilter && _Utils_eq(f.status, $author$project$File$Selected);
},
model.sourceFiles);
} else {
return A2(
$elm_community$list_extra$List$Extra$find,
function (f) {
return _Utils_eq(f.status, $author$project$File$Selected);
},
model.destinationFiles);
}
}();
if (fileToOpen.$ === 'Just') {
var file = fileToOpen.a;
return _Utils_Tuple2(
model,
$author$project$Main$openFile(
_Utils_ap(
file.parentPath,
_Utils_ap(model.pathSeparator, file.name))));
} else {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
});
var $author$project$Main$openSelectedFolder = F2(
function (model, target) {
var folderToOpen = function () {
if (target.$ === 'Source') {
return model.sourceDirectoryPath;
} else {
return model.destinationDirectoryPath;
}
}();
return _Utils_Tuple2(
model,
$author$project$Main$openFile(folderToOpen));
});
var $author$project$Main$Confirmation = {$: 'Confirmation'};
var $author$project$Main$prepareSelectedFilesForRemoval = function (model) {
var _v0 = model.focusedZone;
switch (_v0.$) {
case 'LeftSide':
return _Utils_Tuple2(
A3(
$author$project$Main$changeStatusOfSourceFiles,
$author$project$File$Selected,
$author$project$File$SelectedForDeletion,
_Utils_update(
model,
{
filesToDelete: $author$project$Main$filterSelectedFiles(model.sourceFiles),
focusedZone: $author$project$Main$Confirmation,
previousFocusedZone: model.focusedZone
})),
A2($author$project$Main$focusOn, 'delete-button', $author$project$Main$NoOp));
case 'RightSide':
return _Utils_Tuple2(
A3(
$author$project$Main$changeStatusOfDestinationFiles,
$author$project$File$Selected,
$author$project$File$SelectedForDeletion,
_Utils_update(
model,
{
filesToDelete: A2(
$elm$core$List$filter,
function (f) {
return _Utils_eq(f.status, $author$project$File$Selected);
},
model.destinationFiles),
focusedZone: $author$project$Main$Confirmation,
previousFocusedZone: model.focusedZone
})),
A2($author$project$Main$focusOn, 'delete-button', $author$project$Main$NoOp));
default:
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
};
var $author$project$Main$quit = _Platform_outgoingPort(
'quit',
function ($) {
return $elm$json$Json$Encode$null;
});
var $author$project$Main$reload = F2(
function (model, target) {
if (target.$ === 'Source') {
return _Utils_Tuple2(
model,
$author$project$Main$getSourceDirectoryContent(model.sourceDirectoryPath));
} else {
return _Utils_Tuple2(
model,
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getDestinationSubdirectories(model.destinationDirectoryPath),
$author$project$Main$getDestinationDirectoryFiles(model.destinationDirectoryPath)
])));
}
});
var $elm_community$list_extra$List$Extra$updateIf = F3(
function (predicate, update, list) {
return A2(
$elm$core$List$map,
function (item) {
return predicate(item) ? update(item) : item;
},
list);
});
var $author$project$Main$renameSelectedSourceFile = function (model) {
var fileToEdit = A2(
$elm_community$list_extra$List$Extra$find,
function (f) {
return f.satisfiesFilter && _Utils_eq(f.status, $author$project$File$Selected);
},
model.sourceFiles);
if (fileToEdit.$ === 'Just') {
var file = fileToEdit.a;
var sourceDirectoryFiles = A3(
$elm_community$list_extra$List$Extra$updateIf,
function (f) {
return _Utils_eq(f, file);
},
function (f) {
return _Utils_update(
f,
{status: $author$project$File$Edited});
},
model.sourceFiles);
return _Utils_Tuple2(
_Utils_update(
model,
{
editedFile: $elm$core$Maybe$Just(file),
editedFileName: file.name,
sourceFiles: sourceDirectoryFiles
}),
A2($author$project$Main$focusOn, 'filename-input', $author$project$Main$NoOp));
} else {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
};
var $author$project$File$selectNextOrPrevious = F2(
function (visit, files) {
var initialAccumulator = {isPreviousSelected: false, selectedCount: 0};
var _v0 = A3(
visit,
F2(
function (acc, file) {
var newAcc = _Utils_update(
acc,
{
isPreviousSelected: _Utils_eq(file.status, $author$project$File$Selected)
});
return acc.isPreviousSelected ? _Utils_Tuple2(
_Utils_update(
newAcc,
{selectedCount: acc.selectedCount + 1}),
_Utils_update(
file,
{status: $author$project$File$Selected})) : _Utils_Tuple2(
newAcc,
_Utils_update(
file,
{status: $author$project$File$Unselected}));
}),
initialAccumulator,
files);
var finalAccumulator = _v0.a;
var updatedFiles = _v0.b;
var isAtLeastOneFileSelected = finalAccumulator.selectedCount > 0;
return _Utils_Tuple2(isAtLeastOneFileSelected, updatedFiles);
});
var $author$project$File$selectNext = function (files) {
var _v0 = A2($author$project$File$selectNextOrPrevious, $elm_community$list_extra$List$Extra$mapAccuml, files);
var isAtLeastOneFileSelected = _v0.a;
var updatedFiles = _v0.b;
return isAtLeastOneFileSelected ? updatedFiles : $author$project$File$selectLast(updatedFiles);
};
var $author$project$File$selectFirst = function (files) {
return A3(
$elm_community$list_extra$List$Extra$updateAt,
0,
function (f) {
return _Utils_update(
f,
{status: $author$project$File$Selected});
},
files);
};
var $author$project$File$selectPrevious = function (files) {
var _v0 = A2($author$project$File$selectNextOrPrevious, $elm_community$list_extra$List$Extra$mapAccumr, files);
var isAtLeastOneFileSelected = _v0.a;
var updatedFiles = _v0.b;
return isAtLeastOneFileSelected ? updatedFiles : $author$project$File$selectFirst(updatedFiles);
};
var $author$project$StringComparison$compareChars = F2(
function (_v0, currentLevel) {
var char1 = _v0.a;
var char2 = _v0.b;
return _Utils_eq(char1, char2) ? (currentLevel + 1) : currentLevel;
});
var $elm$core$Basics$ge = _Utils_ge;
var $elm$core$String$cons = _String_cons;
var $elm$core$String$fromChar = function (_char) {
return A2($elm$core$String$cons, _char, '');
};
var $elm$core$Bitwise$and = _Bitwise_and;
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 $elm$core$String$padRight = F3(
function (n, _char, string) {
return _Utils_ap(
string,
A2(
$elm$core$String$repeat,
n - $elm$core$String$length(string),
$elm$core$String$fromChar(_char)));
});
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 $elm$core$Tuple$pair = F2(
function (a, b) {
return _Utils_Tuple2(a, b);
});
var $elm_community$list_extra$List$Extra$zip = $elm$core$List$map2($elm$core$Tuple$pair);
var $author$project$StringComparison$isSimilarityLevelGreaterThan = F3(
function (string1, string2, threshold) {
var len2 = $elm$core$String$length(string2);
var len1 = $elm$core$String$length(string1);
var chars2 = $elm$core$String$toList(
A3(
$elm$core$String$padRight,
len1 - len2,
_Utils_chr(' '),
string2));
var chars1 = $elm$core$String$toList(
A3(
$elm$core$String$padRight,
len2 - len1,
_Utils_chr(' '),
string1));
var charList = A2($elm_community$list_extra$List$Extra$zip, chars1, chars2);
var similarCharCount = A3($elm$core$List$foldl, $author$project$StringComparison$compareChars, 0, charList);
return _Utils_cmp(similarCharCount, threshold) > -1;
});
var $author$project$File$selectIfSimilar = F3(
function (referenceFile, minSimilarity, file) {
return (_Utils_eq(file, referenceFile) || A3($author$project$StringComparison$isSimilarityLevelGreaterThan, referenceFile.name, file.name, minSimilarity)) ? _Utils_update(
file,
{status: $author$project$File$Selected}) : _Utils_update(
file,
{status: $author$project$File$Unselected});
});
var $author$project$File$selectSimilar = F3(
function (referenceFile, minSimilarity, files) {
return A2(
$elm$core$List$map,
A2($author$project$File$selectIfSimilar, referenceFile, minSimilarity),
files);
});
var $author$project$Main$selectSimilarFiles = F2(
function (model, target) {
var _v0 = _Utils_Tuple2(model.referenceFile, target);
if (_v0.a.$ === 'Just') {
if (_v0.b.$ === 'Source') {
var file = _v0.a.a;
var _v1 = _v0.b;
return _Utils_Tuple2(
_Utils_update(
model,
{
sourceFiles: A3($author$project$File$selectSimilar, file, model.minSimilarity, model.sourceFiles)
}),
$elm$core$Platform$Cmd$none);
} else {
var file = _v0.a.a;
var _v2 = _v0.b;
return _Utils_Tuple2(
_Utils_update(
model,
{
destinationFiles: A3($author$project$File$selectSimilar, file, model.minSimilarity, model.destinationFiles)
}),
$elm$core$Platform$Cmd$none);
}
} else {
var _v3 = _v0.a;
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
});
var $author$project$Main$showDirNameEditor = F2(
function (model, target) {
if (target.$ === 'Source') {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
} else {
return _Utils_Tuple2(
_Utils_update(
model,
{isCreatingDirectory: true}),
A2($author$project$Main$focusOn, 'dirname-input', $author$project$Main$NoOp));
}
});
var $author$project$Main$undoMove = F3(
function (model, cmds, command) {
var source = A2($elm$core$Maybe$withDefault, '', command.destination);
var filesToMove = A2(
$elm$core$List$map,
function (f) {
return _Utils_ap(
source,
_Utils_ap(model.pathSeparator, f.name));
},
command.files);
var destination = A2($elm$core$Maybe$withDefault, '', command.source);
return _Utils_Tuple2(
_Utils_update(
model,
{isUndoing: true}),
A2(
$elm$core$List$cons,
$author$project$Main$moveFiles(
_Utils_Tuple2(filesToMove, destination)),
cmds));
});
var $author$project$Main$undoRenaming = F3(
function (model, cmds, command) {
var oldName = A2($elm$core$Maybe$withDefault, '', command.destination);
var newName = A2($elm$core$Maybe$withDefault, '', command.source);
var encodedValue = $elm$json$Json$Encode$object(
_List_fromArray(
[
_Utils_Tuple2(
'oldName',
$elm$json$Json$Encode$string(oldName)),
_Utils_Tuple2(
'newName',
$elm$json$Json$Encode$string(newName))
]));
return _Utils_Tuple2(
_Utils_update(
model,
{isUndoing: true}),
A2(
$elm$core$List$cons,
$author$project$Main$renameFiles(
_List_fromArray(
[encodedValue])),
cmds));
});
var $author$project$Main$undo = function (model) {
var _v0 = $elm$core$List$head(model.history);
if (_v0.$ === 'Just') {
var commands = _v0.a;
var _v1 = A3(
$elm$core$List$foldl,
F2(
function (command, _v2) {
var modelAcc = _v2.a;
var cmdAcc = _v2.b;
var _v3 = command.operation;
if (_v3.$ === 'Move') {
return A3($author$project$Main$undoMove, modelAcc, cmdAcc, command);
} else {
return A3($author$project$Main$undoRenaming, modelAcc, cmdAcc, command);
}
}),
_Utils_Tuple2(model, _List_Nil),
commands);
var updatedModel = _v1.a;
var cmds = _v1.b;
return _Utils_Tuple2(
_Utils_update(
updatedModel,
{
history: A2($elm$core$List$drop, 1, model.history)
}),
$elm$core$Platform$Cmd$batch(cmds));
} else {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
};
var $author$project$Main$processMainShortcuts = F3(
function (model, target, event) {
if (event.ctrlKey || event.metaKey) {
var _v0 = _Utils_Tuple2(event.keyCode, event.shiftKey);
_v0$5:
while (true) {
if (_v0.b) {
if (_v0.a.$ === 'A') {
var _v1 = _v0.a;
return A3($author$project$Main$changeAllFileStatus, model, target, $author$project$File$Unselected);
} else {
break _v0$5;
}
} else {
switch (_v0.a.$) {
case 'A':
var _v2 = _v0.a;
return A3($author$project$Main$changeAllFileStatus, model, target, $author$project$File$Selected);
case 'R':
var _v3 = _v0.a;
return A2($author$project$Main$reload, model, target);
case 'Z':
var _v4 = _v0.a;
return $author$project$Main$undo(model);
case 'Backspace':
var _v5 = _v0.a;
return $author$project$Main$prepareSelectedFilesForRemoval(model);
default:
break _v0$5;
}
}
}
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
} else {
if (event.altKey) {
var _v6 = event.keyCode;
if (_v6.$ === 'F4') {
return _Utils_Tuple2(
model,
$author$project$Main$quit(_Utils_Tuple0));
} else {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
} else {
var _v7 = _Utils_Tuple2(event.keyCode, event.shiftKey);
_v7$19:
while (true) {
switch (_v7.a.$) {
case 'D':
if (!_v7.b) {
var _v8 = _v7.a;
return _Utils_Tuple2(
_Utils_update(
model,
{isDebugVisible: !model.isDebugVisible}),
$elm$core$Platform$Cmd$none);
} else {
break _v7$19;
}
case 'F':
if (!_v7.b) {
var _v9 = _v7.a;
return A2($author$project$Main$openSelectedFolder, model, target);
} else {
break _v7$19;
}
case 'M':
if (!_v7.b) {
var _v10 = _v7.a;
return $author$project$Main$moveSelectedFiles(model);
} else {
break _v7$19;
}
case 'N':
if (!_v7.b) {
var _v11 = _v7.a;
return A2($author$project$Main$showDirNameEditor, model, target);
} else {
break _v7$19;
}
case 'O':
if (!_v7.b) {
var _v12 = _v7.a;
return A2($author$project$Main$openSelectedFile, model, target);
} else {
break _v7$19;
}
case 'R':
if (!_v7.b) {
var _v13 = _v7.a;
return $author$project$Main$renameSelectedSourceFile(model);
} else {
break _v7$19;
}
case 'U':
if (!_v7.b) {
var _v14 = _v7.a;
return $author$project$Main$undo(model);
} else {
break _v7$19;
}
case 'W':
if (!_v7.b) {
var _v15 = _v7.a;
var files = function () {
if (target.$ === 'Source') {
return model.sourceFiles;
} else {
return model.destinationFiles;
}
}();
var firstSelectedFile = A2(
$elm_community$list_extra$List$Extra$find,
function (f) {
return _Utils_eq(f.status, $author$project$File$Selected);
},
files);
return A2(
$author$project$Main$selectSimilarFiles,
_Utils_update(
model,
{referenceFile: firstSelectedFile}),
target);
} else {
break _v7$19;
}
case 'Left':
var _v17 = _v7.a;
return A2($author$project$Main$goBack, model, target);
case 'Up':
if (_v7.b) {
var _v18 = _v7.a;
if (target.$ === 'Source') {
return _Utils_Tuple2(
_Utils_update(
model,
{
sourceFiles: $author$project$File$extendSelectionToPrevious(model.sourceFiles)
}),
$elm$core$Platform$Cmd$none);
} else {
return _Utils_Tuple2(
_Utils_update(
model,
{
destinationFiles: $author$project$File$extendSelectionToPrevious(model.destinationFiles)
}),
$elm$core$Platform$Cmd$none);
}
} else {
var _v20 = _v7.a;
if (target.$ === 'Source') {
return _Utils_Tuple2(
_Utils_update(
model,
{
sourceFiles: $author$project$File$selectPrevious(model.sourceFiles)
}),
$elm$core$Platform$Cmd$none);
} else {
return _Utils_Tuple2(
_Utils_update(
model,
{
destinationFiles: $author$project$File$selectPrevious(model.destinationFiles)
}),
$elm$core$Platform$Cmd$none);
}
}
case 'Down':
if (_v7.b) {
var _v22 = _v7.a;
if (target.$ === 'Source') {
return _Utils_Tuple2(
_Utils_update(
model,
{
sourceFiles: $author$project$File$extendSelectionToNext(model.sourceFiles)
}),
$elm$core$Platform$Cmd$none);
} else {
return _Utils_Tuple2(
_Utils_update(
model,
{
destinationFiles: $author$project$File$extendSelectionToNext(model.destinationFiles)
}),
$elm$core$Platform$Cmd$none);
}
} else {
var _v24 = _v7.a;
if (target.$ === 'Source') {
return _Utils_Tuple2(
_Utils_update(
model,
{
sourceFiles: $author$project$File$selectNext(model.sourceFiles)
}),
$elm$core$Platform$Cmd$none);
} else {
return _Utils_Tuple2(
_Utils_update(
model,
{
destinationFiles: $author$project$File$selectNext(model.destinationFiles)
}),
$elm$core$Platform$Cmd$none);
}
}
case 'Delete':
if (!_v7.b) {
var _v26 = _v7.a;
return $author$project$Main$prepareSelectedFilesForRemoval(model);
} else {
break _v7$19;
}
case 'Add':
var _v27 = _v7.a;
return _Utils_Tuple2(
_Utils_update(
model,
{
minSimilarity: A2($elm$core$Basics$min, model.minSimilarity + 1, $author$project$Main$maxSimilarity)
}),
$elm$core$Platform$Cmd$none);
case 'Subtract':
var _v28 = _v7.a;
return _Utils_Tuple2(
_Utils_update(
model,
{
minSimilarity: A2($elm$core$Basics$max, model.minSimilarity + 1, 0)
}),
$elm$core$Platform$Cmd$none);
case 'F2':
if (!_v7.b) {
var _v29 = _v7.a;
return $author$project$Main$renameSelectedSourceFile(model);
} else {
break _v7$19;
}
case 'F5':
if (!_v7.b) {
var _v30 = _v7.a;
return A2($author$project$Main$reload, model, target);
} else {
break _v7$19;
}
case 'Unknown':
var _v31 = event.key;
_v31$2:
while (true) {
if (_v31.$ === 'Just') {
switch (_v31.a) {
case '+':
return _Utils_Tuple2(
_Utils_update(
model,
{
minSimilarity: A2($elm$core$Basics$min, model.minSimilarity + 1, $author$project$Main$maxSimilarity)
}),
$elm$core$Platform$Cmd$none);
case '-':
return _Utils_Tuple2(
_Utils_update(
model,
{
minSimilarity: A2($elm$core$Basics$max, model.minSimilarity - 1, 0)
}),
$elm$core$Platform$Cmd$none);
default:
break _v31$2;
}
} else {
break _v31$2;
}
}
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
default:
break _v7$19;
}
}
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
}
});
var $author$project$Main$restoreFocus = function (model) {
return _Utils_Tuple2(
_Utils_update(
model,
{focusedZone: model.previousFocusedZone}),
A2(
$author$project$Main$focusOn,
function () {
var _v0 = model.previousFocusedZone;
switch (_v0.$) {
case 'Confirmation':
return 'delete-button';
case 'ErrorMessage':
return 'close-error';
case 'Filtering':
return 'filtering-left';
case 'LeftSide':
return 'container-left';
case 'FileNameEditor':
return 'filename-input';
case 'DirNameEditor':
return 'dirname-input';
case 'RightSide':
return 'container-right';
case 'SimilarityLevel':
return 'similarity-level';
default:
return 'search-left';
}
}(),
$author$project$Main$NoOp));
};
var $author$project$Main$processKeyboardShortcut = F3(
function (model, target, event) {
var _v0 = model.focusedZone;
switch (_v0.$) {
case 'Confirmation':
return A2($author$project$Main$processConfirmationShortcuts, model, event);
case 'LeftSide':
return A3($author$project$Main$processMainShortcuts, model, target, event);
case 'FileNameEditor':
var _v1 = event.keyCode;
if (_v1.$ === 'Escape') {
var sourceDirectoryFiles = A3(
$elm_community$list_extra$List$Extra$updateIf,
function (f) {
return _Utils_eq(f.status, $author$project$File$Edited);
},
function (f) {
return _Utils_update(
f,
{status: $author$project$File$Selected});
},
model.sourceFiles);
return $author$project$Main$restoreFocus(
_Utils_update(
model,
{editedFile: $elm$core$Maybe$Nothing, editedFileName: '', sourceFiles: sourceDirectoryFiles}));
} else {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
case 'DirNameEditor':
var _v2 = event.keyCode;
if (_v2.$ === 'Escape') {
return $author$project$Main$restoreFocus(
_Utils_update(
model,
{editedDirName: '', isCreatingDirectory: false}));
} else {
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
case 'RightSide':
return A3($author$project$Main$processMainShortcuts, model, target, event);
default:
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
}
});
var $elm_community$list_extra$List$Extra$findIndexHelp = F3(
function (index, predicate, list) {
findIndexHelp:
while (true) {
if (!list.b) {
return $elm$core$Maybe$Nothing;
} else {
var x = list.a;
var xs = list.b;
if (predicate(x)) {
return $elm$core$Maybe$Just(index);
} else {
var $temp$index = index + 1,
$temp$predicate = predicate,
$temp$list = xs;
index = $temp$index;
predicate = $temp$predicate;
list = $temp$list;
continue findIndexHelp;
}
}
}
});
var $elm_community$list_extra$List$Extra$findIndex = $elm_community$list_extra$List$Extra$findIndexHelp(0);
var $elm_community$list_extra$List$Extra$elemIndex = function (x) {
return $elm_community$list_extra$List$Extra$findIndex(
$elm$core$Basics$eq(x));
};
var $elm$core$Tuple$second = function (_v0) {
var y = _v0.b;
return y;
};
var $elm_community$list_extra$List$Extra$indexedFoldr = F3(
function (func, acc, list) {
var step = F2(
function (x, _v0) {
var i = _v0.a;
var thisAcc = _v0.b;
return _Utils_Tuple2(
i - 1,
A3(func, i, x, thisAcc));
});
return A3(
$elm$core$List$foldr,
step,
_Utils_Tuple2(
$elm$core$List$length(list) - 1,
acc),
list).b;
});
var $elm_community$list_extra$List$Extra$findIndices = function (predicate) {
var consIndexIf = F3(
function (index, x, acc) {
return predicate(x) ? A2($elm$core$List$cons, index, acc) : acc;
});
return A2($elm_community$list_extra$List$Extra$indexedFoldr, consIndexIf, _List_Nil);
};
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 $author$project$File$toggleSelectionStatus = function (file) {
var _v0 = file.status;
switch (_v0.$) {
case 'Unselected':
return _Utils_update(
file,
{status: $author$project$File$Selected});
case 'Edited':
return _Utils_update(
file,
{status: $author$project$File$Selected});
case 'Selected':
return _Utils_update(
file,
{status: $author$project$File$Unselected});
default:
return _Utils_update(
file,
{status: $author$project$File$Selected});
}
};
var $elm_community$list_extra$List$Extra$updateIfIndex = F3(
function (predicate, update, list) {
return A2(
$elm$core$List$indexedMap,
F2(
function (i, x) {
return predicate(i) ? update(x) : x;
}),
list);
});
var $author$project$File$withStatus = F2(
function (fileStatus, file) {
return _Utils_update(
file,
{status: fileStatus});
});
var $author$project$Main$select = F3(
function (model, files, clickedFile) {
if (model.isShiftPressed) {
var selectedItemsIndices = A2(
$elm_community$list_extra$List$Extra$findIndices,
function (f) {
return _Utils_eq(f.status, $author$project$File$Selected);
},
files);
var indexOfLastSelectedElement = A2(
$elm$core$Maybe$withDefault,
0,
$elm$core$List$maximum(selectedItemsIndices));
var indexOfFirstSelectedElement = A2(
$elm$core$Maybe$withDefault,
0,
$elm$core$List$minimum(selectedItemsIndices));
var indexOfClickedElement = A2(
$elm$core$Maybe$withDefault,
0,
A2($elm_community$list_extra$List$Extra$elemIndex, clickedFile, files));
return A3(
$elm_community$list_extra$List$Extra$updateIfIndex,
function (index) {
var isInRangeBetweenFirstSelectedFileAndClickedFile = (_Utils_cmp(indexOfClickedElement, indexOfFirstSelectedElement) > 0) && ((_Utils_cmp(index, indexOfFirstSelectedElement) > -1) && (_Utils_cmp(index, indexOfClickedElement) < 1));
var isInRangeBetweenClickedFileAndLastSelectedFile = (_Utils_cmp(indexOfClickedElement, indexOfLastSelectedElement) < 0) && ((_Utils_cmp(index, indexOfClickedElement) > -1) && (_Utils_cmp(index, indexOfLastSelectedElement) < 1));
return isInRangeBetweenFirstSelectedFileAndClickedFile || ((!isInRangeBetweenFirstSelectedFileAndClickedFile) && isInRangeBetweenClickedFileAndLastSelectedFile);
},
function (f) {
return f.satisfiesFilter ? _Utils_update(
f,
{status: $author$project$File$Selected}) : f;
},
files);
} else {
return A2(
$elm$core$List$map,
function (f) {
return _Utils_eq(f, clickedFile) ? $author$project$File$toggleSelectionStatus(f) : (model.isControlPressed ? f : A2($author$project$File$withStatus, $author$project$File$Unselected, f));
},
files);
}
});
var $author$project$Main$selectDestinationDirectory = _Platform_outgoingPort('selectDestinationDirectory', $elm$json$Json$Encode$string);
var $author$project$Main$selectSourceDirectory = _Platform_outgoingPort('selectSourceDirectory', $elm$json$Json$Encode$string);
var $elm$core$List$sortBy = _List_sortBy;
var $author$project$Main$sortByName = $elm$core$List$sortBy(
A2(
$elm$core$Basics$composeR,
function ($) {
return $.name;
},
$elm$core$String$toLower));
var $elm$core$Debug$toString = _Debug_toString;
var $author$project$Main$windowsPathSep = '\\';
var $author$project$Main$update = F2(
function (msg, mymodel) {
var model = _Utils_update(
mymodel,
{
debug: A2(
$elm$core$List$take,
9,
A2(
$elm$core$List$cons,
$elm$core$Debug$toString(msg),
mymodel.debug))
});
switch (msg.$) {
case 'AdjustTimeZone':
var newZone = msg.a;
return _Utils_Tuple2(
_Utils_update(
model,
{timezone: newZone}),
$elm$core$Platform$Cmd$none);
case 'BackendReturnedCreatedDirectory':
var dir = msg.a;
var newDirPath = _Utils_ap(
model.destinationDirectoryPath,
_Utils_ap(model.pathSeparator, dir.name));
return _Utils_Tuple2(
A2(
$author$project$Main$changeDestinationDirectory,
newDirPath,
_Utils_update(
model,
{editedDirName: '', focusedZone: $author$project$Main$RightSide, isCreatingDirectory: false, previousFocusedZone: model.focusedZone})),
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getDestinationSubdirectories(newDirPath),
$author$project$Main$getDestinationDirectoryFiles(newDirPath),
A2($author$project$Main$focusOn, 'container-right', $author$project$Main$NoOp)
])));
case 'BackendReturnedCurrentDirPath':
var path = msg.a;
var pathSeparator = A2($elm$core$String$contains, $author$project$Main$windowsPathSep, path) ? $author$project$Main$windowsPathSep : $author$project$Main$unixPathSep;
return _Utils_Tuple2(
_Utils_update(
model,
{destinationDirectoryPath: path, pathSeparator: pathSeparator, sourceDirectoryPath: path}),
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getSourceDirectoryContent(path),
$author$project$Main$getDestinationSubdirectories(path),
$author$project$Main$getDestinationDirectoryFiles(path)
])));
case 'BackendReturnedDestinationDirectories':
var files = msg.a;
return _Utils_Tuple2(
$author$project$Main$filterDestinationDirectories(
_Utils_update(
model,
{
destinationSubdirectories: $author$project$Main$sortByName(files),
isDestinationLoadingInProgress: false
})),
$elm$core$Platform$Cmd$none);
case 'BackendReturnedDestinationDirectoryPath':
var path = msg.a;
return (path === '') ? _Utils_Tuple2(model, $elm$core$Platform$Cmd$none) : _Utils_Tuple2(
A2($author$project$Main$changeDestinationDirectory, path, model),
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getDestinationSubdirectories(path),
$author$project$Main$getDestinationDirectoryFiles(path)
])));
case 'BackendReturnedDestinationFiles':
var fileList = msg.a;
return _Utils_Tuple2(
$author$project$Main$filterDestinationFiles(
_Utils_update(
model,
{
destinationFiles: $author$project$Main$sortByName(fileList)
})),
$elm$core$Platform$Cmd$none);
case 'BackendReturnedError':
var errorMsg = msg.a;
var _v1 = A3($author$project$Main$isFileNotFoundError, model, $author$project$Main$Source, errorMsg) ? A2($author$project$Main$goBack, model, $author$project$Main$Source) : (A3($author$project$Main$isFileNotFoundError, model, $author$project$Main$Destination, errorMsg) ? A2($author$project$Main$goBack, model, $author$project$Main$Destination) : _Utils_Tuple2(model, $elm$core$Platform$Cmd$none));
var updatedModel = _v1.a;
var cmd = _v1.b;
return _Utils_Tuple2(
_Utils_update(
updatedModel,
{
error: $elm$core$Maybe$Just(errorMsg),
focusedZone: $author$project$Main$ErrorMessage,
previousFocusedZone: model.focusedZone
}),
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
A2($author$project$Main$focusOn, 'close-error', $author$project$Main$NoOp),
cmd
])));
case 'BackendReturnedMovedFiles':
var files = msg.a;
return _Utils_Tuple2(
function () {
if (model.isUndoing) {
return _Utils_update(
model,
{isUndoing: false});
} else {
var firstMovedFile = $elm$core$List$head(files);
var destination = function () {
if (firstMovedFile.$ === 'Just') {
var file = firstMovedFile.a;
return file.parentPath;
} else {
return '';
}
}();
var source = _Utils_eq(destination, model.destinationDirectoryPath) ? model.sourceDirectoryPath : model.destinationDirectoryPath;
return _Utils_update(
model,
{
history: A2(
$elm$core$List$cons,
_List_fromArray(
[
{
destination: $elm$core$Maybe$Just(destination),
files: files,
operation: $author$project$Main$Move,
source: $elm$core$Maybe$Just(source)
}
]),
model.history)
});
}
}(),
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getSourceDirectoryContent(model.sourceDirectoryPath),
$author$project$Main$getDestinationDirectoryFiles(model.destinationDirectoryPath)
])));
case 'BackendReturnedRemovedFile':
return _Utils_Tuple2(
model,
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getSourceDirectoryContent(model.sourceDirectoryPath),
$author$project$Main$getDestinationDirectoryFiles(model.destinationDirectoryPath)
])));
case 'BackendReturnedRenamedFiles':
var files = msg.a;
var originalPaths = msg.b;
return _Utils_Tuple2(
function () {
if (model.isUndoing) {
return _Utils_update(
model,
{isUndoing: false});
} else {
var commands = A3(
$elm$core$List$map2,
F2(
function (file, originalPath) {
var newFile = _Utils_update(
file,
{status: $author$project$File$Selected});
return {
destination: $elm$core$Maybe$Just(
_Utils_ap(
newFile.parentPath,
_Utils_ap(model.pathSeparator, newFile.name))),
files: _List_fromArray(
[newFile]),
operation: $author$project$Main$Rename,
source: $elm$core$Maybe$Just(originalPath)
};
}),
files,
originalPaths);
return _Utils_update(
model,
{
editedFile: $elm$core$Maybe$Nothing,
editedFileName: '',
focusedZone: $author$project$Main$LeftSide,
history: A2($elm$core$List$cons, commands, model.history),
previousFocusedZone: model.focusedZone,
sourceFiles: A2(
$elm$core$List$map,
function (f) {
return _Utils_eq(f.status, $author$project$File$Edited) ? _Utils_update(
f,
{status: $author$project$File$Selected}) : f;
},
model.sourceFiles)
});
}
}(),
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getSourceDirectoryContent(model.sourceDirectoryPath),
A2($author$project$Main$focusOn, 'container-left', $author$project$Main$NoOp)
])));
case 'BackendReturnedSourceDirectoryContent':
var directoryContent = msg.a;
var _v3 = A2(
$elm$core$List$partition,
function ($) {
return $.isDir;
},
directoryContent);
var dirList = _v3.a;
var fileList = _v3.b;
var _v4 = A2($elm$core$Debug$log, 'directoryContent', directoryContent);
return _Utils_Tuple2(
$author$project$Main$filterSourceFiles(
_Utils_update(
model,
{
isSourceLoadingInProgress: false,
sourceFiles: $author$project$Main$sortByName(fileList),
sourceSubDirectories: $author$project$Main$sortByName(dirList)
})),
$elm$core$Platform$Cmd$none);
case 'BackendReturnedSourceDirectoryPath':
var path = msg.a;
return (path === '') ? _Utils_Tuple2(model, $elm$core$Platform$Cmd$none) : _Utils_Tuple2(
A2($author$project$Main$changeSourceDirectory, path, model),
$author$project$Main$getSourceDirectoryContent(path));
case 'NoOp':
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
case 'UserChangedDestinationDirectoryFilter':
var filteringString = msg.a;
return _Utils_Tuple2(
$author$project$Main$filterDestinationDirectories(
_Utils_update(
model,
{destinationDirectoryFilter: filteringString})),
$elm$core$Platform$Cmd$none);
case 'UserChangedDestinationFilesFilter':
var filteringString = msg.a;
return _Utils_Tuple2(
$author$project$Main$filterDestinationFiles(
_Utils_update(
model,
{destinationFilesFilter: filteringString})),
$elm$core$Platform$Cmd$none);
case 'UserChangedSourceFilter':
var filteringString = msg.a;
return _Utils_Tuple2(
$author$project$Main$filterSourceFiles(
_Utils_update(
model,
{sourceFilter: filteringString})),
$elm$core$Platform$Cmd$none);
case 'UserChangedSourceReplace':
var replaceString = msg.a;
return _Utils_Tuple2(
_Utils_update(
model,
{sourceReplace: replaceString}),
$elm$core$Platform$Cmd$none);
case 'UserChangedSourceSearch':
var searchString = msg.a;
return _Utils_Tuple2(
_Utils_update(
model,
{sourceSearch: searchString}),
$elm$core$Platform$Cmd$none);
case 'UserClickedCancel':
var unselectForDeletion = function (file) {
return _Utils_eq(file.status, $author$project$File$SelectedForDeletion) ? _Utils_update(
file,
{status: $author$project$File$Selected}) : file;
};
return _Utils_Tuple2(
_Utils_update(
model,
{
destinationFiles: A2($elm$core$List$map, unselectForDeletion, model.destinationFiles),
filesToDelete: _List_Nil,
focusedZone: $author$project$Main$LeftSide,
previousFocusedZone: model.focusedZone,
sourceFiles: A2($elm$core$List$map, unselectForDeletion, model.sourceFiles)
}),
A2($author$project$Main$focusOn, 'container-left', $author$project$Main$NoOp));
case 'UserClickedCopyFilterButton':
return _Utils_Tuple2(
$author$project$Main$filterDestinationDirectories(
$author$project$Main$filterDestinationFiles(
_Utils_update(
model,
{destinationDirectoryFilter: model.sourceFilter, destinationFilesFilter: model.sourceFilter}))),
$elm$core$Platform$Cmd$none);
case 'UserClickedClearSourceFilter':
return _Utils_Tuple2(
$author$project$Main$filterSourceFiles(
_Utils_update(
model,
{sourceFilter: ''})),
$elm$core$Platform$Cmd$none);
case 'UserClickedClearDestinationDirectoryFilter':
return _Utils_Tuple2(
$author$project$Main$filterDestinationDirectories(
_Utils_update(
model,
{destinationDirectoryFilter: ''})),
$elm$core$Platform$Cmd$none);
case 'UserClickedClearDestinationFilesFilter':
return _Utils_Tuple2(
$author$project$Main$filterDestinationFiles(
_Utils_update(
model,
{destinationFilesFilter: ''})),
$elm$core$Platform$Cmd$none);
case 'UserClickedCloseError':
return $author$project$Main$restoreFocus(
_Utils_update(
model,
{error: $elm$core$Maybe$Nothing}));
case 'UserClickedDelete':
return $author$project$Main$removeSelectedFiles(model);
case 'UserClickedDestinationDirectory':
var isAbsolute = msg.a;
var file = msg.b;
var newDestinationPath = function () {
var _v5 = _Utils_Tuple2(
A2($elm$core$Debug$log, 'isAbsolute', isAbsolute),
A2($elm$core$Debug$log, 'file.name', file.name));
if (_v5.a) {
return _Utils_eq(file.parentPath, $author$project$Main$unixPathSep) ? _Utils_ap(model.pathSeparator, file.name) : _Utils_ap(
file.parentPath,
_Utils_ap(model.pathSeparator, file.name));
} else {
if (_v5.b === '..') {
return A2($author$project$Main$parentDir, model, model.destinationDirectoryPath);
} else {
return _Utils_ap(
model.destinationDirectoryPath,
_Utils_ap(model.pathSeparator, file.name));
}
}
}();
return _Utils_Tuple2(
A2($author$project$Main$changeDestinationDirectory, newDestinationPath, model),
$elm$core$Platform$Cmd$batch(
_List_fromArray(
[
$author$project$Main$getDestinationDirectoryFiles(newDestinationPath),
$author$project$Main$getDestinationSubdirectories(newDestinationPath)
])));
case 'UserClickedDestinationDirectoryButton':
return _Utils_Tuple2(
model,
$author$project$Main$selectDestinationDirectory(model.destinationDirectoryPath));
case 'UserClickedDestinationFile':
var file = msg.a;
var updatedDestinationFiles = A3($author$project$Main$select, model, model.destinationFiles, file);
return _Utils_Tuple2(
_Utils_update(
model,
{destinationFiles: updatedDestinationFiles}),
$elm$core$Platform$Cmd$none);
case 'UserClickedReload':
var target = msg.a;
return A2($author$project$Main$reload, model, target);
case 'UserClickedReplaceButton':
var renamings = A2(
$elm$core$List$filterMap,
$author$project$Main$nameReplacement(model),
model.sourceFiles);
return _Utils_Tuple2(
_Utils_update(
model,
{sourceReplace: ''}),
A2($author$project$Main$applyRenaming, model, renamings));
case 'UserClickedSourceDirectory':
var isAbsolute = msg.a;
var file = msg.b;
var newSourcePath = function () {
var _v6 = _Utils_Tuple2(isAbsolute, file.name);
if (_v6.a) {
return _Utils_eq(file.parentPath, $author$project$Main$unixPathSep) ? _Utils_ap(model.pathSeparator, file.name) : _Utils_ap(
file.parentPath,
_Utils_ap(model.pathSeparator, file.name));
} else {
if (_v6.b === '..') {
return A2($author$project$Main$parentDir, model, model.sourceDirectoryPath);
} else {
return _Utils_ap(
model.sourceDirectoryPath,
_Utils_ap(model.pathSeparator, file.name));
}
}
}();
return _Utils_Tuple2(
A2($author$project$Main$changeSourceDirectory, newSourcePath, model),
$author$project$Main$getSourceDirectoryContent(newSourcePath));
case 'UserClickedSourceDirectoryButton':
return _Utils_Tuple2(
model,
$author$project$Main$selectSourceDirectory(model.sourceDirectoryPath));
case 'UserClickedSourceFile':
var file = msg.a;
var updatedSourceFiles = A3($author$project$Main$select, model, model.sourceFiles, file);
return _Utils_Tuple2(
$author$project$Main$filterSourceFiles(
_Utils_update(
model,
{focusedZone: $author$project$Main$LeftSide, previousFocusedZone: model.focusedZone, sourceFiles: updatedSourceFiles})),
A2($author$project$Main$focusOn, 'container-left', $author$project$Main$NoOp));
case 'UserChangedFocusedZone':
var focus = msg.a;
return _Utils_Tuple2(
_Utils_update(
model,
{focusedZone: focus, previousFocusedZone: model.focusedZone}),
$elm$core$Platform$Cmd$none);
case 'UserModifiedFileName':
var newName = msg.a;
return _Utils_Tuple2(
_Utils_update(
model,
{editedFileName: newName}),
$elm$core$Platform$Cmd$none);
case 'UserModifiedDirName':
var newName = msg.a;
return _Utils_Tuple2(
_Utils_update(
model,
{editedDirName: newName}),
$elm$core$Platform$Cmd$none);
case 'UserPressedKey':
var target = msg.a;
var event = msg.b;
return model.isUndoing ? _Utils_Tuple2(model, $elm$core$Platform$Cmd$none) : A3($author$project$Main$processKeyboardShortcut, model, target, event);
case 'UserPressedOrReleasedKey':
var keyboardEvent = msg.a;
return _Utils_Tuple2(
_Utils_update(
model,
{isControlPressed: keyboardEvent.ctrlKey || keyboardEvent.metaKey, isShiftPressed: keyboardEvent.shiftKey}),
$elm$core$Platform$Cmd$none);
case 'UserSubmittedDirName':
return (model.isCreatingDirectory && (model.editedDirName !== '')) ? $author$project$Main$createNewDirectory(model) : _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
case 'UserSubmittedFilename':
var isNameEmpty = $elm$core$String$isEmpty(model.editedFileName);
var isConflicting = A2(
$elm$core$List$any,
function (f) {
return _Utils_eq(f.name, model.editedFileName);
},
model.sourceFiles);
var _v7 = _Utils_Tuple3(model.editedFile, isConflicting, isNameEmpty);
_v7$2:
while (true) {
if (_v7.a.$ === 'Just') {
if (_v7.b) {
if (!_v7.c) {
return _Utils_Tuple2(
_Utils_update(
model,
{
error: $elm$core$Maybe$Just('A file with the name ' + (model.editedFileName + ' already exists in the source directory')),
focusedZone: $author$project$Main$ErrorMessage
}),
A2($author$project$Main$focusOn, 'close-error', $author$project$Main$NoOp));
} else {
break _v7$2;
}
} else {
if (!_v7.c) {
var file = _v7.a.a;
var renaming = {
file: _Utils_update(
file,
{name: model.editedFileName}),
originalPath: file.name
};
return _Utils_Tuple2(
_Utils_update(
model,
{error: $elm$core$Maybe$Nothing}),
A2(
$author$project$Main$applyRenaming,
model,
_List_fromArray(
[renaming])));
} else {
break _v7$2;
}
}
} else {
break _v7$2;
}
}
return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
default:
var maxDistance = msg.a;
return A2(
$author$project$Main$selectSimilarFiles,
_Utils_update(
model,
{
minSimilarity: $elm$core$Basics$round(maxDistance)
}),
$author$project$Main$Source);
}
});
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$class = $elm$html$Html$Attributes$stringProperty('className');
var $elm$html$Html$div = _VirtualDom_node('div');
var $elm$html$Html$Attributes$id = $elm$html$Html$Attributes$stringProperty('id');
var $author$project$Main$UserPressedOrReleasedKey = function (a) {
return {$: 'UserPressedOrReleasedKey', a: a};
};
var $Gizra$elm_keyboard_event$Keyboard$Event$KeyboardEvent = F7(
function (altKey, ctrlKey, key, keyCode, metaKey, repeat, shiftKey) {
return {altKey: altKey, ctrlKey: ctrlKey, key: key, keyCode: keyCode, metaKey: metaKey, repeat: repeat, shiftKey: shiftKey};
});
var $elm$json$Json$Decode$oneOf = _Json_oneOf;
var $elm$json$Json$Decode$maybe = function (decoder) {
return $elm$json$Json$Decode$oneOf(
_List_fromArray(
[
A2($elm$json$Json$Decode$map, $elm$core$Maybe$Just, decoder),
$elm$json$Json$Decode$succeed($elm$core$Maybe$Nothing)
]));
};
var $Gizra$elm_keyboard_event$Keyboard$Event$decodeKey = $elm$json$Json$Decode$maybe(
A2(
$elm$json$Json$Decode$andThen,
function (key) {
return $elm$core$String$isEmpty(key) ? $elm$json$Json$Decode$fail('empty key') : $elm$json$Json$Decode$succeed(key);
},
A2($elm$json$Json$Decode$field, 'key', $elm$json$Json$Decode$string)));
var $Gizra$elm_keyboard_event$Keyboard$Event$decodeNonZero = A2(
$elm$json$Json$Decode$andThen,
function (code) {
return (!code) ? $elm$json$Json$Decode$fail('code was zero') : $elm$json$Json$Decode$succeed(code);
},
$elm$json$Json$Decode$int);
var $Gizra$elm_keyboard_event$Keyboard$Event$decodeKeyCode = $elm$json$Json$Decode$oneOf(
_List_fromArray(
[
A2($elm$json$Json$Decode$field, 'keyCode', $Gizra$elm_keyboard_event$Keyboard$Event$decodeNonZero),
A2($elm$json$Json$Decode$field, 'which', $Gizra$elm_keyboard_event$Keyboard$Event$decodeNonZero),
A2($elm$json$Json$Decode$field, 'charCode', $Gizra$elm_keyboard_event$Keyboard$Event$decodeNonZero),
$elm$json$Json$Decode$succeed(0)
]));
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$A = {$: 'A'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Add = {$: 'Add'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Alt = {$: 'Alt'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Ambiguous = function (a) {
return {$: 'Ambiguous', a: a};
};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$B = {$: 'B'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Backspace = {$: 'Backspace'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$C = {$: 'C'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$CapsLock = {$: 'CapsLock'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$ChromeSearch = {$: 'ChromeSearch'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Command = {$: 'Command'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Ctrl = function (a) {
return {$: 'Ctrl', a: a};
};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$D = {$: 'D'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Decimal = {$: 'Decimal'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Delete = {$: 'Delete'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Divide = {$: 'Divide'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Down = {$: 'Down'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$E = {$: 'E'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Eight = {$: 'Eight'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$End = {$: 'End'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Enter = {$: 'Enter'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Escape = {$: 'Escape'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F = {$: 'F'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F1 = {$: 'F1'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F10 = {$: 'F10'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F11 = {$: 'F11'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F12 = {$: 'F12'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F2 = {$: 'F2'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F3 = {$: 'F3'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F4 = {$: 'F4'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F5 = {$: 'F5'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F6 = {$: 'F6'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F7 = {$: 'F7'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F8 = {$: 'F8'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$F9 = {$: 'F9'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Five = {$: 'Five'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Four = {$: 'Four'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$G = {$: 'G'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$H = {$: 'H'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Home = {$: 'Home'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$I = {$: 'I'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Insert = {$: 'Insert'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$J = {$: 'J'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$K = {$: 'K'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$L = {$: 'L'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Left = {$: 'Left'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$M = {$: 'M'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Multiply = {$: 'Multiply'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$N = {$: 'N'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Nine = {$: 'Nine'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumLock = {$: 'NumLock'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadEight = {$: 'NumpadEight'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadFive = {$: 'NumpadFive'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadFour = {$: 'NumpadFour'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadNine = {$: 'NumpadNine'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadOne = {$: 'NumpadOne'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadSeven = {$: 'NumpadSeven'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadSix = {$: 'NumpadSix'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadThree = {$: 'NumpadThree'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadTwo = {$: 'NumpadTwo'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadZero = {$: 'NumpadZero'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$O = {$: 'O'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$One = {$: 'One'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$P = {$: 'P'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$PageDown = {$: 'PageDown'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$PageUp = {$: 'PageUp'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$PauseBreak = {$: 'PauseBreak'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$PrintScreen = {$: 'PrintScreen'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Q = {$: 'Q'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$R = {$: 'R'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Right = {$: 'Right'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$S = {$: 'S'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$ScrollLock = {$: 'ScrollLock'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Seven = {$: 'Seven'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Shift = function (a) {
return {$: 'Shift', a: a};
};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Six = {$: 'Six'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Spacebar = {$: 'Spacebar'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Subtract = {$: 'Subtract'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$T = {$: 'T'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Tab = {$: 'Tab'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Three = {$: 'Three'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Two = {$: 'Two'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$U = {$: 'U'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Unknown = function (a) {
return {$: 'Unknown', a: a};
};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Up = {$: 'Up'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$V = {$: 'V'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$W = {$: 'W'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Windows = {$: 'Windows'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$X = {$: 'X'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Y = {$: 'Y'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Z = {$: 'Z'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$Zero = {$: 'Zero'};
var $SwiftsNamesake$proper_keyboard$Keyboard$Key$fromCode = function (keyCode) {
switch (keyCode) {
case 8:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Backspace;
case 9:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Tab;
case 13:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Enter;
case 16:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Shift($elm$core$Maybe$Nothing);
case 17:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Ctrl($elm$core$Maybe$Nothing);
case 18:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Alt;
case 19:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$PauseBreak;
case 20:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$CapsLock;
case 27:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Escape;
case 32:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Spacebar;
case 33:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$PageUp;
case 34:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$PageDown;
case 35:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$End;
case 36:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Home;
case 37:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Left;
case 38:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Up;
case 39:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Right;
case 40:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Down;
case 44:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$PrintScreen;
case 45:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Insert;
case 46:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Delete;
case 48:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Zero;
case 49:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$One;
case 50:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Two;
case 51:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Three;
case 52:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Four;
case 53:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Five;
case 54:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Six;
case 55:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Seven;
case 56:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Eight;
case 57:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Nine;
case 65:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$A;
case 66:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$B;
case 67:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$C;
case 68:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$D;
case 69:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$E;
case 70:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F;
case 71:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$G;
case 72:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$H;
case 73:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$I;
case 74:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$J;
case 75:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$K;
case 76:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$L;
case 77:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$M;
case 78:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$N;
case 79:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$O;
case 80:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$P;
case 81:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Q;
case 82:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$R;
case 83:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$S;
case 84:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$T;
case 85:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$U;
case 86:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$V;
case 87:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$W;
case 88:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$X;
case 89:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Y;
case 90:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Z;
case 91:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Ambiguous(
_List_fromArray(
[$SwiftsNamesake$proper_keyboard$Keyboard$Key$Windows, $SwiftsNamesake$proper_keyboard$Keyboard$Key$Command, $SwiftsNamesake$proper_keyboard$Keyboard$Key$ChromeSearch]));
case 96:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadZero;
case 97:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadOne;
case 98:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadTwo;
case 99:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadThree;
case 100:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadFour;
case 101:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadFive;
case 102:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadSix;
case 103:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadSeven;
case 104:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadEight;
case 105:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumpadNine;
case 106:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Multiply;
case 107:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Add;
case 109:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Subtract;
case 110:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Decimal;
case 111:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Divide;
case 112:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F1;
case 113:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F2;
case 114:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F3;
case 115:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F4;
case 116:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F5;
case 117:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F6;
case 118:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F7;
case 119:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F8;
case 120:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F9;
case 121:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F10;
case 122:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F11;
case 123:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$F12;
case 144:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$NumLock;
case 145:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$ScrollLock;
default:
return $SwiftsNamesake$proper_keyboard$Keyboard$Key$Unknown(keyCode);
}
};
var $elm$json$Json$Decode$map7 = _Json_map7;
var $Gizra$elm_keyboard_event$Keyboard$Event$decodeKeyboardEvent = A8(
$elm$json$Json$Decode$map7,
$Gizra$elm_keyboard_event$Keyboard$Event$KeyboardEvent,
A2($elm$json$Json$Decode$field, 'altKey', $elm$json$Json$Decode$bool),
A2($elm$json$Json$Decode$field, 'ctrlKey', $elm$json$Json$Decode$bool),
$Gizra$elm_keyboard_event$Keyboard$Event$decodeKey,
A2($elm$json$Json$Decode$map, $SwiftsNamesake$proper_keyboard$Keyboard$Key$fromCode, $Gizra$elm_keyboard_event$Keyboard$Event$decodeKeyCode),
A2($elm$json$Json$Decode$field, 'metaKey', $elm$json$Json$Decode$bool),
A2($elm$json$Json$Decode$field, 'repeat', $elm$json$Json$Decode$bool),
A2($elm$json$Json$Decode$field, 'shiftKey', $elm$json$Json$Decode$bool));
var $author$project$Main$keyDecoder = A2(
$elm$json$Json$Decode$map,
function (key) {
return $author$project$Main$UserPressedOrReleasedKey(key);
},
$Gizra$elm_keyboard_event$Keyboard$Event$decodeKeyboardEvent);
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 $author$project$Main$UserChangedFocusedZone = function (a) {
return {$: 'UserChangedFocusedZone', a: a};
};
var $author$project$Main$UserClickedCancel = {$: 'UserClickedCancel'};
var $author$project$Main$UserClickedCloseError = {$: 'UserClickedCloseError'};
var $author$project$Main$UserClickedDelete = {$: 'UserClickedDelete'};
var $elm$html$Html$button = _VirtualDom_node('button');
var $elm$html$Html$footer = _VirtualDom_node('footer');
var $author$project$Main$UserPressedKey = F2(
function (a, b) {
return {$: 'UserPressedKey', a: a, b: b};
});
var $author$project$Main$keyDecoderPreventingDefault = function (target) {
return A2(
$elm$json$Json$Decode$map,
function (key) {
return _Utils_Tuple2(
A2($author$project$Main$UserPressedKey, target, key),
true);
},
$Gizra$elm_keyboard_event$Keyboard$Event$decodeKeyboardEvent);
};
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$Events$onFocus = function (msg) {
return A2(
$elm$html$Html$Events$on,
'focus',
$elm$json$Json$Decode$succeed(msg));
};
var $elm$virtual_dom$VirtualDom$MayPreventDefault = function (a) {
return {$: 'MayPreventDefault', a: a};
};
var $elm$html$Html$Events$preventDefaultOn = F2(
function (event, decoder) {
return A2(
$elm$virtual_dom$VirtualDom$on,
event,
$elm$virtual_dom$VirtualDom$MayPreventDefault(decoder));
});
var $elm$html$Html$span = _VirtualDom_node('span');
var $elm$virtual_dom$VirtualDom$text = _VirtualDom_text;
var $elm$html$Html$text = $elm$virtual_dom$VirtualDom$text;
var $elm$html$Html$li = _VirtualDom_node('li');
var $elm$html$Html$ul = _VirtualDom_node('ul');
var $author$project$Main$viewDebug = function (model) {
return model.isDebugVisible ? A2(
$elm$html$Html$ul,
_List_fromArray(
[
$elm$html$Html$Attributes$class('debug')
]),
_Utils_ap(
_List_fromArray(
[
A2(
$elm$html$Html$li,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text('destinationDirectoryPath: ' + model.destinationDirectoryPath)
]))
]),
A2(
$elm$core$List$map,
function (msg) {
return A2(
$elm$html$Html$li,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text(
'Msg: ' + A2($elm$core$String$left, 220, msg))
]));
},
model.debug))) : $elm$html$Html$text('');
};
var $author$project$Main$viewPressedKeys = function (model) {
return $elm$html$Html$text(
model.isControlPressed ? ' CTRL ' : ('' + (model.isShiftPressed ? ' SHIFT ' : '')));
};
var $author$project$Main$viewFooter = function (model) {
var isWaitingForConfirmation = $elm$core$List$length(model.filesToDelete) > 0;
var conditionalAttributes = isWaitingForConfirmation ? _List_fromArray(
[
A2(
$elm$html$Html$Events$preventDefaultOn,
'keydown',
$author$project$Main$keyDecoderPreventingDefault($author$project$Main$Source)),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$Confirmation))
]) : _List_Nil;
var className = ((!_Utils_eq(model.error, $elm$core$Maybe$Nothing)) || isWaitingForConfirmation) ? 'danger' : '';
return A2(
$elm$html$Html$footer,
A2(
$elm$core$List$cons,
$elm$html$Html$Attributes$class(className),
conditionalAttributes),
_List_fromArray(
[
function () {
var _v0 = model.error;
if (_v0.$ === 'Just') {
var errorMsg = _v0.a;
return A2(
$elm$html$Html$div,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text(errorMsg),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$id('close-error'),
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedCloseError)
]),
_List_fromArray(
[
$elm$html$Html$text('Ok')
]))
]));
} else {
return $author$project$Main$viewPressedKeys(model);
}
}(),
function () {
var _v1 = model.filesToDelete;
if (!_v1.b) {
return $elm$html$Html$text('');
} else {
return A2(
$elm$html$Html$span,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text('This will permanently delete the selected files. This cannot be undone.'),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedCancel)
]),
_List_fromArray(
[
$elm$html$Html$text('Cancel')
])),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedDelete),
$elm$html$Html$Attributes$id('delete-button')
]),
_List_fromArray(
[
$elm$html$Html$text('DELETE')
]))
]));
}
}(),
$author$project$Main$viewDebug(model)
]));
};
var $elm$html$Html$Attributes$tabindex = function (n) {
return A2(
_VirtualDom_attribute,
'tabIndex',
$elm$core$String$fromInt(n));
};
var $author$project$Main$Filtering = {$: 'Filtering'};
var $author$project$Main$UserChangedSourceFilter = function (a) {
return {$: 'UserChangedSourceFilter', a: a};
};
var $author$project$Main$UserClickedClearSourceFilter = {$: 'UserClickedClearSourceFilter'};
var $author$project$Main$UserClickedCopyFilterButton = {$: 'UserClickedCopyFilterButton'};
var $author$project$Main$UserClickedSourceFile = function (a) {
return {$: 'UserClickedSourceFile', a: a};
};
var $author$project$Main$additionalHeaderClass = F2(
function (model, zone) {
return _Utils_eq(model.focusedZone, zone) ? ' focused' : ' unfocused';
});
var $elm_community$list_extra$List$Extra$count = function (predicate) {
return A2(
$elm$core$List$foldl,
F2(
function (x, acc) {
return predicate(x) ? (acc + 1) : acc;
}),
0);
};
var $author$project$Main$inflect = function (count) {
return (count > 1) ? ' files' : ' file';
};
var $author$project$Main$fileCount = F2(
function (model, target) {
var totalCount = function () {
if (target.$ === 'Source') {
return $elm$core$List$length(model.sourceFiles);
} else {
return $elm$core$List$length(model.destinationFiles);
}
}();
var filteredCount = A2(
$elm_community$list_extra$List$Extra$count,
function ($) {
return $.satisfiesFilter;
},
function () {
if (target.$ === 'Source') {
return model.sourceFiles;
} else {
return model.destinationFiles;
}
}());
return _Utils_eq(filteredCount, totalCount) ? ($elm$core$String$fromInt(filteredCount) + ($author$project$Main$inflect(totalCount) + ' in directory')) : ($elm$core$String$fromInt(filteredCount) + (' (on a total of ' + ($elm$core$String$fromInt(totalCount) + (')' + ($author$project$Main$inflect(totalCount) + ' in directory')))));
});
var $elm$html$Html$h2 = _VirtualDom_node('h2');
var $elm$html$Html$input = _VirtualDom_node('input');
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$at = F2(
function (fields, decoder) {
return A3($elm$core$List$foldr, $elm$json$Json$Decode$field, decoder, fields);
});
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$html$Html$Attributes$placeholder = $elm$html$Html$Attributes$stringProperty('placeholder');
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 $author$project$Main$FileNameEditor = {$: 'FileNameEditor'};
var $author$project$Main$UserModifiedFileName = function (a) {
return {$: 'UserModifiedFileName', a: a};
};
var $author$project$Main$UserSubmittedFilename = {$: 'UserSubmittedFilename'};
var $elm$html$Html$form = _VirtualDom_node('form');
var $elm$html$Html$Events$alwaysPreventDefault = function (msg) {
return _Utils_Tuple2(msg, true);
};
var $elm$html$Html$Events$onSubmit = function (msg) {
return A2(
$elm$html$Html$Events$preventDefaultOn,
'submit',
A2(
$elm$json$Json$Decode$map,
$elm$html$Html$Events$alwaysPreventDefault,
$elm$json$Json$Decode$succeed(msg)));
};
var $author$project$Main$simpleKeyDecoder = function (target) {
return A2(
$elm$json$Json$Decode$map,
function (key) {
return A2($author$project$Main$UserPressedKey, target, key);
},
$Gizra$elm_keyboard_event$Keyboard$Event$decodeKeyboardEvent);
};
var $author$project$Main$viewEditedFilename = function (model) {
return A2(
$elm$html$Html$form,
_List_fromArray(
[
$elm$html$Html$Events$onSubmit($author$project$Main$UserSubmittedFilename)
]),
_List_fromArray(
[
A2(
$elm$html$Html$input,
_List_fromArray(
[
$elm$html$Html$Attributes$class('file-input'),
$elm$html$Html$Attributes$id('filename-input'),
$elm$html$Html$Events$onInput($author$project$Main$UserModifiedFileName),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$FileNameEditor)),
A2(
$elm$html$Html$Events$on,
'keydown',
$author$project$Main$simpleKeyDecoder($author$project$Main$Source)),
$elm$html$Html$Attributes$value(model.editedFileName)
]),
_List_Nil)
]));
};
var $basti1302$elm_human_readable_filesize$Filesize$Base10 = {$: 'Base10'};
var $basti1302$elm_human_readable_filesize$Filesize$defaultSettings = {decimalPlaces: 2, decimalSeparator: '.', units: $basti1302$elm_human_readable_filesize$Filesize$Base10};
var $basti1302$elm_human_readable_filesize$Filesize$base10UnitList = _List_fromArray(
[
{abbreviation: 'B', minimumSize: 1},
{abbreviation: 'kB', minimumSize: 1000},
{abbreviation: 'MB', minimumSize: 1000000},
{abbreviation: 'GB', minimumSize: 1000000000},
{abbreviation: 'TB', minimumSize: 1000000000000},
{abbreviation: 'PB', minimumSize: 1000000000000000},
{abbreviation: 'EB', minimumSize: 1000000000000000000}
]);
var $basti1302$elm_human_readable_filesize$Filesize$base2UnitList = _List_fromArray(
[
{abbreviation: 'B', minimumSize: 1},
{abbreviation: 'KiB', minimumSize: 1024},
{abbreviation: 'MiB', minimumSize: 1048576},
{abbreviation: 'GiB', minimumSize: 1073741824},
{abbreviation: 'TiB', minimumSize: 1099511627776},
{abbreviation: 'PiB', minimumSize: 1125899906842624}
]);
var $basti1302$elm_human_readable_filesize$Filesize$getUnitDefinitionList = function (units) {
if (units.$ === 'Base10') {
return $basti1302$elm_human_readable_filesize$Filesize$base10UnitList;
} else {
return $basti1302$elm_human_readable_filesize$Filesize$base2UnitList;
}
};
var $elm$regex$Regex$never = _Regex_never;
var $basti1302$elm_human_readable_filesize$Filesize$decimalSeparatorRegex = A2(
$elm$core$Maybe$withDefault,
$elm$regex$Regex$never,
$elm$regex$Regex$fromString('\\.'));
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 $elm$core$Basics$abs = function (n) {
return (n < 0) ? (-n) : n;
};
var $myrho$elm_round$Round$addSign = F2(
function (signed, str) {
var isNotZero = A2(
$elm$core$List$any,
function (c) {
return (!_Utils_eq(
c,
_Utils_chr('0'))) && (!_Utils_eq(
c,
_Utils_chr('.')));
},
$elm$core$String$toList(str));
return _Utils_ap(
(signed && isNotZero) ? '-' : '',
str);
});
var $elm$core$String$fromFloat = _String_fromNumber;
var $elm$core$Char$fromCode = _Char_fromCode;
var $myrho$elm_round$Round$increaseNum = function (_v0) {
var head = _v0.a;
var tail = _v0.b;
if (_Utils_eq(
head,
_Utils_chr('9'))) {
var _v1 = $elm$core$String$uncons(tail);
if (_v1.$ === 'Nothing') {
return '01';
} else {
var headtail = _v1.a;
return A2(
$elm$core$String$cons,
_Utils_chr('0'),
$myrho$elm_round$Round$increaseNum(headtail));
}
} else {
var c = $elm$core$Char$toCode(head);
return ((c >= 48) && (c < 57)) ? A2(
$elm$core$String$cons,
$elm$core$Char$fromCode(c + 1),
tail) : '0';
}
};
var $elm$core$Basics$isInfinite = _Basics_isInfinite;
var $elm$core$Basics$isNaN = _Basics_isNaN;
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 $elm$core$String$reverse = _String_reverse;
var $myrho$elm_round$Round$splitComma = function (str) {
var _v0 = A2($elm$core$String$split, '.', str);
if (_v0.b) {
if (_v0.b.b) {
var before = _v0.a;
var _v1 = _v0.b;
var after = _v1.a;
return _Utils_Tuple2(before, after);
} else {
var before = _v0.a;
return _Utils_Tuple2(before, '0');
}
} else {
return _Utils_Tuple2('0', '0');
}
};
var $elm$core$Tuple$mapFirst = F2(
function (func, _v0) {
var x = _v0.a;
var y = _v0.b;
return _Utils_Tuple2(
func(x),
y);
});
var $myrho$elm_round$Round$toDecimal = function (fl) {
var _v0 = A2(
$elm$core$String$split,
'e',
$elm$core$String$fromFloat(
$elm$core$Basics$abs(fl)));
if (_v0.b) {
if (_v0.b.b) {
var num = _v0.a;
var _v1 = _v0.b;
var exp = _v1.a;
var e = A2(
$elm$core$Maybe$withDefault,
0,
$elm$core$String$toInt(
A2($elm$core$String$startsWith, '+', exp) ? A2($elm$core$String$dropLeft, 1, exp) : exp));
var _v2 = $myrho$elm_round$Round$splitComma(num);
var before = _v2.a;
var after = _v2.b;
var total = _Utils_ap(before, after);
var zeroed = (e < 0) ? A2(
$elm$core$Maybe$withDefault,
'0',
A2(
$elm$core$Maybe$map,
function (_v3) {
var a = _v3.a;
var b = _v3.b;
return a + ('.' + b);
},
A2(
$elm$core$Maybe$map,
$elm$core$Tuple$mapFirst($elm$core$String$fromChar),
$elm$core$String$uncons(
_Utils_ap(
A2(
$elm$core$String$repeat,
$elm$core$Basics$abs(e),
'0'),
total))))) : A3(
$elm$core$String$padRight,
e + 1,
_Utils_chr('0'),
total);
return _Utils_ap(
(fl < 0) ? '-' : '',
zeroed);
} else {
var num = _v0.a;
return _Utils_ap(
(fl < 0) ? '-' : '',
num);
}
} else {
return '';
}
};
var $myrho$elm_round$Round$roundFun = F3(
function (functor, s, fl) {
if ($elm$core$Basics$isInfinite(fl) || $elm$core$Basics$isNaN(fl)) {
return $elm$core$String$fromFloat(fl);
} else {
var signed = fl < 0;
var _v0 = $myrho$elm_round$Round$splitComma(
$myrho$elm_round$Round$toDecimal(
$elm$core$Basics$abs(fl)));
var before = _v0.a;
var after = _v0.b;
var r = $elm$core$String$length(before) + s;
var normalized = _Utils_ap(
A2($elm$core$String$repeat, (-r) + 1, '0'),
A3(
$elm$core$String$padRight,
r,
_Utils_chr('0'),
_Utils_ap(before, after)));
var totalLen = $elm$core$String$length(normalized);
var roundDigitIndex = A2($elm$core$Basics$max, 1, r);
var increase = A2(
functor,
signed,
A3($elm$core$String$slice, roundDigitIndex, totalLen, normalized));
var remains = A3($elm$core$String$slice, 0, roundDigitIndex, normalized);
var num = increase ? $elm$core$String$reverse(
A2(
$elm$core$Maybe$withDefault,
'1',
A2(
$elm$core$Maybe$map,
$myrho$elm_round$Round$increaseNum,
$elm$core$String$uncons(
$elm$core$String$reverse(remains))))) : remains;
var numLen = $elm$core$String$length(num);
var numZeroed = (num === '0') ? num : ((s <= 0) ? _Utils_ap(
num,
A2(
$elm$core$String$repeat,
$elm$core$Basics$abs(s),
'0')) : ((_Utils_cmp(
s,
$elm$core$String$length(after)) < 0) ? (A3($elm$core$String$slice, 0, numLen - s, num) + ('.' + A3($elm$core$String$slice, numLen - s, numLen, num))) : _Utils_ap(
before + '.',
A3(
$elm$core$String$padRight,
s,
_Utils_chr('0'),
after))));
return A2($myrho$elm_round$Round$addSign, signed, numZeroed);
}
});
var $myrho$elm_round$Round$floor = $myrho$elm_round$Round$roundFun(
F2(
function (signed, str) {
var _v0 = $elm$core$String$uncons(str);
if (_v0.$ === 'Nothing') {
return false;
} else {
if ('0' === _v0.a.a.valueOf()) {
var _v1 = _v0.a;
var rest = _v1.b;
return signed && A2(
$elm$core$List$any,
$elm$core$Basics$neq(
_Utils_chr('0')),
$elm$core$String$toList(rest));
} else {
return signed;
}
}
}));
var $basti1302$elm_human_readable_filesize$Filesize$removeTrailingZeroesRegex = A2(
$elm$core$Maybe$withDefault,
$elm$regex$Regex$never,
$elm$regex$Regex$fromString('^(\\d+\\.[^0]*)(0+)$'));
var $elm$regex$Regex$replaceAtMost = _Regex_replaceAtMost;
var $basti1302$elm_human_readable_filesize$Filesize$roundToDecimalPlaces = F2(
function (settings, num) {
var rounded = A2($myrho$elm_round$Round$floor, settings.decimalPlaces, num);
var withoutTrailingZeroes = A4(
$elm$regex$Regex$replaceAtMost,
1,
$basti1302$elm_human_readable_filesize$Filesize$removeTrailingZeroesRegex,
function (_v1) {
var submatches = _v1.submatches;
return A2(
$elm$core$String$join,
'',
A2(
$elm$core$List$map,
$elm$core$Maybe$withDefault(''),
A2($elm$core$List$take, 1, submatches)));
},
rounded);
var withoutTrailingDot = A2($elm$core$String$endsWith, '.', withoutTrailingZeroes) ? A2($elm$core$String$dropRight, 1, withoutTrailingZeroes) : withoutTrailingZeroes;
return (settings.decimalSeparator === '.') ? withoutTrailingDot : A4(
$elm$regex$Regex$replaceAtMost,
1,
$basti1302$elm_human_readable_filesize$Filesize$decimalSeparatorRegex,
function (_v0) {
return settings.decimalSeparator;
},
withoutTrailingDot);
});
var $basti1302$elm_human_readable_filesize$Filesize$unknownUnit = {abbreviation: '?', minimumSize: 1};
var $basti1302$elm_human_readable_filesize$Filesize$formatWithSplit = F2(
function (settings, num) {
if (!num) {
return _Utils_Tuple2('0', 'B');
} else {
var unitDefinitionList = $basti1302$elm_human_readable_filesize$Filesize$getUnitDefinitionList(settings.units);
var _v0 = (num < 0) ? _Utils_Tuple2(-num, '-') : _Utils_Tuple2(num, '');
var num2 = _v0.a;
var negativePrefix = _v0.b;
var unitDefinition = A2(
$elm$core$Maybe$withDefault,
$basti1302$elm_human_readable_filesize$Filesize$unknownUnit,
$elm$core$List$head(
$elm$core$List$reverse(
A2(
$elm$core$List$filter,
function (unitDef) {
return _Utils_cmp(num2, unitDef.minimumSize) > -1;
},
unitDefinitionList))));
var formattedNumber = A2($basti1302$elm_human_readable_filesize$Filesize$roundToDecimalPlaces, settings, num2 / unitDefinition.minimumSize);
return _Utils_Tuple2(
_Utils_ap(negativePrefix, formattedNumber),
unitDefinition.abbreviation);
}
});
var $basti1302$elm_human_readable_filesize$Filesize$format = function (num) {
var _v0 = A2($basti1302$elm_human_readable_filesize$Filesize$formatWithSplit, $basti1302$elm_human_readable_filesize$Filesize$defaultSettings, num);
var size = _v0.a;
var unit = _v0.b;
return size + (' ' + unit);
};
var $ChristophP$elm_mark$String$Mark$CaseIgnore = {$: 'CaseIgnore'};
var $ChristophP$elm_mark$String$Mark$SearchNormal = function (a) {
return {$: 'SearchNormal', a: a};
};
var $ChristophP$elm_mark$String$Mark$SingleWord = {$: 'SingleWord'};
var $elm$html$Html$mark = _VirtualDom_node('mark');
var $ChristophP$elm_mark$String$Mark$defaultOptions = {
mapHit: function (hit) {
return A2(
$elm$html$Html$mark,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text(hit)
]));
},
mapMiss: $elm$html$Html$text,
minTermLength: 3,
searchType: $ChristophP$elm_mark$String$Mark$SearchNormal($ChristophP$elm_mark$String$Mark$CaseIgnore),
whitespace: $ChristophP$elm_mark$String$Mark$SingleWord
};
var $ChristophP$elm_mark$String$Mark$wrapAndAddToMarkers = F3(
function (item, wrapper, markers) {
if (item === '') {
return markers;
} else {
return A2(
$elm$core$List$cons,
wrapper(item),
markers);
}
});
var $ChristophP$elm_mark$String$Mark$markWithHelp = F5(
function (options, revPositions, term, content, markers) {
markWithHelp:
while (true) {
var mapMiss = options.mapMiss;
var mapHit = options.mapHit;
if (!revPositions.b) {
return A3($ChristophP$elm_mark$String$Mark$wrapAndAddToMarkers, content, mapMiss, markers);
} else {
var _v1 = revPositions.a;
var start = _v1.a;
var end = _v1.b;
var rest = revPositions.b;
var miss = A2($elm$core$String$dropLeft, end, content);
var hit = A3($elm$core$String$slice, start, end, content);
var newContent = A2(
$elm$core$String$dropRight,
$elm$core$String$length(miss) + $elm$core$String$length(hit),
content);
var newMarkers = A3(
$ChristophP$elm_mark$String$Mark$wrapAndAddToMarkers,
hit,
mapHit,
A3($ChristophP$elm_mark$String$Mark$wrapAndAddToMarkers, miss, mapMiss, markers));
var $temp$options = options,
$temp$revPositions = rest,
$temp$term = term,
$temp$content = newContent,
$temp$markers = newMarkers;
options = $temp$options;
revPositions = $temp$revPositions;
term = $temp$term;
content = $temp$content;
markers = $temp$markers;
continue markWithHelp;
}
}
});
var $ChristophP$elm_mark$Internal$applyMinLengthCheck = F4(
function (minLength, getIndexes, term, content) {
return (_Utils_cmp(
minLength,
$elm$core$String$length(term)) < 1) ? A2(getIndexes, term, content) : _List_Nil;
});
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 $ChristophP$elm_mark$Internal$filterLastTwoHelp = F4(
function (func, val, list, acc) {
filterLastTwoHelp:
while (true) {
if (!list.b) {
return acc;
} else {
var head = list.a;
var tail = list.b;
var _v1 = A2(func, val, head) ? _Utils_Tuple2(
head,
A2($elm$core$List$cons, head, acc)) : _Utils_Tuple2(val, acc);
var newVal = _v1.a;
var newAcc = _v1.b;
var $temp$func = func,
$temp$val = newVal,
$temp$list = tail,
$temp$acc = newAcc;
func = $temp$func;
val = $temp$val;
list = $temp$list;
acc = $temp$acc;
continue filterLastTwoHelp;
}
}
});
var $ChristophP$elm_mark$Internal$filterLastTwo = F2(
function (func, list) {
if (!list.b) {
return list;
} else {
var x = list.a;
var tail = list.b;
return $elm$core$List$reverse(
A4(
$ChristophP$elm_mark$Internal$filterLastTwoHelp,
func,
x,
tail,
_List_fromArray(
[x])));
}
});
var $ChristophP$elm_mark$Internal$removeOverlaps = $ChristophP$elm_mark$Internal$filterLastTwo(
F2(
function (_v0, _v1) {
var end = _v0.b;
var start = _v1.a;
return _Utils_cmp(end, start) < 1;
}));
var $ChristophP$elm_mark$Internal$multiWordGetIndexes = F3(
function (getIndexes, term, content) {
return (!A2($elm$core$String$contains, ' ', term)) ? A2(getIndexes, term, content) : $ChristophP$elm_mark$Internal$removeOverlaps(
A2(
$elm$core$List$sortBy,
$elm$core$Tuple$first,
A2(
$elm$core$List$concatMap,
function (word) {
return A2(getIndexes, word, content);
},
$elm$core$String$words(term))));
});
var $ChristophP$elm_mark$Internal$addEnds = function (term) {
return $elm$core$List$map(
function (start) {
return _Utils_Tuple2(
start,
start + $elm$core$String$length(term));
});
};
var $ChristophP$elm_mark$Internal$stringIndexes = F2(
function (term, content) {
return A2(
$ChristophP$elm_mark$Internal$addEnds,
term,
A2($elm$core$String$indexes, term, content));
});
var $ChristophP$elm_mark$Internal$stringIndexesIgnoreCase = F2(
function (term, content) {
return A2(
$ChristophP$elm_mark$Internal$addEnds,
term,
A2(
$elm$core$String$indexes,
$elm$core$String$toLower(term),
$elm$core$String$toLower(content)));
});
var $ChristophP$elm_mark$String$Mark$pickGetIndexesFn = function (_v0) {
var minTermLength = _v0.minTermLength;
var whitespace = _v0.whitespace;
var searchType = _v0.searchType;
var getIndexes = A2(
$ChristophP$elm_mark$Internal$applyMinLengthCheck,
minTermLength,
function () {
if (searchType.$ === 'SearchNormal') {
var caseSensitivity = searchType.a;
if (caseSensitivity.$ === 'CaseIgnore') {
return $ChristophP$elm_mark$Internal$stringIndexesIgnoreCase;
} else {
return $ChristophP$elm_mark$Internal$stringIndexes;
}
} else {
var customGetIndexes = searchType.a;
return customGetIndexes;
}
}());
if (whitespace.$ === 'SingleWord') {
return getIndexes;
} else {
return $ChristophP$elm_mark$Internal$multiWordGetIndexes(getIndexes);
}
};
var $ChristophP$elm_mark$String$Mark$markWith = F3(
function (options, term, content) {
var indexes = A3($ChristophP$elm_mark$String$Mark$pickGetIndexesFn, options, term, content);
return A5(
$ChristophP$elm_mark$String$Mark$markWithHelp,
options,
$elm$core$List$reverse(indexes),
term,
content,
_List_Nil);
});
var $ChristophP$elm_mark$String$Mark$MultiWord = {$: 'MultiWord'};
var $ChristophP$elm_mark$String$Mark$multiWord = $ChristophP$elm_mark$String$Mark$MultiWord;
var $author$project$Main$highlight = $ChristophP$elm_mark$String$Mark$markWith(
_Utils_update(
$ChristophP$elm_mark$String$Mark$defaultOptions,
{minTermLength: 1, whitespace: $ChristophP$elm_mark$String$Mark$multiWord}));
var $elm$regex$Regex$find = _Regex_findAtMost(_Regex_infinity);
var $author$project$Main$matches = F2(
function (model, string) {
var maybeRegex = $author$project$Pattern$toRegexp(
$author$project$Pattern$fromString(model.sourceSearch));
if (maybeRegex.$ === 'Just') {
var regex = maybeRegex.a;
return A2(
$elm$core$String$join,
' ',
A2(
$elm$core$List$map,
function ($) {
return $.match;
},
A2($elm$regex$Regex$find, regex, string)));
} else {
return '';
}
});
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 $elm$time$Time$flooredDiv = F2(
function (numerator, denominator) {
return $elm$core$Basics$floor(numerator / denominator);
});
var $elm$time$Time$posixToMillis = function (_v0) {
var millis = _v0.a;
return millis;
};
var $elm$time$Time$toAdjustedMinutesHelp = F3(
function (defaultOffset, posixMinutes, eras) {
toAdjustedMinutesHelp:
while (true) {
if (!eras.b) {
return posixMinutes + defaultOffset;
} else {
var era = eras.a;
var olderEras = eras.b;
if (_Utils_cmp(era.start, posixMinutes) < 0) {
return posixMinutes + era.offset;
} else {
var $temp$defaultOffset = defaultOffset,
$temp$posixMinutes = posixMinutes,
$temp$eras = olderEras;
defaultOffset = $temp$defaultOffset;
posixMinutes = $temp$posixMinutes;
eras = $temp$eras;
continue toAdjustedMinutesHelp;
}
}
}
});
var $elm$time$Time$toAdjustedMinutes = F2(
function (_v0, time) {
var defaultOffset = _v0.a;
var eras = _v0.b;
return A3(
$elm$time$Time$toAdjustedMinutesHelp,
defaultOffset,
A2(
$elm$time$Time$flooredDiv,
$elm$time$Time$posixToMillis(time),
60000),
eras);
});
var $elm$time$Time$toCivil = function (minutes) {
var rawDay = A2($elm$time$Time$flooredDiv, minutes, 60 * 24) + 719468;
var era = (((rawDay >= 0) ? rawDay : (rawDay - 146096)) / 146097) | 0;
var dayOfEra = rawDay - (era * 146097);
var yearOfEra = ((((dayOfEra - ((dayOfEra / 1460) | 0)) + ((dayOfEra / 36524) | 0)) - ((dayOfEra / 146096) | 0)) / 365) | 0;
var dayOfYear = dayOfEra - (((365 * yearOfEra) + ((yearOfEra / 4) | 0)) - ((yearOfEra / 100) | 0));
var mp = (((5 * dayOfYear) + 2) / 153) | 0;
var month = mp + ((mp < 10) ? 3 : (-9));
var year = yearOfEra + (era * 400);
return {
day: (dayOfYear - ((((153 * mp) + 2) / 5) | 0)) + 1,
month: month,
year: year + ((month <= 2) ? 1 : 0)
};
};
var $elm$time$Time$toDay = F2(
function (zone, time) {
return $elm$time$Time$toCivil(
A2($elm$time$Time$toAdjustedMinutes, zone, time)).day;
});
var $elm$time$Time$Apr = {$: 'Apr'};
var $elm$time$Time$Aug = {$: 'Aug'};
var $elm$time$Time$Dec = {$: 'Dec'};
var $elm$time$Time$Feb = {$: 'Feb'};
var $elm$time$Time$Jan = {$: 'Jan'};
var $elm$time$Time$Jul = {$: 'Jul'};
var $elm$time$Time$Jun = {$: 'Jun'};
var $elm$time$Time$Mar = {$: 'Mar'};
var $elm$time$Time$May = {$: 'May'};
var $elm$time$Time$Nov = {$: 'Nov'};
var $elm$time$Time$Oct = {$: 'Oct'};
var $elm$time$Time$Sep = {$: 'Sep'};
var $elm$time$Time$toMonth = F2(
function (zone, time) {
var _v0 = $elm$time$Time$toCivil(
A2($elm$time$Time$toAdjustedMinutes, zone, time)).month;
switch (_v0) {
case 1:
return $elm$time$Time$Jan;
case 2:
return $elm$time$Time$Feb;
case 3:
return $elm$time$Time$Mar;
case 4:
return $elm$time$Time$Apr;
case 5:
return $elm$time$Time$May;
case 6:
return $elm$time$Time$Jun;
case 7:
return $elm$time$Time$Jul;
case 8:
return $elm$time$Time$Aug;
case 9:
return $elm$time$Time$Sep;
case 10:
return $elm$time$Time$Oct;
case 11:
return $elm$time$Time$Nov;
default:
return $elm$time$Time$Dec;
}
});
var $elm$time$Time$toYear = F2(
function (zone, time) {
return $elm$time$Time$toCivil(
A2($elm$time$Time$toAdjustedMinutes, zone, time)).year;
});
var $author$project$Main$viewDate = F2(
function (model, time) {
var year = $elm$core$String$fromInt(
A2($elm$time$Time$toYear, model.timezone, time));
var monthToString = function (timeMonth) {
switch (timeMonth.$) {
case 'Jan':
return '01';
case 'Feb':
return '02';
case 'Mar':
return '03';
case 'Apr':
return '04';
case 'May':
return '05';
case 'Jun':
return '06';
case 'Jul':
return '07';
case 'Aug':
return '08';
case 'Sep':
return '09';
case 'Oct':
return '10';
case 'Nov':
return '11';
default:
return '12';
}
};
var month = monthToString(
A2($elm$time$Time$toMonth, model.timezone, time));
var day = A3(
$elm$core$String$padLeft,
2,
_Utils_chr('0'),
$elm$core$String$fromInt(
A2($elm$time$Time$toDay, model.timezone, time)));
return $elm$html$Html$text(day + ('/' + (month + ('/' + year))));
});
var $author$project$Main$viewReadOnlyFile = F4(
function (model, onClickMsg, canBeSearchedAndReplaced, file) {
var fileName = function () {
if (canBeSearchedAndReplaced) {
var _v1 = _Utils_Tuple2(model.sourceSearch, model.sourceReplace);
if (_v1.a === '') {
return _List_fromArray(
[
$elm$html$Html$text(file.name)
]);
} else {
if (_v1.b === '') {
return A2(
$author$project$Main$highlight,
A2($author$project$Main$matches, model, file.name),
file.name);
} else {
var replacementString = _v1.b;
return A2(
$author$project$Main$highlight,
replacementString,
A2($author$project$Main$replace, model, file.name));
}
}
} else {
return _List_fromArray(
[
$elm$html$Html$text(file.name)
]);
}
}();
var className = function () {
var _v0 = file.status;
switch (_v0.$) {
case 'Unselected':
return 'file';
case 'Edited':
return 'file';
case 'Selected':
return 'file selected';
default:
return 'file marked-for-deletion';
}
}();
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class(className),
$elm$html$Html$Events$onClick(
onClickMsg(file))
]),
_List_fromArray(
[
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('filename')
]),
fileName),
A2(
$elm$html$Html$div,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text(
$basti1302$elm_human_readable_filesize$Filesize$format(file.size))
])),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('filemodificationdate')
]),
_List_fromArray(
[
A2($author$project$Main$viewDate, model, file.modTime)
]))
]));
});
var $author$project$Main$viewFile = F4(
function (model, onClickMsg, canBeSearchedAndReplaced, file) {
return _Utils_eq(file.status, $author$project$File$Edited) ? $author$project$Main$viewEditedFilename(model) : A4($author$project$Main$viewReadOnlyFile, model, onClickMsg, canBeSearchedAndReplaced, file);
});
var $author$project$Main$SourceSearchReplace = {$: 'SourceSearchReplace'};
var $author$project$Main$UserChangedSourceReplace = function (a) {
return {$: 'UserChangedSourceReplace', a: a};
};
var $author$project$Main$UserChangedSourceSearch = function (a) {
return {$: 'UserChangedSourceSearch', a: a};
};
var $author$project$Main$UserClickedReplaceButton = {$: 'UserClickedReplaceButton'};
var $author$project$Main$viewSearchReplaceForm = function (model) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('search-form')
]),
_List_fromArray(
[
A2(
$elm$html$Html$input,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input'),
$elm$html$Html$Attributes$id('search-left'),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$SourceSearchReplace)),
$elm$html$Html$Events$onInput($author$project$Main$UserChangedSourceSearch),
$elm$html$Html$Attributes$placeholder('Search'),
$elm$html$Html$Attributes$type_('text'),
$elm$html$Html$Attributes$value(model.sourceSearch)
]),
_List_Nil),
A2(
$elm$html$Html$input,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input'),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$SourceSearchReplace)),
$elm$html$Html$Events$onInput($author$project$Main$UserChangedSourceReplace),
$elm$html$Html$Attributes$placeholder('Replace with'),
$elm$html$Html$Attributes$type_('text'),
$elm$html$Html$Attributes$value(model.sourceReplace)
]),
_List_Nil),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedReplaceButton)
]),
_List_fromArray(
[
$elm$html$Html$text('Replace')
]))
]));
};
var $author$project$Main$UserChangedMaxDistance = function (a) {
return {$: 'UserChangedMaxDistance', a: a};
};
var $carwow$elm_slider$SingleSlider$SingleSlider = function (a) {
return {$: 'SingleSlider', a: a};
};
var $carwow$elm_slider$RangeSlider$defaultLabelFormatter = function (value) {
return $elm$core$String$fromFloat(value);
};
var $carwow$elm_slider$RangeSlider$defaultValueFormatter = F2(
function (value, max) {
return _Utils_eq(value, max) ? '' : $elm$core$String$fromFloat(value);
});
var $carwow$elm_slider$SingleSlider$init = function (attrs) {
return $carwow$elm_slider$SingleSlider$SingleSlider(
{
commonAttributes: {max: attrs.max, maxFormatter: $carwow$elm_slider$RangeSlider$defaultLabelFormatter, min: attrs.min, minFormatter: $carwow$elm_slider$RangeSlider$defaultLabelFormatter, step: attrs.step},
valueAttributes: {change: attrs.onChange, formatter: $carwow$elm_slider$RangeSlider$defaultValueFormatter, value: attrs.value}
});
};
var $carwow$elm_slider$SingleSlider$inputDecoder = A2(
$elm$json$Json$Decode$map,
function (value) {
return A2(
$elm$core$Maybe$withDefault,
0,
$elm$core$String$toFloat(value));
},
$elm$html$Html$Events$targetValue);
var $elm$json$Json$Decode$map3 = _Json_map3;
var $elm$json$Json$Decode$float = _Json_decodeFloat;
var $debois$elm_dom$DOM$offsetHeight = A2($elm$json$Json$Decode$field, 'offsetHeight', $elm$json$Json$Decode$float);
var $debois$elm_dom$DOM$offsetWidth = A2($elm$json$Json$Decode$field, 'offsetWidth', $elm$json$Json$Decode$float);
var $elm$json$Json$Decode$map4 = _Json_map4;
var $debois$elm_dom$DOM$offsetLeft = A2($elm$json$Json$Decode$field, 'offsetLeft', $elm$json$Json$Decode$float);
var $elm$json$Json$Decode$null = _Json_decodeNull;
var $debois$elm_dom$DOM$offsetParent = F2(
function (x, decoder) {
return $elm$json$Json$Decode$oneOf(
_List_fromArray(
[
A2(
$elm$json$Json$Decode$field,
'offsetParent',
$elm$json$Json$Decode$null(x)),
A2($elm$json$Json$Decode$field, 'offsetParent', decoder)
]));
});
var $debois$elm_dom$DOM$offsetTop = A2($elm$json$Json$Decode$field, 'offsetTop', $elm$json$Json$Decode$float);
var $debois$elm_dom$DOM$scrollLeft = A2($elm$json$Json$Decode$field, 'scrollLeft', $elm$json$Json$Decode$float);
var $debois$elm_dom$DOM$scrollTop = A2($elm$json$Json$Decode$field, 'scrollTop', $elm$json$Json$Decode$float);
var $debois$elm_dom$DOM$position = F2(
function (x, y) {
return A2(
$elm$json$Json$Decode$andThen,
function (_v0) {
var x_ = _v0.a;
var y_ = _v0.b;
return A2(
$debois$elm_dom$DOM$offsetParent,
_Utils_Tuple2(x_, y_),
A2($debois$elm_dom$DOM$position, x_, y_));
},
A5(
$elm$json$Json$Decode$map4,
F4(
function (scrollLeftP, scrollTopP, offsetLeftP, offsetTopP) {
return _Utils_Tuple2((x + offsetLeftP) - scrollLeftP, (y + offsetTopP) - scrollTopP);
}),
$debois$elm_dom$DOM$scrollLeft,
$debois$elm_dom$DOM$scrollTop,
$debois$elm_dom$DOM$offsetLeft,
$debois$elm_dom$DOM$offsetTop));
});
var $debois$elm_dom$DOM$boundingClientRect = A4(
$elm$json$Json$Decode$map3,
F3(
function (_v0, width, height) {
var x = _v0.a;
var y = _v0.b;
return {height: height, left: x, top: y, width: width};
}),
A2($debois$elm_dom$DOM$position, 0, 0),
$debois$elm_dom$DOM$offsetWidth,
$debois$elm_dom$DOM$offsetHeight);
var $myrho$elm_round$Round$funNum = F3(
function (fun, s, fl) {
return A2(
$elm$core$Maybe$withDefault,
0 / 0,
$elm$core$String$toFloat(
A2(fun, s, fl)));
});
var $myrho$elm_round$Round$round = $myrho$elm_round$Round$roundFun(
F2(
function (signed, str) {
var _v0 = $elm$core$String$uncons(str);
if (_v0.$ === 'Nothing') {
return false;
} else {
if ('5' === _v0.a.a.valueOf()) {
if (_v0.a.b === '') {
var _v1 = _v0.a;
return !signed;
} else {
var _v2 = _v0.a;
return true;
}
} else {
var _v3 = _v0.a;
var _int = _v3.a;
return function (i) {
return ((i > 53) && signed) || ((i >= 53) && (!signed));
}(
$elm$core$Char$toCode(_int));
}
}
}));
var $myrho$elm_round$Round$roundNum = $myrho$elm_round$Round$funNum($myrho$elm_round$Round$round);
var $carwow$elm_slider$RangeSlider$snapValue = F2(
function (value, step) {
var stepDecimals = $elm$core$List$head(
A2(
$elm$core$List$drop,
1,
A2(
$elm$core$String$split,
'.',
$elm$core$String$fromFloat(step))));
var precision = function () {
if (stepDecimals.$ === 'Just') {
var s = stepDecimals.a;
return $elm$core$String$length(s);
} else {
return 0;
}
}();
return A2(
$myrho$elm_round$Round$roundNum,
precision,
$elm$core$Basics$round(value / step) * step);
});
var $carwow$elm_slider$SingleSlider$onOutsideRangeClick = function (_v0) {
var slider = _v0.a;
var commonAttributes = slider.commonAttributes;
var valueDecoder = A3(
$elm$json$Json$Decode$map2,
F2(
function (rectangle, mouseX) {
var clickedValue = (((commonAttributes.max - commonAttributes.min) / rectangle.width) * mouseX) + commonAttributes.min;
return A2($carwow$elm_slider$RangeSlider$snapValue, clickedValue, commonAttributes.step);
}),
A2(
$elm$json$Json$Decode$at,
_List_fromArray(
['target']),
$debois$elm_dom$DOM$boundingClientRect),
A2(
$elm$json$Json$Decode$at,
_List_fromArray(
['offsetX']),
$elm$json$Json$Decode$float));
return A2($elm$json$Json$Decode$map, slider.valueAttributes.change, valueDecoder);
};
var $elm$core$Basics$clamp = F3(
function (low, high, number) {
return (_Utils_cmp(number, low) < 0) ? low : ((_Utils_cmp(number, high) > 0) ? high : number);
});
var $carwow$elm_slider$RangeSlider$onClick = function (decoder) {
return A2($elm$html$Html$Events$on, 'click', decoder);
};
var $carwow$elm_slider$SingleSlider$onInsideRangeClick = function (_v0) {
var valueAttributes = _v0.a.valueAttributes;
var commonAttributes = _v0.a.commonAttributes;
var valueDecoder = A3(
$elm$json$Json$Decode$map2,
F2(
function (rectangle, mouseX) {
var adjustedValue = A3($elm$core$Basics$clamp, commonAttributes.min, commonAttributes.max, valueAttributes.value);
var newValue = $elm$core$Basics$round((adjustedValue / rectangle.width) * mouseX);
var adjustedNewValue = A3($elm$core$Basics$clamp, commonAttributes.min, commonAttributes.max, newValue);
return A2($carwow$elm_slider$RangeSlider$snapValue, adjustedNewValue, commonAttributes.step);
}),
A2(
$elm$json$Json$Decode$at,
_List_fromArray(
['target']),
$debois$elm_dom$DOM$boundingClientRect),
A2(
$elm$json$Json$Decode$at,
_List_fromArray(
['offsetX']),
$elm$json$Json$Decode$float));
return A2($elm$json$Json$Decode$map, valueAttributes.change, valueDecoder);
};
var $elm$virtual_dom$VirtualDom$style = _VirtualDom_style;
var $elm$html$Html$Attributes$style = $elm$virtual_dom$VirtualDom$style;
var $carwow$elm_slider$SingleSlider$progressView = function (_v0) {
var slider = _v0.a;
var valueAttributes = slider.valueAttributes;
var commonAttributes = slider.commonAttributes;
var value = A3($elm$core$Basics$clamp, commonAttributes.min, commonAttributes.max, valueAttributes.value);
var progressRatio = 100 / (commonAttributes.max - commonAttributes.min);
var progress = (commonAttributes.max - value) * progressRatio;
var progressAttributes = _List_fromArray(
[
$elm$html$Html$Attributes$class('input-range__progress'),
A2($elm$html$Html$Attributes$style, 'left', '0.0%'),
A2(
$elm$html$Html$Attributes$style,
'right',
$elm$core$String$fromFloat(progress) + '%'),
$carwow$elm_slider$RangeSlider$onClick(
$carwow$elm_slider$SingleSlider$onInsideRangeClick(
$carwow$elm_slider$SingleSlider$SingleSlider(slider)))
]);
return A2($elm$html$Html$div, progressAttributes, _List_Nil);
};
var $elm$html$Html$Attributes$classList = function (classes) {
return $elm$html$Html$Attributes$class(
A2(
$elm$core$String$join,
' ',
A2(
$elm$core$List$map,
$elm$core$Tuple$first,
A2($elm$core$List$filter, $elm$core$Tuple$second, classes))));
};
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 $carwow$elm_slider$RangeSlider$onChange = F2(
function (msg, input) {
return A2(
$elm$html$Html$Events$on,
'change',
A2($elm$json$Json$Decode$map, msg, input));
});
var $carwow$elm_slider$RangeSlider$onInput = F2(
function (msg, input) {
return A2(
$elm$html$Html$Events$on,
'input',
A2($elm$json$Json$Decode$map, msg, input));
});
var $elm$html$Html$Attributes$step = function (n) {
return A2($elm$html$Html$Attributes$stringProperty, 'step', n);
};
var $carwow$elm_slider$RangeSlider$sliderInputView = F4(
function (commonAttributes, valueAttributes, input, extraClasses) {
return A2(
$elm$html$Html$input,
_List_fromArray(
[
$elm$html$Html$Attributes$type_('range'),
$elm$html$Html$Attributes$min(
$elm$core$String$fromFloat(commonAttributes.min)),
$elm$html$Html$Attributes$max(
$elm$core$String$fromFloat(commonAttributes.max)),
$elm$html$Html$Attributes$step(
$elm$core$String$fromFloat(commonAttributes.step)),
$elm$html$Html$Attributes$value(
$elm$core$String$fromFloat(valueAttributes.value)),
$elm$html$Html$Attributes$class('input-range'),
$elm$html$Html$Attributes$classList(
A2(
$elm$core$List$map,
function (c) {
return _Utils_Tuple2(c, true);
},
extraClasses)),
A2($carwow$elm_slider$RangeSlider$onChange, valueAttributes.change, input),
A2($carwow$elm_slider$RangeSlider$onInput, valueAttributes.change, input)
]),
_List_Nil);
});
var $carwow$elm_slider$RangeSlider$sliderTrackView = function (decoder) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-range__track'),
$carwow$elm_slider$RangeSlider$onClick(decoder)
]),
_List_Nil);
};
var $carwow$elm_slider$SingleSlider$view = function (_v0) {
var slider = _v0.a;
return A2(
$elm$html$Html$div,
_List_Nil,
_List_fromArray(
[
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-range-container')
]),
_List_fromArray(
[
A4($carwow$elm_slider$RangeSlider$sliderInputView, slider.commonAttributes, slider.valueAttributes, $carwow$elm_slider$SingleSlider$inputDecoder, _List_Nil),
$carwow$elm_slider$RangeSlider$sliderTrackView(
$carwow$elm_slider$SingleSlider$onOutsideRangeClick(
$carwow$elm_slider$SingleSlider$SingleSlider(slider))),
$carwow$elm_slider$SingleSlider$progressView(
$carwow$elm_slider$SingleSlider$SingleSlider(slider))
])),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-range-labels-container')
]),
_List_fromArray(
[
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-range-label')
]),
_List_fromArray(
[
$elm$html$Html$text(
slider.commonAttributes.minFormatter(slider.commonAttributes.min))
])),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-range-label input-range-label--current-value')
]),
_List_fromArray(
[
$elm$html$Html$text(
A2(slider.valueAttributes.formatter, slider.valueAttributes.value, slider.commonAttributes.max))
])),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-range-label')
]),
_List_fromArray(
[
$elm$html$Html$text(
slider.commonAttributes.maxFormatter(slider.commonAttributes.max))
]))
]))
]));
};
var $author$project$Main$viewSimilarityLevelForm = function (model) {
return $carwow$elm_slider$SingleSlider$view(
$carwow$elm_slider$SingleSlider$init(
{max: $author$project$Main$maxSimilarity, min: 0, onChange: $author$project$Main$UserChangedMaxDistance, step: 1, value: model.minSimilarity}));
};
var $author$project$Main$viewSourceFiles = function (model) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('panel')
]),
_List_fromArray(
[
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class(
'panel-header' + A2($author$project$Main$additionalHeaderClass, model, $author$project$Main$LeftSide))
]),
_List_fromArray(
[
A2(
$elm$html$Html$h2,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text(
A2($author$project$Main$fileCount, model, $author$project$Main$Source))
])),
$author$project$Main$viewSimilarityLevelForm(model),
$author$project$Main$viewSearchReplaceForm(model)
])),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-box')
]),
_List_fromArray(
[
A2(
$elm$html$Html$input,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input'),
$elm$html$Html$Attributes$type_('text'),
$elm$html$Html$Attributes$id('filtering-left'),
$elm$html$Html$Events$onInput($author$project$Main$UserChangedSourceFilter),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$Filtering)),
$elm$html$Html$Attributes$value(model.sourceFilter),
$elm$html$Html$Attributes$placeholder('Enter one or more words to filter source files')
]),
_List_Nil),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedClearSourceFilter)
]),
_List_fromArray(
[
$elm$html$Html$text('Clear')
])),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedCopyFilterButton)
]),
_List_fromArray(
[
$elm$html$Html$text('Copy')
]))
])),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('panel-content')
]),
A2(
$elm$core$List$map,
A3($author$project$Main$viewFile, model, $author$project$Main$UserClickedSourceFile, true),
A2(
$elm$core$List$filter,
function ($) {
return $.satisfiesFilter;
},
model.sourceFiles)))
]));
};
var $author$project$Main$UserClickedReload = function (a) {
return {$: 'UserClickedReload', a: a};
};
var $author$project$Main$UserClickedSourceDirectory = F2(
function (a, b) {
return {$: 'UserClickedSourceDirectory', a: a, b: b};
});
var $author$project$Main$UserClickedSourceDirectoryButton = {$: 'UserClickedSourceDirectoryButton'};
var $author$project$Main$viewDirectory = F3(
function (_v0, onClickMsg, file) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('file dir'),
$elm$html$Html$Events$onClick(
onClickMsg(file))
]),
_List_fromArray(
[
$elm$html$Html$text(file.name)
]));
});
var $author$project$Main$UserClickedDestinationDirectory = F2(
function (a, b) {
return {$: 'UserClickedDestinationDirectory', a: a, b: b};
});
var $author$project$Main$maxVisibleCharactersInPaths = 50;
var $author$project$File$defaultDir = {
isDir: true,
modTime: $elm$time$Time$millisToPosix(0),
mode: 777,
name: '',
parentPath: '',
satisfiesFilter: false,
size: 0,
status: $author$project$File$Unselected
};
var $author$project$File$withName = F2(
function (name, file) {
return _Utils_update(
file,
{name: name});
});
var $author$project$File$withParentPath = F2(
function (path, file) {
return _Utils_update(
file,
{parentPath: path});
});
var $author$project$Main$pathElementsRecursive = F3(
function (model, acc, path) {
var parentPath = A2($author$project$Main$parentDir, model, path);
var parentIsRootDir = (_Utils_eq(model.pathSeparator, $author$project$Main$unixPathSep) && (!$elm$core$String$length(parentPath))) || (_Utils_eq(model.pathSeparator, $author$project$Main$windowsPathSep) && ($elm$core$String$length(parentPath) === 2));
var endIndex = $elm$core$String$length(path);
var lastPartIndex = 1 + A2(
$elm$core$Maybe$withDefault,
endIndex,
$elm$core$List$maximum(
A2($elm$core$String$indexes, model.pathSeparator, path)));
var leaf = A3($elm$core$String$slice, lastPartIndex, endIndex, path);
var file = A2(
$author$project$File$withParentPath,
parentPath,
A2($author$project$File$withName, leaf, $author$project$File$defaultDir));
if (parentIsRootDir) {
if (parentPath === '') {
return A2(
$elm$core$List$cons,
_Utils_update(
file,
{parentPath: $author$project$Main$unixPathSep}),
acc);
} else {
return A2($elm$core$List$cons, file, acc);
}
} else {
return A2(
$elm$core$List$cons,
file,
A3($author$project$Main$pathElementsRecursive, model, acc, parentPath));
}
});
var $author$project$Main$pathElements = F3(
function (model, acc, path) {
return (path === '.') ? _List_Nil : $elm$core$List$reverse(
A3($author$project$Main$pathElementsRecursive, model, acc, path));
});
var $elm$core$List$sum = function (numbers) {
return A3($elm$core$List$foldl, $elm$core$Basics$add, 0, numbers);
};
var $author$project$Main$truncateConcatenatedNames = F2(
function (maxLength, elements) {
var currentLength = function (acc) {
return $elm$core$List$sum(
A2(
$elm$core$List$map,
A2(
$elm$core$Basics$composeR,
function ($) {
return $.name;
},
$elm$core$String$length),
acc));
};
return A3(
$elm$core$List$foldl,
F2(
function (element, acc) {
return (_Utils_cmp(
currentLength(acc) + $elm$core$String$length(element.name),
maxLength) < 1) ? A2($elm$core$List$cons, element, acc) : acc;
}),
_List_Nil,
$elm$core$List$reverse(elements));
});
var $author$project$Main$viewPath = F2(
function (model, target) {
var path = function () {
if (target.$ === 'Source') {
return model.sourceDirectoryPath;
} else {
return model.destinationDirectoryPath;
}
}();
var msgToEmit = function () {
if (target.$ === 'Source') {
return $author$project$Main$UserClickedSourceDirectory(true);
} else {
return $author$project$Main$UserClickedDestinationDirectory(true);
}
}();
var elements = A3($author$project$Main$pathElements, model, _List_Nil, path);
var displayableElements = A2($author$project$Main$truncateConcatenatedNames, $author$project$Main$maxVisibleCharactersInPaths, elements);
var displayableElementsCount = $elm$core$List$length(displayableElements);
var ellipsis = (_Utils_cmp(
displayableElementsCount,
$elm$core$List$length(elements)) < 0) ? $elm$html$Html$text('...' + model.pathSeparator) : $elm$html$Html$text(model.pathSeparator);
var clickablePath = A2(
$elm$core$List$indexedMap,
F2(
function (index, element) {
return (_Utils_cmp(index, displayableElementsCount - 1) < 0) ? A2(
$elm$html$Html$span,
_List_Nil,
_List_fromArray(
[
A2(
$elm$html$Html$span,
_List_fromArray(
[
$elm$html$Html$Attributes$class('link'),
$elm$html$Html$Events$onClick(
msgToEmit(element))
]),
_List_fromArray(
[
$elm$html$Html$text(element.name)
])),
A2(
$elm$html$Html$span,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text(model.pathSeparator)
]))
])) : A2(
$elm$html$Html$span,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text(element.name)
]));
}),
displayableElements);
return A2(
$elm$html$Html$span,
_List_Nil,
A2($elm$core$List$cons, ellipsis, clickablePath));
});
var $author$project$Main$viewSourceSubdirectories = function (model) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('panel')
]),
_List_fromArray(
[
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class(
'panel-header' + A2($author$project$Main$additionalHeaderClass, model, $author$project$Main$LeftSide))
]),
_List_fromArray(
[
A2(
$elm$html$Html$h2,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text('Source: '),
A2($author$project$Main$viewPath, model, $author$project$Main$Source)
])),
A2(
$elm$html$Html$span,
_List_Nil,
_List_fromArray(
[
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick(
$author$project$Main$UserClickedReload($author$project$Main$Source))
]),
_List_fromArray(
[
$elm$html$Html$text('Refresh')
])),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedSourceDirectoryButton)
]),
_List_fromArray(
[
$elm$html$Html$text('...')
]))
]))
])),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('panel-content')
]),
A2(
$elm$core$List$map,
A2(
$author$project$Main$viewDirectory,
model,
$author$project$Main$UserClickedSourceDirectory(false)),
model.sourceSubDirectories))
]));
};
var $author$project$Main$viewSource = function (model) {
return _List_fromArray(
[
$author$project$Main$viewSourceSubdirectories(model),
$author$project$Main$viewSourceFiles(model)
]);
};
var $author$project$Main$viewLeftSide = function (model) {
var conditionalAttributes = function () {
var _v0 = _Utils_Tuple2(model.editedFile, model.focusedZone);
if (_v0.a.$ === 'Nothing') {
if (_v0.b.$ === 'LeftSide') {
var _v1 = _v0.a;
var _v2 = _v0.b;
return _List_fromArray(
[
A2(
$elm$html$Html$Events$preventDefaultOn,
'keydown',
$author$project$Main$keyDecoderPreventingDefault($author$project$Main$Source))
]);
} else {
var _v3 = _v0.a;
return _List_fromArray(
[
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$LeftSide))
]);
}
} else {
return _List_Nil;
}
}();
return A2(
$elm$html$Html$div,
_Utils_ap(
_List_fromArray(
[
$elm$html$Html$Attributes$id('container-left'),
$elm$html$Html$Attributes$tabindex(1)
]),
conditionalAttributes),
$author$project$Main$viewSource(model));
};
var $author$project$Main$UserClickedDestinationFile = function (a) {
return {$: 'UserClickedDestinationFile', a: a};
};
var $author$project$Main$UserChangedDestinationFilesFilter = function (a) {
return {$: 'UserChangedDestinationFilesFilter', a: a};
};
var $author$project$Main$UserClickedClearDestinationFilesFilter = {$: 'UserClickedClearDestinationFilesFilter'};
var $elm$json$Json$Encode$bool = _Json_wrap;
var $elm$html$Html$Attributes$boolProperty = F2(
function (key, bool) {
return A2(
_VirtualDom_property,
key,
$elm$json$Json$Encode$bool(bool));
});
var $elm$html$Html$Attributes$disabled = $elm$html$Html$Attributes$boolProperty('disabled');
var $author$project$Main$viewDestinationFilesFilter = function (model) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-box')
]),
_List_fromArray(
[
A2(
$elm$html$Html$input,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input'),
$elm$html$Html$Attributes$type_('text'),
$elm$html$Html$Attributes$id('filtering-files-right'),
$elm$html$Html$Events$onInput($author$project$Main$UserChangedDestinationFilesFilter),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$Filtering)),
$elm$html$Html$Attributes$value(model.destinationFilesFilter),
$elm$html$Html$Attributes$placeholder('Enter one or more words to filter files in destination directory'),
$elm$html$Html$Attributes$disabled(model.applySourceFilterToDestinationFiles)
]),
_List_Nil),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedClearDestinationFilesFilter),
$elm$html$Html$Attributes$disabled(model.applySourceFilterToDestinationFiles)
]),
_List_fromArray(
[
$elm$html$Html$text('Clear')
]))
]));
};
var $author$project$Main$viewDestinationFiles = function (model) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('panel')
]),
_List_fromArray(
[
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class(
'panel-header' + A2($author$project$Main$additionalHeaderClass, model, $author$project$Main$RightSide))
]),
_List_fromArray(
[
A2(
$elm$html$Html$h2,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text(
A2($author$project$Main$fileCount, model, $author$project$Main$Destination))
]))
])),
$author$project$Main$viewDestinationFilesFilter(model),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('panel-content')
]),
A2(
$elm$core$List$map,
A3($author$project$Main$viewFile, model, $author$project$Main$UserClickedDestinationFile, false),
A2(
$elm$core$List$filter,
function ($) {
return $.satisfiesFilter;
},
model.destinationFiles)))
]));
};
var $author$project$Main$UserClickedDestinationDirectoryButton = {$: 'UserClickedDestinationDirectoryButton'};
var $author$project$Main$UserChangedDestinationDirectoryFilter = function (a) {
return {$: 'UserChangedDestinationDirectoryFilter', a: a};
};
var $author$project$Main$UserClickedClearDestinationDirectoryFilter = {$: 'UserClickedClearDestinationDirectoryFilter'};
var $author$project$Main$viewDestinationDirectoryFilter = function (model) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input-box')
]),
_List_fromArray(
[
A2(
$elm$html$Html$input,
_List_fromArray(
[
$elm$html$Html$Attributes$class('input'),
$elm$html$Html$Attributes$type_('text'),
$elm$html$Html$Attributes$id('filtering-dir-right'),
$elm$html$Html$Events$onInput($author$project$Main$UserChangedDestinationDirectoryFilter),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$Filtering)),
$elm$html$Html$Attributes$value(model.destinationDirectoryFilter),
$elm$html$Html$Attributes$placeholder('Enter one or more words to filter destination directories'),
$elm$html$Html$Attributes$disabled(model.applySourceFilterToDestinationDirectories)
]),
_List_Nil),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedClearDestinationDirectoryFilter),
$elm$html$Html$Attributes$disabled(model.applySourceFilterToDestinationDirectories)
]),
_List_fromArray(
[
$elm$html$Html$text('Clear')
]))
]));
};
var $author$project$Main$DirNameEditor = {$: 'DirNameEditor'};
var $author$project$Main$UserModifiedDirName = function (a) {
return {$: 'UserModifiedDirName', a: a};
};
var $author$project$Main$UserSubmittedDirName = {$: 'UserSubmittedDirName'};
var $author$project$Main$viewEditedDirectoryName = function (model) {
return A2(
$elm$html$Html$form,
_List_fromArray(
[
$elm$html$Html$Events$onSubmit($author$project$Main$UserSubmittedDirName)
]),
_List_fromArray(
[
A2(
$elm$html$Html$input,
_List_fromArray(
[
$elm$html$Html$Attributes$class('file-input'),
$elm$html$Html$Attributes$id('dirname-input'),
$elm$html$Html$Events$onInput($author$project$Main$UserModifiedDirName),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$DirNameEditor)),
A2(
$elm$html$Html$Events$on,
'keydown',
$author$project$Main$simpleKeyDecoder($author$project$Main$Destination)),
$elm$html$Html$Attributes$value(model.editedDirName)
]),
_List_Nil)
]));
};
var $author$project$Main$viewDestinationSubdirectories = function (model) {
var newDirEditor = model.isCreatingDirectory ? _List_fromArray(
[
$author$project$Main$viewEditedDirectoryName(model)
]) : _List_Nil;
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('panel')
]),
_List_fromArray(
[
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class(
'panel-header' + A2($author$project$Main$additionalHeaderClass, model, $author$project$Main$RightSide))
]),
_List_fromArray(
[
A2(
$elm$html$Html$h2,
_List_Nil,
_List_fromArray(
[
$elm$html$Html$text('Destination: '),
A2($author$project$Main$viewPath, model, $author$project$Main$Destination)
])),
A2(
$elm$html$Html$span,
_List_Nil,
_List_fromArray(
[
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick(
$author$project$Main$UserClickedReload($author$project$Main$Destination))
]),
_List_fromArray(
[
$elm$html$Html$text('Refresh')
])),
A2(
$elm$html$Html$button,
_List_fromArray(
[
$elm$html$Html$Attributes$class('btn'),
$elm$html$Html$Events$onClick($author$project$Main$UserClickedDestinationDirectoryButton)
]),
_List_fromArray(
[
$elm$html$Html$text('...')
]))
]))
])),
$author$project$Main$viewDestinationDirectoryFilter(model),
A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('panel-content')
]),
_Utils_ap(
newDirEditor,
A2(
$elm$core$List$map,
A2(
$author$project$Main$viewDirectory,
model,
$author$project$Main$UserClickedDestinationDirectory(false)),
A2(
$elm$core$List$filter,
function ($) {
return $.satisfiesFilter;
},
model.destinationSubdirectories))))
]));
};
var $author$project$Main$viewLoadingAnimation = A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class('spin')
]),
_List_Nil);
var $author$project$Main$viewDestination = function (model) {
return model.isDestinationLoadingInProgress ? _List_fromArray(
[$author$project$Main$viewLoadingAnimation]) : _List_fromArray(
[
$author$project$Main$viewDestinationSubdirectories(model),
$author$project$Main$viewDestinationFiles(model)
]);
};
var $author$project$Main$viewRightSide = function (model) {
var conditionalAttributes = function () {
var _v0 = model.focusedZone;
if (_v0.$ === 'RightSide') {
return _List_fromArray(
[
A2(
$elm$html$Html$Events$preventDefaultOn,
'keydown',
$author$project$Main$keyDecoderPreventingDefault($author$project$Main$Destination))
]);
} else {
return _List_Nil;
}
}();
return A2(
$elm$html$Html$div,
_Utils_ap(
_List_fromArray(
[
$elm$html$Html$Attributes$id('container-right'),
$elm$html$Html$Attributes$tabindex(2),
$elm$html$Html$Events$onFocus(
$author$project$Main$UserChangedFocusedZone($author$project$Main$RightSide))
]),
conditionalAttributes),
$author$project$Main$viewDestination(model));
};
var $author$project$Main$view = function (model) {
return A2(
$elm$html$Html$div,
_List_fromArray(
[
$elm$html$Html$Attributes$class(
model.isDebugVisible ? 'app debug' : 'app'),
$elm$html$Html$Attributes$id('app'),
A2($elm$html$Html$Events$on, 'keydown', $author$project$Main$keyDecoder),
A2($elm$html$Html$Events$on, 'keyup', $author$project$Main$keyDecoder)
]),
_List_fromArray(
[
$author$project$Main$viewLeftSide(model),
$author$project$Main$viewRightSide(model),
$author$project$Main$viewFooter(model)
]));
};
var $author$project$Main$main = $elm$browser$Browser$element(
{init: $author$project$Main$init, subscriptions: $author$project$Main$subscriptions, update: $author$project$Main$update, view: $author$project$Main$view});
_Platform_export({'Main':{'init':$author$project$Main$main(
$elm$json$Json$Decode$succeed(_Utils_Tuple0))(0)}});}(this));
var app = Elm.Main.init({ node: document.getElementById("elm") });
}
catch (e)
{
// display initialization errors (e.g. bad flags, infinite recursion)
var header = document.createElement("h1");
header.style.fontFamily = "monospace";
header.innerText = "Initialization Error";
var pre = document.getElementById("elm");
document.body.insertBefore(header, pre);
pre.innerText = e;
throw e;
}
</script>
</body>
</html>
Reference in a new issue View git blame Copy permalink