diff --git a/.gitignore b/.gitignore
index e27a60e..e6442a9 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1 +1,3 @@
-elm-stuff/
\ No newline at end of file
+elm-stuff/
+index.html
+prof.js
\ No newline at end of file
diff --git a/index.html b/index.html
deleted file mode 100644
index d0ac5bb..0000000
--- a/index.html
+++ /dev/null
@@ -1 +0,0 @@
-Le coin du prof
\ No newline at end of file
diff --git a/prof.js b/prof.js
deleted file mode 100644
index 1cdc728..0000000
--- a/prof.js
+++ /dev/null
@@ -1,17709 +0,0 @@
-(function(scope){
-'use strict';
-
-function F(arity, fun, wrapper) {
- wrapper.a = arity;
- wrapper.f = fun;
- return wrapper;
-}
-
-function F2(fun) {
- return F(2, fun, function(a) { return function(b) { return fun(a,b); }; })
-}
-function F3(fun) {
- return F(3, fun, function(a) {
- return function(b) { return function(c) { return fun(a, b, c); }; };
- });
-}
-function F4(fun) {
- return F(4, fun, function(a) { return function(b) { return function(c) {
- return function(d) { return fun(a, b, c, d); }; }; };
- });
-}
-function F5(fun) {
- return F(5, fun, function(a) { return function(b) { return function(c) {
- return function(d) { return function(e) { return fun(a, b, c, d, e); }; }; }; };
- });
-}
-function F6(fun) {
- return F(6, fun, function(a) { return function(b) { return function(c) {
- return function(d) { return function(e) { return function(f) {
- return fun(a, b, c, d, e, f); }; }; }; }; };
- });
-}
-function F7(fun) {
- return F(7, fun, function(a) { return function(b) { return function(c) {
- return function(d) { return function(e) { return function(f) {
- return function(g) { return fun(a, b, c, d, e, f, g); }; }; }; }; }; };
- });
-}
-function F8(fun) {
- return F(8, fun, function(a) { return function(b) { return function(c) {
- return function(d) { return function(e) { return function(f) {
- return function(g) { return function(h) {
- return fun(a, b, c, d, e, f, g, h); }; }; }; }; }; }; };
- });
-}
-function F9(fun) {
- return F(9, fun, function(a) { return function(b) { return function(c) {
- return function(d) { return function(e) { return function(f) {
- return function(g) { return function(h) { return function(i) {
- return fun(a, b, c, d, e, f, g, h, i); }; }; }; }; }; }; }; };
- });
-}
-
-function A2(fun, a, b) {
- return fun.a === 2 ? fun.f(a, b) : fun(a)(b);
-}
-function A3(fun, a, b, c) {
- return fun.a === 3 ? fun.f(a, b, c) : fun(a)(b)(c);
-}
-function A4(fun, a, b, c, d) {
- return fun.a === 4 ? fun.f(a, b, c, d) : fun(a)(b)(c)(d);
-}
-function A5(fun, a, b, c, d, e) {
- return fun.a === 5 ? fun.f(a, b, c, d, e) : fun(a)(b)(c)(d)(e);
-}
-function A6(fun, a, b, c, d, e, f) {
- return fun.a === 6 ? fun.f(a, b, c, d, e, f) : fun(a)(b)(c)(d)(e)(f);
-}
-function A7(fun, a, b, c, d, e, f, g) {
- return fun.a === 7 ? fun.f(a, b, c, d, e, f, g) : fun(a)(b)(c)(d)(e)(f)(g);
-}
-function A8(fun, a, b, c, d, e, f, g, h) {
- return fun.a === 8 ? fun.f(a, b, c, d, e, f, g, h) : fun(a)(b)(c)(d)(e)(f)(g)(h);
-}
-function A9(fun, a, b, c, d, e, f, g, h, i) {
- return fun.a === 9 ? fun.f(a, b, c, d, e, f, g, h, i) : fun(a)(b)(c)(d)(e)(f)(g)(h)(i);
-}
-
-
-
-
-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 = F2(function(tag, value)
-{
- return value;
-});
-
-var _Debug_log_UNUSED = 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(value)
-{
- return '';
-}
-
-function _Debug_toString_UNUSED(value)
-{
- return _Debug_toAnsiString(false, value);
-}
-
-function _Debug_toAnsiString(ansi, value)
-{
- if (typeof value === 'function')
- {
- return _Debug_internalColor(ansi, '');
- }
-
- if (typeof value === 'boolean')
- {
- return _Debug_ctorColor(ansi, value ? 'True' : 'False');
- }
-
- if (typeof value === 'number')
- {
- return _Debug_numberColor(ansi, value + '');
- }
-
- if (value instanceof String)
- {
- return _Debug_charColor(ansi, "'" + _Debug_addSlashes(value, true) + "'");
- }
-
- if (typeof value === 'string')
- {
- return _Debug_stringColor(ansi, '"' + _Debug_addSlashes(value, false) + '"');
- }
-
- if (typeof value === 'object' && '$' in value)
- {
- var tag = value.$;
-
- if (typeof tag === 'number')
- {
- return _Debug_internalColor(ansi, '');
- }
-
- if (tag[0] === '#')
- {
- var output = [];
- for (var k in value)
- {
- if (k === '$') continue;
- output.push(_Debug_toAnsiString(ansi, value[k]));
- }
- return '(' + output.join(',') + ')';
- }
-
- if (tag === 'Set_elm_builtin')
- {
- return _Debug_ctorColor(ansi, 'Set')
- + _Debug_fadeColor(ansi, '.fromList') + ' '
- + _Debug_toAnsiString(ansi, $elm$core$Set$toList(value));
- }
-
- if (tag === 'RBNode_elm_builtin' || tag === 'RBEmpty_elm_builtin')
- {
- return _Debug_ctorColor(ansi, 'Dict')
- + _Debug_fadeColor(ansi, '.fromList') + ' '
- + _Debug_toAnsiString(ansi, $elm$core$Dict$toList(value));
- }
-
- if (tag === 'Array_elm_builtin')
- {
- return _Debug_ctorColor(ansi, 'Array')
- + _Debug_fadeColor(ansi, '.fromList') + ' '
- + _Debug_toAnsiString(ansi, $elm$core$Array$toList(value));
- }
-
- if (tag === '::' || tag === '[]')
- {
- var output = '[';
-
- value.b && (output += _Debug_toAnsiString(ansi, value.a), value = value.b)
-
- for (; value.b; value = value.b) // WHILE_CONS
- {
- output += ',' + _Debug_toAnsiString(ansi, value.a);
- }
- return output + ']';
- }
-
- var output = '';
- for (var i in value)
- {
- if (i === '$') continue;
- var str = _Debug_toAnsiString(ansi, value[i]);
- var c0 = str[0];
- var parenless = c0 === '{' || c0 === '(' || c0 === '[' || c0 === '<' || c0 === '"' || str.indexOf(' ') < 0;
- output += ' ' + (parenless ? str : '(' + str + ')');
- }
- return _Debug_ctorColor(ansi, tag) + output;
- }
-
- if (typeof DataView === 'function' && value instanceof DataView)
- {
- return _Debug_stringColor(ansi, '<' + value.byteLength + ' bytes>');
- }
-
- if (typeof File !== 'undefined' && value instanceof File)
- {
- return _Debug_internalColor(ansi, '<' + value.name + '>');
- }
-
- if (typeof value === 'object')
- {
- var output = [];
- for (var key in value)
- {
- var field = key[0] === '_' ? key.slice(1) : key;
- output.push(_Debug_fadeColor(ansi, field) + ' = ' + _Debug_toAnsiString(ansi, value[key]));
- }
- if (output.length === 0)
- {
- return '{}';
- }
- return '{ ' + output.join(', ') + ' }';
- }
-
- return _Debug_internalColor(ansi, '');
-}
-
-function _Debug_addSlashes(str, isChar)
-{
- var s = str
- .replace(/\\/g, '\\\\')
- .replace(/\n/g, '\\n')
- .replace(/\t/g, '\\t')
- .replace(/\r/g, '\\r')
- .replace(/\v/g, '\\v')
- .replace(/\0/g, '\\0');
-
- if (isChar)
- {
- return s.replace(/\'/g, '\\\'');
- }
- else
- {
- return s.replace(/\"/g, '\\"');
- }
-}
-
-function _Debug_ctorColor(ansi, string)
-{
- return ansi ? '\x1b[96m' + string + '\x1b[0m' : string;
-}
-
-function _Debug_numberColor(ansi, string)
-{
- return ansi ? '\x1b[95m' + string + '\x1b[0m' : string;
-}
-
-function _Debug_stringColor(ansi, string)
-{
- return ansi ? '\x1b[93m' + string + '\x1b[0m' : string;
-}
-
-function _Debug_charColor(ansi, string)
-{
- return ansi ? '\x1b[92m' + string + '\x1b[0m' : string;
-}
-
-function _Debug_fadeColor(ansi, string)
-{
- return ansi ? '\x1b[37m' + string + '\x1b[0m' : string;
-}
-
-function _Debug_internalColor(ansi, string)
-{
- return ansi ? '\x1b[36m' + string + '\x1b[0m' : string;
-}
-
-function _Debug_toHexDigit(n)
-{
- return String.fromCharCode(n < 10 ? 48 + n : 55 + n);
-}
-
-
-// CRASH
-
-
-function _Debug_crash(identifier)
-{
- throw new Error('https://github.com/elm/core/blob/1.0.0/hints/' + identifier + '.md');
-}
-
-
-function _Debug_crash_UNUSED(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.Z.cy === region.aD.cy)
- {
- return 'on line ' + region.Z.cy;
- }
- return 'on lines ' + region.Z.cy + ' through ' + region.aD.cy;
-}
-
-
-
-// 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;
- }
-
- /**_UNUSED/
- 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);
- }
- //*/
-
- /**/
- 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;
- }
-
- /**_UNUSED/
- if (x instanceof String)
- {
- var a = x.valueOf();
- var b = y.valueOf();
- return a === b ? 0 : a < b ? -1 : 1;
- }
- //*/
-
- /**/
- if (typeof x.$ === 'undefined')
- //*/
- /**_UNUSED/
- 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 = 0;
-var _Utils_Tuple0_UNUSED = { $: '#0' };
-
-function _Utils_Tuple2(a, b) { return { a: a, b: b }; }
-function _Utils_Tuple2_UNUSED(a, b) { return { $: '#2', a: a, b: b }; }
-
-function _Utils_Tuple3(a, b, c) { return { a: a, b: b, c: c }; }
-function _Utils_Tuple3_UNUSED(a, b, c) { return { $: '#3', a: a, b: b, c: c }; }
-
-function _Utils_chr(c) { return c; }
-function _Utils_chr_UNUSED(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 = { $: 0 };
-var _List_Nil_UNUSED = { $: '[]' };
-
-function _List_Cons(hd, tl) { return { $: 1, a: hd, b: tl }; }
-function _List_Cons_UNUSED(hd, tl) { return { $: '::', a: hd, b: tl }; }
-
-
-var _List_cons = F2(_List_Cons);
-
-function _List_fromArray(arr)
-{
- var out = _List_Nil;
- for (var i = arr.length; i--; )
- {
- out = _List_Cons(arr[i], out);
- }
- return out;
-}
-
-function _List_toArray(xs)
-{
- for (var out = []; xs.b; xs = xs.b) // WHILE_CONS
- {
- out.push(xs.a);
- }
- return out;
-}
-
-var _List_map2 = F3(function(f, xs, ys)
-{
- for (var arr = []; xs.b && ys.b; xs = xs.b, ys = ys.b) // WHILE_CONSES
- {
- arr.push(A2(f, xs.a, ys.a));
- }
- return _List_fromArray(arr);
-});
-
-var _List_map3 = F4(function(f, xs, ys, zs)
-{
- for (var arr = []; xs.b && ys.b && zs.b; xs = xs.b, ys = ys.b, zs = zs.b) // WHILE_CONSES
- {
- arr.push(A3(f, xs.a, ys.a, zs.a));
- }
- return _List_fromArray(arr);
-});
-
-var _List_map4 = F5(function(f, ws, xs, ys, zs)
-{
- for (var arr = []; ws.b && xs.b && ys.b && zs.b; ws = ws.b, xs = xs.b, ys = ys.b, zs = zs.b) // WHILE_CONSES
- {
- arr.push(A4(f, ws.a, xs.a, ys.a, zs.a));
- }
- return _List_fromArray(arr);
-});
-
-var _List_map5 = F6(function(f, vs, ws, xs, ys, zs)
-{
- for (var arr = []; vs.b && ws.b && xs.b && ys.b && zs.b; vs = vs.b, ws = ws.b, xs = xs.b, ys = ys.b, zs = zs.b) // WHILE_CONSES
- {
- arr.push(A5(f, vs.a, ws.a, xs.a, ys.a, zs.a));
- }
- return _List_fromArray(arr);
-});
-
-var _List_sortBy = F2(function(f, xs)
-{
- return _List_fromArray(_List_toArray(xs).sort(function(a, b) {
- return _Utils_cmp(f(a), f(b));
- }));
-});
-
-var _List_sortWith = F2(function(f, xs)
-{
- return _List_fromArray(_List_toArray(xs).sort(function(a, b) {
- var ord = A2(f, a, b);
- return ord === $elm$core$Basics$EQ ? 0 : ord === $elm$core$Basics$LT ? -1 : 1;
- }));
-});
-
-
-
-// MATH
-
-var _Basics_add = F2(function(a, b) { return a + b; });
-var _Basics_sub = F2(function(a, b) { return a - b; });
-var _Basics_mul = F2(function(a, b) { return a * b; });
-var _Basics_fdiv = F2(function(a, b) { return a / b; });
-var _Basics_idiv = F2(function(a, b) { return (a / b) | 0; });
-var _Basics_pow = F2(Math.pow);
-
-var _Basics_remainderBy = F2(function(b, a) { return a % b; });
-
-// https://www.microsoft.com/en-us/research/wp-content/uploads/2016/02/divmodnote-letter.pdf
-var _Basics_modBy = F2(function(modulus, x)
-{
- var answer = x % modulus;
- return modulus === 0
- ? _Debug_crash(11)
- :
- ((answer > 0 && modulus < 0) || (answer < 0 && modulus > 0))
- ? answer + modulus
- : answer;
-});
-
-
-// TRIGONOMETRY
-
-var _Basics_pi = Math.PI;
-var _Basics_e = Math.E;
-var _Basics_cos = Math.cos;
-var _Basics_sin = Math.sin;
-var _Basics_tan = Math.tan;
-var _Basics_acos = Math.acos;
-var _Basics_asin = Math.asin;
-var _Basics_atan = Math.atan;
-var _Basics_atan2 = F2(Math.atan2);
-
-
-// MORE MATH
-
-function _Basics_toFloat(x) { return x; }
-function _Basics_truncate(n) { return n | 0; }
-function _Basics_isInfinite(n) { return n === Infinity || n === -Infinity; }
-
-var _Basics_ceiling = Math.ceil;
-var _Basics_floor = Math.floor;
-var _Basics_round = Math.round;
-var _Basics_sqrt = Math.sqrt;
-var _Basics_log = Math.log;
-var _Basics_isNaN = isNaN;
-
-
-// BOOLEANS
-
-function _Basics_not(bool) { return !bool; }
-var _Basics_and = F2(function(a, b) { return a && b; });
-var _Basics_or = F2(function(a, b) { return a || b; });
-var _Basics_xor = F2(function(a, b) { return a !== b; });
-
-
-
-var _String_cons = F2(function(chr, str)
-{
- return chr + str;
-});
-
-function _String_uncons(string)
-{
- var word = string.charCodeAt(0);
- return !isNaN(word)
- ? $elm$core$Maybe$Just(
- 0xD800 <= word && word <= 0xDBFF
- ? _Utils_Tuple2(_Utils_chr(string[0] + string[1]), string.slice(2))
- : _Utils_Tuple2(_Utils_chr(string[0]), string.slice(1))
- )
- : $elm$core$Maybe$Nothing;
-}
-
-var _String_append = F2(function(a, b)
-{
- return a + b;
-});
-
-function _String_length(str)
-{
- return str.length;
-}
-
-var _String_map = F2(function(func, string)
-{
- var len = string.length;
- var array = new Array(len);
- var i = 0;
- while (i < len)
- {
- var word = string.charCodeAt(i);
- if (0xD800 <= word && word <= 0xDBFF)
- {
- array[i] = func(_Utils_chr(string[i] + string[i+1]));
- i += 2;
- continue;
- }
- array[i] = func(_Utils_chr(string[i]));
- i++;
- }
- return array.join('');
-});
-
-var _String_filter = F2(function(isGood, str)
-{
- var arr = [];
- var len = str.length;
- var i = 0;
- while (i < len)
- {
- var char = str[i];
- var word = str.charCodeAt(i);
- i++;
- if (0xD800 <= word && word <= 0xDBFF)
- {
- char += str[i];
- i++;
- }
-
- if (isGood(_Utils_chr(char)))
- {
- arr.push(char);
- }
- }
- return arr.join('');
-});
-
-function _String_reverse(str)
-{
- var len = str.length;
- var arr = new Array(len);
- var i = 0;
- while (i < len)
- {
- var word = str.charCodeAt(i);
- if (0xD800 <= word && word <= 0xDBFF)
- {
- arr[len - i] = str[i + 1];
- i++;
- arr[len - i] = str[i - 1];
- i++;
- }
- else
- {
- arr[len - i] = str[i];
- i++;
- }
- }
- return arr.join('');
-}
-
-var _String_foldl = F3(function(func, state, string)
-{
- var len = string.length;
- var i = 0;
- while (i < len)
- {
- var char = string[i];
- var word = string.charCodeAt(i);
- i++;
- if (0xD800 <= word && word <= 0xDBFF)
- {
- char += string[i];
- i++;
- }
- state = A2(func, _Utils_chr(char), state);
- }
- return state;
-});
-
-var _String_foldr = F3(function(func, state, string)
-{
- var i = string.length;
- while (i--)
- {
- var char = string[i];
- var word = string.charCodeAt(i);
- if (0xDC00 <= word && word <= 0xDFFF)
- {
- i--;
- char = string[i] + char;
- }
- state = A2(func, _Utils_chr(char), state);
- }
- return state;
-});
-
-var _String_split = F2(function(sep, str)
-{
- return str.split(sep);
-});
-
-var _String_join = F2(function(sep, strs)
-{
- return strs.join(sep);
-});
-
-var _String_slice = F3(function(start, end, str) {
- return str.slice(start, end);
-});
-
-function _String_trim(str)
-{
- return str.trim();
-}
-
-function _String_trimLeft(str)
-{
- return str.replace(/^\s+/, '');
-}
-
-function _String_trimRight(str)
-{
- return str.replace(/\s+$/, '');
-}
-
-function _String_words(str)
-{
- return _List_fromArray(str.trim().split(/\s+/g));
-}
-
-function _String_lines(str)
-{
- return _List_fromArray(str.split(/\r\n|\r|\n/g));
-}
-
-function _String_toUpper(str)
-{
- return str.toUpperCase();
-}
-
-function _String_toLower(str)
-{
- return str.toLowerCase();
-}
-
-var _String_any = F2(function(isGood, string)
-{
- var i = string.length;
- while (i--)
- {
- var char = string[i];
- var word = string.charCodeAt(i);
- if (0xDC00 <= word && word <= 0xDFFF)
- {
- i--;
- char = string[i] + char;
- }
- if (isGood(_Utils_chr(char)))
- {
- return true;
- }
- }
- return false;
-});
-
-var _String_all = F2(function(isGood, string)
-{
- var i = string.length;
- while (i--)
- {
- var char = string[i];
- var word = string.charCodeAt(i);
- if (0xDC00 <= word && word <= 0xDFFF)
- {
- i--;
- char = string[i] + char;
- }
- if (!isGood(_Utils_chr(char)))
- {
- return false;
- }
- }
- return true;
-});
-
-var _String_contains = F2(function(sub, str)
-{
- return str.indexOf(sub) > -1;
-});
-
-var _String_startsWith = F2(function(sub, str)
-{
- return str.indexOf(sub) === 0;
-});
-
-var _String_endsWith = F2(function(sub, str)
-{
- return str.length >= sub.length &&
- str.lastIndexOf(sub) === str.length - sub.length;
-});
-
-var _String_indexes = F2(function(sub, str)
-{
- var subLen = sub.length;
-
- if (subLen < 1)
- {
- return _List_Nil;
- }
-
- var i = 0;
- var is = [];
-
- while ((i = str.indexOf(sub, i)) > -1)
- {
- is.push(i);
- i = i + subLen;
- }
-
- return _List_fromArray(is);
-});
-
-
-// TO STRING
-
-function _String_fromNumber(number)
-{
- return number + '';
-}
-
-
-// INT CONVERSIONS
-
-function _String_toInt(str)
-{
- var total = 0;
- var code0 = str.charCodeAt(0);
- var start = code0 == 0x2B /* + */ || code0 == 0x2D /* - */ ? 1 : 0;
-
- for (var i = start; i < str.length; ++i)
- {
- var code = str.charCodeAt(i);
- if (code < 0x30 || 0x39 < code)
- {
- return $elm$core$Maybe$Nothing;
- }
- total = 10 * total + code - 0x30;
- }
-
- return i == start
- ? $elm$core$Maybe$Nothing
- : $elm$core$Maybe$Just(code0 == 0x2D ? -total : total);
-}
-
-
-// FLOAT CONVERSIONS
-
-function _String_toFloat(s)
-{
- // check if it is a hex, octal, or binary number
- if (s.length === 0 || /[\sxbo]/.test(s))
- {
- return $elm$core$Maybe$Nothing;
- }
- var n = +s;
- // faster isNaN check
- return n === n ? $elm$core$Maybe$Just(n) : $elm$core$Maybe$Nothing;
-}
-
-function _String_fromList(chars)
-{
- return _List_toArray(chars).join('');
-}
-
-
-
-
-function _Char_toCode(char)
-{
- var code = char.charCodeAt(0);
- if (0xD800 <= code && code <= 0xDBFF)
- {
- return (code - 0xD800) * 0x400 + char.charCodeAt(1) - 0xDC00 + 0x10000
- }
- return code;
-}
-
-function _Char_fromCode(code)
-{
- return _Utils_chr(
- (code < 0 || 0x10FFFF < code)
- ? '\uFFFD'
- :
- (code <= 0xFFFF)
- ? String.fromCharCode(code)
- :
- (code -= 0x10000,
- String.fromCharCode(Math.floor(code / 0x400) + 0xD800, code % 0x400 + 0xDC00)
- )
- );
-}
-
-function _Char_toUpper(char)
-{
- return _Utils_chr(char.toUpperCase());
-}
-
-function _Char_toLower(char)
-{
- return _Utils_chr(char.toLowerCase());
-}
-
-function _Char_toLocaleUpper(char)
-{
- return _Utils_chr(char.toLocaleUpperCase());
-}
-
-function _Char_toLocaleLower(char)
-{
- return _Utils_chr(char.toLocaleLowerCase());
-}
-
-
-
-/**_UNUSED/
-function _Json_errorToString(error)
-{
- return $elm$json$Json$Decode$errorToString(error);
-}
-//*/
-
-
-// CORE DECODERS
-
-function _Json_succeed(msg)
-{
- return {
- $: 0,
- a: msg
- };
-}
-
-function _Json_fail(msg)
-{
- return {
- $: 1,
- a: msg
- };
-}
-
-function _Json_decodePrim(decoder)
-{
- return { $: 2, b: decoder };
-}
-
-var _Json_decodeInt = _Json_decodePrim(function(value) {
- return (typeof value !== 'number')
- ? _Json_expecting('an INT', value)
- :
- (-2147483647 < value && value < 2147483647 && (value | 0) === value)
- ? $elm$core$Result$Ok(value)
- :
- (isFinite(value) && !(value % 1))
- ? $elm$core$Result$Ok(value)
- : _Json_expecting('an INT', value);
-});
-
-var _Json_decodeBool = _Json_decodePrim(function(value) {
- return (typeof value === 'boolean')
- ? $elm$core$Result$Ok(value)
- : _Json_expecting('a BOOL', value);
-});
-
-var _Json_decodeFloat = _Json_decodePrim(function(value) {
- return (typeof value === 'number')
- ? $elm$core$Result$Ok(value)
- : _Json_expecting('a FLOAT', value);
-});
-
-var _Json_decodeValue = _Json_decodePrim(function(value) {
- return $elm$core$Result$Ok(_Json_wrap(value));
-});
-
-var _Json_decodeString = _Json_decodePrim(function(value) {
- return (typeof value === 'string')
- ? $elm$core$Result$Ok(value)
- : (value instanceof String)
- ? $elm$core$Result$Ok(value + '')
- : _Json_expecting('a STRING', value);
-});
-
-function _Json_decodeList(decoder) { return { $: 3, b: decoder }; }
-function _Json_decodeArray(decoder) { return { $: 4, b: decoder }; }
-
-function _Json_decodeNull(value) { return { $: 5, c: value }; }
-
-var _Json_decodeField = F2(function(field, decoder)
-{
- return {
- $: 6,
- d: field,
- b: decoder
- };
-});
-
-var _Json_decodeIndex = F2(function(index, decoder)
-{
- return {
- $: 7,
- e: index,
- b: decoder
- };
-});
-
-function _Json_decodeKeyValuePairs(decoder)
-{
- return {
- $: 8,
- b: decoder
- };
-}
-
-function _Json_mapMany(f, decoders)
-{
- return {
- $: 9,
- f: f,
- g: decoders
- };
-}
-
-var _Json_andThen = F2(function(callback, decoder)
-{
- return {
- $: 10,
- b: decoder,
- h: callback
- };
-});
-
-function _Json_oneOf(decoders)
-{
- return {
- $: 11,
- g: decoders
- };
-}
-
-
-// DECODING OBJECTS
-
-var _Json_map1 = F2(function(f, d1)
-{
- return _Json_mapMany(f, [d1]);
-});
-
-var _Json_map2 = F3(function(f, d1, d2)
-{
- return _Json_mapMany(f, [d1, d2]);
-});
-
-var _Json_map3 = F4(function(f, d1, d2, d3)
-{
- return _Json_mapMany(f, [d1, d2, d3]);
-});
-
-var _Json_map4 = F5(function(f, d1, d2, d3, d4)
-{
- return _Json_mapMany(f, [d1, d2, d3, d4]);
-});
-
-var _Json_map5 = F6(function(f, d1, d2, d3, d4, d5)
-{
- return _Json_mapMany(f, [d1, d2, d3, d4, d5]);
-});
-
-var _Json_map6 = F7(function(f, d1, d2, d3, d4, d5, d6)
-{
- return _Json_mapMany(f, [d1, d2, d3, d4, d5, d6]);
-});
-
-var _Json_map7 = F8(function(f, d1, d2, d3, d4, d5, d6, d7)
-{
- return _Json_mapMany(f, [d1, d2, d3, d4, d5, d6, d7]);
-});
-
-var _Json_map8 = F9(function(f, d1, d2, d3, d4, d5, d6, d7, d8)
-{
- return _Json_mapMany(f, [d1, d2, d3, d4, d5, d6, d7, d8]);
-});
-
-
-// DECODE
-
-var _Json_runOnString = F2(function(decoder, string)
-{
- try
- {
- var value = JSON.parse(string);
- return _Json_runHelp(decoder, value);
- }
- catch (e)
- {
- return $elm$core$Result$Err(A2($elm$json$Json$Decode$Failure, 'This is not valid JSON! ' + e.message, _Json_wrap(string)));
- }
-});
-
-var _Json_run = F2(function(decoder, value)
-{
- return _Json_runHelp(decoder, _Json_unwrap(value));
-});
-
-function _Json_runHelp(decoder, value)
-{
- switch (decoder.$)
- {
- case 2:
- return decoder.b(value);
-
- case 5:
- return (value === null)
- ? $elm$core$Result$Ok(decoder.c)
- : _Json_expecting('null', value);
-
- case 3:
- if (!_Json_isArray(value))
- {
- return _Json_expecting('a LIST', value);
- }
- return _Json_runArrayDecoder(decoder.b, value, _List_fromArray);
-
- case 4:
- if (!_Json_isArray(value))
- {
- return _Json_expecting('an ARRAY', value);
- }
- return _Json_runArrayDecoder(decoder.b, value, _Json_toElmArray);
-
- case 6:
- var field = decoder.d;
- if (typeof value !== 'object' || value === null || !(field in value))
- {
- return _Json_expecting('an OBJECT with a field named `' + field + '`', value);
- }
- var result = _Json_runHelp(decoder.b, value[field]);
- return ($elm$core$Result$isOk(result)) ? result : $elm$core$Result$Err(A2($elm$json$Json$Decode$Field, field, result.a));
-
- case 7:
- var index = decoder.e;
- if (!_Json_isArray(value))
- {
- return _Json_expecting('an ARRAY', value);
- }
- if (index >= value.length)
- {
- return _Json_expecting('a LONGER array. Need index ' + index + ' but only see ' + value.length + ' entries', value);
- }
- var result = _Json_runHelp(decoder.b, value[index]);
- return ($elm$core$Result$isOk(result)) ? result : $elm$core$Result$Err(A2($elm$json$Json$Decode$Index, index, result.a));
-
- case 8:
- if (typeof value !== 'object' || value === null || _Json_isArray(value))
- {
- return _Json_expecting('an OBJECT', value);
- }
-
- var keyValuePairs = _List_Nil;
- // TODO test perf of Object.keys and switch when support is good enough
- for (var key in value)
- {
- if (value.hasOwnProperty(key))
- {
- var result = _Json_runHelp(decoder.b, value[key]);
- if (!$elm$core$Result$isOk(result))
- {
- return $elm$core$Result$Err(A2($elm$json$Json$Decode$Field, key, result.a));
- }
- keyValuePairs = _List_Cons(_Utils_Tuple2(key, result.a), keyValuePairs);
- }
- }
- return $elm$core$Result$Ok($elm$core$List$reverse(keyValuePairs));
-
- case 9:
- var answer = decoder.f;
- var decoders = decoder.g;
- for (var i = 0; i < decoders.length; i++)
- {
- var result = _Json_runHelp(decoders[i], value);
- if (!$elm$core$Result$isOk(result))
- {
- return result;
- }
- answer = answer(result.a);
- }
- return $elm$core$Result$Ok(answer);
-
- case 10:
- var result = _Json_runHelp(decoder.b, value);
- return (!$elm$core$Result$isOk(result))
- ? result
- : _Json_runHelp(decoder.h(result.a), value);
-
- case 11:
- var errors = _List_Nil;
- for (var temp = decoder.g; temp.b; temp = temp.b) // WHILE_CONS
- {
- var result = _Json_runHelp(temp.a, value);
- if ($elm$core$Result$isOk(result))
- {
- return result;
- }
- errors = _List_Cons(result.a, errors);
- }
- return $elm$core$Result$Err($elm$json$Json$Decode$OneOf($elm$core$List$reverse(errors)));
-
- case 1:
- return $elm$core$Result$Err(A2($elm$json$Json$Decode$Failure, decoder.a, _Json_wrap(value)));
-
- case 0:
- return $elm$core$Result$Ok(decoder.a);
- }
-}
-
-function _Json_runArrayDecoder(decoder, value, toElmValue)
-{
- var len = value.length;
- var array = new Array(len);
- for (var i = 0; i < len; i++)
- {
- var result = _Json_runHelp(decoder, value[i]);
- if (!$elm$core$Result$isOk(result))
- {
- return $elm$core$Result$Err(A2($elm$json$Json$Decode$Index, i, result.a));
- }
- array[i] = result.a;
- }
- return $elm$core$Result$Ok(toElmValue(array));
-}
-
-function _Json_isArray(value)
-{
- return Array.isArray(value) || (typeof FileList !== 'undefined' && value instanceof FileList);
-}
-
-function _Json_toElmArray(array)
-{
- return A2($elm$core$Array$initialize, array.length, function(i) { return array[i]; });
-}
-
-function _Json_expecting(type, value)
-{
- return $elm$core$Result$Err(A2($elm$json$Json$Decode$Failure, 'Expecting ' + type, _Json_wrap(value)));
-}
-
-
-// EQUALITY
-
-function _Json_equality(x, y)
-{
- if (x === y)
- {
- return true;
- }
-
- if (x.$ !== y.$)
- {
- return false;
- }
-
- switch (x.$)
- {
- case 0:
- case 1:
- return x.a === y.a;
-
- case 2:
- return x.b === y.b;
-
- case 5:
- return x.c === y.c;
-
- case 3:
- case 4:
- case 8:
- return _Json_equality(x.b, y.b);
-
- case 6:
- return x.d === y.d && _Json_equality(x.b, y.b);
-
- case 7:
- return x.e === y.e && _Json_equality(x.b, y.b);
-
- case 9:
- return x.f === y.f && _Json_listEquality(x.g, y.g);
-
- case 10:
- return x.h === y.h && _Json_equality(x.b, y.b);
-
- case 11:
- return _Json_listEquality(x.g, y.g);
- }
-}
-
-function _Json_listEquality(aDecoders, bDecoders)
-{
- var len = aDecoders.length;
- if (len !== bDecoders.length)
- {
- return false;
- }
- for (var i = 0; i < len; i++)
- {
- if (!_Json_equality(aDecoders[i], bDecoders[i]))
- {
- return false;
- }
- }
- return true;
-}
-
-
-// ENCODE
-
-var _Json_encode = F2(function(indentLevel, value)
-{
- return JSON.stringify(_Json_unwrap(value), null, indentLevel) + '';
-});
-
-function _Json_wrap_UNUSED(value) { return { $: 0, a: value }; }
-function _Json_unwrap_UNUSED(value) { return value.a; }
-
-function _Json_wrap(value) { return value; }
-function _Json_unwrap(value) { return value; }
-
-function _Json_emptyArray() { return []; }
-function _Json_emptyObject() { return {}; }
-
-var _Json_addField = F3(function(key, value, object)
-{
- object[key] = _Json_unwrap(value);
- return object;
-});
-
-function _Json_addEntry(func)
-{
- return F2(function(entry, array)
- {
- array.push(_Json_unwrap(func(entry)));
- return array;
- });
-}
-
-var _Json_encodeNull = _Json_wrap(null);
-
-
-
-// TASKS
-
-function _Scheduler_succeed(value)
-{
- return {
- $: 0,
- a: value
- };
-}
-
-function _Scheduler_fail(error)
-{
- return {
- $: 1,
- a: error
- };
-}
-
-function _Scheduler_binding(callback)
-{
- return {
- $: 2,
- b: callback,
- c: null
- };
-}
-
-var _Scheduler_andThen = F2(function(callback, task)
-{
- return {
- $: 3,
- b: callback,
- d: task
- };
-});
-
-var _Scheduler_onError = F2(function(callback, task)
-{
- return {
- $: 4,
- b: callback,
- d: task
- };
-});
-
-function _Scheduler_receive(callback)
-{
- return {
- $: 5,
- b: callback
- };
-}
-
-
-// PROCESSES
-
-var _Scheduler_guid = 0;
-
-function _Scheduler_rawSpawn(task)
-{
- var proc = {
- $: 0,
- e: _Scheduler_guid++,
- f: task,
- g: null,
- h: []
- };
-
- _Scheduler_enqueue(proc);
-
- return proc;
-}
-
-function _Scheduler_spawn(task)
-{
- return _Scheduler_binding(function(callback) {
- callback(_Scheduler_succeed(_Scheduler_rawSpawn(task)));
- });
-}
-
-function _Scheduler_rawSend(proc, msg)
-{
- proc.h.push(msg);
- _Scheduler_enqueue(proc);
-}
-
-var _Scheduler_send = F2(function(proc, msg)
-{
- return _Scheduler_binding(function(callback) {
- _Scheduler_rawSend(proc, msg);
- callback(_Scheduler_succeed(_Utils_Tuple0));
- });
-});
-
-function _Scheduler_kill(proc)
-{
- return _Scheduler_binding(function(callback) {
- var task = proc.f;
- if (task.$ === 2 && task.c)
- {
- task.c();
- }
-
- proc.f = null;
-
- callback(_Scheduler_succeed(_Utils_Tuple0));
- });
-}
-
-
-/* STEP PROCESSES
-
-type alias Process =
- { $ : tag
- , id : unique_id
- , root : Task
- , stack : null | { $: SUCCEED | FAIL, a: callback, b: stack }
- , mailbox : [msg]
- }
-
-*/
-
-
-var _Scheduler_working = false;
-var _Scheduler_queue = [];
-
-
-function _Scheduler_enqueue(proc)
-{
- _Scheduler_queue.push(proc);
- if (_Scheduler_working)
- {
- return;
- }
- _Scheduler_working = true;
- while (proc = _Scheduler_queue.shift())
- {
- _Scheduler_step(proc);
- }
- _Scheduler_working = false;
-}
-
-
-function _Scheduler_step(proc)
-{
- while (proc.f)
- {
- var rootTag = proc.f.$;
- if (rootTag === 0 || rootTag === 1)
- {
- while (proc.g && proc.g.$ !== rootTag)
- {
- proc.g = proc.g.i;
- }
- if (!proc.g)
- {
- return;
- }
- proc.f = proc.g.b(proc.f.a);
- proc.g = proc.g.i;
- }
- else if (rootTag === 2)
- {
- proc.f.c = proc.f.b(function(newRoot) {
- proc.f = newRoot;
- _Scheduler_enqueue(proc);
- });
- return;
- }
- else if (rootTag === 5)
- {
- if (proc.h.length === 0)
- {
- return;
- }
- proc.f = proc.f.b(proc.h.shift());
- }
- else // if (rootTag === 3 || rootTag === 4)
- {
- proc.g = {
- $: rootTag === 3 ? 0 : 1,
- b: proc.f.b,
- i: proc.g
- };
- proc.f = proc.f.d;
- }
- }
-}
-
-
-
-function _Process_sleep(time)
-{
- return _Scheduler_binding(function(callback) {
- var id = setTimeout(function() {
- callback(_Scheduler_succeed(_Utils_Tuple0));
- }, time);
-
- return function() { clearTimeout(id); };
- });
-}
-
-
-
-
-// PROGRAMS
-
-
-var _Platform_worker = F4(function(impl, flagDecoder, debugMetadata, args)
-{
- return _Platform_initialize(
- flagDecoder,
- args,
- impl.el,
- impl.fw,
- impl.fc,
- 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 /**_UNUSED/, _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(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_UNUSED(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
-
- /**/
- var node = args['node'];
- //*/
- /**_UNUSED/
- var node = args && args['node'] ? args['node'] : _Debug_crash(0);
- //*/
-
- node.parentNode.replaceChild(
- _VirtualDom_render(virtualNode, function() {}),
- node
- );
-
- return {};
-});
-
-
-
-// TEXT
-
-
-function _VirtualDom_text(string)
-{
- return {
- $: 0,
- a: string
- };
-}
-
-
-
-// NODE
-
-
-var _VirtualDom_nodeNS = F2(function(namespace, tag)
-{
- return F2(function(factList, kidList)
- {
- for (var kids = [], descendantsCount = 0; kidList.b; kidList = kidList.b) // WHILE_CONS
- {
- var kid = kidList.a;
- descendantsCount += (kid.b || 0);
- kids.push(kid);
- }
- descendantsCount += kids.length;
-
- return {
- $: 1,
- c: tag,
- d: _VirtualDom_organizeFacts(factList),
- e: kids,
- f: namespace,
- b: descendantsCount
- };
- });
-});
-
-
-var _VirtualDom_node = _VirtualDom_nodeNS(undefined);
-
-
-
-// KEYED NODE
-
-
-var _VirtualDom_keyedNodeNS = F2(function(namespace, tag)
-{
- return F2(function(factList, kidList)
- {
- for (var kids = [], descendantsCount = 0; kidList.b; kidList = kidList.b) // WHILE_CONS
- {
- var kid = kidList.a;
- descendantsCount += (kid.b.b || 0);
- kids.push(kid);
- }
- descendantsCount += kids.length;
-
- return {
- $: 2,
- c: tag,
- d: _VirtualDom_organizeFacts(factList),
- e: kids,
- f: namespace,
- b: descendantsCount
- };
- });
-});
-
-
-var _VirtualDom_keyedNode = _VirtualDom_keyedNodeNS(undefined);
-
-
-
-// CUSTOM
-
-
-function _VirtualDom_custom(factList, model, render, diff)
-{
- return {
- $: 3,
- d: _VirtualDom_organizeFacts(factList),
- g: model,
- h: render,
- i: diff
- };
-}
-
-
-
-// MAP
-
-
-var _VirtualDom_map = F2(function(tagger, node)
-{
- return {
- $: 4,
- j: tagger,
- k: node,
- b: 1 + (node.b || 0)
- };
-});
-
-
-
-// LAZY
-
-
-function _VirtualDom_thunk(refs, thunk)
-{
- return {
- $: 5,
- l: refs,
- m: thunk,
- k: undefined
- };
-}
-
-var _VirtualDom_lazy = F2(function(func, a)
-{
- return _VirtualDom_thunk([func, a], function() {
- return func(a);
- });
-});
-
-var _VirtualDom_lazy2 = F3(function(func, a, b)
-{
- return _VirtualDom_thunk([func, a, b], function() {
- return A2(func, a, b);
- });
-});
-
-var _VirtualDom_lazy3 = F4(function(func, a, b, c)
-{
- return _VirtualDom_thunk([func, a, b, c], function() {
- return A3(func, a, b, c);
- });
-});
-
-var _VirtualDom_lazy4 = F5(function(func, a, b, c, d)
-{
- return _VirtualDom_thunk([func, a, b, c, d], function() {
- return A4(func, a, b, c, d);
- });
-});
-
-var _VirtualDom_lazy5 = F6(function(func, a, b, c, d, e)
-{
- return _VirtualDom_thunk([func, a, b, c, d, e], function() {
- return A5(func, a, b, c, d, e);
- });
-});
-
-var _VirtualDom_lazy6 = F7(function(func, a, b, c, d, e, f)
-{
- return _VirtualDom_thunk([func, a, b, c, d, e, f], function() {
- return A6(func, a, b, c, d, e, f);
- });
-});
-
-var _VirtualDom_lazy7 = F8(function(func, a, b, c, d, e, f, g)
-{
- return _VirtualDom_thunk([func, a, b, c, d, e, f, g], function() {
- return A7(func, a, b, c, d, e, f, g);
- });
-});
-
-var _VirtualDom_lazy8 = F9(function(func, a, b, c, d, e, f, g, h)
-{
- return _VirtualDom_thunk([func, a, b, c, d, e, f, g, h], function() {
- return A8(func, a, b, c, d, e, f, g, h);
- });
-});
-
-
-
-// FACTS
-
-
-var _VirtualDom_on = F2(function(key, handler)
-{
- return {
- $: 'a0',
- n: key,
- o: handler
- };
-});
-var _VirtualDom_style = F2(function(key, value)
-{
- return {
- $: 'a1',
- n: key,
- o: value
- };
-});
-var _VirtualDom_property = F2(function(key, value)
-{
- return {
- $: 'a2',
- n: key,
- o: value
- };
-});
-var _VirtualDom_attribute = F2(function(key, value)
-{
- return {
- $: 'a3',
- n: key,
- o: value
- };
-});
-var _VirtualDom_attributeNS = F3(function(namespace, key, value)
-{
- return {
- $: 'a4',
- n: key,
- o: { f: namespace, o: value }
- };
-});
-
-
-
-// XSS ATTACK VECTOR CHECKS
-
-
-function _VirtualDom_noScript(tag)
-{
- return tag == 'script' ? 'p' : tag;
-}
-
-function _VirtualDom_noOnOrFormAction(key)
-{
- return /^(on|formAction$)/i.test(key) ? 'data-' + key : key;
-}
-
-function _VirtualDom_noInnerHtmlOrFormAction(key)
-{
- return key == 'innerHTML' || key == 'formAction' ? 'data-' + key : key;
-}
-
-function _VirtualDom_noJavaScriptUri(value)
-{
- return /^javascript:/i.test(value.replace(/\s/g,'')) ? '' : value;
-}
-
-function _VirtualDom_noJavaScriptUri_UNUSED(value)
-{
- return /^javascript:/i.test(value.replace(/\s/g,''))
- ? 'javascript:alert("This is an XSS vector. Please use ports or web components instead.")'
- : value;
-}
-
-function _VirtualDom_noJavaScriptOrHtmlUri(value)
-{
- return /^\s*(javascript:|data:text\/html)/i.test(value) ? '' : value;
-}
-
-function _VirtualDom_noJavaScriptOrHtmlUri_UNUSED(value)
-{
- return /^\s*(javascript:|data:text\/html)/i.test(value)
- ? 'javascript:alert("This is an XSS vector. Please use ports or web components instead.")'
- : value;
-}
-
-
-
-// MAP FACTS
-
-
-var _VirtualDom_mapAttribute = F2(function(func, attr)
-{
- return (attr.$ === 'a0')
- ? A2(_VirtualDom_on, attr.n, _VirtualDom_mapHandler(func, attr.o))
- : attr;
-});
-
-function _VirtualDom_mapHandler(func, handler)
-{
- var tag = $elm$virtual_dom$VirtualDom$toHandlerInt(handler);
-
- // 0 = Normal
- // 1 = MayStopPropagation
- // 2 = MayPreventDefault
- // 3 = Custom
-
- return {
- $: handler.$,
- a:
- !tag
- ? A2($elm$json$Json$Decode$map, func, handler.a)
- :
- A3($elm$json$Json$Decode$map2,
- tag < 3
- ? _VirtualDom_mapEventTuple
- : _VirtualDom_mapEventRecord,
- $elm$json$Json$Decode$succeed(func),
- handler.a
- )
- };
-}
-
-var _VirtualDom_mapEventTuple = F2(function(func, tuple)
-{
- return _Utils_Tuple2(func(tuple.a), tuple.b);
-});
-
-var _VirtualDom_mapEventRecord = F2(function(func, record)
-{
- return {
- K: func(record.K),
- bX: record.bX,
- bT: record.bT
- }
-});
-
-
-
-// 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.K;
- var stopPropagation = tag == 1 ? value.b : tag == 3 && value.bX;
- var currentEventNode = (
- stopPropagation && event.stopPropagation(),
- (tag == 2 ? value.b : tag == 3 && value.bT) && 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.el,
- impl.fw,
- impl.fc,
- function(sendToApp, initialModel) {
- var view = impl.da;
- /**/
- var domNode = args['node'];
- //*/
- /**_UNUSED/
- 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.el,
- impl.fw,
- impl.fc,
- function(sendToApp, initialModel) {
- var divertHrefToApp = impl.bV && impl.bV(sendToApp)
- var view = impl.da;
- 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.b5);
- var patches = _VirtualDom_diff(currNode, nextNode);
- bodyNode = _VirtualDom_applyPatches(bodyNode, currNode, patches, sendToApp);
- currNode = nextNode;
- _VirtualDom_divertHrefToApp = 0;
- (title !== doc.c5) && (_VirtualDom_doc.title = title = doc.c5);
- });
- }
- );
-});
-
-
-
-// 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.eG;
- var onUrlRequest = impl.eH;
- var key = function() { key.a(onUrlChange(_Browser_getUrl())); };
-key['elm-hot-nav-key'] = true
-
- return _Browser_document({
- bV: 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.cR === next.cR
- && curr.co === next.co
- && curr.cN.a === next.cN.a
- )
- ? $elm$browser$Browser$Internal(next)
- : $elm$browser$Browser$External(href)
- ));
- }
- });
- },
- el: function(flags)
- {
- return A3(impl.el, flags, _Browser_getUrl(), key);
- },
- da: impl.da,
- fw: impl.fw,
- fc: impl.fc
- });
-}
-
-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')
- ? { ee: 'hidden', dP: 'visibilitychange' }
- :
- (typeof _VirtualDom_doc.mozHidden !== 'undefined')
- ? { ee: 'mozHidden', dP: 'mozvisibilitychange' }
- :
- (typeof _VirtualDom_doc.msHidden !== 'undefined')
- ? { ee: 'msHidden', dP: 'msvisibilitychange' }
- :
- (typeof _VirtualDom_doc.webkitHidden !== 'undefined')
- ? { ee: 'webkitHidden', dP: 'webkitvisibilitychange' }
- : { ee: 'hidden', dP: '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 {
- c_: _Browser_getScene(),
- db: {
- df: _Browser_window.pageXOffset,
- dg: _Browser_window.pageYOffset,
- dc: _Browser_doc.documentElement.clientWidth,
- cl: _Browser_doc.documentElement.clientHeight
- }
- };
-}
-
-function _Browser_getScene()
-{
- var body = _Browser_doc.body;
- var elem = _Browser_doc.documentElement;
- return {
- dc: Math.max(body.scrollWidth, body.offsetWidth, elem.scrollWidth, elem.offsetWidth, elem.clientWidth),
- cl: 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 {
- c_: {
- dc: node.scrollWidth,
- cl: node.scrollHeight
- },
- db: {
- df: node.scrollLeft,
- dg: node.scrollTop,
- dc: node.clientWidth,
- cl: 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 {
- c_: _Browser_getScene(),
- db: {
- df: x,
- dg: y,
- dc: _Browser_doc.documentElement.clientWidth,
- cl: _Browser_doc.documentElement.clientHeight
- },
- d2: {
- df: x + rect.left,
- dg: y + rect.top,
- dc: rect.width,
- cl: 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);
- }
- }));
-}
-
-
-
-
-// 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);
-});
-
-
-
-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;
-});
-
-
-
-// DECODER
-
-var _File_decoder = _Json_decodePrim(function(value) {
- // NOTE: checks if `File` exists in case this is run on node
- return (typeof File !== 'undefined' && value instanceof File)
- ? $elm$core$Result$Ok(value)
- : _Json_expecting('a FILE', value);
-});
-
-
-// METADATA
-
-function _File_name(file) { return file.name; }
-function _File_mime(file) { return file.type; }
-function _File_size(file) { return file.size; }
-
-function _File_lastModified(file)
-{
- return $elm$time$Time$millisToPosix(file.lastModified);
-}
-
-
-// DOWNLOAD
-
-var _File_downloadNode;
-
-function _File_getDownloadNode()
-{
- return _File_downloadNode || (_File_downloadNode = document.createElement('a'));
-}
-
-var _File_download = F3(function(name, mime, content)
-{
- return _Scheduler_binding(function(callback)
- {
- var blob = new Blob([content], {type: mime});
-
- // for IE10+
- if (navigator.msSaveOrOpenBlob)
- {
- navigator.msSaveOrOpenBlob(blob, name);
- return;
- }
-
- // for HTML5
- var node = _File_getDownloadNode();
- var objectUrl = URL.createObjectURL(blob);
- node.href = objectUrl;
- node.download = name;
- _File_click(node);
- URL.revokeObjectURL(objectUrl);
- });
-});
-
-function _File_downloadUrl(href)
-{
- return _Scheduler_binding(function(callback)
- {
- var node = _File_getDownloadNode();
- node.href = href;
- node.download = '';
- node.origin === location.origin || (node.target = '_blank');
- _File_click(node);
- });
-}
-
-
-// IE COMPATIBILITY
-
-function _File_makeBytesSafeForInternetExplorer(bytes)
-{
- // only needed by IE10 and IE11 to fix https://github.com/elm/file/issues/10
- // all other browsers can just run `new Blob([bytes])` directly with no problem
- //
- return new Uint8Array(bytes.buffer, bytes.byteOffset, bytes.byteLength);
-}
-
-function _File_click(node)
-{
- // only needed by IE10 and IE11 to fix https://github.com/elm/file/issues/11
- // all other browsers have MouseEvent and do not need this conditional stuff
- //
- if (typeof MouseEvent === 'function')
- {
- node.dispatchEvent(new MouseEvent('click'));
- }
- else
- {
- var event = document.createEvent('MouseEvents');
- event.initMouseEvent('click', true, true, window, 0, 0, 0, 0, 0, false, false, false, false, 0, null);
- document.body.appendChild(node);
- node.dispatchEvent(event);
- document.body.removeChild(node);
- }
-}
-
-
-// UPLOAD
-
-var _File_node;
-
-function _File_uploadOne(mimes)
-{
- return _Scheduler_binding(function(callback)
- {
- _File_node = document.createElement('input');
- _File_node.type = 'file';
- _File_node.accept = A2($elm$core$String$join, ',', mimes);
- _File_node.addEventListener('change', function(event)
- {
- callback(_Scheduler_succeed(event.target.files[0]));
- });
- _File_click(_File_node);
- });
-}
-
-function _File_uploadOneOrMore(mimes)
-{
- return _Scheduler_binding(function(callback)
- {
- _File_node = document.createElement('input');
- _File_node.type = 'file';
- _File_node.multiple = true;
- _File_node.accept = A2($elm$core$String$join, ',', mimes);
- _File_node.addEventListener('change', function(event)
- {
- var elmFiles = _List_fromArray(event.target.files);
- callback(_Scheduler_succeed(_Utils_Tuple2(elmFiles.a, elmFiles.b)));
- });
- _File_click(_File_node);
- });
-}
-
-
-// CONTENT
-
-function _File_toString(blob)
-{
- return _Scheduler_binding(function(callback)
- {
- var reader = new FileReader();
- reader.addEventListener('loadend', function() {
- callback(_Scheduler_succeed(reader.result));
- });
- reader.readAsText(blob);
- return function() { reader.abort(); };
- });
-}
-
-function _File_toBytes(blob)
-{
- return _Scheduler_binding(function(callback)
- {
- var reader = new FileReader();
- reader.addEventListener('loadend', function() {
- callback(_Scheduler_succeed(new DataView(reader.result)));
- });
- reader.readAsArrayBuffer(blob);
- return function() { reader.abort(); };
- });
-}
-
-function _File_toUrl(blob)
-{
- return _Scheduler_binding(function(callback)
- {
- var reader = new FileReader();
- reader.addEventListener('loadend', function() {
- callback(_Scheduler_succeed(reader.result));
- });
- reader.readAsDataURL(blob);
- return function() { reader.abort(); };
- });
-}
-
-
-
-
-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));
- });
-}
-var $author$project$Prof$LinkClicked = function (a) {
- return {$: 0, a: a};
-};
-var $author$project$Prof$UrlChanged = function (a) {
- return {$: 1, a: a};
-};
-var $elm$core$List$cons = _List_cons;
-var $elm$core$Elm$JsArray$foldr = _JsArray_foldr;
-var $elm$core$Array$foldr = F3(
- function (func, baseCase, _v0) {
- var tree = _v0.c;
- var tail = _v0.d;
- var helper = F2(
- function (node, acc) {
- if (!node.$) {
- var subTree = node.a;
- return A3($elm$core$Elm$JsArray$foldr, helper, acc, subTree);
- } else {
- var values = node.a;
- return A3($elm$core$Elm$JsArray$foldr, func, acc, values);
- }
- });
- return A3(
- $elm$core$Elm$JsArray$foldr,
- helper,
- A3($elm$core$Elm$JsArray$foldr, func, baseCase, tail),
- tree);
- });
-var $elm$core$Array$toList = function (array) {
- return A3($elm$core$Array$foldr, $elm$core$List$cons, _List_Nil, array);
-};
-var $elm$core$Dict$foldr = F3(
- function (func, acc, t) {
- foldr:
- while (true) {
- if (t.$ === -2) {
- 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;
- return $elm$core$Dict$keys(dict);
-};
-var $elm$core$Basics$EQ = 1;
-var $elm$core$Basics$GT = 2;
-var $elm$core$Basics$LT = 0;
-var $elm$core$Result$Err = function (a) {
- return {$: 1, a: a};
-};
-var $elm$json$Json$Decode$Failure = F2(
- function (a, b) {
- return {$: 3, a: a, b: b};
- });
-var $elm$json$Json$Decode$Field = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $elm$json$Json$Decode$Index = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $elm$core$Result$Ok = function (a) {
- return {$: 0, a: a};
-};
-var $elm$json$Json$Decode$OneOf = function (a) {
- return {$: 2, a: a};
-};
-var $elm$core$Basics$False = 1;
-var $elm$core$Basics$add = _Basics_add;
-var $elm$core$Maybe$Just = function (a) {
- return {$: 0, a: a};
-};
-var $elm$core$Maybe$Nothing = {$: 1};
-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 0:
- var f = error.a;
- var err = error.b;
- var isSimple = function () {
- var _v1 = $elm$core$String$uncons(f);
- if (_v1.$ === 1) {
- 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 1:
- 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 2:
- 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 {$: 0, 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 {$: 1, 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 {$: 0, 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.i) {
- return A4(
- $elm$core$Array$Array_elm_builtin,
- $elm$core$Elm$JsArray$length(builder.k),
- $elm$core$Array$shiftStep,
- $elm$core$Elm$JsArray$empty,
- builder.k);
- } else {
- var treeLen = builder.i * $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.l) : builder.l;
- var tree = A2($elm$core$Array$treeFromBuilder, correctNodeList, builder.i);
- return A4(
- $elm$core$Array$Array_elm_builtin,
- $elm$core$Elm$JsArray$length(builder.k) + treeLen,
- A2($elm$core$Basics$max, 5, depth * $elm$core$Array$shiftStep),
- tree,
- builder.k);
- }
- });
-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,
- {l: nodeList, i: (len / $elm$core$Array$branchFactor) | 0, k: 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 = 0;
-var $elm$core$Result$isOk = function (result) {
- if (!result.$) {
- return true;
- } else {
- return false;
- }
-};
-var $elm$json$Json$Decode$andThen = _Json_andThen;
-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 0:
- return 0;
- case 1:
- return 1;
- case 2:
- return 2;
- default:
- return 3;
- }
-};
-var $elm$browser$Browser$External = function (a) {
- return {$: 1, a: a};
-};
-var $elm$browser$Browser$Internal = function (a) {
- return {$: 0, a: a};
-};
-var $elm$core$Basics$identity = function (x) {
- return x;
-};
-var $elm$browser$Browser$Dom$NotFound = $elm$core$Basics$identity;
-var $elm$url$Url$Http = 0;
-var $elm$url$Url$Https = 1;
-var $elm$url$Url$Url = F6(
- function (protocol, host, port_, path, query, fragment) {
- return {ah: fragment, co: host, cL: path, cN: port_, cR: protocol, cS: 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.$ === 1) {
- 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,
- 0,
- A2($elm$core$String$dropLeft, 7, str)) : (A2($elm$core$String$startsWith, 'https://', str) ? A2(
- $elm$url$Url$chompAfterProtocol,
- 1,
- A2($elm$core$String$dropLeft, 8, str)) : $elm$core$Maybe$Nothing);
-};
-var $elm$core$Basics$never = function (_v0) {
- never:
- while (true) {
- var nvr = _v0;
- var $temp$_v0 = nvr;
- _v0 = $temp$_v0;
- continue never;
- }
-};
-var $elm$core$Task$Perform = $elm$core$Basics$identity;
-var $elm$core$Task$succeed = _Scheduler_succeed;
-var $elm$core$Task$init = $elm$core$Task$succeed(0);
-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;
- 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 0;
- },
- $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(0);
- });
-var $elm$core$Task$cmdMap = F2(
- function (tagger, _v0) {
- var task = _v0;
- return 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(
- A2($elm$core$Task$map, toMessage, task));
- });
-var $elm$browser$Browser$application = _Browser_application;
-var $elm$json$Json$Decode$field = _Json_decodeField;
-var $author$project$Prof$CalculateurDeNotes = 1;
-var $author$project$Prof$GenerateurDeProblemes = 0;
-var $author$project$Prof$Model = F7(
- function (key, url, page, largeur, hauteur, modeleGenerateurDeProblemes, modeleCalculateurDeNotes) {
- return {ec: hauteur, bG: key, bI: largeur, bh: modeleCalculateurDeNotes, bi: modeleGenerateurDeProblemes, ao: page, bq: url};
- });
-var $author$project$CalculateurDeNotes$init = {ay: '', D: _List_Nil, aM: '', aN: ''};
-var $author$project$GenerateurDeProblemes$init = {ar: '', aX: ''};
-var $elm$core$Platform$Cmd$batch = _Platform_batch;
-var $elm$core$Platform$Cmd$none = $elm$core$Platform$Cmd$batch(_List_Nil);
-var $elm$browser$Browser$Navigation$pushUrl = _Browser_pushUrl;
-var $elm$url$Url$addPort = F2(
- function (maybePort, starter) {
- if (maybePort.$ === 1) {
- return starter;
- } else {
- var port_ = maybePort.a;
- return starter + (':' + $elm$core$String$fromInt(port_));
- }
- });
-var $elm$url$Url$addPrefixed = F3(
- function (prefix, maybeSegment, starter) {
- if (maybeSegment.$ === 1) {
- return starter;
- } else {
- var segment = maybeSegment.a;
- return _Utils_ap(
- starter,
- _Utils_ap(prefix, segment));
- }
- });
-var $elm$url$Url$toString = function (url) {
- var http = function () {
- var _v0 = url.cR;
- if (!_v0) {
- return 'http://';
- } else {
- return 'https://';
- }
- }();
- return A3(
- $elm$url$Url$addPrefixed,
- '#',
- url.ah,
- A3(
- $elm$url$Url$addPrefixed,
- '?',
- url.cS,
- _Utils_ap(
- A2(
- $elm$url$Url$addPort,
- url.cN,
- _Utils_ap(http, url.co)),
- url.cL)));
-};
-var $author$project$Prof$init = F3(
- function (flags, url, key) {
- var _v0 = url.ah;
- _v0$2:
- while (true) {
- if (!_v0.$) {
- switch (_v0.a) {
- case 'CalculateurDeNotes':
- return _Utils_Tuple2(
- A7($author$project$Prof$Model, key, url, 1, flags.aI, flags.aE, $author$project$GenerateurDeProblemes$init, $author$project$CalculateurDeNotes$init),
- $elm$core$Platform$Cmd$none);
- case 'GenerateurDeProblemes':
- return _Utils_Tuple2(
- A7($author$project$Prof$Model, key, url, 0, flags.aI, flags.aE, $author$project$GenerateurDeProblemes$init, $author$project$CalculateurDeNotes$init),
- $elm$core$Platform$Cmd$none);
- default:
- break _v0$2;
- }
- } else {
- break _v0$2;
- }
- }
- return _Utils_Tuple2(
- A7(
- $author$project$Prof$Model,
- key,
- _Utils_update(
- url,
- {
- ah: $elm$core$Maybe$Just('GenerateurDeProblemes')
- }),
- 0,
- flags.aI,
- flags.aE,
- $author$project$GenerateurDeProblemes$init,
- $author$project$CalculateurDeNotes$init),
- A2(
- $elm$browser$Browser$Navigation$pushUrl,
- key,
- $elm$url$Url$toString(
- _Utils_update(
- url,
- {
- ah: $elm$core$Maybe$Just('GenerateurDeProblemes')
- }))));
- });
-var $elm$json$Json$Decode$int = _Json_decodeInt;
-var $elm$core$Platform$Sub$batch = _Platform_batch;
-var $elm$core$Platform$Sub$none = $elm$core$Platform$Sub$batch(_List_Nil);
-var $author$project$Prof$subscriptions = function (_v0) {
- return $elm$core$Platform$Sub$none;
-};
-var $author$project$Prof$CalculateurDeNotesMsg = function (a) {
- return {$: 2, a: a};
-};
-var $author$project$Prof$GenerateurDeProblemesMsg = function (a) {
- return {$: 3, a: a};
-};
-var $elm$browser$Browser$Navigation$load = _Browser_load;
-var $elm$core$Platform$Cmd$map = _Platform_map;
-var $elm$parser$Parser$Forbidden = 0;
-var $author$project$CalculateurDeNotes$BaremeQuestion = F2(
- function (bonneReponse, mauvaiseReponse) {
- return {ad: bonneReponse, al: mauvaiseReponse};
- });
-var $elm$core$Basics$always = F2(
- function (a, _v0) {
- return a;
- });
-var $elm$parser$Parser$Advanced$Bad = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $elm$parser$Parser$Advanced$Good = F3(
- function (a, b, c) {
- return {$: 0, a: a, b: b, c: c};
- });
-var $elm$parser$Parser$Advanced$Parser = $elm$core$Basics$identity;
-var $elm$parser$Parser$Advanced$map2 = F3(
- function (func, _v0, _v1) {
- var parseA = _v0;
- var parseB = _v1;
- return function (s0) {
- var _v2 = parseA(s0);
- if (_v2.$ === 1) {
- 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.$ === 1) {
- 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$ExpectingFloat = {$: 5};
-var $elm$parser$Parser$Advanced$consumeBase = _Parser_consumeBase;
-var $elm$parser$Parser$Advanced$consumeBase16 = _Parser_consumeBase16;
-var $elm$parser$Parser$Advanced$bumpOffset = F2(
- function (newOffset, s) {
- return {dT: s.dT + (newOffset - s.bl), c: s.c, g: s.g, bl: newOffset, eU: s.eU, a: s.a};
- });
-var $elm$parser$Parser$Advanced$chompBase10 = _Parser_chompBase10;
-var $elm$parser$Parser$Advanced$isAsciiCode = _Parser_isAsciiCode;
-var $elm$core$Basics$negate = function (n) {
- return -n;
-};
-var $elm$parser$Parser$Advanced$consumeExp = F2(
- function (offset, src) {
- if (A3($elm$parser$Parser$Advanced$isAsciiCode, 101, offset, src) || A3($elm$parser$Parser$Advanced$isAsciiCode, 69, offset, src)) {
- var eOffset = offset + 1;
- var expOffset = (A3($elm$parser$Parser$Advanced$isAsciiCode, 43, eOffset, src) || A3($elm$parser$Parser$Advanced$isAsciiCode, 45, eOffset, src)) ? (eOffset + 1) : eOffset;
- var newOffset = A2($elm$parser$Parser$Advanced$chompBase10, expOffset, src);
- return _Utils_eq(expOffset, newOffset) ? (-newOffset) : newOffset;
- } else {
- return offset;
- }
- });
-var $elm$parser$Parser$Advanced$consumeDotAndExp = F2(
- function (offset, src) {
- return A3($elm$parser$Parser$Advanced$isAsciiCode, 46, offset, src) ? A2(
- $elm$parser$Parser$Advanced$consumeExp,
- A2($elm$parser$Parser$Advanced$chompBase10, offset + 1, src),
- src) : A2($elm$parser$Parser$Advanced$consumeExp, offset, src);
- });
-var $elm$parser$Parser$Advanced$AddRight = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $elm$parser$Parser$Advanced$DeadEnd = F4(
- function (row, col, problem, contextStack) {
- return {dT: col, dW: contextStack, eL: problem, eU: row};
- });
-var $elm$parser$Parser$Advanced$Empty = {$: 0};
-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.eU, s.dT, x, s.c));
- });
-var $elm$parser$Parser$Advanced$finalizeInt = F5(
- function (invalid, handler, startOffset, _v0, s) {
- var endOffset = _v0.a;
- var n = _v0.b;
- if (handler.$ === 1) {
- var x = handler.a;
- return A2(
- $elm$parser$Parser$Advanced$Bad,
- true,
- A2($elm$parser$Parser$Advanced$fromState, s, x));
- } else {
- var toValue = handler.a;
- return _Utils_eq(startOffset, endOffset) ? A2(
- $elm$parser$Parser$Advanced$Bad,
- _Utils_cmp(s.bl, startOffset) < 0,
- A2($elm$parser$Parser$Advanced$fromState, s, invalid)) : A3(
- $elm$parser$Parser$Advanced$Good,
- true,
- toValue(n),
- A2($elm$parser$Parser$Advanced$bumpOffset, endOffset, s));
- }
- });
-var $elm$parser$Parser$Advanced$fromInfo = F4(
- function (row, col, x, context) {
- return A2(
- $elm$parser$Parser$Advanced$AddRight,
- $elm$parser$Parser$Advanced$Empty,
- A4($elm$parser$Parser$Advanced$DeadEnd, row, col, x, context));
- });
-var $elm$core$String$toFloat = _String_toFloat;
-var $elm$parser$Parser$Advanced$finalizeFloat = F6(
- function (invalid, expecting, intSettings, floatSettings, intPair, s) {
- var intOffset = intPair.a;
- var floatOffset = A2($elm$parser$Parser$Advanced$consumeDotAndExp, intOffset, s.a);
- if (floatOffset < 0) {
- return A2(
- $elm$parser$Parser$Advanced$Bad,
- true,
- A4($elm$parser$Parser$Advanced$fromInfo, s.eU, s.dT - (floatOffset + s.bl), invalid, s.c));
- } else {
- if (_Utils_eq(s.bl, floatOffset)) {
- return A2(
- $elm$parser$Parser$Advanced$Bad,
- false,
- A2($elm$parser$Parser$Advanced$fromState, s, expecting));
- } else {
- if (_Utils_eq(intOffset, floatOffset)) {
- return A5($elm$parser$Parser$Advanced$finalizeInt, invalid, intSettings, s.bl, intPair, s);
- } else {
- if (floatSettings.$ === 1) {
- var x = floatSettings.a;
- return A2(
- $elm$parser$Parser$Advanced$Bad,
- true,
- A2($elm$parser$Parser$Advanced$fromState, s, invalid));
- } else {
- var toValue = floatSettings.a;
- var _v1 = $elm$core$String$toFloat(
- A3($elm$core$String$slice, s.bl, floatOffset, s.a));
- if (_v1.$ === 1) {
- return A2(
- $elm$parser$Parser$Advanced$Bad,
- true,
- A2($elm$parser$Parser$Advanced$fromState, s, invalid));
- } else {
- var n = _v1.a;
- return A3(
- $elm$parser$Parser$Advanced$Good,
- true,
- toValue(n),
- A2($elm$parser$Parser$Advanced$bumpOffset, floatOffset, s));
- }
- }
- }
- }
- }
- });
-var $elm$parser$Parser$Advanced$number = function (c) {
- return function (s) {
- if (A3($elm$parser$Parser$Advanced$isAsciiCode, 48, s.bl, s.a)) {
- var zeroOffset = s.bl + 1;
- var baseOffset = zeroOffset + 1;
- return A3($elm$parser$Parser$Advanced$isAsciiCode, 120, zeroOffset, s.a) ? A5(
- $elm$parser$Parser$Advanced$finalizeInt,
- c.es,
- c.ed,
- baseOffset,
- A2($elm$parser$Parser$Advanced$consumeBase16, baseOffset, s.a),
- s) : (A3($elm$parser$Parser$Advanced$isAsciiCode, 111, zeroOffset, s.a) ? A5(
- $elm$parser$Parser$Advanced$finalizeInt,
- c.es,
- c.eC,
- baseOffset,
- A3($elm$parser$Parser$Advanced$consumeBase, 8, baseOffset, s.a),
- s) : (A3($elm$parser$Parser$Advanced$isAsciiCode, 98, zeroOffset, s.a) ? A5(
- $elm$parser$Parser$Advanced$finalizeInt,
- c.es,
- c.dD,
- baseOffset,
- A3($elm$parser$Parser$Advanced$consumeBase, 2, baseOffset, s.a),
- s) : A6(
- $elm$parser$Parser$Advanced$finalizeFloat,
- c.es,
- c.cg,
- c.er,
- c.d5,
- _Utils_Tuple2(zeroOffset, 0),
- s)));
- } else {
- return A6(
- $elm$parser$Parser$Advanced$finalizeFloat,
- c.es,
- c.cg,
- c.er,
- c.d5,
- A3($elm$parser$Parser$Advanced$consumeBase, 10, s.bl, s.a),
- s);
- }
- };
-};
-var $elm$parser$Parser$Advanced$float = F2(
- function (expecting, invalid) {
- return $elm$parser$Parser$Advanced$number(
- {
- dD: $elm$core$Result$Err(invalid),
- cg: expecting,
- d5: $elm$core$Result$Ok($elm$core$Basics$identity),
- ed: $elm$core$Result$Err(invalid),
- er: $elm$core$Result$Ok($elm$core$Basics$toFloat),
- es: invalid,
- eC: $elm$core$Result$Err(invalid)
- });
- });
-var $elm$parser$Parser$float = A2($elm$parser$Parser$Advanced$float, $elm$parser$Parser$ExpectingFloat, $elm$parser$Parser$ExpectingFloat);
-var $elm$parser$Parser$Advanced$Append = F2(
- function (a, b) {
- return {$: 2, 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;
- var remainingParsers = parsers.b;
- var _v1 = parse(s0);
- if (!_v1.$) {
- 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 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$Advanced$succeed = function (a) {
- return function (s) {
- return A3($elm$parser$Parser$Advanced$Good, false, a, s);
- };
-};
-var $elm$parser$Parser$succeed = $elm$parser$Parser$Advanced$succeed;
-var $elm$parser$Parser$ExpectingSymbol = function (a) {
- return {$: 8, a: a};
-};
-var $elm$parser$Parser$Advanced$Token = F2(
- function (a, b) {
- return {$: 0, 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 function (s) {
- var _v1 = A5($elm$parser$Parser$Advanced$isSubString, str, s.bl, s.eU, s.dT, s.a);
- 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,
- 0,
- {dT: newCol, c: s.c, g: s.g, bl: newOffset, eU: newRow, a: s.a});
- };
-};
-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 $author$project$CalculateurDeNotes$nombre = $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($elm$core$Basics$negate),
- $elm$parser$Parser$symbol('-')),
- $elm$parser$Parser$float),
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($elm$core$Basics$identity),
- $elm$parser$Parser$symbol('+')),
- $elm$parser$Parser$float)
- ]));
-var $elm$parser$Parser$Advanced$isSubChar = _Parser_isSubChar;
-var $elm$parser$Parser$Advanced$chompWhileHelp = F5(
- function (isGood, offset, row, col, s0) {
- chompWhileHelp:
- while (true) {
- var newOffset = A3($elm$parser$Parser$Advanced$isSubChar, isGood, offset, s0.a);
- if (_Utils_eq(newOffset, -1)) {
- return A3(
- $elm$parser$Parser$Advanced$Good,
- _Utils_cmp(s0.bl, offset) < 0,
- 0,
- {dT: col, c: s0.c, g: s0.g, bl: offset, eU: row, a: s0.a});
- } 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 function (s) {
- return A5($elm$parser$Parser$Advanced$chompWhileHelp, isGood, s.bl, s.eU, s.dT, s);
- };
-};
-var $elm$parser$Parser$Advanced$spaces = $elm$parser$Parser$Advanced$chompWhile(
- function (c) {
- return (c === ' ') || ((c === '\n') || (c === '\r'));
- });
-var $elm$parser$Parser$spaces = $elm$parser$Parser$Advanced$spaces;
-var $author$project$CalculateurDeNotes$baremeQuestion = A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($author$project$CalculateurDeNotes$BaremeQuestion),
- A2($elm$parser$Parser$ignorer, $author$project$CalculateurDeNotes$nombre, $elm$parser$Parser$spaces)),
- $author$project$CalculateurDeNotes$nombre);
-var $elm$parser$Parser$chompWhile = $elm$parser$Parser$Advanced$chompWhile;
-var $author$project$CalculateurDeNotes$espaces = $elm$parser$Parser$chompWhile(
- $elm$core$Basics$eq(' '));
-var $elm$parser$Parser$Advanced$andThen = F2(
- function (callback, _v0) {
- var parseA = _v0;
- return function (s0) {
- var _v1 = parseA(s0);
- if (_v1.$ === 1) {
- 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;
- var _v3 = parseB(s1);
- if (_v3.$ === 1) {
- var p2 = _v3.a;
- var x = _v3.b;
- return A2($elm$parser$Parser$Advanced$Bad, p1 || p2, x);
- } else {
- var p2 = _v3.a;
- var b = _v3.b;
- var s2 = _v3.c;
- return A3($elm$parser$Parser$Advanced$Good, p1 || p2, b, s2);
- }
- }
- };
- });
-var $elm$parser$Parser$Advanced$loopHelp = F4(
- function (p, state, callback, s0) {
- loopHelp:
- while (true) {
- var _v0 = callback(state);
- var parse = _v0;
- var _v1 = parse(s0);
- if (!_v1.$) {
- var p1 = _v1.a;
- var step = _v1.b;
- var s1 = _v1.c;
- if (!step.$) {
- 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 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;
- return function (s0) {
- var _v1 = parse(s0);
- if (!_v1.$) {
- var p = _v1.a;
- var a = _v1.b;
- var s1 = _v1.c;
- return A3(
- $elm$parser$Parser$Advanced$Good,
- p,
- func(a),
- s1);
- } else {
- var p = _v1.a;
- var x = _v1.b;
- return A2($elm$parser$Parser$Advanced$Bad, p, x);
- }
- };
- });
-var $elm$parser$Parser$Advanced$Done = function (a) {
- return {$: 1, a: a};
-};
-var $elm$parser$Parser$Advanced$Loop = function (a) {
- return {$: 0, a: a};
-};
-var $elm$parser$Parser$Advanced$revAlways = F2(
- function (_v0, b) {
- return b;
- });
-var $elm$parser$Parser$Advanced$skip = F2(
- function (iParser, kParser) {
- return A3($elm$parser$Parser$Advanced$map2, $elm$parser$Parser$Advanced$revAlways, iParser, kParser);
- });
-var $elm$parser$Parser$Advanced$sequenceEndForbidden = F5(
- function (ender, ws, parseItem, sep, revItems) {
- var chompRest = function (item) {
- return A5(
- $elm$parser$Parser$Advanced$sequenceEndForbidden,
- ender,
- ws,
- parseItem,
- sep,
- A2($elm$core$List$cons, item, revItems));
- };
- return A2(
- $elm$parser$Parser$Advanced$skip,
- ws,
- $elm$parser$Parser$Advanced$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$Advanced$skip,
- sep,
- A2(
- $elm$parser$Parser$Advanced$skip,
- ws,
- A2(
- $elm$parser$Parser$Advanced$map,
- function (item) {
- return $elm$parser$Parser$Advanced$Loop(
- A2($elm$core$List$cons, item, revItems));
- },
- parseItem))),
- A2(
- $elm$parser$Parser$Advanced$map,
- function (_v0) {
- return $elm$parser$Parser$Advanced$Done(
- $elm$core$List$reverse(revItems));
- },
- ender)
- ])));
- });
-var $elm$parser$Parser$Advanced$sequenceEndMandatory = F4(
- function (ws, parseItem, sep, revItems) {
- return $elm$parser$Parser$Advanced$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$Advanced$map,
- function (item) {
- return $elm$parser$Parser$Advanced$Loop(
- A2($elm$core$List$cons, item, revItems));
- },
- A2(
- $elm$parser$Parser$Advanced$ignorer,
- parseItem,
- A2(
- $elm$parser$Parser$Advanced$ignorer,
- ws,
- A2($elm$parser$Parser$Advanced$ignorer, sep, ws)))),
- A2(
- $elm$parser$Parser$Advanced$map,
- function (_v0) {
- return $elm$parser$Parser$Advanced$Done(
- $elm$core$List$reverse(revItems));
- },
- $elm$parser$Parser$Advanced$succeed(0))
- ]));
- });
-var $elm$parser$Parser$Advanced$sequenceEndOptional = F5(
- function (ender, ws, parseItem, sep, revItems) {
- var parseEnd = A2(
- $elm$parser$Parser$Advanced$map,
- function (_v0) {
- return $elm$parser$Parser$Advanced$Done(
- $elm$core$List$reverse(revItems));
- },
- ender);
- return A2(
- $elm$parser$Parser$Advanced$skip,
- ws,
- $elm$parser$Parser$Advanced$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$Advanced$skip,
- sep,
- A2(
- $elm$parser$Parser$Advanced$skip,
- ws,
- $elm$parser$Parser$Advanced$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$Advanced$map,
- function (item) {
- return $elm$parser$Parser$Advanced$Loop(
- A2($elm$core$List$cons, item, revItems));
- },
- parseItem),
- parseEnd
- ])))),
- parseEnd
- ])));
- });
-var $elm$parser$Parser$Advanced$sequenceEnd = F5(
- function (ender, ws, parseItem, sep, trailing) {
- var chompRest = function (item) {
- switch (trailing) {
- case 0:
- return A2(
- $elm$parser$Parser$Advanced$loop,
- _List_fromArray(
- [item]),
- A4($elm$parser$Parser$Advanced$sequenceEndForbidden, ender, ws, parseItem, sep));
- case 1:
- return A2(
- $elm$parser$Parser$Advanced$loop,
- _List_fromArray(
- [item]),
- A4($elm$parser$Parser$Advanced$sequenceEndOptional, ender, ws, parseItem, sep));
- default:
- return A2(
- $elm$parser$Parser$Advanced$ignorer,
- A2(
- $elm$parser$Parser$Advanced$skip,
- ws,
- A2(
- $elm$parser$Parser$Advanced$skip,
- sep,
- A2(
- $elm$parser$Parser$Advanced$skip,
- ws,
- A2(
- $elm$parser$Parser$Advanced$loop,
- _List_fromArray(
- [item]),
- A3($elm$parser$Parser$Advanced$sequenceEndMandatory, ws, parseItem, sep))))),
- ender);
- }
- };
- return $elm$parser$Parser$Advanced$oneOf(
- _List_fromArray(
- [
- A2($elm$parser$Parser$Advanced$andThen, chompRest, parseItem),
- A2(
- $elm$parser$Parser$Advanced$map,
- function (_v0) {
- return _List_Nil;
- },
- ender)
- ]));
- });
-var $elm$parser$Parser$Advanced$sequence = function (i) {
- return A2(
- $elm$parser$Parser$Advanced$skip,
- $elm$parser$Parser$Advanced$token(i.Z),
- A2(
- $elm$parser$Parser$Advanced$skip,
- i.aP,
- A5(
- $elm$parser$Parser$Advanced$sequenceEnd,
- $elm$parser$Parser$Advanced$token(i.aD),
- i.aP,
- i.aH,
- $elm$parser$Parser$Advanced$token(i.aO),
- i.a$)));
-};
-var $elm$parser$Parser$Advanced$Forbidden = 0;
-var $elm$parser$Parser$Advanced$Mandatory = 2;
-var $elm$parser$Parser$Advanced$Optional = 1;
-var $elm$parser$Parser$toAdvancedTrailing = function (trailing) {
- switch (trailing) {
- case 0:
- return 0;
- case 1:
- return 1;
- default:
- return 2;
- }
-};
-var $elm$parser$Parser$Expecting = function (a) {
- return {$: 0, a: a};
-};
-var $elm$parser$Parser$toToken = function (str) {
- return A2(
- $elm$parser$Parser$Advanced$Token,
- str,
- $elm$parser$Parser$Expecting(str));
-};
-var $elm$parser$Parser$sequence = function (i) {
- return $elm$parser$Parser$Advanced$sequence(
- {
- aD: $elm$parser$Parser$toToken(i.aD),
- aH: i.aH,
- aO: $elm$parser$Parser$toToken(i.aO),
- aP: i.aP,
- Z: $elm$parser$Parser$toToken(i.Z),
- a$: $elm$parser$Parser$toAdvancedTrailing(i.a$)
- });
-};
-var $author$project$CalculateurDeNotes$baremeSujet = $elm$parser$Parser$sequence(
- {aD: '', aH: $author$project$CalculateurDeNotes$baremeQuestion, aO: ',', aP: $author$project$CalculateurDeNotes$espaces, Z: '', a$: 0});
-var $elm$core$Bitwise$and = _Bitwise_and;
-var $elm$core$Bitwise$shiftRightZfBy = _Bitwise_shiftRightZfBy;
-var $elm$core$Array$bitMask = 4294967295 >>> (32 - $elm$core$Array$shiftStep);
-var $elm$core$Basics$ge = _Utils_ge;
-var $elm$core$Elm$JsArray$unsafeGet = _JsArray_unsafeGet;
-var $elm$core$Array$getHelp = F3(
- function (shift, index, tree) {
- getHelp:
- while (true) {
- var pos = $elm$core$Array$bitMask & (index >>> shift);
- var _v0 = A2($elm$core$Elm$JsArray$unsafeGet, pos, tree);
- if (!_v0.$) {
- var subTree = _v0.a;
- var $temp$shift = shift - $elm$core$Array$shiftStep,
- $temp$index = index,
- $temp$tree = subTree;
- shift = $temp$shift;
- index = $temp$index;
- tree = $temp$tree;
- continue getHelp;
- } else {
- var values = _v0.a;
- return A2($elm$core$Elm$JsArray$unsafeGet, $elm$core$Array$bitMask & index, values);
- }
- }
- });
-var $elm$core$Bitwise$shiftLeftBy = _Bitwise_shiftLeftBy;
-var $elm$core$Array$tailIndex = function (len) {
- return (len >>> 5) << 5;
-};
-var $elm$core$Array$get = F2(
- function (index, _v0) {
- var len = _v0.a;
- var startShift = _v0.b;
- var tree = _v0.c;
- var tail = _v0.d;
- return ((index < 0) || (_Utils_cmp(index, len) > -1)) ? $elm$core$Maybe$Nothing : ((_Utils_cmp(
- index,
- $elm$core$Array$tailIndex(len)) > -1) ? $elm$core$Maybe$Just(
- A2($elm$core$Elm$JsArray$unsafeGet, $elm$core$Array$bitMask & index, tail)) : $elm$core$Maybe$Just(
- A3($elm$core$Array$getHelp, startShift, index, tree)));
- });
-var $elm$core$Maybe$andThen = F2(
- function (callback, maybeValue) {
- if (!maybeValue.$) {
- var value = maybeValue.a;
- return callback(value);
- } else {
- return $elm$core$Maybe$Nothing;
- }
- });
-var $elm$core$Basics$composeL = F3(
- function (g, f, x) {
- return g(
- f(x));
- });
-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 $author$project$CalculateurDeNotes$noteQuestion = F3(
- function (brm, bonneRpn, rpnEleve) {
- switch (bonneRpn) {
- case 'V':
- return (rpnEleve === 'A') ? brm.ad : ((rpnEleve === 'B') ? ((2 * brm.ad) / 3) : ((rpnEleve === 'C') ? (brm.al / 3) : ((rpnEleve === 'D') ? brm.al : 0)));
- case 'F':
- return (rpnEleve === 'D') ? brm.ad : ((rpnEleve === 'C') ? ((2 * brm.ad) / 3) : ((rpnEleve === 'B') ? (brm.al / 3) : ((rpnEleve === 'A') ? brm.al : 0)));
- default:
- return _Utils_eq(bonneRpn, rpnEleve) ? brm.ad : ((rpnEleve === '-') ? 0 : brm.al);
- }
- });
-var $elm$core$List$tail = function (list) {
- if (list.b) {
- var x = list.a;
- var xs = list.b;
- return $elm$core$Maybe$Just(xs);
- } else {
- return $elm$core$Maybe$Nothing;
- }
-};
-var $author$project$CalculateurDeNotes$noteSujet = F3(
- function (brms, bonneRpns, rpnsEleve) {
- if (!brms.b) {
- return $elm$core$Maybe$Just(0);
- } else {
- var brm = brms.a;
- var brmss = brms.b;
- var rpnEleveSuite = $elm$core$List$tail(rpnsEleve);
- var rpnEleve = $elm$core$List$head(rpnsEleve);
- var bonneRpnSuite = $elm$core$List$tail(bonneRpns);
- var bonneRpn = $elm$core$List$head(bonneRpns);
- var _v1 = _Utils_Tuple2(
- _Utils_Tuple2(bonneRpn, bonneRpnSuite),
- _Utils_Tuple2(rpnEleve, rpnEleveSuite));
- if ((((!_v1.a.a.$) && (!_v1.a.b.$)) && (!_v1.b.a.$)) && (!_v1.b.b.$)) {
- var _v2 = _v1.a;
- var bnRpn = _v2.a.a;
- var bnRpnSuite = _v2.b.a;
- var _v3 = _v1.b;
- var rpnElv = _v3.a.a;
- var rpnElvSuite = _v3.b.a;
- return A2(
- $elm$core$Maybe$andThen,
- A2(
- $elm$core$Basics$composeL,
- $elm$core$Maybe$Just,
- $elm$core$Basics$add(
- A3($author$project$CalculateurDeNotes$noteQuestion, brm, bnRpn, rpnElv))),
- A3($author$project$CalculateurDeNotes$noteSujet, brmss, bnRpnSuite, rpnElvSuite));
- } else {
- return $elm$core$Maybe$Nothing;
- }
- }
- });
-var $author$project$CalculateurDeNotes$notes = F3(
- function (brms, rpnCorrectes, rpnEleves) {
- var f = function (rpnEleve) {
- var _v0 = A2($elm$core$Array$get, rpnEleve.cH - 11, rpnCorrectes);
- if (_v0.$ === 1) {
- return rpnEleve;
- } else {
- var bonneRpns = _v0.a;
- return _Utils_update(
- rpnEleve,
- {
- an: A3($author$project$CalculateurDeNotes$noteSujet, brms, bonneRpns, rpnEleve.cU)
- });
- }
- };
- return A2($elm$core$List$map, f, rpnEleves);
- });
-var $elm$parser$Parser$Optional = 1;
-var $elm$core$Array$fromListHelp = F3(
- function (list, nodeList, nodeListSize) {
- fromListHelp:
- while (true) {
- var _v0 = A2($elm$core$Elm$JsArray$initializeFromList, $elm$core$Array$branchFactor, list);
- var jsArray = _v0.a;
- var remainingItems = _v0.b;
- if (_Utils_cmp(
- $elm$core$Elm$JsArray$length(jsArray),
- $elm$core$Array$branchFactor) < 0) {
- return A2(
- $elm$core$Array$builderToArray,
- true,
- {l: nodeList, i: nodeListSize, k: jsArray});
- } else {
- var $temp$list = remainingItems,
- $temp$nodeList = A2(
- $elm$core$List$cons,
- $elm$core$Array$Leaf(jsArray),
- nodeList),
- $temp$nodeListSize = nodeListSize + 1;
- list = $temp$list;
- nodeList = $temp$nodeList;
- nodeListSize = $temp$nodeListSize;
- continue fromListHelp;
- }
- }
- });
-var $elm$core$Array$fromList = function (list) {
- if (!list.b) {
- return $elm$core$Array$empty;
- } else {
- return A3($elm$core$Array$fromListHelp, list, _List_Nil, 0);
- }
-};
-var $elm$core$Set$Set_elm_builtin = $elm$core$Basics$identity;
-var $elm$core$Dict$RBEmpty_elm_builtin = {$: -2};
-var $elm$core$Dict$empty = $elm$core$Dict$RBEmpty_elm_builtin;
-var $elm$core$Set$empty = $elm$core$Dict$empty;
-var $elm$core$Dict$Black = 1;
-var $elm$core$Dict$RBNode_elm_builtin = F5(
- function (a, b, c, d, e) {
- return {$: -1, a: a, b: b, c: c, d: d, e: e};
- });
-var $elm$core$Dict$Red = 0;
-var $elm$core$Dict$balance = F5(
- function (color, key, value, left, right) {
- if ((right.$ === -1) && (!right.a)) {
- var _v1 = right.a;
- var rK = right.b;
- var rV = right.c;
- var rLeft = right.d;
- var rRight = right.e;
- if ((left.$ === -1) && (!left.a)) {
- var _v3 = left.a;
- var lK = left.b;
- var lV = left.c;
- var lLeft = left.d;
- var lRight = left.e;
- return A5(
- $elm$core$Dict$RBNode_elm_builtin,
- 0,
- key,
- value,
- A5($elm$core$Dict$RBNode_elm_builtin, 1, lK, lV, lLeft, lRight),
- A5($elm$core$Dict$RBNode_elm_builtin, 1, rK, rV, rLeft, rRight));
- } else {
- return A5(
- $elm$core$Dict$RBNode_elm_builtin,
- color,
- rK,
- rV,
- A5($elm$core$Dict$RBNode_elm_builtin, 0, key, value, left, rLeft),
- rRight);
- }
- } else {
- if ((((left.$ === -1) && (!left.a)) && (left.d.$ === -1)) && (!left.d.a)) {
- var _v5 = left.a;
- var lK = left.b;
- var lV = left.c;
- var _v6 = left.d;
- var _v7 = _v6.a;
- var llK = _v6.b;
- var llV = _v6.c;
- var llLeft = _v6.d;
- var llRight = _v6.e;
- var lRight = left.e;
- return A5(
- $elm$core$Dict$RBNode_elm_builtin,
- 0,
- lK,
- lV,
- A5($elm$core$Dict$RBNode_elm_builtin, 1, llK, llV, llLeft, llRight),
- A5($elm$core$Dict$RBNode_elm_builtin, 1, key, value, lRight, right));
- } else {
- return A5($elm$core$Dict$RBNode_elm_builtin, color, key, value, left, right);
- }
- }
- });
-var $elm$core$Basics$compare = _Utils_compare;
-var $elm$core$Dict$insertHelp = F3(
- function (key, value, dict) {
- if (dict.$ === -2) {
- return A5($elm$core$Dict$RBNode_elm_builtin, 0, key, value, $elm$core$Dict$RBEmpty_elm_builtin, $elm$core$Dict$RBEmpty_elm_builtin);
- } else {
- var nColor = dict.a;
- var nKey = dict.b;
- var nValue = dict.c;
- var nLeft = dict.d;
- var nRight = dict.e;
- var _v1 = A2($elm$core$Basics$compare, key, nKey);
- switch (_v1) {
- case 0:
- return A5(
- $elm$core$Dict$balance,
- nColor,
- nKey,
- nValue,
- A3($elm$core$Dict$insertHelp, key, value, nLeft),
- nRight);
- case 1:
- return A5($elm$core$Dict$RBNode_elm_builtin, nColor, nKey, value, nLeft, nRight);
- default:
- return A5(
- $elm$core$Dict$balance,
- nColor,
- nKey,
- nValue,
- nLeft,
- A3($elm$core$Dict$insertHelp, key, value, nRight));
- }
- }
- });
-var $elm$core$Dict$insert = F3(
- function (key, value, dict) {
- var _v0 = A3($elm$core$Dict$insertHelp, key, value, dict);
- if ((_v0.$ === -1) && (!_v0.a)) {
- var _v1 = _v0.a;
- var k = _v0.b;
- var v = _v0.c;
- var l = _v0.d;
- var r = _v0.e;
- return A5($elm$core$Dict$RBNode_elm_builtin, 1, k, v, l, r);
- } else {
- var x = _v0;
- return x;
- }
- });
-var $elm$core$Set$insert = F2(
- function (key, _v0) {
- var dict = _v0;
- return A3($elm$core$Dict$insert, key, 0, dict);
- });
-var $elm$core$Set$fromList = function (list) {
- return A3($elm$core$List$foldl, $elm$core$Set$insert, $elm$core$Set$empty, list);
-};
-var $elm$core$Basics$neq = _Utils_notEqual;
-var $elm$parser$Parser$ExpectingVariable = {$: 7};
-var $elm$core$Dict$get = F2(
- function (targetKey, dict) {
- get:
- while (true) {
- if (dict.$ === -2) {
- return $elm$core$Maybe$Nothing;
- } else {
- var key = dict.b;
- var value = dict.c;
- var left = dict.d;
- var right = dict.e;
- var _v1 = A2($elm$core$Basics$compare, targetKey, key);
- switch (_v1) {
- case 0:
- var $temp$targetKey = targetKey,
- $temp$dict = left;
- targetKey = $temp$targetKey;
- dict = $temp$dict;
- continue get;
- case 1:
- return $elm$core$Maybe$Just(value);
- default:
- var $temp$targetKey = targetKey,
- $temp$dict = right;
- targetKey = $temp$targetKey;
- dict = $temp$dict;
- continue get;
- }
- }
- }
- });
-var $elm$core$Dict$member = F2(
- function (key, dict) {
- var _v0 = A2($elm$core$Dict$get, key, dict);
- if (!_v0.$) {
- return true;
- } else {
- return false;
- }
- });
-var $elm$core$Set$member = F2(
- function (key, _v0) {
- var dict = _v0;
- return A2($elm$core$Dict$member, key, dict);
- });
-var $elm$parser$Parser$Advanced$varHelp = F7(
- function (isGood, offset, row, col, src, indent, context) {
- varHelp:
- while (true) {
- var newOffset = A3($elm$parser$Parser$Advanced$isSubChar, isGood, offset, src);
- if (_Utils_eq(newOffset, -1)) {
- return {dT: col, c: context, g: indent, bl: offset, eU: row, a: src};
- } else {
- if (_Utils_eq(newOffset, -2)) {
- var $temp$isGood = isGood,
- $temp$offset = offset + 1,
- $temp$row = row + 1,
- $temp$col = 1,
- $temp$src = src,
- $temp$indent = indent,
- $temp$context = context;
- isGood = $temp$isGood;
- offset = $temp$offset;
- row = $temp$row;
- col = $temp$col;
- src = $temp$src;
- indent = $temp$indent;
- context = $temp$context;
- continue varHelp;
- } else {
- var $temp$isGood = isGood,
- $temp$offset = newOffset,
- $temp$row = row,
- $temp$col = col + 1,
- $temp$src = src,
- $temp$indent = indent,
- $temp$context = context;
- isGood = $temp$isGood;
- offset = $temp$offset;
- row = $temp$row;
- col = $temp$col;
- src = $temp$src;
- indent = $temp$indent;
- context = $temp$context;
- continue varHelp;
- }
- }
- }
- });
-var $elm$parser$Parser$Advanced$variable = function (i) {
- return function (s) {
- var firstOffset = A3($elm$parser$Parser$Advanced$isSubChar, i.Z, s.bl, s.a);
- if (_Utils_eq(firstOffset, -1)) {
- return A2(
- $elm$parser$Parser$Advanced$Bad,
- false,
- A2($elm$parser$Parser$Advanced$fromState, s, i.cg));
- } else {
- var s1 = _Utils_eq(firstOffset, -2) ? A7($elm$parser$Parser$Advanced$varHelp, i.cr, s.bl + 1, s.eU + 1, 1, s.a, s.g, s.c) : A7($elm$parser$Parser$Advanced$varHelp, i.cr, firstOffset, s.eU, s.dT + 1, s.a, s.g, s.c);
- var name = A3($elm$core$String$slice, s.bl, s1.bl, s.a);
- return A2($elm$core$Set$member, name, i.cX) ? A2(
- $elm$parser$Parser$Advanced$Bad,
- false,
- A2($elm$parser$Parser$Advanced$fromState, s, i.cg)) : A3($elm$parser$Parser$Advanced$Good, true, name, s1);
- }
- };
-};
-var $elm$parser$Parser$variable = function (i) {
- return $elm$parser$Parser$Advanced$variable(
- {cg: $elm$parser$Parser$ExpectingVariable, cr: i.cr, cX: i.cX, Z: i.Z});
-};
-var $author$project$CalculateurDeNotes$reponses = $elm$parser$Parser$sequence(
- {
- aD: '',
- aH: $elm$parser$Parser$variable(
- {
- cr: function (_v0) {
- return false;
- },
- cX: $elm$core$Set$fromList(_List_Nil),
- Z: function (x) {
- return (x !== '\n') && (x !== ';');
- }
- }),
- aO: '',
- aP: $author$project$CalculateurDeNotes$espaces,
- Z: '',
- a$: 1
- });
-var $author$project$CalculateurDeNotes$reponsesCorrectes = A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($elm$core$Array$fromList),
- $elm$parser$Parser$sequence(
- {aD: '', aH: $author$project$CalculateurDeNotes$reponses, aO: '\n', aP: $author$project$CalculateurDeNotes$espaces, Z: '', a$: 1}));
-var $author$project$CalculateurDeNotes$Eleve = F6(
- function (numeroEtudiant, numeroSujet, nomEtudiant, prenomEtudiant, reponses, note) {
- return {cG: nomEtudiant, an: note, bk: numeroEtudiant, cH: numeroSujet, cO: prenomEtudiant, cU: reponses};
- });
-var $elm$parser$Parser$Advanced$mapChompedString = F2(
- function (func, _v0) {
- var parse = _v0;
- return function (s0) {
- var _v1 = parse(s0);
- if (_v1.$ === 1) {
- 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.bl, s1.bl, s0.a),
- 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 $author$project$CalculateurDeNotes$champ = A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($elm$core$Basics$identity),
- $elm$parser$Parser$symbol(';')),
- $elm$parser$Parser$getChompedString(
- $elm$parser$Parser$chompWhile(
- $elm$core$Basics$neq(';'))));
-var $author$project$CalculateurDeNotes$champzInteret = A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($elm$core$Maybe$Nothing),
- $elm$parser$Parser$symbol(';')),
- $elm$parser$Parser$chompWhile(
- function (x) {
- return (x !== '\n') && (x !== ';');
- }));
-var $elm$parser$Parser$UnexpectedChar = {$: 11};
-var $elm$parser$Parser$Advanced$chompIf = F2(
- function (isGood, expecting) {
- return function (s) {
- var newOffset = A3($elm$parser$Parser$Advanced$isSubChar, isGood, s.bl, s.a);
- 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,
- 0,
- {dT: 1, c: s.c, g: s.g, bl: s.bl + 1, eU: s.eU + 1, a: s.a}) : A3(
- $elm$parser$Parser$Advanced$Good,
- true,
- 0,
- {dT: s.dT + 1, c: s.c, g: s.g, bl: newOffset, eU: s.eU, a: s.a}));
- };
- });
-var $elm$parser$Parser$chompIf = function (isGood) {
- return A2($elm$parser$Parser$Advanced$chompIf, isGood, $elm$parser$Parser$UnexpectedChar);
-};
-var $author$project$CalculateurDeNotes$etudiant = $elm$parser$Parser$getChompedString(
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$chompIf($elm$core$Char$isDigit),
- $elm$parser$Parser$chompIf($elm$core$Char$isDigit)),
- $elm$parser$Parser$chompIf($elm$core$Char$isDigit)),
- $elm$parser$Parser$chompIf($elm$core$Char$isDigit)),
- $elm$parser$Parser$chompIf($elm$core$Char$isDigit)));
-var $elm$parser$Parser$ExpectingInt = {$: 1};
-var $elm$parser$Parser$Advanced$int = F2(
- function (expecting, invalid) {
- return $elm$parser$Parser$Advanced$number(
- {
- dD: $elm$core$Result$Err(invalid),
- cg: expecting,
- d5: $elm$core$Result$Err(invalid),
- ed: $elm$core$Result$Err(invalid),
- er: $elm$core$Result$Ok($elm$core$Basics$identity),
- es: invalid,
- eC: $elm$core$Result$Err(invalid)
- });
- });
-var $elm$parser$Parser$int = A2($elm$parser$Parser$Advanced$int, $elm$parser$Parser$ExpectingInt, $elm$parser$Parser$ExpectingInt);
-var $elm$parser$Parser$Mandatory = 2;
-var $author$project$CalculateurDeNotes$reponsesQuizScan = $elm$parser$Parser$sequence(
- {
- aD: '',
- aH: $elm$parser$Parser$variable(
- {
- cr: function (_v0) {
- return false;
- },
- cX: $elm$core$Set$fromList(_List_Nil),
- Z: function (x) {
- return (x !== '\n') && (x !== ';');
- }
- }),
- aO: ';',
- aP: $author$project$CalculateurDeNotes$espaces,
- Z: ';',
- a$: 2
- });
-var $author$project$CalculateurDeNotes$reponsesEleve = 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$keeper,
- $elm$parser$Parser$succeed($author$project$CalculateurDeNotes$Eleve),
- $author$project$CalculateurDeNotes$etudiant),
- $elm$parser$Parser$int),
- $author$project$CalculateurDeNotes$champ),
- $author$project$CalculateurDeNotes$champ),
- $author$project$CalculateurDeNotes$reponsesQuizScan),
- $author$project$CalculateurDeNotes$champzInteret);
-var $author$project$CalculateurDeNotes$reponsesEleves = $elm$parser$Parser$sequence(
- {aD: '', aH: $author$project$CalculateurDeNotes$reponsesEleve, aO: '\n', aP: $author$project$CalculateurDeNotes$espaces, Z: '', a$: 1});
-var $elm$time$Time$Posix = $elm$core$Basics$identity;
-var $elm$time$Time$millisToPosix = $elm$core$Basics$identity;
-var $elm$file$File$Download$string = F3(
- function (name, mime, content) {
- return A2(
- $elm$core$Task$perform,
- $elm$core$Basics$never,
- A3(_File_download, name, mime, content));
- });
-var $elm$parser$Parser$DeadEnd = F3(
- function (row, col, problem) {
- return {dT: col, eL: problem, eU: row};
- });
-var $elm$parser$Parser$problemToDeadEnd = function (p) {
- return A3($elm$parser$Parser$DeadEnd, p.eU, p.dT, p.eL);
-};
-var $elm$parser$Parser$Advanced$bagToList = F2(
- function (bag, list) {
- bagToList:
- while (true) {
- switch (bag.$) {
- case 0:
- return list;
- case 1:
- 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;
- var _v1 = parse(
- {dT: 1, c: _List_Nil, g: 1, bl: 0, eU: 1, a: src});
- if (!_v1.$) {
- 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.$) {
- 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 $author$project$CalculateurDeNotes$unsafeRun = F3(
- function (prsr, defaut, texte) {
- var _v0 = A2($elm$parser$Parser$run, prsr, texte);
- if (!_v0.$) {
- var x = _v0.a;
- return x;
- } else {
- return defaut;
- }
- });
-var $elm$core$String$concat = function (strings) {
- return A2($elm$core$String$join, '', strings);
-};
-var $elm$core$String$fromFloat = _String_fromNumber;
-var $author$project$CalculateurDeNotes$voirNotesOrg = function (rpnsEleves) {
- var voirNote = function (rpns) {
- var _v0 = rpns.an;
- if (_v0.$ === 1) {
- return '';
- } else {
- var nt = _v0.a;
- return $elm$core$String$fromFloat(nt);
- }
- };
- var numero = function (rpns) {
- return rpns.bk;
- };
- var ligne = function (rpns) {
- return '|' + (rpns.bk + ('|' + (rpns.cG + ('|' + (rpns.cO + ('|' + (voirNote(rpns) + '|\n')))))));
- };
- return '|Numéro|Nom|Prénom|Note|\n' + $elm$core$String$concat(
- A2($elm$core$List$map, ligne, rpnsEleves));
-};
-var $author$project$CalculateurDeNotes$update = F2(
- function (msg, model) {
- var rpnEleves = A3($author$project$CalculateurDeNotes$unsafeRun, $author$project$CalculateurDeNotes$reponsesEleves, _List_Nil, model.aN);
- var rpnCorrectes = A3($author$project$CalculateurDeNotes$unsafeRun, $author$project$CalculateurDeNotes$reponsesCorrectes, $elm$core$Array$empty, model.aM);
- var brms = A3($author$project$CalculateurDeNotes$unsafeRun, $author$project$CalculateurDeNotes$baremeSujet, _List_Nil, model.ay);
- switch (msg.$) {
- case 0:
- var nouveauBareme = msg.a;
- var brmss = A3($author$project$CalculateurDeNotes$unsafeRun, $author$project$CalculateurDeNotes$baremeSujet, _List_Nil, nouveauBareme);
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {
- ay: nouveauBareme,
- D: A3($author$project$CalculateurDeNotes$notes, brmss, rpnCorrectes, rpnEleves)
- }),
- $elm$core$Platform$Cmd$none);
- case 1:
- var nouvellesReponsesCorrectes = msg.a;
- var rpnCorrectess = A3($author$project$CalculateurDeNotes$unsafeRun, $author$project$CalculateurDeNotes$reponsesCorrectes, $elm$core$Array$empty, nouvellesReponsesCorrectes);
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {
- D: A3($author$project$CalculateurDeNotes$notes, brms, rpnCorrectess, rpnEleves),
- aM: nouvellesReponsesCorrectes
- }),
- $elm$core$Platform$Cmd$none);
- case 2:
- var nouvellesReponsesEleves = msg.a;
- var rpnElevess = A3($author$project$CalculateurDeNotes$unsafeRun, $author$project$CalculateurDeNotes$reponsesEleves, _List_Nil, nouvellesReponsesEleves);
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {
- D: A3($author$project$CalculateurDeNotes$notes, brms, rpnCorrectes, rpnElevess),
- aN: nouvellesReponsesEleves
- }),
- $elm$core$Platform$Cmd$none);
- default:
- return _Utils_Tuple2(
- model,
- A3(
- $elm$file$File$Download$string,
- 'Notes.org',
- 'text/org',
- $author$project$CalculateurDeNotes$voirNotesOrg(model.D)));
- }
- });
-var $author$project$GenerateurDeProblemes$SujetGenere = function (a) {
- return {$: 3, a: a};
-};
-var $elm$random$Random$Generator = $elm$core$Basics$identity;
-var $elm$random$Random$constant = function (value) {
- return function (seed) {
- return _Utils_Tuple2(value, seed);
- };
-};
-var $author$project$GenerateurDeProblemes$voirErreur = function (err) {
- return 'Ligne : ' + ($elm$core$String$fromInt(err.eU) + (' | Colonne : ' + $elm$core$String$fromInt(err.dT)));
-};
-var $author$project$GenerateurDeProblemes$deadEndsToStringBis = function (errs) {
- return 'Il y a des problèmes aux endroits suivants :\n' + $elm$core$String$concat(
- A2($elm$core$List$map, $author$project$GenerateurDeProblemes$voirErreur, errs));
-};
-var $author$project$Fraction$Fraction = F2(
- function (num, den) {
- return {f: den, e: num};
- });
-var $elm$core$Basics$pow = _Basics_pow;
-var $elm$core$Basics$abs = function (n) {
- return (n < 0) ? (-n) : n;
-};
-var $elm$core$Basics$modBy = _Basics_modBy;
-var $lynn$elm_arithmetic$Arithmetic$gcd = F2(
- function (a, b) {
- var gcd_ = F2(
- function (x, y) {
- gcd_:
- while (true) {
- if (!y) {
- return x;
- } else {
- var $temp$x = y,
- $temp$y = A2($elm$core$Basics$modBy, y, x);
- x = $temp$x;
- y = $temp$y;
- continue gcd_;
- }
- }
- });
- return A2(
- gcd_,
- $elm$core$Basics$abs(a),
- $elm$core$Basics$abs(b));
- });
-var $author$project$Fraction$simplifier = function (a) {
- var sgnDuDen = (a.f < 0) ? (-1) : 1;
- var pgcd = A2($lynn$elm_arithmetic$Arithmetic$gcd, a.e, a.f);
- return _Utils_update(
- a,
- {f: sgnDuDen * ((a.f / pgcd) | 0), e: sgnDuDen * ((a.e / pgcd) | 0)});
-};
-var $author$project$Fraction$frac = F2(
- function (a, b) {
- var min = 1 - A2($elm$core$Basics$pow, 2, 31);
- var max = A2($elm$core$Basics$pow, 2, 31) - 1;
- if (!b) {
- return $elm$core$Result$Err('Division par zéro.');
- } else {
- return ((_Utils_cmp(a, max) > 0) || ((_Utils_cmp(b, max) > 0) || ((_Utils_cmp(a, min) < 0) || (_Utils_cmp(b, min) < 0)))) ? $elm$core$Result$Err('Certains calculs font intervenir des valeurs trop grandes pour être prises en charge.') : $elm$core$Result$Ok(
- $author$project$Fraction$simplifier(
- A2($author$project$Fraction$Fraction, a, b)));
- }
- });
-var $author$project$Fraction$add = F2(
- function (a, b) {
- var pgcd = A2($lynn$elm_arithmetic$Arithmetic$gcd, a.f, b.f);
- var bDenBis = (b.f / pgcd) | 0;
- var aDenBis = (a.f / pgcd) | 0;
- return A2($author$project$Fraction$frac, (a.e * bDenBis) + (b.e * aDenBis), a.f * bDenBis);
- });
-var $elm$core$Result$andThen = F2(
- function (callback, result) {
- if (!result.$) {
- var value = result.a;
- return callback(value);
- } else {
- var msg = result.a;
- return $elm$core$Result$Err(msg);
- }
- });
-var $author$project$Fraction$inv = function (a) {
- var _v0 = a.e;
- if (!_v0) {
- return $elm$core$Result$Err('Division par zéro');
- } else {
- return $elm$core$Result$Ok(
- A2($author$project$Fraction$Fraction, a.f, a.e));
- }
-};
-var $author$project$Fraction$mul = F2(
- function (a, b) {
- var pgcdBis = A2($lynn$elm_arithmetic$Arithmetic$gcd, b.e, a.f);
- var pgcd = A2($lynn$elm_arithmetic$Arithmetic$gcd, a.e, b.f);
- var bNum = (b.e / pgcdBis) | 0;
- var bDen = (b.f / pgcd) | 0;
- var aNum = (a.e / pgcd) | 0;
- var aDen = (a.f / pgcdBis) | 0;
- return A2($author$project$Fraction$frac, aNum * bNum, aDen * bDen);
- });
-var $author$project$Fraction$div = F2(
- function (a, b) {
- return A2(
- $elm$core$Result$andThen,
- $author$project$Fraction$mul(a),
- $author$project$Fraction$inv(b));
- });
-var $author$project$Fraction$exp = F2(
- function (a, b) {
- var sgnDeB = (b.e < 0) ? (-1) : 1;
- var sgnDeA = (a.e < 0) ? (-1) : 1;
- return ((b.f === 1) && (b.e < 0)) ? A2(
- $author$project$Fraction$frac,
- A2($elm$core$Basics$pow, sgnDeA * a.f, sgnDeB * b.e),
- A2($elm$core$Basics$pow, sgnDeA * a.e, sgnDeB * b.e)) : ((b.f === 1) ? A2(
- $author$project$Fraction$frac,
- A2($elm$core$Basics$pow, a.e, b.e),
- A2($elm$core$Basics$pow, a.f, b.e)) : $elm$core$Result$Err('Extraction de racine impossible'));
- });
-var $elm$core$Result$map = F2(
- function (func, ra) {
- if (!ra.$) {
- var a = ra.a;
- return $elm$core$Result$Ok(
- func(a));
- } else {
- var e = ra.a;
- return $elm$core$Result$Err(e);
- }
- });
-var $author$project$Fraction$neg = function (a) {
- return A2($author$project$Fraction$Fraction, -a.e, a.f);
-};
-var $author$project$Fraction$opp = F3(
- function (operation, resultat1, resultat2) {
- var _v0 = _Utils_Tuple2(resultat1, resultat2);
- if (!_v0.a.$) {
- if (!_v0.b.$) {
- var fraction1 = _v0.a.a;
- var fraction2 = _v0.b.a;
- return A2(operation, fraction1, fraction2);
- } else {
- var erreur = _v0.b.a;
- return $elm$core$Result$Err(erreur);
- }
- } else {
- var erreur = _v0.a.a;
- return $elm$core$Result$Err(erreur);
- }
- });
-var $author$project$Fraction$sub = F2(
- function (a, b) {
- return A2(
- $author$project$Fraction$add,
- a,
- $author$project$Fraction$neg(b));
- });
-var $author$project$ParserMaths$evaluer = function (expression) {
- evaluer:
- while (true) {
- switch (expression.$) {
- case 0:
- var a = expression.a;
- var b = expression.b;
- return A3(
- $author$project$Fraction$opp,
- $author$project$Fraction$add,
- $author$project$ParserMaths$evaluer(a),
- $author$project$ParserMaths$evaluer(b));
- case 1:
- var a = expression.a;
- var b = expression.b;
- return A3(
- $author$project$Fraction$opp,
- $author$project$Fraction$sub,
- $author$project$ParserMaths$evaluer(a),
- $author$project$ParserMaths$evaluer(b));
- case 2:
- var a = expression.a;
- var b = expression.b;
- return A3(
- $author$project$Fraction$opp,
- $author$project$Fraction$mul,
- $author$project$ParserMaths$evaluer(a),
- $author$project$ParserMaths$evaluer(b));
- case 3:
- var a = expression.a;
- var b = expression.b;
- return A3(
- $author$project$Fraction$opp,
- $author$project$Fraction$div,
- $author$project$ParserMaths$evaluer(a),
- $author$project$ParserMaths$evaluer(b));
- case 4:
- var a = expression.a;
- var b = expression.b;
- return A3(
- $author$project$Fraction$opp,
- $author$project$Fraction$exp,
- $author$project$ParserMaths$evaluer(a),
- $author$project$ParserMaths$evaluer(b));
- case 5:
- var a = expression.a;
- return A2(
- $elm$core$Result$map,
- $author$project$Fraction$neg,
- $author$project$ParserMaths$evaluer(a));
- case 7:
- var l = expression.a;
- var $temp$expression = l;
- expression = $temp$expression;
- continue evaluer;
- case 6:
- var n = expression.a;
- return A2($author$project$Fraction$frac, n, 1);
- default:
- var a_i = expression.a;
- var x = expression.b;
- return $elm$core$Result$Err('Les polynômes ne sont pas encore pris en charge.');
- }
- }
-};
-var $author$project$ParserMaths$AddOp = 2;
-var $author$project$ParserMaths$DivOp = 1;
-var $elm$parser$Parser$Done = function (a) {
- return {$: 1, a: a};
-};
-var $author$project$ParserMaths$ExpOp = 4;
-var $author$project$ParserMaths$Grouping = function (a) {
- return {$: 7, a: a};
-};
-var $elm$parser$Parser$Loop = function (a) {
- return {$: 0, a: a};
-};
-var $author$project$ParserMaths$MulOp = 0;
-var $author$project$ParserMaths$Neg = function (a) {
- return {$: 5, a: a};
-};
-var $author$project$ParserMaths$NoOperand = {$: 0};
-var $author$project$ParserMaths$Operand = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $author$project$ParserMaths$Poly = F2(
- function (a, b) {
- return {$: 8, a: a, b: b};
- });
-var $author$project$ParserMaths$SubOp = 3;
-var $author$project$ParserMaths$Add = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $author$project$ParserMaths$Div = F2(
- function (a, b) {
- return {$: 3, a: a, b: b};
- });
-var $author$project$ParserMaths$Exp = F2(
- function (a, b) {
- return {$: 4, a: a, b: b};
- });
-var $author$project$ParserMaths$Mul = F2(
- function (a, b) {
- return {$: 2, a: a, b: b};
- });
-var $author$project$ParserMaths$Sub = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $author$project$ParserMaths$binary = F2(
- function (a, b) {
- if (!b.$) {
- return a;
- } else {
- var op = b.a;
- var e = b.b;
- switch (op) {
- case 0:
- return A2($author$project$ParserMaths$Mul, a, e);
- case 1:
- return A2($author$project$ParserMaths$Div, a, e);
- case 2:
- return A2($author$project$ParserMaths$Add, a, e);
- case 3:
- return A2($author$project$ParserMaths$Sub, a, e);
- default:
- return A2($author$project$ParserMaths$Exp, a, e);
- }
- }
- });
-var $author$project$ParserMaths$foldBinary = F2(
- function (left, operands) {
- return A3(
- $elm$core$List$foldr,
- F2(
- function (operand, expression) {
- return A2($author$project$ParserMaths$binary, expression, operand);
- }),
- left,
- operands);
- });
-var $elm$parser$Parser$ExpectingKeyword = function (a) {
- return {$: 9, a: a};
-};
-var $elm$parser$Parser$Advanced$keyword = function (_v0) {
- var kwd = _v0.a;
- var expecting = _v0.b;
- var progress = !$elm$core$String$isEmpty(kwd);
- return function (s) {
- var _v1 = A5($elm$parser$Parser$Advanced$isSubString, kwd, s.bl, s.eU, s.dT, s.a);
- var newOffset = _v1.a;
- var newRow = _v1.b;
- var newCol = _v1.c;
- return (_Utils_eq(newOffset, -1) || (0 <= A3(
- $elm$parser$Parser$Advanced$isSubChar,
- function (c) {
- return $elm$core$Char$isAlphaNum(c) || (c === '_');
- },
- newOffset,
- s.a))) ? A2(
- $elm$parser$Parser$Advanced$Bad,
- false,
- A2($elm$parser$Parser$Advanced$fromState, s, expecting)) : A3(
- $elm$parser$Parser$Advanced$Good,
- progress,
- 0,
- {dT: newCol, c: s.c, g: s.g, bl: newOffset, eU: newRow, a: s.a});
- };
-};
-var $elm$parser$Parser$keyword = function (kwd) {
- return $elm$parser$Parser$Advanced$keyword(
- A2(
- $elm$parser$Parser$Advanced$Token,
- kwd,
- $elm$parser$Parser$ExpectingKeyword(kwd)));
-};
-var $elm$parser$Parser$Advanced$lazy = function (thunk) {
- return function (s) {
- var _v0 = thunk(0);
- var parse = _v0;
- return parse(s);
- };
-};
-var $elm$parser$Parser$lazy = $elm$parser$Parser$Advanced$lazy;
-var $elm$parser$Parser$map = $elm$parser$Parser$Advanced$map;
-var $elm$parser$Parser$toAdvancedStep = function (step) {
- if (!step.$) {
- 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 $author$project$ParserMaths$Entier = function (a) {
- return {$: 6, a: a};
-};
-var $elm$parser$Parser$ExpectingBinary = {$: 4};
-var $elm$parser$Parser$ExpectingHex = {$: 2};
-var $elm$parser$Parser$ExpectingNumber = {$: 6};
-var $elm$parser$Parser$ExpectingOctal = {$: 3};
-var $elm$core$Result$fromMaybe = F2(
- function (err, maybe) {
- if (!maybe.$) {
- var v = maybe.a;
- return $elm$core$Result$Ok(v);
- } else {
- return $elm$core$Result$Err(err);
- }
- });
-var $elm$parser$Parser$number = function (i) {
- return $elm$parser$Parser$Advanced$number(
- {
- dD: A2($elm$core$Result$fromMaybe, $elm$parser$Parser$ExpectingBinary, i.dD),
- cg: $elm$parser$Parser$ExpectingNumber,
- d5: A2($elm$core$Result$fromMaybe, $elm$parser$Parser$ExpectingFloat, i.d5),
- ed: A2($elm$core$Result$fromMaybe, $elm$parser$Parser$ExpectingHex, i.ed),
- er: A2($elm$core$Result$fromMaybe, $elm$parser$Parser$ExpectingInt, i.er),
- es: $elm$parser$Parser$ExpectingNumber,
- eC: A2($elm$core$Result$fromMaybe, $elm$parser$Parser$ExpectingOctal, i.eC)
- });
-};
-var $author$project$ParserMaths$nombre = A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($author$project$ParserMaths$Entier),
- $elm$parser$Parser$number(
- {
- dD: $elm$core$Maybe$Nothing,
- d5: $elm$core$Maybe$Nothing,
- ed: $elm$core$Maybe$Nothing,
- er: $elm$core$Maybe$Just($elm$core$Basics$identity),
- eC: $elm$core$Maybe$Nothing
- }));
-var $author$project$ParserMaths$addHelper = function (operands) {
- return $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- function (right) {
- return $elm$parser$Parser$Loop(
- A2(
- $elm$core$List$cons,
- A2($author$project$ParserMaths$Operand, 2, right),
- operands));
- }),
- $elm$parser$Parser$symbol('+')),
- $elm$parser$Parser$spaces),
- $elm$parser$Parser$lazy(
- function (_v9) {
- return $author$project$ParserMaths$cyclic$mul();
- })),
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- function (right) {
- return $elm$parser$Parser$Loop(
- A2(
- $elm$core$List$cons,
- A2($author$project$ParserMaths$Operand, 3, right),
- operands));
- }),
- $elm$parser$Parser$symbol('-')),
- $elm$parser$Parser$spaces),
- $elm$parser$Parser$lazy(
- function (_v10) {
- return $author$project$ParserMaths$cyclic$mul();
- })),
- A2(
- $elm$parser$Parser$map,
- function (_v11) {
- return $elm$parser$Parser$Done(operands);
- },
- $elm$parser$Parser$succeed(0))
- ]));
-};
-var $author$project$ParserMaths$mulHelper = function (operands) {
- return $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- function (right) {
- return $elm$parser$Parser$Loop(
- A2(
- $elm$core$List$cons,
- A2($author$project$ParserMaths$Operand, 0, right),
- operands));
- }),
- $elm$parser$Parser$symbol('*')),
- $elm$parser$Parser$spaces),
- $elm$parser$Parser$lazy(
- function (_v3) {
- return $author$project$ParserMaths$cyclic$exp();
- })),
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- function (right) {
- return $elm$parser$Parser$Loop(
- A2(
- $elm$core$List$cons,
- A2($author$project$ParserMaths$Operand, 1, right),
- operands));
- }),
- $elm$parser$Parser$symbol('/')),
- $elm$parser$Parser$spaces),
- $elm$parser$Parser$lazy(
- function (_v4) {
- return $author$project$ParserMaths$cyclic$exp();
- })),
- A2(
- $elm$parser$Parser$map,
- function (_v5) {
- return $elm$parser$Parser$Done(operands);
- },
- $elm$parser$Parser$succeed(0))
- ]));
-};
-function $author$project$ParserMaths$cyclic$expr() {
- return $author$project$ParserMaths$cyclic$add();
-}
-function $author$project$ParserMaths$cyclic$add() {
- return A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($author$project$ParserMaths$foldBinary),
- A2(
- $elm$parser$Parser$ignorer,
- $author$project$ParserMaths$cyclic$mul(),
- $elm$parser$Parser$spaces)),
- A2($elm$parser$Parser$loop, _List_Nil, $author$project$ParserMaths$addHelper));
-}
-function $author$project$ParserMaths$cyclic$mul() {
- return A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($author$project$ParserMaths$foldBinary),
- A2(
- $elm$parser$Parser$ignorer,
- $author$project$ParserMaths$cyclic$exp(),
- $elm$parser$Parser$spaces)),
- A2($elm$parser$Parser$loop, _List_Nil, $author$project$ParserMaths$mulHelper));
-}
-function $author$project$ParserMaths$cyclic$exp() {
- return A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($author$project$ParserMaths$binary),
- A2(
- $elm$parser$Parser$ignorer,
- $author$project$ParserMaths$cyclic$primary(),
- $elm$parser$Parser$spaces)),
- $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- $author$project$ParserMaths$Operand(4)),
- $elm$parser$Parser$symbol('^')),
- $elm$parser$Parser$spaces),
- $elm$parser$Parser$lazy(
- function (_v8) {
- return $author$project$ParserMaths$cyclic$exp();
- })),
- $elm$parser$Parser$succeed($author$project$ParserMaths$NoOperand)
- ])));
-}
-function $author$project$ParserMaths$cyclic$primary() {
- return A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed(
- F2(
- function (op, literal) {
- if (op.$ === 1) {
- return literal;
- } else {
- return $author$project$ParserMaths$Neg(literal);
- }
- })),
- $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($elm$core$Maybe$Just),
- $elm$parser$Parser$symbol('-')),
- $elm$parser$Parser$succeed($elm$core$Maybe$Nothing)
- ]))),
- $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- $author$project$ParserMaths$cyclic$grouping(),
- $author$project$ParserMaths$cyclic$poly(),
- $author$project$ParserMaths$nombre
- ])));
-}
-function $author$project$ParserMaths$cyclic$grouping() {
- return A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($author$project$ParserMaths$Grouping),
- $elm$parser$Parser$symbol('(')),
- $elm$parser$Parser$spaces),
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$lazy(
- function (_v6) {
- return $author$project$ParserMaths$cyclic$expr();
- }),
- $elm$parser$Parser$spaces),
- $elm$parser$Parser$symbol(')')));
-}
-function $author$project$ParserMaths$cyclic$poly() {
- return A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($author$project$ParserMaths$Poly),
- $elm$parser$Parser$keyword('Poly')),
- $elm$parser$Parser$spaces),
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$sequence(
- {
- aD: ']',
- aH: $elm$parser$Parser$lazy(
- function (_v0) {
- return $author$project$ParserMaths$cyclic$expr();
- }),
- aO: ',',
- aP: $elm$parser$Parser$spaces,
- Z: '[',
- a$: 0
- }),
- $elm$parser$Parser$spaces)),
- $elm$parser$Parser$variable(
- {
- cr: function (_v1) {
- return false;
- },
- cX: $elm$core$Set$fromList(_List_Nil),
- Z: function (_v2) {
- return true;
- }
- }));
-}
-var $author$project$ParserMaths$expr = $author$project$ParserMaths$cyclic$expr();
-$author$project$ParserMaths$cyclic$expr = function () {
- return $author$project$ParserMaths$expr;
-};
-var $author$project$ParserMaths$add = $author$project$ParserMaths$cyclic$add();
-$author$project$ParserMaths$cyclic$add = function () {
- return $author$project$ParserMaths$add;
-};
-var $author$project$ParserMaths$mul = $author$project$ParserMaths$cyclic$mul();
-$author$project$ParserMaths$cyclic$mul = function () {
- return $author$project$ParserMaths$mul;
-};
-var $author$project$ParserMaths$exp = $author$project$ParserMaths$cyclic$exp();
-$author$project$ParserMaths$cyclic$exp = function () {
- return $author$project$ParserMaths$exp;
-};
-var $author$project$ParserMaths$primary = $author$project$ParserMaths$cyclic$primary();
-$author$project$ParserMaths$cyclic$primary = function () {
- return $author$project$ParserMaths$primary;
-};
-var $author$project$ParserMaths$grouping = $author$project$ParserMaths$cyclic$grouping();
-$author$project$ParserMaths$cyclic$grouping = function () {
- return $author$project$ParserMaths$grouping;
-};
-var $author$project$ParserMaths$poly = $author$project$ParserMaths$cyclic$poly();
-$author$project$ParserMaths$cyclic$poly = function () {
- return $author$project$ParserMaths$poly;
-};
-var $author$project$ParserMaths$parseMaths = function (source) {
- return A2($elm$parser$Parser$run, $author$project$ParserMaths$expr, source);
-};
-var $author$project$Fraction$teX = function (a) {
- var _v0 = a.f;
- if (_v0 === 1) {
- return $elm$core$String$fromInt(a.e);
- } else {
- return (a.e < 0) ? ('-\\frac{' + ($elm$core$String$fromInt(-a.e) + ('}{' + ($elm$core$String$fromInt(a.f) + '}')))) : ('\\frac{' + ($elm$core$String$fromInt(a.e) + ('}{' + ($elm$core$String$fromInt(a.f) + '}'))));
- }
-};
-var $author$project$GenerateurDeProblemes$voirTexteVariable = function (txtvar) {
- if (!txtvar.$) {
- var txt = txtvar.a;
- return txt;
- } else {
- var _var = txtvar.a;
- var expressionParseePotentielle = $author$project$ParserMaths$parseMaths(_var);
- if (expressionParseePotentielle.$ === 1) {
- var erreur = expressionParseePotentielle.a;
- return 'L\'expression est mal formée.';
- } else {
- var expressionParsee = expressionParseePotentielle.a;
- var _v2 = A2(
- $elm$core$Result$map,
- $author$project$Fraction$teX,
- $author$project$ParserMaths$evaluer(expressionParsee));
- if (!_v2.$) {
- var a = _v2.a;
- return a;
- } else {
- var erreur = _v2.a;
- return erreur;
- }
- }
- }
-};
-var $author$project$GenerateurDeProblemes$voirMacro = A2(
- $elm$core$Basics$composeL,
- $elm$core$String$concat,
- $elm$core$List$map($author$project$GenerateurDeProblemes$voirTexteVariable));
-var $author$project$GenerateurDeProblemes$evalBoxVoirBloc = function (blc) {
- var f = function (prp) {
- if (!prp.$) {
- var mc = prp.a;
- return '+' + $author$project$GenerateurDeProblemes$voirMacro(mc);
- } else {
- var mc = prp.a;
- return '-' + $author$project$GenerateurDeProblemes$voirMacro(mc);
- }
- };
- switch (blc.$) {
- case 0:
- var blcs = blc.a;
- return $author$project$GenerateurDeProblemes$evalBoxVoirBlocs(blcs);
- case 2:
- var mcr = blc.a;
- var sjt = blc.b;
- return _Utils_ap(
- $author$project$GenerateurDeProblemes$voirMacro(mcr),
- $author$project$GenerateurDeProblemes$evalBoxVoirBlocs(sjt));
- case 3:
- var mcr = blc.a;
- var prps = blc.b;
- return $author$project$GenerateurDeProblemes$voirMacro(mcr) + ('\n' + A2(
- $elm$core$String$join,
- '\n',
- A2($elm$core$List$map, f, prps)));
- case 4:
- var prps = blc.a;
- return $elm$core$String$concat(
- A2($elm$core$List$map, f, prps));
- default:
- var ar = blc.a;
- var sjt = blc.b;
- return '' + $author$project$GenerateurDeProblemes$evalBoxVoirBlocs(sjt);
- }
-};
-var $author$project$GenerateurDeProblemes$evalBoxVoirBlocs = function (blcs) {
- return A2(
- $elm$core$String$join,
- '\n',
- A2($elm$core$List$map, $author$project$GenerateurDeProblemes$evalBoxVoirBloc, blcs));
-};
-var $elm$random$Random$Generate = $elm$core$Basics$identity;
-var $elm$random$Random$Seed = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $elm$random$Random$next = function (_v0) {
- var state0 = _v0.a;
- var incr = _v0.b;
- return A2($elm$random$Random$Seed, ((state0 * 1664525) + incr) >>> 0, incr);
-};
-var $elm$random$Random$initialSeed = function (x) {
- var _v0 = $elm$random$Random$next(
- A2($elm$random$Random$Seed, 0, 1013904223));
- var state1 = _v0.a;
- var incr = _v0.b;
- var state2 = (state1 + x) >>> 0;
- return $elm$random$Random$next(
- A2($elm$random$Random$Seed, state2, incr));
-};
-var $elm$time$Time$Name = function (a) {
- return {$: 0, a: a};
-};
-var $elm$time$Time$Offset = function (a) {
- return {$: 1, a: a};
-};
-var $elm$time$Time$Zone = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $elm$time$Time$customZone = $elm$time$Time$Zone;
-var $elm$time$Time$now = _Time_now($elm$time$Time$millisToPosix);
-var $elm$time$Time$posixToMillis = function (_v0) {
- var millis = _v0;
- return millis;
-};
-var $elm$random$Random$init = A2(
- $elm$core$Task$andThen,
- function (time) {
- return $elm$core$Task$succeed(
- $elm$random$Random$initialSeed(
- $elm$time$Time$posixToMillis(time)));
- },
- $elm$time$Time$now);
-var $elm$random$Random$step = F2(
- function (_v0, seed) {
- var generator = _v0;
- return generator(seed);
- });
-var $elm$random$Random$onEffects = F3(
- function (router, commands, seed) {
- if (!commands.b) {
- return $elm$core$Task$succeed(seed);
- } else {
- var generator = commands.a;
- var rest = commands.b;
- var _v1 = A2($elm$random$Random$step, generator, seed);
- var value = _v1.a;
- var newSeed = _v1.b;
- return A2(
- $elm$core$Task$andThen,
- function (_v2) {
- return A3($elm$random$Random$onEffects, router, rest, newSeed);
- },
- A2($elm$core$Platform$sendToApp, router, value));
- }
- });
-var $elm$random$Random$onSelfMsg = F3(
- function (_v0, _v1, seed) {
- return $elm$core$Task$succeed(seed);
- });
-var $elm$random$Random$map = F2(
- function (func, _v0) {
- var genA = _v0;
- return function (seed0) {
- var _v1 = genA(seed0);
- var a = _v1.a;
- var seed1 = _v1.b;
- return _Utils_Tuple2(
- func(a),
- seed1);
- };
- });
-var $elm$random$Random$cmdMap = F2(
- function (func, _v0) {
- var generator = _v0;
- return A2($elm$random$Random$map, func, generator);
- });
-_Platform_effectManagers['Random'] = _Platform_createManager($elm$random$Random$init, $elm$random$Random$onEffects, $elm$random$Random$onSelfMsg, $elm$random$Random$cmdMap);
-var $elm$random$Random$command = _Platform_leaf('Random');
-var $elm$random$Random$generate = F2(
- function (tagger, generator) {
- return $elm$random$Random$command(
- A2($elm$random$Random$map, tagger, generator));
- });
-var $author$project$GenerateurDeProblemes$quizScanVoirBloc = function (prblm) {
- switch (prblm.$) {
- case 0:
- var blcs = prblm.a;
- return '\n\\begin{Sujet}\n' + ($author$project$GenerateurDeProblemes$quizScanVoirBlocs(blcs) + '\n\\end{Sujet}');
- case 2:
- var mcr = prblm.a;
- var sjt = prblm.b;
- return $author$project$GenerateurDeProblemes$voirMacro(mcr) + ('\n' + $author$project$GenerateurDeProblemes$quizScanVoirBlocs(sjt));
- case 3:
- var mcr = prblm.a;
- var prps = prblm.b;
- var f = function (prp) {
- if (!prp.$) {
- var mc = prp.a;
- return ' \\Vrai{' + ($author$project$GenerateurDeProblemes$voirMacro(mc) + '}');
- } else {
- var mc = prp.a;
- return ' \\Faux{' + ($author$project$GenerateurDeProblemes$voirMacro(mc) + '}');
- }
- };
- return '\n \\begin{QCM}\n' + ($author$project$GenerateurDeProblemes$voirMacro(mcr) + ('\n \\begin{enumerate}\n' + (A2(
- $elm$core$String$join,
- '\n',
- A2($elm$core$List$map, f, prps)) + '\n \\end{enumerate}\n \\end{QCM}')));
- case 4:
- var prps = prblm.a;
- var f = function (prp) {
- if (!prp.$) {
- var mc = prp.a;
- return '\n \\begin{VraiFaux}\n \\Vrai{' + ($author$project$GenerateurDeProblemes$voirMacro(mc) + '}\n \\end{VraiFaux}');
- } else {
- var mc = prp.a;
- return '\n \\begin{VraiFaux}\n \\Faux{' + ($author$project$GenerateurDeProblemes$voirMacro(mc) + '}\n \\end{VraiFaux}');
- }
- };
- return $elm$core$String$concat(
- A2($elm$core$List$map, f, prps));
- default:
- var ar = prblm.a;
- var sjt = prblm.b;
- return '' + $author$project$GenerateurDeProblemes$quizScanVoirBlocs(sjt);
- }
-};
-var $author$project$GenerateurDeProblemes$quizScanVoirBlocs = function (blcs) {
- return A2(
- $elm$core$String$join,
- '\n',
- A2($elm$core$List$map, $author$project$GenerateurDeProblemes$quizScanVoirBloc, blcs));
-};
-var $author$project$GenerateurDeProblemes$quizScanVoirSujet = function (blcs) {
- return '\\documentclass[oneside,twocolumn,landscape]{book}\r\n\\usepackage[T1]{fontenc}\r\n\\usepackage[utf8]{inputenc}\r\n\\usepackage{geometry}\r\n\\geometry{verbose,tmargin=1cm,bmargin=1cm,lmargin=2cm,rmargin=2cm}\r\n\\setcounter{secnumdepth}{3}\r\n\\setcounter{tocdepth}{3}\r\n\\usepackage{mathrsfs}\r\n\\usepackage{amsmath}\r\n\\usepackage{amssymb}\r\n\\usepackage{amsfonts}\r\n\\usepackage{bbold}\r\n\\usepackage{xcolor}\r\n\\pagestyle{empty}\r\n\\newcounter{NumeroDuSujet}\r\n\\setcounter{NumeroDuSujet}{10}\r\n\\newenvironment{Sujet}[1][]\r\n {\\refstepcounter{NumeroDuSujet}\\section*{Numéro du sujet :~\\theNumeroDuSujet}\\par #1}{\\newpage}\r\n\\newcounter{NumeroDeLaQuestion}[NumeroDuSujet]\r\n\\newenvironment{VraiFaux}[1][]\r\n {\\begin{enumerate}\\setcounter{enumi}{\\theNumeroDeLaQuestion}#1}\r\n {\\end{enumerate}\\stepcounter{NumeroDeLaQuestion}}\r\n\\newenvironment{QCM}[1][]\r\n {\\begin{enumerate}\\setcounter{enumi}{\\theNumeroDeLaQuestion}\\item #1}\r\n {\\end{enumerate}\\stepcounter{NumeroDeLaQuestion}}\r\n\r\n\\let\\Vrai\\item\r\n\\let\\Faux\\item\r\n\r\n% Pour obtenir les corrigés, retirer les % devant les deux lignes suivantes :\r\n\r\n%\\def\\Vrai#1{\\item{\\color{green}#1}}\r\n%\\def\\Faux#1{\\item{\\color{red}#1}}\r\n\r\n\\begin{document}\r\n\r\n' + ($author$project$GenerateurDeProblemes$quizScanVoirBlocs(blcs) + '\n\n\\end{document}');
-};
-var $author$project$GenerateurDeProblemes$Sujet = function (a) {
- return {$: 0, a: a};
-};
-var $author$project$GenerateurDeProblemes$Entete = F2(
- function (a, b) {
- return {$: 2, a: a, b: b};
- });
-var $author$project$GenerateurDeProblemes$VariableAremplacer = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $author$project$GenerateurDeProblemes$Aremplacer = F2(
- function (_var, vals) {
- return {br: vals, a2: _var};
- });
-var $author$project$GenerateurDeProblemes$espaces = $elm$parser$Parser$chompWhile(
- $elm$core$Basics$eq(' '));
-var $author$project$ParserMaths$evaluerBis = function (expression) {
- var _v0 = $author$project$ParserMaths$evaluer(expression);
- if (_v0.$ === 1) {
- return {f: 1, e: 666};
- } else {
- var a = _v0.a;
- return a;
- }
-};
-var $author$project$Fraction$raw = function (a) {
- return '(' + ($elm$core$String$fromInt(a.e) + ('/' + ($elm$core$String$fromInt(a.f) + ')')));
-};
-var $author$project$GenerateurDeProblemes$reserve = $elm$core$Set$fromList(
- _List_fromArray(
- ['qcm', 'vrfx']));
-var $author$project$GenerateurDeProblemes$aRemplacer = A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- F2(
- function (x, y) {
- return A2(
- $author$project$GenerateurDeProblemes$Aremplacer,
- x,
- A2(
- $elm$core$List$map,
- A2($elm$core$Basics$composeL, $author$project$Fraction$raw, $author$project$ParserMaths$evaluerBis),
- y));
- })),
- $author$project$GenerateurDeProblemes$espaces),
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$variable(
- {cr: $elm$core$Char$isAlpha, cX: $author$project$GenerateurDeProblemes$reserve, Z: $elm$core$Char$isAlpha}),
- $author$project$GenerateurDeProblemes$espaces),
- $elm$parser$Parser$symbol(':'))),
- $elm$parser$Parser$sequence(
- {aD: '', aH: $author$project$ParserMaths$expr, aO: ',', aP: $author$project$GenerateurDeProblemes$espaces, Z: '', a$: 1}));
-var $elm$parser$Parser$andThen = $elm$parser$Parser$Advanced$andThen;
-var $elm$parser$Parser$Advanced$backtrackable = function (_v0) {
- var parse = _v0;
- return function (s0) {
- var _v1 = parse(s0);
- if (_v1.$ === 1) {
- var x = _v1.b;
- return A2($elm$parser$Parser$Advanced$Bad, false, x);
- } else {
- var a = _v1.b;
- var s1 = _v1.c;
- return A3($elm$parser$Parser$Advanced$Good, false, a, s1);
- }
- };
-};
-var $elm$parser$Parser$backtrackable = $elm$parser$Parser$Advanced$backtrackable;
-var $elm$parser$Parser$ExpectingEnd = {$: 10};
-var $elm$parser$Parser$Advanced$end = function (x) {
- return function (s) {
- return _Utils_eq(
- $elm$core$String$length(s.a),
- s.bl) ? A3($elm$parser$Parser$Advanced$Good, false, 0, 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 $author$project$GenerateurDeProblemes$flip = F3(
- function (f, a, b) {
- return A2(f, b, a);
- });
-var $elm$parser$Parser$Advanced$getCol = function (s) {
- return A3($elm$parser$Parser$Advanced$Good, false, s.dT, s);
-};
-var $elm$parser$Parser$getCol = $elm$parser$Parser$Advanced$getCol;
-var $elm$parser$Parser$Advanced$getIndent = function (s) {
- return A3($elm$parser$Parser$Advanced$Good, false, s.g, s);
-};
-var $elm$parser$Parser$getIndent = $elm$parser$Parser$Advanced$getIndent;
-var $author$project$GenerateurDeProblemes$Variable = function (a) {
- return {$: 1, a: a};
-};
-var $elm$parser$Parser$Advanced$findSubString = _Parser_findSubString;
-var $elm$parser$Parser$Advanced$chompUntil = function (_v0) {
- var str = _v0.a;
- var expecting = _v0.b;
- return function (s) {
- var _v1 = A5($elm$parser$Parser$Advanced$findSubString, str, s.bl, s.eU, s.dT, s.a);
- var newOffset = _v1.a;
- var newRow = _v1.b;
- var newCol = _v1.c;
- return _Utils_eq(newOffset, -1) ? A2(
- $elm$parser$Parser$Advanced$Bad,
- false,
- A4($elm$parser$Parser$Advanced$fromInfo, newRow, newCol, expecting, s.c)) : A3(
- $elm$parser$Parser$Advanced$Good,
- _Utils_cmp(s.bl, newOffset) < 0,
- 0,
- {dT: newCol, c: s.c, g: s.g, bl: newOffset, eU: newRow, a: s.a});
- };
-};
-var $elm$parser$Parser$chompUntil = function (str) {
- return $elm$parser$Parser$Advanced$chompUntil(
- $elm$parser$Parser$toToken(str));
-};
-var $author$project$GenerateurDeProblemes$expressionVariable = A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($author$project$GenerateurDeProblemes$Variable),
- $elm$parser$Parser$symbol('#')),
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$getChompedString(
- $elm$parser$Parser$chompUntil('#')),
- $elm$parser$Parser$symbol('#')));
-var $author$project$GenerateurDeProblemes$Texte = function (a) {
- return {$: 0, a: a};
-};
-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$parser$Parser$token = function (str) {
- return $elm$parser$Parser$Advanced$token(
- $elm$parser$Parser$toToken(str));
-};
-var $author$project$GenerateurDeProblemes$retourAlaLigne = function () {
- var suite = function (ind) {
- return A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- $author$project$GenerateurDeProblemes$Texte('\n')),
- $elm$parser$Parser$token('\n')),
- $elm$parser$Parser$token(
- A2($elm$core$String$repeat, ind - 1, ' ')));
- };
- return A2($elm$parser$Parser$andThen, suite, $elm$parser$Parser$getIndent);
-}();
-var $author$project$GenerateurDeProblemes$texteSansVariables = function () {
- var condition = function (caractere) {
- return (caractere !== '#') && (caractere !== '\n');
- };
- return A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($author$project$GenerateurDeProblemes$Texte),
- $elm$parser$Parser$getChompedString(
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(0),
- $elm$parser$Parser$chompIf(condition)),
- $elm$parser$Parser$chompWhile(condition))));
-}();
-var $author$project$GenerateurDeProblemes$macro = function () {
- var suite = function (ls) {
- return $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed(
- function (l) {
- return $elm$parser$Parser$Loop(
- A2($elm$core$List$cons, l, ls));
- }),
- $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- $author$project$GenerateurDeProblemes$expressionVariable,
- $author$project$GenerateurDeProblemes$texteSansVariables,
- $elm$parser$Parser$backtrackable($author$project$GenerateurDeProblemes$retourAlaLigne)
- ]))),
- A2(
- $elm$parser$Parser$map,
- function (_v0) {
- return $elm$parser$Parser$Done(
- $elm$core$List$reverse(ls));
- },
- $elm$parser$Parser$succeed(0))
- ]));
- };
- return A2($elm$parser$Parser$loop, _List_Nil, suite);
-}();
-var $elm$core$Tuple$pair = F2(
- function (a, b) {
- return _Utils_Tuple2(a, b);
- });
-var $author$project$GenerateurDeProblemes$QCM = F2(
- function (a, b) {
- return {$: 3, a: a, b: b};
- });
-var $author$project$GenerateurDeProblemes$Faux = function (a) {
- return {$: 1, a: a};
-};
-var $author$project$GenerateurDeProblemes$Vrai = function (a) {
- return {$: 0, a: a};
-};
-var $elm$core$Tuple$second = function (_v0) {
- var y = _v0.b;
- return y;
-};
-var $author$project$GenerateurDeProblemes$propositions = function () {
- var suiteBis = function (prps) {
- var fin = $elm$parser$Parser$map(
- function (_v0) {
- return $elm$parser$Parser$Done(prps);
- });
- var boucle = $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- function (mcr) {
- return $elm$parser$Parser$Loop(
- A2(
- $elm$core$List$cons,
- $author$project$GenerateurDeProblemes$Vrai(mcr),
- prps));
- }),
- $elm$parser$Parser$symbol('+')),
- $author$project$GenerateurDeProblemes$macro),
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(
- function (mcr) {
- return $elm$parser$Parser$Loop(
- A2(
- $elm$core$List$cons,
- $author$project$GenerateurDeProblemes$Faux(mcr),
- prps));
- }),
- $elm$parser$Parser$symbol('-')),
- $author$project$GenerateurDeProblemes$macro)
- ]));
- var suite = function (col_ind) {
- return $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- fin(
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(0),
- $elm$parser$Parser$end)),
- (_Utils_cmp(col_ind.a, col_ind.b) > 0) ? boucle : fin(
- $elm$parser$Parser$succeed(0))
- ]));
- };
- return A2(
- $elm$parser$Parser$andThen,
- suite,
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($elm$core$Tuple$pair),
- $elm$parser$Parser$spaces),
- $elm$parser$Parser$getCol),
- $elm$parser$Parser$getIndent));
- };
- return A2($elm$parser$Parser$loop, _List_Nil, suiteBis);
-}();
-var $author$project$GenerateurDeProblemes$qcm = A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($author$project$GenerateurDeProblemes$QCM),
- $elm$parser$Parser$keyword('qcm')),
- $author$project$GenerateurDeProblemes$espaces),
- $author$project$GenerateurDeProblemes$macro),
- $author$project$GenerateurDeProblemes$propositions);
-var $author$project$GenerateurDeProblemes$VraiFaux = function (a) {
- return {$: 4, a: a};
-};
-var $author$project$GenerateurDeProblemes$vraiFaux = A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($author$project$GenerateurDeProblemes$VraiFaux),
- $elm$parser$Parser$keyword('vrfx')),
- $author$project$GenerateurDeProblemes$propositions);
-var $elm$parser$Parser$Advanced$changeIndent = F2(
- function (newIndent, s) {
- return {dT: s.dT, c: s.c, g: newIndent, bl: s.bl, eU: s.eU, a: s.a};
- });
-var $elm$parser$Parser$Advanced$withIndent = F2(
- function (newIndent, _v0) {
- var parse = _v0;
- return function (s0) {
- var _v1 = parse(
- A2($elm$parser$Parser$Advanced$changeIndent, newIndent, s0));
- if (!_v1.$) {
- var p = _v1.a;
- var a = _v1.b;
- var s1 = _v1.c;
- return A3(
- $elm$parser$Parser$Advanced$Good,
- p,
- a,
- A2($elm$parser$Parser$Advanced$changeIndent, s0.g, s1));
- } else {
- var p = _v1.a;
- var x = _v1.b;
- return A2($elm$parser$Parser$Advanced$Bad, p, x);
- }
- };
- });
-var $elm$parser$Parser$withIndent = $elm$parser$Parser$Advanced$withIndent;
-function $author$project$GenerateurDeProblemes$cyclic$bloc() {
- var suite = A2(
- $author$project$GenerateurDeProblemes$flip,
- $elm$parser$Parser$withIndent,
- $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- $author$project$GenerateurDeProblemes$vraiFaux,
- $author$project$GenerateurDeProblemes$qcm,
- $elm$parser$Parser$backtrackable(
- $author$project$GenerateurDeProblemes$cyclic$variableAremplacer()),
- $author$project$GenerateurDeProblemes$cyclic$entete()
- ])));
- return A2($elm$parser$Parser$andThen, suite, $elm$parser$Parser$getCol);
-}
-function $author$project$GenerateurDeProblemes$cyclic$variableAremplacer() {
- return A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($author$project$GenerateurDeProblemes$VariableAremplacer),
- $author$project$GenerateurDeProblemes$aRemplacer),
- $author$project$GenerateurDeProblemes$cyclic$blocs());
-}
-function $author$project$GenerateurDeProblemes$cyclic$entete() {
- return A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed($author$project$GenerateurDeProblemes$Entete),
- $author$project$GenerateurDeProblemes$macro),
- $author$project$GenerateurDeProblemes$cyclic$blocs());
-}
-function $author$project$GenerateurDeProblemes$cyclic$blocs() {
- var problemes = function (prblms) {
- var fin = $elm$parser$Parser$map(
- function (_v0) {
- return $elm$parser$Parser$Done(
- $elm$core$List$reverse(prblms));
- });
- var boucle = A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed(
- function (prblm) {
- return $elm$parser$Parser$Loop(
- A2($elm$core$List$cons, prblm, prblms));
- }),
- $author$project$GenerateurDeProblemes$cyclic$bloc());
- var suite = function (col_ind) {
- return $elm$parser$Parser$oneOf(
- _List_fromArray(
- [
- fin(
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed(0),
- $elm$parser$Parser$end)),
- (_Utils_cmp(col_ind.a, col_ind.b) > 0) ? boucle : fin(
- $elm$parser$Parser$succeed(0))
- ]));
- };
- return A2(
- $elm$parser$Parser$andThen,
- suite,
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$keeper,
- A2(
- $elm$parser$Parser$ignorer,
- $elm$parser$Parser$succeed($elm$core$Tuple$pair),
- $elm$parser$Parser$spaces),
- $elm$parser$Parser$getCol),
- $elm$parser$Parser$getIndent));
- };
- return A2($elm$parser$Parser$loop, _List_Nil, problemes);
-}
-var $author$project$GenerateurDeProblemes$bloc = $author$project$GenerateurDeProblemes$cyclic$bloc();
-$author$project$GenerateurDeProblemes$cyclic$bloc = function () {
- return $author$project$GenerateurDeProblemes$bloc;
-};
-var $author$project$GenerateurDeProblemes$variableAremplacer = $author$project$GenerateurDeProblemes$cyclic$variableAremplacer();
-$author$project$GenerateurDeProblemes$cyclic$variableAremplacer = function () {
- return $author$project$GenerateurDeProblemes$variableAremplacer;
-};
-var $author$project$GenerateurDeProblemes$entete = $author$project$GenerateurDeProblemes$cyclic$entete();
-$author$project$GenerateurDeProblemes$cyclic$entete = function () {
- return $author$project$GenerateurDeProblemes$entete;
-};
-var $author$project$GenerateurDeProblemes$blocs = $author$project$GenerateurDeProblemes$cyclic$blocs();
-$author$project$GenerateurDeProblemes$cyclic$blocs = function () {
- return $author$project$GenerateurDeProblemes$blocs;
-};
-var $elm$core$List$singleton = function (value) {
- return _List_fromArray(
- [value]);
-};
-var $author$project$GenerateurDeProblemes$sujet = A2(
- $elm$parser$Parser$keeper,
- $elm$parser$Parser$succeed(
- A2($elm$core$Basics$composeL, $elm$core$List$singleton, $author$project$GenerateurDeProblemes$Sujet)),
- $author$project$GenerateurDeProblemes$blocs);
-var $elm$random$Random$andThen = F2(
- function (callback, _v0) {
- var genA = _v0;
- return function (seed) {
- var _v1 = genA(seed);
- var result = _v1.a;
- var newSeed = _v1.b;
- var _v2 = callback(result);
- var genB = _v2;
- return genB(newSeed);
- };
- });
-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$random$Random$map2 = F3(
- function (func, _v0, _v1) {
- var genA = _v0;
- var genB = _v1;
- return function (seed0) {
- var _v2 = genA(seed0);
- var a = _v2.a;
- var seed1 = _v2.b;
- var _v3 = genB(seed1);
- var b = _v3.a;
- var seed2 = _v3.b;
- return _Utils_Tuple2(
- A2(func, a, b),
- seed2);
- };
- });
-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$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLeTexteVariable = F3(
- function (_var, val, tv) {
- if (!tv.$) {
- var chaine = tv.a;
- return $author$project$GenerateurDeProblemes$Texte(chaine);
- } else {
- var chaine = tv.a;
- return $author$project$GenerateurDeProblemes$Variable(
- A3($elm$core$String$replace, _var, val, chaine));
- }
- });
-var $author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaMacro = F3(
- function (_var, val, mcr) {
- return A2(
- $elm$core$List$map,
- A2($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLeTexteVariable, _var, val),
- mcr);
- });
-var $author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaProposition = F3(
- function (vrbl, vlr, prp) {
- if (!prp.$) {
- var mcr = prp.a;
- return $author$project$GenerateurDeProblemes$Vrai(
- A3($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaMacro, vrbl, vlr, mcr));
- } else {
- var mcr = prp.a;
- return $author$project$GenerateurDeProblemes$Faux(
- A3($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaMacro, vrbl, vlr, mcr));
- }
- });
-var $elm_community$random_extra$Random$Extra$sequence = A2(
- $elm$core$List$foldr,
- $elm$random$Random$map2($elm$core$List$cons),
- $elm$random$Random$constant(_List_Nil));
-var $elm$core$Bitwise$xor = _Bitwise_xor;
-var $elm$random$Random$peel = function (_v0) {
- var state = _v0.a;
- var word = (state ^ (state >>> ((state >>> 28) + 4))) * 277803737;
- return ((word >>> 22) ^ word) >>> 0;
-};
-var $elm$random$Random$int = F2(
- function (a, b) {
- return function (seed0) {
- var _v0 = (_Utils_cmp(a, b) < 0) ? _Utils_Tuple2(a, b) : _Utils_Tuple2(b, a);
- var lo = _v0.a;
- var hi = _v0.b;
- var range = (hi - lo) + 1;
- if (!((range - 1) & range)) {
- return _Utils_Tuple2(
- (((range - 1) & $elm$random$Random$peel(seed0)) >>> 0) + lo,
- $elm$random$Random$next(seed0));
- } else {
- var threshhold = (((-range) >>> 0) % range) >>> 0;
- var accountForBias = function (seed) {
- accountForBias:
- while (true) {
- var x = $elm$random$Random$peel(seed);
- var seedN = $elm$random$Random$next(seed);
- if (_Utils_cmp(x, threshhold) < 0) {
- var $temp$seed = seedN;
- seed = $temp$seed;
- continue accountForBias;
- } else {
- return _Utils_Tuple2((x % range) + lo, seedN);
- }
- }
- };
- return accountForBias(seed0);
- }
- };
- });
-var $elm$random$Random$maxInt = 2147483647;
-var $elm$random$Random$minInt = -2147483648;
-var $elm_community$random_extra$Random$List$anyInt = A2($elm$random$Random$int, $elm$random$Random$minInt, $elm$random$Random$maxInt);
-var $elm$random$Random$map3 = F4(
- function (func, _v0, _v1, _v2) {
- var genA = _v0;
- var genB = _v1;
- var genC = _v2;
- return function (seed0) {
- var _v3 = genA(seed0);
- var a = _v3.a;
- var seed1 = _v3.b;
- var _v4 = genB(seed1);
- var b = _v4.a;
- var seed2 = _v4.b;
- var _v5 = genC(seed2);
- var c = _v5.a;
- var seed3 = _v5.b;
- return _Utils_Tuple2(
- A3(func, a, b, c),
- seed3);
- };
- });
-var $elm$core$Bitwise$or = _Bitwise_or;
-var $elm$random$Random$independentSeed = function (seed0) {
- var makeIndependentSeed = F3(
- function (state, b, c) {
- return $elm$random$Random$next(
- A2($elm$random$Random$Seed, state, (1 | (b ^ c)) >>> 0));
- });
- var gen = A2($elm$random$Random$int, 0, 4294967295);
- return A2(
- $elm$random$Random$step,
- A4($elm$random$Random$map3, makeIndependentSeed, gen, gen, gen),
- seed0);
-};
-var $elm$core$List$sortBy = _List_sortBy;
-var $elm_community$random_extra$Random$List$shuffle = function (list) {
- return A2(
- $elm$random$Random$map,
- function (independentSeed) {
- return A2(
- $elm$core$List$map,
- $elm$core$Tuple$first,
- A2(
- $elm$core$List$sortBy,
- $elm$core$Tuple$second,
- A3(
- $elm$core$List$foldl,
- F2(
- function (item, _v0) {
- var acc = _v0.a;
- var seed = _v0.b;
- var _v1 = A2($elm$random$Random$step, $elm_community$random_extra$Random$List$anyInt, seed);
- var tag = _v1.a;
- var nextSeed = _v1.b;
- return _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- _Utils_Tuple2(item, tag),
- acc),
- nextSeed);
- }),
- _Utils_Tuple2(_List_Nil, independentSeed),
- list).a));
- },
- $elm$random$Random$independentSeed);
-};
-var $elm$random$Random$addOne = function (value) {
- return _Utils_Tuple2(1, value);
-};
-var $elm$random$Random$float = F2(
- function (a, b) {
- return function (seed0) {
- var seed1 = $elm$random$Random$next(seed0);
- var range = $elm$core$Basics$abs(b - a);
- var n1 = $elm$random$Random$peel(seed1);
- var n0 = $elm$random$Random$peel(seed0);
- var lo = (134217727 & n1) * 1.0;
- var hi = (67108863 & n0) * 1.0;
- var val = ((hi * 134217728.0) + lo) / 9007199254740992.0;
- var scaled = (val * range) + a;
- return _Utils_Tuple2(
- scaled,
- $elm$random$Random$next(seed1));
- };
- });
-var $elm$random$Random$getByWeight = F3(
- function (_v0, others, countdown) {
- getByWeight:
- while (true) {
- var weight = _v0.a;
- var value = _v0.b;
- if (!others.b) {
- return value;
- } else {
- var second = others.a;
- var otherOthers = others.b;
- if (_Utils_cmp(
- countdown,
- $elm$core$Basics$abs(weight)) < 1) {
- return value;
- } else {
- var $temp$_v0 = second,
- $temp$others = otherOthers,
- $temp$countdown = countdown - $elm$core$Basics$abs(weight);
- _v0 = $temp$_v0;
- others = $temp$others;
- countdown = $temp$countdown;
- continue getByWeight;
- }
- }
- }
- });
-var $elm$core$List$sum = function (numbers) {
- return A3($elm$core$List$foldl, $elm$core$Basics$add, 0, numbers);
-};
-var $elm$random$Random$weighted = F2(
- function (first, others) {
- var normalize = function (_v0) {
- var weight = _v0.a;
- return $elm$core$Basics$abs(weight);
- };
- var total = normalize(first) + $elm$core$List$sum(
- A2($elm$core$List$map, normalize, others));
- return A2(
- $elm$random$Random$map,
- A2($elm$random$Random$getByWeight, first, others),
- A2($elm$random$Random$float, 0, total));
- });
-var $elm$random$Random$uniform = F2(
- function (value, valueList) {
- return A2(
- $elm$random$Random$weighted,
- $elm$random$Random$addOne(value),
- A2($elm$core$List$map, $elm$random$Random$addOne, valueList));
- });
-var $author$project$GenerateurDeProblemes$valeurAleatoire = F2(
- function (f, fs) {
- if (!fs.b) {
- return $elm$random$Random$constant(f);
- } else {
- var ff = fs.a;
- var fss = fs.b;
- return A2($elm$random$Random$uniform, ff, fss);
- }
- });
-var $author$project$GenerateurDeProblemes$blocAleatoire = function (prblm) {
- switch (prblm.$) {
- case 0:
- var blcs = prblm.a;
- return A2(
- $elm$random$Random$map,
- A2($elm$core$Basics$composeL, $elm$core$List$singleton, $author$project$GenerateurDeProblemes$Sujet),
- $author$project$GenerateurDeProblemes$blocsAleatoires(blcs));
- case 1:
- var ar = prblm.a;
- var sjt = prblm.b;
- var vrbl = ar.a2;
- var vlr = A2($author$project$GenerateurDeProblemes$valeurAleatoire, '', ar.br);
- var f = F2(
- function (sj, vl) {
- return A3($author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocsAleatoires, vrbl, vl, sj);
- });
- return A2(
- $elm$random$Random$andThen,
- f(sjt),
- vlr);
- case 2:
- var mcr = prblm.a;
- var sjt = prblm.b;
- return A2(
- $elm$random$Random$map,
- A2(
- $elm$core$Basics$composeL,
- $elm$core$List$singleton,
- $author$project$GenerateurDeProblemes$Entete(mcr)),
- $author$project$GenerateurDeProblemes$blocsAleatoires(sjt));
- case 4:
- var prps = prblm.a;
- return A2(
- $elm$random$Random$map,
- A2(
- $elm$core$Basics$composeL,
- A2($elm$core$Basics$composeL, $elm$core$List$singleton, $author$project$GenerateurDeProblemes$VraiFaux),
- $elm$core$List$singleton),
- A2(
- $author$project$GenerateurDeProblemes$valeurAleatoire,
- $author$project$GenerateurDeProblemes$Vrai(
- _List_fromArray(
- [
- $author$project$GenerateurDeProblemes$Texte('Le prof de maths est le meilleur.')
- ])),
- prps));
- default:
- var mcr = prblm.a;
- var prps = prblm.b;
- return A2(
- $elm$random$Random$map,
- A2(
- $elm$core$Basics$composeL,
- $elm$core$List$singleton,
- $author$project$GenerateurDeProblemes$QCM(mcr)),
- $elm_community$random_extra$Random$List$shuffle(prps));
- }
-};
-var $author$project$GenerateurDeProblemes$blocsAleatoires = function (sjt) {
- return A2(
- $elm$random$Random$map,
- $elm$core$List$concat,
- $elm_community$random_extra$Random$Extra$sequence(
- A2($elm$core$List$map, $author$project$GenerateurDeProblemes$blocAleatoire, sjt)));
-};
-var $author$project$GenerateurDeProblemes$remplacerLaVariableDansLeBlocAleatoire = F3(
- function (vrbl, vlr, prblm) {
- switch (prblm.$) {
- case 0:
- var blcs = prblm.a;
- return A3($author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocsAleatoires, vrbl, vlr, blcs);
- case 1:
- var ar = prblm.a;
- var sjt = prblm.b;
- return A2(
- $elm$random$Random$andThen,
- A2($author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocsAleatoires, vrbl, vlr),
- $author$project$GenerateurDeProblemes$blocAleatoire(
- A2($author$project$GenerateurDeProblemes$VariableAremplacer, ar, sjt)));
- case 2:
- var mcr = prblm.a;
- var sjt = prblm.b;
- return A2(
- $elm$random$Random$map,
- $elm$core$List$singleton,
- A3(
- $elm$random$Random$map2,
- $author$project$GenerateurDeProblemes$Entete,
- $elm$random$Random$constant(
- A3($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaMacro, vrbl, vlr, mcr)),
- A3($author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocsAleatoires, vrbl, vlr, sjt)));
- case 3:
- var mcr = prblm.a;
- var prps = prblm.b;
- return A2(
- $elm$random$Random$map,
- $elm$core$List$singleton,
- A3(
- $elm$random$Random$map2,
- $author$project$GenerateurDeProblemes$QCM,
- $elm$random$Random$constant(
- A3($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaMacro, vrbl, vlr, mcr)),
- $elm_community$random_extra$Random$List$shuffle(
- A2(
- $elm$core$List$map,
- A2($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaProposition, vrbl, vlr),
- prps))));
- default:
- var prps = prblm.a;
- return A2(
- $elm$random$Random$map,
- A2(
- $elm$core$Basics$composeL,
- A2(
- $elm$core$Basics$composeL,
- A2($elm$core$Basics$composeL, $elm$core$List$singleton, $author$project$GenerateurDeProblemes$VraiFaux),
- $elm$core$List$singleton),
- A2($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaProposition, vrbl, vlr)),
- A2(
- $author$project$GenerateurDeProblemes$valeurAleatoire,
- $author$project$GenerateurDeProblemes$Vrai(
- _List_fromArray(
- [
- $author$project$GenerateurDeProblemes$Texte('Le prof de maths est le meilleur.')
- ])),
- prps));
- }
- });
-var $author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocsAleatoires = F3(
- function (vrbl, vlr, sjt) {
- return A2(
- $elm$random$Random$map,
- $elm$core$List$concat,
- $elm_community$random_extra$Random$Extra$sequence(
- A2(
- $elm$core$List$map,
- A2($author$project$GenerateurDeProblemes$remplacerLaVariableDansLeBlocAleatoire, vrbl, vlr),
- sjt)));
- });
-var $elm$random$Random$listHelp = F4(
- function (revList, n, gen, seed) {
- listHelp:
- while (true) {
- if (n < 1) {
- return _Utils_Tuple2(revList, seed);
- } else {
- var _v0 = gen(seed);
- var value = _v0.a;
- var newSeed = _v0.b;
- var $temp$revList = A2($elm$core$List$cons, value, revList),
- $temp$n = n - 1,
- $temp$gen = gen,
- $temp$seed = newSeed;
- revList = $temp$revList;
- n = $temp$n;
- gen = $temp$gen;
- seed = $temp$seed;
- continue listHelp;
- }
- }
- });
-var $elm$random$Random$list = F2(
- function (n, _v0) {
- var gen = _v0;
- return function (seed) {
- return A4($elm$random$Random$listHelp, _List_Nil, n, gen, seed);
- };
- });
-var $author$project$GenerateurDeProblemes$sujetsAleatoires = function (sjt) {
- return A2(
- $elm$random$Random$map,
- $elm$core$List$concat,
- A2(
- $elm$random$Random$list,
- 89,
- $author$project$GenerateurDeProblemes$blocsAleatoires(sjt)));
-};
-var $elm$core$Maybe$map = F2(
- function (f, maybe) {
- if (!maybe.$) {
- var value = maybe.a;
- return $elm$core$Maybe$Just(
- f(value));
- } else {
- return $elm$core$Maybe$Nothing;
- }
- });
-var $author$project$GenerateurDeProblemes$mix = function (lls) {
- if (!lls.b) {
- return _List_Nil;
- } else {
- if (!lls.a.b) {
- var llss = lls.b;
- return _List_Nil;
- } else {
- if (!lls.b.b) {
- var l = lls.a;
- return A2($elm$core$List$map, $elm$core$List$singleton, l);
- } else {
- var _v1 = lls.a;
- var a = _v1.a;
- var ls = _v1.b;
- var llss = lls.b;
- return _Utils_ap(
- A2(
- $elm$core$List$map,
- $elm$core$List$cons(a),
- $author$project$GenerateurDeProblemes$mix(llss)),
- $author$project$GenerateurDeProblemes$mix(
- A2($elm$core$List$cons, ls, llss)));
- }
- }
- }
-};
-var $author$project$GenerateurDeProblemes$qcmsDepuisVraiFauxx = F2(
- function (mcr, blcs) {
- var listeDesAlternatives = F2(
- function (listePartielle, listeDeMaybePropositions) {
- listeDesAlternatives:
- while (true) {
- if (!listeDeMaybePropositions.b) {
- return $elm$core$Maybe$Just(
- $elm$core$List$reverse(listePartielle));
- } else {
- if (listeDeMaybePropositions.a.$ === 1) {
- var _v1 = listeDeMaybePropositions.a;
- var lstMbPrps = listeDeMaybePropositions.b;
- return $elm$core$Maybe$Nothing;
- } else {
- var prps = listeDeMaybePropositions.a.a;
- var lstMbPrps = listeDeMaybePropositions.b;
- var $temp$listePartielle = A2($elm$core$List$cons, prps, listePartielle),
- $temp$listeDeMaybePropositions = lstMbPrps;
- listePartielle = $temp$listePartielle;
- listeDeMaybePropositions = $temp$listeDeMaybePropositions;
- continue listeDesAlternatives;
- }
- }
- }
- });
- var alternativesDuVraiFaux = function (blc) {
- if (blc.$ === 4) {
- var prps = blc.a;
- return $elm$core$Maybe$Just(prps);
- } else {
- return $elm$core$Maybe$Nothing;
- }
- };
- return A2(
- $elm$core$Maybe$map,
- $elm$core$List$map(
- $author$project$GenerateurDeProblemes$QCM(mcr)),
- A2(
- $elm$core$Maybe$map,
- $author$project$GenerateurDeProblemes$mix,
- A2(
- listeDesAlternatives,
- _List_Nil,
- A2($elm$core$List$map, alternativesDuVraiFaux, blcs))));
- });
-var $author$project$GenerateurDeProblemes$remplacerLaVariableDansLeBloc = F2(
- function (ar, blc) {
- switch (blc.$) {
- case 0:
- var blcs = blc.a;
- return A2($author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocs, ar, blcs);
- case 1:
- var arr = blc.a;
- var sjt = blc.b;
- return A2(
- $author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocs,
- ar,
- $author$project$GenerateurDeProblemes$variantesBloc(
- A2($author$project$GenerateurDeProblemes$VariableAremplacer, arr, sjt)));
- case 2:
- var mcr = blc.a;
- var blcs = blc.b;
- var _v3 = A2($author$project$GenerateurDeProblemes$qcmsDepuisVraiFauxx, mcr, blcs);
- if (!_v3.$) {
- var qcms = _v3.a;
- return A2($author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocs, ar, qcms);
- } else {
- return _List_fromArray(
- [
- A2(
- $author$project$GenerateurDeProblemes$Entete,
- _List_fromArray(
- [
- $author$project$GenerateurDeProblemes$Texte('Je ne peux pas prendre en charge une telle imbrication :(')
- ]),
- _List_Nil)
- ]);
- }
- case 3:
- var mcr = blc.a;
- var prps = blc.b;
- var f = function (vlr) {
- return A2(
- $author$project$GenerateurDeProblemes$QCM,
- A3($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaMacro, ar.a2, vlr, mcr),
- A2(
- $elm$core$List$map,
- A2($author$project$GenerateurDeProblemes$remplacerLaVariableParLaValeurDansLaProposition, ar.a2, vlr),
- prps));
- };
- return A2($elm$core$List$map, f, ar.br);
- default:
- var prps = blc.a;
- return _List_fromArray(
- [
- A2(
- $author$project$GenerateurDeProblemes$Entete,
- _List_fromArray(
- [
- $author$project$GenerateurDeProblemes$Texte('J\'ai besoin d\'un entête pour générer des QCM à partir de vrai-faux :(')
- ]),
- _List_Nil)
- ]);
- }
- });
-var $author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocs = F2(
- function (ar, blcs) {
- return $elm$core$List$concat(
- A2(
- $elm$core$List$map,
- $author$project$GenerateurDeProblemes$remplacerLaVariableDansLeBloc(ar),
- blcs));
- });
-var $author$project$GenerateurDeProblemes$variantesBloc = function (blcs) {
- switch (blcs.$) {
- case 0:
- var blcss = blcs.a;
- return $elm$core$List$singleton(
- $author$project$GenerateurDeProblemes$Sujet(
- $author$project$GenerateurDeProblemes$cyclic$variantesBlocs()(blcss)));
- case 1:
- var ar = blcs.a;
- var blcss = blcs.b;
- return A2($author$project$GenerateurDeProblemes$remplacerLaVariableDansLesBlocs, ar, blcss);
- case 2:
- var mcr = blcs.a;
- var blcss = blcs.b;
- var _v1 = A2($author$project$GenerateurDeProblemes$qcmsDepuisVraiFauxx, mcr, blcss);
- if (!_v1.$) {
- var qcms = _v1.a;
- return qcms;
- } else {
- return _List_fromArray(
- [
- A2(
- $author$project$GenerateurDeProblemes$Entete,
- _List_fromArray(
- [
- $author$project$GenerateurDeProblemes$Texte('Je ne peux pas prendre en charge une telle imbrication :(')
- ]),
- _List_Nil)
- ]);
- }
- case 4:
- var prps = blcs.a;
- return _List_fromArray(
- [
- $author$project$GenerateurDeProblemes$VraiFaux(prps)
- ]);
- default:
- var mcr = blcs.a;
- var prps = blcs.b;
- return _List_fromArray(
- [
- A2($author$project$GenerateurDeProblemes$QCM, mcr, prps)
- ]);
- }
-};
-function $author$project$GenerateurDeProblemes$cyclic$variantesBlocs() {
- return A2(
- $elm$core$Basics$composeL,
- $elm$core$List$concat,
- $elm$core$List$map($author$project$GenerateurDeProblemes$variantesBloc));
-}
-var $author$project$GenerateurDeProblemes$variantesBlocs = $author$project$GenerateurDeProblemes$cyclic$variantesBlocs();
-$author$project$GenerateurDeProblemes$cyclic$variantesBlocs = function () {
- return $author$project$GenerateurDeProblemes$variantesBlocs;
-};
-var $author$project$GenerateurDeProblemes$update = F2(
- function (msg, model) {
- switch (msg.$) {
- case 0:
- var nouvelleStructure = msg.a;
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {ar: nouvelleStructure}),
- $elm$core$Platform$Cmd$none);
- case 3:
- var nouveauSujetGenere = msg.a;
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {aX: nouveauSujetGenere}),
- $elm$core$Platform$Cmd$none);
- case 1:
- var f = function (strSuj) {
- var _v1 = A2(
- $elm$parser$Parser$run,
- A2($elm$parser$Parser$withIndent, -1, $author$project$GenerateurDeProblemes$sujet),
- strSuj);
- if (!_v1.$) {
- var sjt = _v1.a;
- return A2(
- $elm$random$Random$map,
- $author$project$GenerateurDeProblemes$quizScanVoirSujet,
- $author$project$GenerateurDeProblemes$sujetsAleatoires(sjt));
- } else {
- var erreurs = _v1.a;
- return $elm$random$Random$constant(
- $author$project$GenerateurDeProblemes$deadEndsToStringBis(erreurs));
- }
- };
- return _Utils_Tuple2(
- model,
- A2(
- $elm$random$Random$generate,
- $author$project$GenerateurDeProblemes$SujetGenere,
- f(model.ar)));
- default:
- var f = function (strSuj) {
- var _v2 = A2(
- $elm$parser$Parser$run,
- A2($elm$parser$Parser$withIndent, -1, $author$project$GenerateurDeProblemes$sujet),
- strSuj);
- if (!_v2.$) {
- var sjt = _v2.a;
- return $author$project$GenerateurDeProblemes$evalBoxVoirBlocs(
- $author$project$GenerateurDeProblemes$variantesBlocs(sjt));
- } else {
- var erreurs = _v2.a;
- return $author$project$GenerateurDeProblemes$deadEndsToStringBis(erreurs);
- }
- };
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {
- aX: f(model.ar)
- }),
- $elm$core$Platform$Cmd$none);
- }
- });
-var $author$project$Prof$update = F2(
- function (msg, model) {
- var _v0 = _Utils_Tuple2(msg, model.ao);
- _v0$4:
- while (true) {
- switch (_v0.a.$) {
- case 0:
- var urlRequest = _v0.a.a;
- if (!urlRequest.$) {
- var url = urlRequest.a;
- return _Utils_Tuple2(
- model,
- A2(
- $elm$browser$Browser$Navigation$pushUrl,
- model.bG,
- $elm$url$Url$toString(url)));
- } else {
- var href = urlRequest.a;
- return _Utils_Tuple2(
- model,
- $elm$browser$Browser$Navigation$load(href));
- }
- case 1:
- var url = _v0.a.a;
- var _v2 = url.ah;
- _v2$2:
- while (true) {
- if (!_v2.$) {
- switch (_v2.a) {
- case 'CalculateurDeNotes':
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {ao: 1, bq: url}),
- $elm$core$Platform$Cmd$none);
- case 'GenerateurDeProblemes':
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {ao: 0, bq: url}),
- $elm$core$Platform$Cmd$none);
- default:
- break _v2$2;
- }
- } else {
- break _v2$2;
- }
- }
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {
- ao: 0,
- bq: _Utils_update(
- url,
- {
- ah: $elm$core$Maybe$Just('GenerateurDeProblemes')
- })
- }),
- A2(
- $elm$browser$Browser$Navigation$pushUrl,
- model.bG,
- $elm$url$Url$toString(
- _Utils_update(
- url,
- {
- ah: $elm$core$Maybe$Just('GenerateurDeProblemes')
- }))));
- case 3:
- if (!_v0.b) {
- var message = _v0.a.a;
- var _v3 = _v0.b;
- var _v4 = A2($author$project$GenerateurDeProblemes$update, message, model.bi);
- var nouveauModele = _v4.a;
- var commande = _v4.b;
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {bi: nouveauModele}),
- A2($elm$core$Platform$Cmd$map, $author$project$Prof$GenerateurDeProblemesMsg, commande));
- } else {
- break _v0$4;
- }
- default:
- if (_v0.b === 1) {
- var message = _v0.a.a;
- var _v5 = _v0.b;
- var _v6 = A2($author$project$CalculateurDeNotes$update, message, model.bh);
- var nouveauModele = _v6.a;
- var commande = _v6.b;
- return _Utils_Tuple2(
- _Utils_update(
- model,
- {bh: nouveauModele}),
- A2($elm$core$Platform$Cmd$map, $author$project$Prof$CalculateurDeNotesMsg, commande));
- } else {
- break _v0$4;
- }
- }
- }
- return _Utils_Tuple2(model, $elm$core$Platform$Cmd$none);
- });
-var $mdgriffith$elm_ui$Internal$Model$Colored = F3(
- function (a, b, c) {
- return {$: 4, a: a, b: b, c: c};
- });
-var $mdgriffith$elm_ui$Internal$Model$StyleClass = F2(
- function (a, b) {
- return {$: 4, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Flag$Flag = function (a) {
- return {$: 0, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Flag$Second = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Flag$flag = function (i) {
- return (i > 31) ? $mdgriffith$elm_ui$Internal$Flag$Second(1 << (i - 32)) : $mdgriffith$elm_ui$Internal$Flag$Flag(1 << i);
-};
-var $mdgriffith$elm_ui$Internal$Flag$bgColor = $mdgriffith$elm_ui$Internal$Flag$flag(8);
-var $elm$core$Basics$round = _Basics_round;
-var $mdgriffith$elm_ui$Internal$Model$floatClass = function (x) {
- return $elm$core$String$fromInt(
- $elm$core$Basics$round(x * 255));
-};
-var $mdgriffith$elm_ui$Internal$Model$formatColorClass = function (_v0) {
- var red = _v0.a;
- var green = _v0.b;
- var blue = _v0.c;
- var alpha = _v0.d;
- return $mdgriffith$elm_ui$Internal$Model$floatClass(red) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(green) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(blue) + ('-' + $mdgriffith$elm_ui$Internal$Model$floatClass(alpha))))));
-};
-var $mdgriffith$elm_ui$Element$Background$color = function (clr) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$bgColor,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Colored,
- 'bg-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(clr),
- 'background-color',
- clr));
-};
-var $mdgriffith$elm_ui$Internal$Model$Unkeyed = function (a) {
- return {$: 0, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$AsColumn = 1;
-var $mdgriffith$elm_ui$Internal$Model$asColumn = 1;
-var $mdgriffith$elm_ui$Internal$Style$classes = {di: 'a', bt: 'atv', dm: 'ab', dn: 'cx', $7: 'cy', dp: 'acb', dq: 'accx', dr: 'accy', ds: 'acr', b2: 'al', b3: 'ar', dt: 'at', bu: 'ah', bv: 'av', dx: 's', dB: 'bh', dC: 'b', dG: 'w7', dI: 'bd', dJ: 'bdt', a6: 'bn', dK: 'bs', a7: 'cpe', dQ: 'cp', dR: 'cpx', dS: 'cpy', ca: 'c', bb: 'ctr', bc: 'cb', bd: 'ccx', I: 'ccy', aA: 'cl', be: 'cr', dV: 'ct', dX: 'cptr', dY: 'ctxt', d6: 'fcs', ch: 'focus-within', d8: 'fs', eb: 'g', bD: 'hbh', bE: 'hc', cm: 'he', bF: 'hf', cn: 'hfp', ef: 'hv', eh: 'ic', ej: 'fr', bg: 'lbl', em: 'iml', en: 'imlf', eo: 'imlp', ep: 'implw', eq: 'it', et: 'i', cz: 'lnk', am: 'nb', cF: 'notxt', eD: 'ol', eF: 'or', W: 'oq', eJ: 'oh', ao: 'pg', cK: 'p', eK: 'ppe', eT: 'ui', eU: 'r', eX: 'sb', eY: 'sbx', eZ: 'sby', e_: 'sbt', e1: 'e', e2: 'cap', e4: 'sev', fa: 'sk', bY: 't', fd: 'tc', fe: 'w8', ff: 'w2', fg: 'w9', fh: 'tj', bp: 'tja', fi: 'tl', fj: 'w3', fk: 'w5', fl: 'w4', fm: 'tr', fn: 'w6', fo: 'w1', fp: 'tun', c7: 'ts', ab: 'clr', fv: 'u', bZ: 'wc', dd: 'we', b_: 'wf', de: 'wfp', b0: 'wrp'};
-var $mdgriffith$elm_ui$Internal$Model$Generic = {$: 0};
-var $mdgriffith$elm_ui$Internal$Model$div = $mdgriffith$elm_ui$Internal$Model$Generic;
-var $mdgriffith$elm_ui$Internal$Model$NoNearbyChildren = {$: 0};
-var $mdgriffith$elm_ui$Internal$Model$columnClass = $mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.ca);
-var $mdgriffith$elm_ui$Internal$Model$gridClass = $mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.eb);
-var $mdgriffith$elm_ui$Internal$Model$pageClass = $mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.ao);
-var $mdgriffith$elm_ui$Internal$Model$paragraphClass = $mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.cK);
-var $mdgriffith$elm_ui$Internal$Model$rowClass = $mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.eU);
-var $mdgriffith$elm_ui$Internal$Model$singleClass = $mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.e1);
-var $mdgriffith$elm_ui$Internal$Model$contextClasses = function (context) {
- switch (context) {
- case 0:
- return $mdgriffith$elm_ui$Internal$Model$rowClass;
- case 1:
- return $mdgriffith$elm_ui$Internal$Model$columnClass;
- case 2:
- return $mdgriffith$elm_ui$Internal$Model$singleClass;
- case 3:
- return $mdgriffith$elm_ui$Internal$Model$gridClass;
- case 4:
- return $mdgriffith$elm_ui$Internal$Model$paragraphClass;
- default:
- return $mdgriffith$elm_ui$Internal$Model$pageClass;
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$Keyed = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$NoStyleSheet = {$: 0};
-var $mdgriffith$elm_ui$Internal$Model$Styled = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$Unstyled = function (a) {
- return {$: 0, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$addChildren = F2(
- function (existing, nearbyChildren) {
- switch (nearbyChildren.$) {
- case 0:
- return existing;
- case 1:
- var behind = nearbyChildren.a;
- return _Utils_ap(behind, existing);
- case 2:
- var inFront = nearbyChildren.a;
- return _Utils_ap(existing, inFront);
- default:
- var behind = nearbyChildren.a;
- var inFront = nearbyChildren.b;
- return _Utils_ap(
- behind,
- _Utils_ap(existing, inFront));
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$addKeyedChildren = F3(
- function (key, existing, nearbyChildren) {
- switch (nearbyChildren.$) {
- case 0:
- return existing;
- case 1:
- var behind = nearbyChildren.a;
- return _Utils_ap(
- A2(
- $elm$core$List$map,
- function (x) {
- return _Utils_Tuple2(key, x);
- },
- behind),
- existing);
- case 2:
- var inFront = nearbyChildren.a;
- return _Utils_ap(
- existing,
- A2(
- $elm$core$List$map,
- function (x) {
- return _Utils_Tuple2(key, x);
- },
- inFront));
- default:
- var behind = nearbyChildren.a;
- var inFront = nearbyChildren.b;
- return _Utils_ap(
- A2(
- $elm$core$List$map,
- function (x) {
- return _Utils_Tuple2(key, x);
- },
- behind),
- _Utils_ap(
- existing,
- A2(
- $elm$core$List$map,
- function (x) {
- return _Utils_Tuple2(key, x);
- },
- inFront)));
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$AsEl = 2;
-var $mdgriffith$elm_ui$Internal$Model$asEl = 2;
-var $mdgriffith$elm_ui$Internal$Model$AsParagraph = 4;
-var $mdgriffith$elm_ui$Internal$Model$asParagraph = 4;
-var $mdgriffith$elm_ui$Internal$Flag$alignBottom = $mdgriffith$elm_ui$Internal$Flag$flag(41);
-var $mdgriffith$elm_ui$Internal$Flag$alignRight = $mdgriffith$elm_ui$Internal$Flag$flag(40);
-var $mdgriffith$elm_ui$Internal$Flag$centerX = $mdgriffith$elm_ui$Internal$Flag$flag(42);
-var $mdgriffith$elm_ui$Internal$Flag$centerY = $mdgriffith$elm_ui$Internal$Flag$flag(43);
-var $elm$json$Json$Encode$string = _Json_wrap;
-var $elm$html$Html$Attributes$stringProperty = F2(
- function (key, string) {
- return A2(
- _VirtualDom_property,
- key,
- $elm$json$Json$Encode$string(string));
- });
-var $elm$html$Html$Attributes$class = $elm$html$Html$Attributes$stringProperty('className');
-var $elm$html$Html$div = _VirtualDom_node('div');
-var $mdgriffith$elm_ui$Internal$Model$lengthClassName = function (x) {
- switch (x.$) {
- case 0:
- var px = x.a;
- return $elm$core$String$fromInt(px) + 'px';
- case 1:
- return 'auto';
- case 2:
- var i = x.a;
- return $elm$core$String$fromInt(i) + 'fr';
- case 3:
- var min = x.a;
- var len = x.b;
- return 'min' + ($elm$core$String$fromInt(min) + $mdgriffith$elm_ui$Internal$Model$lengthClassName(len));
- default:
- var max = x.a;
- var len = x.b;
- return 'max' + ($elm$core$String$fromInt(max) + $mdgriffith$elm_ui$Internal$Model$lengthClassName(len));
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$transformClass = function (transform) {
- switch (transform.$) {
- case 0:
- return $elm$core$Maybe$Nothing;
- case 1:
- var _v1 = transform.a;
- var x = _v1.a;
- var y = _v1.b;
- var z = _v1.c;
- return $elm$core$Maybe$Just(
- 'mv-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(x) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(y) + ('-' + $mdgriffith$elm_ui$Internal$Model$floatClass(z))))));
- default:
- var _v2 = transform.a;
- var tx = _v2.a;
- var ty = _v2.b;
- var tz = _v2.c;
- var _v3 = transform.b;
- var sx = _v3.a;
- var sy = _v3.b;
- var sz = _v3.c;
- var _v4 = transform.c;
- var ox = _v4.a;
- var oy = _v4.b;
- var oz = _v4.c;
- var angle = transform.d;
- return $elm$core$Maybe$Just(
- 'tfrm-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(tx) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(ty) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(tz) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(sx) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(sy) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(sz) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(ox) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(oy) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(oz) + ('-' + $mdgriffith$elm_ui$Internal$Model$floatClass(angle))))))))))))))))))));
- }
-};
-var $elm$core$Maybe$withDefault = F2(
- function (_default, maybe) {
- if (!maybe.$) {
- var value = maybe.a;
- return value;
- } else {
- return _default;
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$getStyleName = function (style) {
- switch (style.$) {
- case 13:
- var name = style.a;
- return name;
- case 12:
- var name = style.a;
- var o = style.b;
- return name;
- case 0:
- var _class = style.a;
- return _class;
- case 1:
- var name = style.a;
- return name;
- case 2:
- var i = style.a;
- return 'font-size-' + $elm$core$String$fromInt(i);
- case 3:
- var _class = style.a;
- return _class;
- case 4:
- var _class = style.a;
- return _class;
- case 5:
- var cls = style.a;
- var x = style.b;
- var y = style.c;
- return cls;
- case 7:
- var cls = style.a;
- var top = style.b;
- var right = style.c;
- var bottom = style.d;
- var left = style.e;
- return cls;
- case 6:
- var cls = style.a;
- var top = style.b;
- var right = style.c;
- var bottom = style.d;
- var left = style.e;
- return cls;
- case 8:
- var template = style.a;
- return 'grid-rows-' + (A2(
- $elm$core$String$join,
- '-',
- A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$lengthClassName, template.eV)) + ('-cols-' + (A2(
- $elm$core$String$join,
- '-',
- A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$lengthClassName, template.dU)) + ('-space-x-' + ($mdgriffith$elm_ui$Internal$Model$lengthClassName(template.e5.a) + ('-space-y-' + $mdgriffith$elm_ui$Internal$Model$lengthClassName(template.e5.b)))))));
- case 9:
- var pos = style.a;
- return 'gp grid-pos-' + ($elm$core$String$fromInt(pos.eU) + ('-' + ($elm$core$String$fromInt(pos.dT) + ('-' + ($elm$core$String$fromInt(pos.dc) + ('-' + $elm$core$String$fromInt(pos.cl)))))));
- case 11:
- var selector = style.a;
- var subStyle = style.b;
- var name = function () {
- switch (selector) {
- case 0:
- return 'fs';
- case 1:
- return 'hv';
- default:
- return 'act';
- }
- }();
- return A2(
- $elm$core$String$join,
- ' ',
- A2(
- $elm$core$List$map,
- function (sty) {
- var _v1 = $mdgriffith$elm_ui$Internal$Model$getStyleName(sty);
- if (_v1 === '') {
- return '';
- } else {
- var styleName = _v1;
- return styleName + ('-' + name);
- }
- },
- subStyle));
- default:
- var x = style.a;
- return A2(
- $elm$core$Maybe$withDefault,
- '',
- $mdgriffith$elm_ui$Internal$Model$transformClass(x));
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$reduceStyles = F2(
- function (style, nevermind) {
- var cache = nevermind.a;
- var existing = nevermind.b;
- var styleName = $mdgriffith$elm_ui$Internal$Model$getStyleName(style);
- return A2($elm$core$Set$member, styleName, cache) ? nevermind : _Utils_Tuple2(
- A2($elm$core$Set$insert, styleName, cache),
- A2($elm$core$List$cons, style, existing));
- });
-var $mdgriffith$elm_ui$Internal$Model$Property = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Model$Style = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Style$dot = function (c) {
- return '.' + c;
-};
-var $elm$core$List$maybeCons = F3(
- function (f, mx, xs) {
- var _v0 = f(mx);
- if (!_v0.$) {
- 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 $mdgriffith$elm_ui$Internal$Model$formatColor = function (_v0) {
- var red = _v0.a;
- var green = _v0.b;
- var blue = _v0.c;
- var alpha = _v0.d;
- return 'rgba(' + ($elm$core$String$fromInt(
- $elm$core$Basics$round(red * 255)) + ((',' + $elm$core$String$fromInt(
- $elm$core$Basics$round(green * 255))) + ((',' + $elm$core$String$fromInt(
- $elm$core$Basics$round(blue * 255))) + (',' + ($elm$core$String$fromFloat(alpha) + ')')))));
-};
-var $mdgriffith$elm_ui$Internal$Model$formatBoxShadow = function (shadow) {
- return A2(
- $elm$core$String$join,
- ' ',
- A2(
- $elm$core$List$filterMap,
- $elm$core$Basics$identity,
- _List_fromArray(
- [
- shadow.ct ? $elm$core$Maybe$Just('inset') : $elm$core$Maybe$Nothing,
- $elm$core$Maybe$Just(
- $elm$core$String$fromFloat(shadow.bl.a) + 'px'),
- $elm$core$Maybe$Just(
- $elm$core$String$fromFloat(shadow.bl.b) + 'px'),
- $elm$core$Maybe$Just(
- $elm$core$String$fromFloat(shadow.a5) + 'px'),
- $elm$core$Maybe$Just(
- $elm$core$String$fromFloat(shadow.bo) + 'px'),
- $elm$core$Maybe$Just(
- $mdgriffith$elm_ui$Internal$Model$formatColor(shadow.ba))
- ])));
-};
-var $elm$core$Tuple$mapFirst = F2(
- function (func, _v0) {
- var x = _v0.a;
- var y = _v0.b;
- return _Utils_Tuple2(
- func(x),
- y);
- });
-var $elm$core$Tuple$mapSecond = F2(
- function (func, _v0) {
- var x = _v0.a;
- var y = _v0.b;
- return _Utils_Tuple2(
- x,
- func(y));
- });
-var $mdgriffith$elm_ui$Internal$Model$renderFocusStyle = function (focus) {
- return _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Style,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ch) + ':focus-within',
- A2(
- $elm$core$List$filterMap,
- $elm$core$Basics$identity,
- _List_fromArray(
- [
- A2(
- $elm$core$Maybe$map,
- function (color) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'border-color',
- $mdgriffith$elm_ui$Internal$Model$formatColor(color));
- },
- focus.dH),
- A2(
- $elm$core$Maybe$map,
- function (color) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'background-color',
- $mdgriffith$elm_ui$Internal$Model$formatColor(color));
- },
- focus.dz),
- A2(
- $elm$core$Maybe$map,
- function (shadow) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'box-shadow',
- $mdgriffith$elm_ui$Internal$Model$formatBoxShadow(
- {
- a5: shadow.a5,
- ba: shadow.ba,
- ct: false,
- bl: A2(
- $elm$core$Tuple$mapSecond,
- $elm$core$Basics$toFloat,
- A2($elm$core$Tuple$mapFirst, $elm$core$Basics$toFloat, shadow.bl)),
- bo: shadow.bo
- }));
- },
- focus.e0),
- $elm$core$Maybe$Just(
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'outline', 'none'))
- ]))),
- A2(
- $mdgriffith$elm_ui$Internal$Model$Style,
- ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + ':focus .focusable, ') + (($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + '.focusable:focus, ') + ('.ui-slide-bar:focus + ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + ' .focusable-thumb'))),
- A2(
- $elm$core$List$filterMap,
- $elm$core$Basics$identity,
- _List_fromArray(
- [
- A2(
- $elm$core$Maybe$map,
- function (color) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'border-color',
- $mdgriffith$elm_ui$Internal$Model$formatColor(color));
- },
- focus.dH),
- A2(
- $elm$core$Maybe$map,
- function (color) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'background-color',
- $mdgriffith$elm_ui$Internal$Model$formatColor(color));
- },
- focus.dz),
- A2(
- $elm$core$Maybe$map,
- function (shadow) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'box-shadow',
- $mdgriffith$elm_ui$Internal$Model$formatBoxShadow(
- {
- a5: shadow.a5,
- ba: shadow.ba,
- ct: false,
- bl: A2(
- $elm$core$Tuple$mapSecond,
- $elm$core$Basics$toFloat,
- A2($elm$core$Tuple$mapFirst, $elm$core$Basics$toFloat, shadow.bl)),
- bo: shadow.bo
- }));
- },
- focus.e0),
- $elm$core$Maybe$Just(
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'outline', 'none'))
- ])))
- ]);
-};
-var $elm$virtual_dom$VirtualDom$node = function (tag) {
- return _VirtualDom_node(
- _VirtualDom_noScript(tag));
-};
-var $elm$virtual_dom$VirtualDom$property = F2(
- function (key, value) {
- return A2(
- _VirtualDom_property,
- _VirtualDom_noInnerHtmlOrFormAction(key),
- _VirtualDom_noJavaScriptOrHtmlUri(value));
- });
-var $mdgriffith$elm_ui$Internal$Style$AllChildren = F2(
- function (a, b) {
- return {$: 2, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Style$Batch = function (a) {
- return {$: 6, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Style$Child = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Style$Class = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Style$Descriptor = F2(
- function (a, b) {
- return {$: 4, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Style$Left = 3;
-var $mdgriffith$elm_ui$Internal$Style$Prop = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Style$Right = 2;
-var $mdgriffith$elm_ui$Internal$Style$Self = $elm$core$Basics$identity;
-var $mdgriffith$elm_ui$Internal$Style$Supports = F2(
- function (a, b) {
- return {$: 3, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Style$Content = $elm$core$Basics$identity;
-var $mdgriffith$elm_ui$Internal$Style$Bottom = 1;
-var $mdgriffith$elm_ui$Internal$Style$CenterX = 4;
-var $mdgriffith$elm_ui$Internal$Style$CenterY = 5;
-var $mdgriffith$elm_ui$Internal$Style$Top = 0;
-var $mdgriffith$elm_ui$Internal$Style$alignments = _List_fromArray(
- [0, 1, 2, 3, 4, 5]);
-var $elm$core$List$concatMap = F2(
- function (f, list) {
- return $elm$core$List$concat(
- A2($elm$core$List$map, f, list));
- });
-var $mdgriffith$elm_ui$Internal$Style$contentName = function (desc) {
- switch (desc) {
- case 0:
- var _v1 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dV);
- case 1:
- var _v2 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bc);
- case 2:
- var _v3 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.be);
- case 3:
- var _v4 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.aA);
- case 4:
- var _v5 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bd);
- default:
- var _v6 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.I);
- }
-};
-var $mdgriffith$elm_ui$Internal$Style$selfName = function (desc) {
- switch (desc) {
- case 0:
- var _v1 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dt);
- case 1:
- var _v2 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dm);
- case 2:
- var _v3 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b3);
- case 3:
- var _v4 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b2);
- case 4:
- var _v5 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dn);
- default:
- var _v6 = desc;
- return $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.$7);
- }
-};
-var $mdgriffith$elm_ui$Internal$Style$describeAlignment = function (values) {
- var createDescription = function (alignment) {
- var _v0 = values(alignment);
- var content = _v0.a;
- var indiv = _v0.b;
- return _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$contentName(alignment),
- content),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$selfName(alignment),
- indiv)
- ]))
- ]);
- };
- return $mdgriffith$elm_ui$Internal$Style$Batch(
- A2($elm$core$List$concatMap, createDescription, $mdgriffith$elm_ui$Internal$Style$alignments));
-};
-var $mdgriffith$elm_ui$Internal$Style$elDescription = _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'column'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bD),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '0'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dB),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '-1')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e_),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bY),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b_),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'auto !important')
- ]))
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bE),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', 'auto')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '100000')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b_),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.de),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bZ),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start')
- ])),
- $mdgriffith$elm_ui$Internal$Style$describeAlignment(
- function (alignment) {
- switch (alignment) {
- case 0:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-start')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', '0 !important')
- ]));
- case 1:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-end')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', '0 !important')
- ]));
- case 2:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-end')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-end')
- ]));
- case 3:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-start')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start')
- ]));
- case 4:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'center')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'center')
- ]));
- default:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto')
- ]))
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important')
- ]));
- }
- })
- ]);
-var $mdgriffith$elm_ui$Internal$Style$gridAlignments = function (values) {
- var createDescription = function (alignment) {
- return _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$selfName(alignment),
- values(alignment))
- ]))
- ]);
- };
- return $mdgriffith$elm_ui$Internal$Style$Batch(
- A2($elm$core$List$concatMap, createDescription, $mdgriffith$elm_ui$Internal$Style$alignments));
-};
-var $mdgriffith$elm_ui$Internal$Style$Above = 0;
-var $mdgriffith$elm_ui$Internal$Style$Behind = 5;
-var $mdgriffith$elm_ui$Internal$Style$Below = 1;
-var $mdgriffith$elm_ui$Internal$Style$OnLeft = 3;
-var $mdgriffith$elm_ui$Internal$Style$OnRight = 2;
-var $mdgriffith$elm_ui$Internal$Style$Within = 4;
-var $mdgriffith$elm_ui$Internal$Style$locations = function () {
- var loc = 0;
- var _v0 = function () {
- switch (loc) {
- case 0:
- return 0;
- case 1:
- return 0;
- case 2:
- return 0;
- case 3:
- return 0;
- case 4:
- return 0;
- default:
- return 0;
- }
- }();
- return _List_fromArray(
- [0, 1, 2, 3, 4, 5]);
-}();
-var $mdgriffith$elm_ui$Internal$Style$baseSheet = _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- 'html,body',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'padding', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- _Utils_ap(
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- _Utils_ap(
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e1),
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eh))),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'block'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 'img',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'max-height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'object-fit', 'cover')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b_),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 'img',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'max-width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'object-fit', 'cover')
- ]))
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + ':focus',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'outline', 'none')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eT),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', 'auto'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'min-height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '0'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- _Utils_ap(
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ej),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.am),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'fixed'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20')
- ]))
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.am),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'relative'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border', 'none'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'row'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e1),
- $mdgriffith$elm_ui$Internal$Style$elDescription),
- $mdgriffith$elm_ui$Internal$Style$Batch(
- function (fn) {
- return A2($elm$core$List$map, fn, $mdgriffith$elm_ui$Internal$Style$locations);
- }(
- function (loc) {
- switch (loc) {
- case 0:
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.di),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'bottom', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', 'auto')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b_),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%')
- ])),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- '*',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto')
- ]))
- ]));
- case 1:
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dC),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'bottom', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- '*',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', 'auto')
- ]))
- ]));
- case 2:
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- '*',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto')
- ]))
- ]));
- case 3:
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eD),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'right', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '20'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- '*',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto')
- ]))
- ]));
- case 4:
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ej),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- '*',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto')
- ]))
- ]));
- default:
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dB),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'absolute'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- '*',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto')
- ]))
- ]));
- }
- }))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'relative'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border', 'none'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'row'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'resize', 'none'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-feature-settings', 'inherit'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'box-sizing', 'border-box'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'padding', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-width', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-style', 'solid'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-size', 'inherit'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'color', 'inherit'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-family', 'inherit'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'line-height', '1'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', 'inherit'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration', 'none'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-style', 'inherit'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b0),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-wrap', 'wrap')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.cF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, '-moz-user-select', 'none'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, '-webkit-user-select', 'none'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, '-ms-user-select', 'none'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'user-select', 'none')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dX),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'cursor', 'pointer')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dY),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'cursor', 'text')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eK),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none !important')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.a7),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'auto !important')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ab),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.W),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot(
- _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.ef, $mdgriffith$elm_ui$Internal$Style$classes.ab)) + ':hover',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot(
- _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.ef, $mdgriffith$elm_ui$Internal$Style$classes.W)) + ':hover',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot(
- _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.d6, $mdgriffith$elm_ui$Internal$Style$classes.ab)) + ':focus',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot(
- _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.d6, $mdgriffith$elm_ui$Internal$Style$classes.W)) + ':focus',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot(
- _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.bt, $mdgriffith$elm_ui$Internal$Style$classes.ab)) + ':active',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot(
- _Utils_ap($mdgriffith$elm_ui$Internal$Style$classes.bt, $mdgriffith$elm_ui$Internal$Style$classes.W)) + ':active',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'opacity', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.c7),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Prop,
- 'transition',
- A2(
- $elm$core$String$join,
- ', ',
- A2(
- $elm$core$List$map,
- function (x) {
- return x + ' 160ms';
- },
- _List_fromArray(
- ['transform', 'opacity', 'filter', 'background-color', 'color', 'font-size']))))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eX),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow', 'auto'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eY),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-x', 'auto'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eU),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '1')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eZ),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-y', 'auto'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ca),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e1),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-shrink', '1')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dQ),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow', 'hidden')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dR),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-x', 'hidden')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dS),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-y', 'hidden')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bZ),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', 'auto')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.a6),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-width', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dI),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-style', 'dashed')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dJ),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-style', 'dotted')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dK),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'border-style', 'solid')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bY),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline-block')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eq),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'line-height', '1.05'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'background', 'transparent'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'inherit')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e1),
- $mdgriffith$elm_ui$Internal$Style$elDescription),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eU),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'row'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', '0%'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dd),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.cz),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'stretch !important')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.cn),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'stretch !important')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b_),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '100000')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bb),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'stretch')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 'u:first-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.ds,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 's:first-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.dq,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dn),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-left', 'auto !important')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 's:last-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.dq,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dn),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-right', 'auto !important')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 's:only-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.dq,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.$7),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 's:last-of-type.' + ($mdgriffith$elm_ui$Internal$Style$classes.dq + ' ~ u'),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 'u:first-of-type.' + ($mdgriffith$elm_ui$Internal$Style$classes.ds + (' ~ s.' + $mdgriffith$elm_ui$Internal$Style$classes.dq)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0')
- ])),
- $mdgriffith$elm_ui$Internal$Style$describeAlignment(
- function (alignment) {
- switch (alignment) {
- case 0:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-start')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start')
- ]));
- case 1:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-end')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-end')
- ]));
- case 2:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-end')
- ]),
- _List_Nil);
- case 3:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-start')
- ]),
- _List_Nil);
- case 4:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'center')
- ]),
- _List_Nil);
- default:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'center')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'center')
- ]));
- }
- }),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e4),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'space-between')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bg),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'baseline')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ca),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-direction', 'column'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', '0px'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'min-height', 'min-content'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.cm),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '100000')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.b_),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.de),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bZ),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 'u:first-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.dp,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 's:first-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.dr,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.$7),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', '0 !important')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 's:last-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.dr,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.$7),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', '0 !important')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 's:only-of-type.' + $mdgriffith$elm_ui$Internal$Style$classes.dr,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '1'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.$7),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto !important')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 's:last-of-type.' + ($mdgriffith$elm_ui$Internal$Style$classes.dr + ' ~ u'),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- 'u:first-of-type.' + ($mdgriffith$elm_ui$Internal$Style$classes.dp + (' ~ s.' + $mdgriffith$elm_ui$Internal$Style$classes.dr)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0')
- ])),
- $mdgriffith$elm_ui$Internal$Style$describeAlignment(
- function (alignment) {
- switch (alignment) {
- case 0:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-start')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-bottom', 'auto')
- ]));
- case 1:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-end')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin-top', 'auto')
- ]));
- case 2:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-end')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-end')
- ]));
- case 3:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-start')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'flex-start')
- ]));
- case 4:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'center')
- ]),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'center')
- ]));
- default:
- return _Utils_Tuple2(
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'center')
- ]),
- _List_Nil);
- }
- }),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bb),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-grow', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-self', 'stretch !important')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e4),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'space-between')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eb),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', '-ms-grid'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- '.gp',
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Supports,
- _Utils_Tuple2('display', 'grid'),
- _List_fromArray(
- [
- _Utils_Tuple2('display', 'grid')
- ])),
- $mdgriffith$elm_ui$Internal$Style$gridAlignments(
- function (alignment) {
- switch (alignment) {
- case 0:
- return _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-start')
- ]);
- case 1:
- return _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'flex-end')
- ]);
- case 2:
- return _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-end')
- ]);
- case 3:
- return _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'flex-start')
- ]);
- case 4:
- return _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'align-items', 'center')
- ]);
- default:
- return _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'justify-content', 'center')
- ]);
- }
- })
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ao),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'block'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx + ':first-child'),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot(
- $mdgriffith$elm_ui$Internal$Style$classes.dx + ($mdgriffith$elm_ui$Internal$Style$selfName(3) + (':first-child + .' + $mdgriffith$elm_ui$Internal$Style$classes.dx))),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot(
- $mdgriffith$elm_ui$Internal$Style$classes.dx + ($mdgriffith$elm_ui$Internal$Style$selfName(2) + (':first-child + .' + $mdgriffith$elm_ui$Internal$Style$classes.dx))),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'margin', '0 !important')
- ])),
- $mdgriffith$elm_ui$Internal$Style$describeAlignment(
- function (alignment) {
- switch (alignment) {
- case 0:
- return _Utils_Tuple2(_List_Nil, _List_Nil);
- case 1:
- return _Utils_Tuple2(_List_Nil, _List_Nil);
- case 2:
- return _Utils_Tuple2(
- _List_Nil,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'float', 'right'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- '::after',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'content', '\"\"'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'table'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'clear', 'both')
- ]))
- ]));
- case 3:
- return _Utils_Tuple2(
- _List_Nil,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'float', 'left'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- '::after',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'content', '\"\"'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'table'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'clear', 'both')
- ]))
- ]));
- case 4:
- return _Utils_Tuple2(_List_Nil, _List_Nil);
- default:
- return _Utils_Tuple2(_List_Nil, _List_Nil);
- }
- })
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.em),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre-wrap !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'background-color', 'transparent')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ep),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e1),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'flex-basis', 'auto')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eo),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre-wrap !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'cursor', 'text'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.en),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'pre-wrap !important'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'color', 'transparent')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.cK),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'block'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'normal'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'overflow-wrap', 'break-word'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bD),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '0'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dB),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'z-index', '-1')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$AllChildren,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bY),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'normal')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$AllChildren,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.cK),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- '::after',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'content', 'none')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- '::before',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'content', 'none')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$AllChildren,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.e1),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'normal'),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dd),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline-block')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ej),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dB),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.di),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dC),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eF),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eD),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'flex')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bY),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'white-space', 'normal')
- ]))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eU),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ca),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline-flex')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Child,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eb),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'inline-grid')
- ])),
- $mdgriffith$elm_ui$Internal$Style$describeAlignment(
- function (alignment) {
- switch (alignment) {
- case 0:
- return _Utils_Tuple2(_List_Nil, _List_Nil);
- case 1:
- return _Utils_Tuple2(_List_Nil, _List_Nil);
- case 2:
- return _Utils_Tuple2(
- _List_Nil,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'float', 'right')
- ]));
- case 3:
- return _Utils_Tuple2(
- _List_Nil,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'float', 'left')
- ]));
- case 4:
- return _Utils_Tuple2(_List_Nil, _List_Nil);
- default:
- return _Utils_Tuple2(_List_Nil, _List_Nil);
- }
- })
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- '.hidden',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'display', 'none')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fo),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '100')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.ff),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '200')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fj),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '300')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fl),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '400')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fk),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '500')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fn),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '600')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dG),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '700')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fe),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '800')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fg),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-weight', '900')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.et),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-style', 'italic')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fa),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration', 'line-through')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fv),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration', 'underline'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration-skip-ink', 'auto'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration-skip', 'ink')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- _Utils_ap(
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fv),
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fa)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration', 'line-through underline'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration-skip-ink', 'auto'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-decoration-skip', 'ink')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fp),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-style', 'normal')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fh),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'justify')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bp),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'justify-all')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fd),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'center')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fm),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'right')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- $mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.fi),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'text-align', 'left')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Descriptor,
- '.modal',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'position', 'fixed'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'left', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'top', '0'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'width', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'height', '100%'),
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'pointer-events', 'none')
- ]))
- ]))
- ]);
-var $mdgriffith$elm_ui$Internal$Style$fontVariant = function (_var) {
- return _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- '.v-' + _var,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-feature-settings', '\"' + (_var + '\"'))
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- '.v-' + (_var + '-off'),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-feature-settings', '\"' + (_var + '\" 0'))
- ]))
- ]);
-};
-var $mdgriffith$elm_ui$Internal$Style$commonValues = $elm$core$List$concat(
- _List_fromArray(
- [
- A2(
- $elm$core$List$map,
- function (x) {
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- '.border-' + $elm$core$String$fromInt(x),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Prop,
- 'border-width',
- $elm$core$String$fromInt(x) + 'px')
- ]));
- },
- A2($elm$core$List$range, 0, 6)),
- A2(
- $elm$core$List$map,
- function (i) {
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- '.font-size-' + $elm$core$String$fromInt(i),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Prop,
- 'font-size',
- $elm$core$String$fromInt(i) + 'px')
- ]));
- },
- A2($elm$core$List$range, 8, 32)),
- A2(
- $elm$core$List$map,
- function (i) {
- return A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- '.p-' + $elm$core$String$fromInt(i),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Prop,
- 'padding',
- $elm$core$String$fromInt(i) + 'px')
- ]));
- },
- A2($elm$core$List$range, 0, 24)),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- '.v-smcp',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-variant', 'small-caps')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Style$Class,
- '.v-smcp-off',
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Style$Prop, 'font-variant', 'normal')
- ]))
- ]),
- $mdgriffith$elm_ui$Internal$Style$fontVariant('zero'),
- $mdgriffith$elm_ui$Internal$Style$fontVariant('onum'),
- $mdgriffith$elm_ui$Internal$Style$fontVariant('liga'),
- $mdgriffith$elm_ui$Internal$Style$fontVariant('dlig'),
- $mdgriffith$elm_ui$Internal$Style$fontVariant('ordn'),
- $mdgriffith$elm_ui$Internal$Style$fontVariant('tnum'),
- $mdgriffith$elm_ui$Internal$Style$fontVariant('afrc'),
- $mdgriffith$elm_ui$Internal$Style$fontVariant('frac')
- ]));
-var $mdgriffith$elm_ui$Internal$Style$explainer = '\n.explain {\n border: 6px solid rgb(174, 121, 15) !important;\n}\n.explain > .' + ($mdgriffith$elm_ui$Internal$Style$classes.dx + (' {\n border: 4px dashed rgb(0, 151, 167) !important;\n}\n\n.ctr {\n border: none !important;\n}\n.explain > .ctr > .' + ($mdgriffith$elm_ui$Internal$Style$classes.dx + ' {\n border: 4px dashed rgb(0, 151, 167) !important;\n}\n\n')));
-var $mdgriffith$elm_ui$Internal$Style$inputTextReset = '\ninput[type="search"],\ninput[type="search"]::-webkit-search-decoration,\ninput[type="search"]::-webkit-search-cancel-button,\ninput[type="search"]::-webkit-search-results-button,\ninput[type="search"]::-webkit-search-results-decoration {\n -webkit-appearance:none;\n}\n';
-var $mdgriffith$elm_ui$Internal$Style$sliderReset = '\ninput[type=range] {\n -webkit-appearance: none; \n background: transparent;\n position:absolute;\n left:0;\n top:0;\n z-index:10;\n width: 100%;\n outline: dashed 1px;\n height: 100%;\n opacity: 0;\n}\n';
-var $mdgriffith$elm_ui$Internal$Style$thumbReset = '\ninput[type=range]::-webkit-slider-thumb {\n -webkit-appearance: none;\n opacity: 0.5;\n width: 80px;\n height: 80px;\n background-color: black;\n border:none;\n border-radius: 5px;\n}\ninput[type=range]::-moz-range-thumb {\n opacity: 0.5;\n width: 80px;\n height: 80px;\n background-color: black;\n border:none;\n border-radius: 5px;\n}\ninput[type=range]::-ms-thumb {\n opacity: 0.5;\n width: 80px;\n height: 80px;\n background-color: black;\n border:none;\n border-radius: 5px;\n}\ninput[type=range][orient=vertical]{\n writing-mode: bt-lr; /* IE */\n -webkit-appearance: slider-vertical; /* WebKit */\n}\n';
-var $mdgriffith$elm_ui$Internal$Style$trackReset = '\ninput[type=range]::-moz-range-track {\n background: transparent;\n cursor: pointer;\n}\ninput[type=range]::-ms-track {\n background: transparent;\n cursor: pointer;\n}\ninput[type=range]::-webkit-slider-runnable-track {\n background: transparent;\n cursor: pointer;\n}\n';
-var $mdgriffith$elm_ui$Internal$Style$overrides = '@media screen and (-ms-high-contrast: active), (-ms-high-contrast: none) {' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eU) + (' > ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + (' { flex-basis: auto !important; } ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.eU) + (' > ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.bb) + (' { flex-basis: auto !important; }}' + ($mdgriffith$elm_ui$Internal$Style$inputTextReset + ($mdgriffith$elm_ui$Internal$Style$sliderReset + ($mdgriffith$elm_ui$Internal$Style$trackReset + ($mdgriffith$elm_ui$Internal$Style$thumbReset + $mdgriffith$elm_ui$Internal$Style$explainer)))))))))))))));
-var $mdgriffith$elm_ui$Internal$Style$Intermediate = $elm$core$Basics$identity;
-var $mdgriffith$elm_ui$Internal$Style$emptyIntermediate = F2(
- function (selector, closing) {
- return {a9: closing, m: _List_Nil, O: _List_Nil, A: selector};
- });
-var $mdgriffith$elm_ui$Internal$Style$renderRules = F2(
- function (_v0, rulesToRender) {
- var parent = _v0;
- var generateIntermediates = F2(
- function (rule, rendered) {
- switch (rule.$) {
- case 0:
- var name = rule.a;
- var val = rule.b;
- return _Utils_update(
- rendered,
- {
- O: A2(
- $elm$core$List$cons,
- _Utils_Tuple2(name, val),
- rendered.O)
- });
- case 3:
- var _v2 = rule.a;
- var prop = _v2.a;
- var value = _v2.b;
- var props = rule.b;
- return _Utils_update(
- rendered,
- {
- m: A2(
- $elm$core$List$cons,
- {a9: '\n}', m: _List_Nil, O: props, A: '@supports (' + (prop + (':' + (value + (') {' + parent.A))))},
- rendered.m)
- });
- case 5:
- var selector = rule.a;
- var adjRules = rule.b;
- return _Utils_update(
- rendered,
- {
- m: A2(
- $elm$core$List$cons,
- A2(
- $mdgriffith$elm_ui$Internal$Style$renderRules,
- A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, parent.A + (' + ' + selector), ''),
- adjRules),
- rendered.m)
- });
- case 1:
- var child = rule.a;
- var childRules = rule.b;
- return _Utils_update(
- rendered,
- {
- m: A2(
- $elm$core$List$cons,
- A2(
- $mdgriffith$elm_ui$Internal$Style$renderRules,
- A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, parent.A + (' > ' + child), ''),
- childRules),
- rendered.m)
- });
- case 2:
- var child = rule.a;
- var childRules = rule.b;
- return _Utils_update(
- rendered,
- {
- m: A2(
- $elm$core$List$cons,
- A2(
- $mdgriffith$elm_ui$Internal$Style$renderRules,
- A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, parent.A + (' ' + child), ''),
- childRules),
- rendered.m)
- });
- case 4:
- var descriptor = rule.a;
- var descriptorRules = rule.b;
- return _Utils_update(
- rendered,
- {
- m: A2(
- $elm$core$List$cons,
- A2(
- $mdgriffith$elm_ui$Internal$Style$renderRules,
- A2(
- $mdgriffith$elm_ui$Internal$Style$emptyIntermediate,
- _Utils_ap(parent.A, descriptor),
- ''),
- descriptorRules),
- rendered.m)
- });
- default:
- var batched = rule.a;
- return _Utils_update(
- rendered,
- {
- m: A2(
- $elm$core$List$cons,
- A2(
- $mdgriffith$elm_ui$Internal$Style$renderRules,
- A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, parent.A, ''),
- batched),
- rendered.m)
- });
- }
- });
- return A3($elm$core$List$foldr, generateIntermediates, parent, rulesToRender);
- });
-var $mdgriffith$elm_ui$Internal$Style$renderCompact = function (styleClasses) {
- var renderValues = function (values) {
- return $elm$core$String$concat(
- A2(
- $elm$core$List$map,
- function (_v3) {
- var x = _v3.a;
- var y = _v3.b;
- return x + (':' + (y + ';'));
- },
- values));
- };
- var renderClass = function (rule) {
- var _v2 = rule.O;
- if (!_v2.b) {
- return '';
- } else {
- return rule.A + ('{' + (renderValues(rule.O) + (rule.a9 + '}')));
- }
- };
- var renderIntermediate = function (_v0) {
- var rule = _v0;
- return _Utils_ap(
- renderClass(rule),
- $elm$core$String$concat(
- A2($elm$core$List$map, renderIntermediate, rule.m)));
- };
- return $elm$core$String$concat(
- A2(
- $elm$core$List$map,
- renderIntermediate,
- A3(
- $elm$core$List$foldr,
- F2(
- function (_v1, existing) {
- var name = _v1.a;
- var styleRules = _v1.b;
- return A2(
- $elm$core$List$cons,
- A2(
- $mdgriffith$elm_ui$Internal$Style$renderRules,
- A2($mdgriffith$elm_ui$Internal$Style$emptyIntermediate, name, ''),
- styleRules),
- existing);
- }),
- _List_Nil,
- styleClasses)));
-};
-var $mdgriffith$elm_ui$Internal$Style$rules = _Utils_ap(
- $mdgriffith$elm_ui$Internal$Style$overrides,
- $mdgriffith$elm_ui$Internal$Style$renderCompact(
- _Utils_ap($mdgriffith$elm_ui$Internal$Style$baseSheet, $mdgriffith$elm_ui$Internal$Style$commonValues)));
-var $elm$virtual_dom$VirtualDom$text = _VirtualDom_text;
-var $mdgriffith$elm_ui$Internal$Model$staticRoot = function (opts) {
- var _v0 = opts.eA;
- switch (_v0) {
- case 0:
- return A3(
- $elm$virtual_dom$VirtualDom$node,
- 'div',
- _List_Nil,
- _List_fromArray(
- [
- A3(
- $elm$virtual_dom$VirtualDom$node,
- 'style',
- _List_Nil,
- _List_fromArray(
- [
- $elm$virtual_dom$VirtualDom$text($mdgriffith$elm_ui$Internal$Style$rules)
- ]))
- ]));
- case 1:
- return $elm$virtual_dom$VirtualDom$text('');
- default:
- return A3(
- $elm$virtual_dom$VirtualDom$node,
- 'elm-ui-static-rules',
- _List_fromArray(
- [
- A2(
- $elm$virtual_dom$VirtualDom$property,
- 'rules',
- $elm$json$Json$Encode$string($mdgriffith$elm_ui$Internal$Style$rules))
- ]),
- _List_Nil);
- }
-};
-var $elm$json$Json$Encode$list = F2(
- function (func, entries) {
- return _Json_wrap(
- A3(
- $elm$core$List$foldl,
- _Json_addEntry(func),
- _Json_emptyArray(0),
- entries));
- });
-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(0),
- pairs));
-};
-var $elm$core$List$any = F2(
- function (isOkay, list) {
- any:
- while (true) {
- if (!list.b) {
- return false;
- } else {
- var x = list.a;
- var xs = list.b;
- if (isOkay(x)) {
- return true;
- } else {
- var $temp$isOkay = isOkay,
- $temp$list = xs;
- isOkay = $temp$isOkay;
- list = $temp$list;
- continue any;
- }
- }
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$fontName = function (font) {
- switch (font.$) {
- case 0:
- return 'serif';
- case 1:
- return 'sans-serif';
- case 2:
- return 'monospace';
- case 3:
- var name = font.a;
- return '\"' + (name + '\"');
- case 4:
- var name = font.a;
- var url = font.b;
- return '\"' + (name + '\"');
- default:
- var name = font.a.bj;
- return '\"' + (name + '\"');
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$isSmallCaps = function (_var) {
- switch (_var.$) {
- case 0:
- var name = _var.a;
- return name === 'smcp';
- case 1:
- var name = _var.a;
- return false;
- default:
- var name = _var.a;
- var index = _var.b;
- return (name === 'smcp') && (index === 1);
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$hasSmallCaps = function (typeface) {
- if (typeface.$ === 5) {
- var font = typeface.a;
- return A2($elm$core$List$any, $mdgriffith$elm_ui$Internal$Model$isSmallCaps, font.c8);
- } else {
- return false;
- }
-};
-var $elm$core$Basics$min = F2(
- function (x, y) {
- return (_Utils_cmp(x, y) < 0) ? x : y;
- });
-var $mdgriffith$elm_ui$Internal$Model$renderProps = F3(
- function (force, _v0, existing) {
- var key = _v0.a;
- var val = _v0.b;
- return force ? (existing + ('\n ' + (key + (': ' + (val + ' !important;'))))) : (existing + ('\n ' + (key + (': ' + (val + ';')))));
- });
-var $mdgriffith$elm_ui$Internal$Model$renderStyle = F4(
- function (options, maybePseudo, selector, props) {
- if (maybePseudo.$ === 1) {
- return _List_fromArray(
- [
- selector + ('{' + (A3(
- $elm$core$List$foldl,
- $mdgriffith$elm_ui$Internal$Model$renderProps(false),
- '',
- props) + '\n}'))
- ]);
- } else {
- var pseudo = maybePseudo.a;
- switch (pseudo) {
- case 1:
- var _v2 = options.ef;
- switch (_v2) {
- case 0:
- return _List_Nil;
- case 2:
- return _List_fromArray(
- [
- selector + ('-hv {' + (A3(
- $elm$core$List$foldl,
- $mdgriffith$elm_ui$Internal$Model$renderProps(true),
- '',
- props) + '\n}'))
- ]);
- default:
- return _List_fromArray(
- [
- selector + ('-hv:hover {' + (A3(
- $elm$core$List$foldl,
- $mdgriffith$elm_ui$Internal$Model$renderProps(false),
- '',
- props) + '\n}'))
- ]);
- }
- case 0:
- var renderedProps = A3(
- $elm$core$List$foldl,
- $mdgriffith$elm_ui$Internal$Model$renderProps(false),
- '',
- props);
- return _List_fromArray(
- [
- selector + ('-fs:focus {' + (renderedProps + '\n}')),
- ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.dx + (':focus ' + (selector + '-fs {')))) + (renderedProps + '\n}'),
- (selector + '-fs:focus-within {') + (renderedProps + '\n}'),
- ('.ui-slide-bar:focus + ' + ($mdgriffith$elm_ui$Internal$Style$dot($mdgriffith$elm_ui$Internal$Style$classes.dx) + (' .focusable-thumb' + (selector + '-fs {')))) + (renderedProps + '\n}')
- ]);
- default:
- return _List_fromArray(
- [
- selector + ('-act:active {' + (A3(
- $elm$core$List$foldl,
- $mdgriffith$elm_ui$Internal$Model$renderProps(false),
- '',
- props) + '\n}'))
- ]);
- }
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$renderVariant = function (_var) {
- switch (_var.$) {
- case 0:
- var name = _var.a;
- return '\"' + (name + '\"');
- case 1:
- var name = _var.a;
- return '\"' + (name + '\" 0');
- default:
- var name = _var.a;
- var index = _var.b;
- return '\"' + (name + ('\" ' + $elm$core$String$fromInt(index)));
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$renderVariants = function (typeface) {
- if (typeface.$ === 5) {
- var font = typeface.a;
- return $elm$core$Maybe$Just(
- A2(
- $elm$core$String$join,
- ', ',
- A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$renderVariant, font.c8)));
- } else {
- return $elm$core$Maybe$Nothing;
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$transformValue = function (transform) {
- switch (transform.$) {
- case 0:
- return $elm$core$Maybe$Nothing;
- case 1:
- var _v1 = transform.a;
- var x = _v1.a;
- var y = _v1.b;
- var z = _v1.c;
- return $elm$core$Maybe$Just(
- 'translate3d(' + ($elm$core$String$fromFloat(x) + ('px, ' + ($elm$core$String$fromFloat(y) + ('px, ' + ($elm$core$String$fromFloat(z) + 'px)'))))));
- default:
- var _v2 = transform.a;
- var tx = _v2.a;
- var ty = _v2.b;
- var tz = _v2.c;
- var _v3 = transform.b;
- var sx = _v3.a;
- var sy = _v3.b;
- var sz = _v3.c;
- var _v4 = transform.c;
- var ox = _v4.a;
- var oy = _v4.b;
- var oz = _v4.c;
- var angle = transform.d;
- var translate = 'translate3d(' + ($elm$core$String$fromFloat(tx) + ('px, ' + ($elm$core$String$fromFloat(ty) + ('px, ' + ($elm$core$String$fromFloat(tz) + 'px)')))));
- var scale = 'scale3d(' + ($elm$core$String$fromFloat(sx) + (', ' + ($elm$core$String$fromFloat(sy) + (', ' + ($elm$core$String$fromFloat(sz) + ')')))));
- var rotate = 'rotate3d(' + ($elm$core$String$fromFloat(ox) + (', ' + ($elm$core$String$fromFloat(oy) + (', ' + ($elm$core$String$fromFloat(oz) + (', ' + ($elm$core$String$fromFloat(angle) + 'rad)')))))));
- return $elm$core$Maybe$Just(translate + (' ' + (scale + (' ' + rotate))));
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$renderStyleRule = F3(
- function (options, rule, maybePseudo) {
- switch (rule.$) {
- case 0:
- var selector = rule.a;
- var props = rule.b;
- return A4($mdgriffith$elm_ui$Internal$Model$renderStyle, options, maybePseudo, selector, props);
- case 13:
- var name = rule.a;
- var prop = rule.b;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- '.' + name,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'box-shadow', prop)
- ]));
- case 12:
- var name = rule.a;
- var transparency = rule.b;
- var opacity = A2(
- $elm$core$Basics$max,
- 0,
- A2($elm$core$Basics$min, 1, 1 - transparency));
- return A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- '.' + name,
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'opacity',
- $elm$core$String$fromFloat(opacity))
- ]));
- case 2:
- var i = rule.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- '.font-size-' + $elm$core$String$fromInt(i),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'font-size',
- $elm$core$String$fromInt(i) + 'px')
- ]));
- case 1:
- var name = rule.a;
- var typefaces = rule.b;
- var features = A2(
- $elm$core$String$join,
- ', ',
- A2($elm$core$List$filterMap, $mdgriffith$elm_ui$Internal$Model$renderVariants, typefaces));
- var families = _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'font-family',
- A2(
- $elm$core$String$join,
- ', ',
- A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$fontName, typefaces))),
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'font-feature-settings', features),
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'font-variant',
- A2($elm$core$List$any, $mdgriffith$elm_ui$Internal$Model$hasSmallCaps, typefaces) ? 'small-caps' : 'normal')
- ]);
- return A4($mdgriffith$elm_ui$Internal$Model$renderStyle, options, maybePseudo, '.' + name, families);
- case 3:
- var _class = rule.a;
- var prop = rule.b;
- var val = rule.c;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- '.' + _class,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, prop, val)
- ]));
- case 4:
- var _class = rule.a;
- var prop = rule.b;
- var color = rule.c;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- '.' + _class,
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- prop,
- $mdgriffith$elm_ui$Internal$Model$formatColor(color))
- ]));
- case 5:
- var cls = rule.a;
- var x = rule.b;
- var y = rule.c;
- var yPx = $elm$core$String$fromInt(y) + 'px';
- var xPx = $elm$core$String$fromInt(x) + 'px';
- var single = '.' + $mdgriffith$elm_ui$Internal$Style$classes.e1;
- var row = '.' + $mdgriffith$elm_ui$Internal$Style$classes.eU;
- var wrappedRow = '.' + ($mdgriffith$elm_ui$Internal$Style$classes.b0 + row);
- var right = '.' + $mdgriffith$elm_ui$Internal$Style$classes.b3;
- var paragraph = '.' + $mdgriffith$elm_ui$Internal$Style$classes.cK;
- var page = '.' + $mdgriffith$elm_ui$Internal$Style$classes.ao;
- var left = '.' + $mdgriffith$elm_ui$Internal$Style$classes.b2;
- var halfY = $elm$core$String$fromFloat(y / 2) + 'px';
- var halfX = $elm$core$String$fromFloat(x / 2) + 'px';
- var column = '.' + $mdgriffith$elm_ui$Internal$Style$classes.ca;
- var _class = '.' + cls;
- var any = '.' + $mdgriffith$elm_ui$Internal$Style$classes.dx;
- return $elm$core$List$concat(
- _List_fromArray(
- [
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (row + (' > ' + (any + (' + ' + any)))),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-left', xPx)
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (wrappedRow + (' > ' + any)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin', halfY + (' ' + halfX))
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (column + (' > ' + (any + (' + ' + any)))),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-top', yPx)
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (page + (' > ' + (any + (' + ' + any)))),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-top', yPx)
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (page + (' > ' + left)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-right', xPx)
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (page + (' > ' + right)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-left', xPx)
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _Utils_ap(_class, paragraph),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'line-height',
- 'calc(1em + ' + ($elm$core$String$fromInt(y) + 'px)'))
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- 'textarea' + (any + _class),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'line-height',
- 'calc(1em + ' + ($elm$core$String$fromInt(y) + 'px)')),
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'height',
- 'calc(100% + ' + ($elm$core$String$fromInt(y) + 'px)'))
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (paragraph + (' > ' + left)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-right', xPx)
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (paragraph + (' > ' + right)),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'margin-left', xPx)
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (paragraph + '::after'),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'content', '\'\''),
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'display', 'block'),
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'height', '0'),
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'width', '0'),
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'margin-top',
- $elm$core$String$fromInt((-1) * ((y / 2) | 0)) + 'px')
- ])),
- A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class + (paragraph + '::before'),
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'content', '\'\''),
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'display', 'block'),
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'height', '0'),
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'width', '0'),
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'margin-bottom',
- $elm$core$String$fromInt((-1) * ((y / 2) | 0)) + 'px')
- ]))
- ]));
- case 7:
- var cls = rule.a;
- var top = rule.b;
- var right = rule.c;
- var bottom = rule.d;
- var left = rule.e;
- var _class = '.' + cls;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class,
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'padding',
- $elm$core$String$fromFloat(top) + ('px ' + ($elm$core$String$fromFloat(right) + ('px ' + ($elm$core$String$fromFloat(bottom) + ('px ' + ($elm$core$String$fromFloat(left) + 'px')))))))
- ]));
- case 6:
- var cls = rule.a;
- var top = rule.b;
- var right = rule.c;
- var bottom = rule.d;
- var left = rule.e;
- var _class = '.' + cls;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- _class,
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$Property,
- 'border-width',
- $elm$core$String$fromInt(top) + ('px ' + ($elm$core$String$fromInt(right) + ('px ' + ($elm$core$String$fromInt(bottom) + ('px ' + ($elm$core$String$fromInt(left) + 'px')))))))
- ]));
- case 8:
- var template = rule.a;
- var toGridLengthHelper = F3(
- function (minimum, maximum, x) {
- toGridLengthHelper:
- while (true) {
- switch (x.$) {
- case 0:
- var px = x.a;
- return $elm$core$String$fromInt(px) + 'px';
- case 1:
- var _v2 = _Utils_Tuple2(minimum, maximum);
- if (_v2.a.$ === 1) {
- if (_v2.b.$ === 1) {
- var _v3 = _v2.a;
- var _v4 = _v2.b;
- return 'max-content';
- } else {
- var _v6 = _v2.a;
- var maxSize = _v2.b.a;
- return 'minmax(max-content, ' + ($elm$core$String$fromInt(maxSize) + 'px)');
- }
- } else {
- if (_v2.b.$ === 1) {
- var minSize = _v2.a.a;
- var _v5 = _v2.b;
- return 'minmax(' + ($elm$core$String$fromInt(minSize) + ('px, ' + 'max-content)'));
- } else {
- var minSize = _v2.a.a;
- var maxSize = _v2.b.a;
- return 'minmax(' + ($elm$core$String$fromInt(minSize) + ('px, ' + ($elm$core$String$fromInt(maxSize) + 'px)')));
- }
- }
- case 2:
- var i = x.a;
- var _v7 = _Utils_Tuple2(minimum, maximum);
- if (_v7.a.$ === 1) {
- if (_v7.b.$ === 1) {
- var _v8 = _v7.a;
- var _v9 = _v7.b;
- return $elm$core$String$fromInt(i) + 'fr';
- } else {
- var _v11 = _v7.a;
- var maxSize = _v7.b.a;
- return 'minmax(max-content, ' + ($elm$core$String$fromInt(maxSize) + 'px)');
- }
- } else {
- if (_v7.b.$ === 1) {
- var minSize = _v7.a.a;
- var _v10 = _v7.b;
- return 'minmax(' + ($elm$core$String$fromInt(minSize) + ('px, ' + ($elm$core$String$fromInt(i) + ('fr' + 'fr)'))));
- } else {
- var minSize = _v7.a.a;
- var maxSize = _v7.b.a;
- return 'minmax(' + ($elm$core$String$fromInt(minSize) + ('px, ' + ($elm$core$String$fromInt(maxSize) + 'px)')));
- }
- }
- case 3:
- var m = x.a;
- var len = x.b;
- var $temp$minimum = $elm$core$Maybe$Just(m),
- $temp$maximum = maximum,
- $temp$x = len;
- minimum = $temp$minimum;
- maximum = $temp$maximum;
- x = $temp$x;
- continue toGridLengthHelper;
- default:
- var m = x.a;
- var len = x.b;
- var $temp$minimum = minimum,
- $temp$maximum = $elm$core$Maybe$Just(m),
- $temp$x = len;
- minimum = $temp$minimum;
- maximum = $temp$maximum;
- x = $temp$x;
- continue toGridLengthHelper;
- }
- }
- });
- var toGridLength = function (x) {
- return A3(toGridLengthHelper, $elm$core$Maybe$Nothing, $elm$core$Maybe$Nothing, x);
- };
- var xSpacing = toGridLength(template.e5.a);
- var ySpacing = toGridLength(template.e5.b);
- var rows = function (x) {
- return 'grid-template-rows: ' + (x + ';');
- }(
- A2(
- $elm$core$String$join,
- ' ',
- A2($elm$core$List$map, toGridLength, template.eV)));
- var msRows = function (x) {
- return '-ms-grid-rows: ' + (x + ';');
- }(
- A2(
- $elm$core$String$join,
- ySpacing,
- A2($elm$core$List$map, toGridLength, template.dU)));
- var msColumns = function (x) {
- return '-ms-grid-columns: ' + (x + ';');
- }(
- A2(
- $elm$core$String$join,
- ySpacing,
- A2($elm$core$List$map, toGridLength, template.dU)));
- var gapY = 'grid-row-gap:' + (toGridLength(template.e5.b) + ';');
- var gapX = 'grid-column-gap:' + (toGridLength(template.e5.a) + ';');
- var columns = function (x) {
- return 'grid-template-columns: ' + (x + ';');
- }(
- A2(
- $elm$core$String$join,
- ' ',
- A2($elm$core$List$map, toGridLength, template.dU)));
- var _class = '.grid-rows-' + (A2(
- $elm$core$String$join,
- '-',
- A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$lengthClassName, template.eV)) + ('-cols-' + (A2(
- $elm$core$String$join,
- '-',
- A2($elm$core$List$map, $mdgriffith$elm_ui$Internal$Model$lengthClassName, template.dU)) + ('-space-x-' + ($mdgriffith$elm_ui$Internal$Model$lengthClassName(template.e5.a) + ('-space-y-' + $mdgriffith$elm_ui$Internal$Model$lengthClassName(template.e5.b)))))));
- var modernGrid = _class + ('{' + (columns + (rows + (gapX + (gapY + '}')))));
- var supports = '@supports (display:grid) {' + (modernGrid + '}');
- var base = _class + ('{' + (msColumns + (msRows + '}')));
- return _List_fromArray(
- [base, supports]);
- case 9:
- var position = rule.a;
- var msPosition = A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [
- '-ms-grid-row: ' + ($elm$core$String$fromInt(position.eU) + ';'),
- '-ms-grid-row-span: ' + ($elm$core$String$fromInt(position.cl) + ';'),
- '-ms-grid-column: ' + ($elm$core$String$fromInt(position.dT) + ';'),
- '-ms-grid-column-span: ' + ($elm$core$String$fromInt(position.dc) + ';')
- ]));
- var modernPosition = A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [
- 'grid-row: ' + ($elm$core$String$fromInt(position.eU) + (' / ' + ($elm$core$String$fromInt(position.eU + position.cl) + ';'))),
- 'grid-column: ' + ($elm$core$String$fromInt(position.dT) + (' / ' + ($elm$core$String$fromInt(position.dT + position.dc) + ';')))
- ]));
- var _class = '.grid-pos-' + ($elm$core$String$fromInt(position.eU) + ('-' + ($elm$core$String$fromInt(position.dT) + ('-' + ($elm$core$String$fromInt(position.dc) + ('-' + $elm$core$String$fromInt(position.cl)))))));
- var modernGrid = _class + ('{' + (modernPosition + '}'));
- var supports = '@supports (display:grid) {' + (modernGrid + '}');
- var base = _class + ('{' + (msPosition + '}'));
- return _List_fromArray(
- [base, supports]);
- case 11:
- var _class = rule.a;
- var styles = rule.b;
- var renderPseudoRule = function (style) {
- return A3(
- $mdgriffith$elm_ui$Internal$Model$renderStyleRule,
- options,
- style,
- $elm$core$Maybe$Just(_class));
- };
- return A2($elm$core$List$concatMap, renderPseudoRule, styles);
- default:
- var transform = rule.a;
- var val = $mdgriffith$elm_ui$Internal$Model$transformValue(transform);
- var _class = $mdgriffith$elm_ui$Internal$Model$transformClass(transform);
- var _v12 = _Utils_Tuple2(_class, val);
- if ((!_v12.a.$) && (!_v12.b.$)) {
- var cls = _v12.a.a;
- var v = _v12.b.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$renderStyle,
- options,
- maybePseudo,
- '.' + cls,
- _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$Property, 'transform', v)
- ]));
- } else {
- return _List_Nil;
- }
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$encodeStyles = F2(
- function (options, stylesheet) {
- return $elm$json$Json$Encode$object(
- A2(
- $elm$core$List$map,
- function (style) {
- var styled = A3($mdgriffith$elm_ui$Internal$Model$renderStyleRule, options, style, $elm$core$Maybe$Nothing);
- return _Utils_Tuple2(
- $mdgriffith$elm_ui$Internal$Model$getStyleName(style),
- A2($elm$json$Json$Encode$list, $elm$json$Json$Encode$string, styled));
- },
- stylesheet));
- });
-var $mdgriffith$elm_ui$Internal$Model$bracket = F2(
- function (selector, rules) {
- var renderPair = function (_v0) {
- var name = _v0.a;
- var val = _v0.b;
- return name + (': ' + (val + ';'));
- };
- return selector + (' {' + (A2(
- $elm$core$String$join,
- '',
- A2($elm$core$List$map, renderPair, rules)) + '}'));
- });
-var $mdgriffith$elm_ui$Internal$Model$fontRule = F3(
- function (name, modifier, _v0) {
- var parentAdj = _v0.a;
- var textAdjustment = _v0.b;
- return _List_fromArray(
- [
- A2($mdgriffith$elm_ui$Internal$Model$bracket, '.' + (name + ('.' + (modifier + (', ' + ('.' + (name + (' .' + modifier))))))), parentAdj),
- A2($mdgriffith$elm_ui$Internal$Model$bracket, '.' + (name + ('.' + (modifier + ('> .' + ($mdgriffith$elm_ui$Internal$Style$classes.bY + (', .' + (name + (' .' + (modifier + (' > .' + $mdgriffith$elm_ui$Internal$Style$classes.bY)))))))))), textAdjustment)
- ]);
- });
-var $mdgriffith$elm_ui$Internal$Model$renderFontAdjustmentRule = F3(
- function (fontToAdjust, _v0, otherFontName) {
- var full = _v0.a;
- var capital = _v0.b;
- var name = _Utils_eq(fontToAdjust, otherFontName) ? fontToAdjust : (otherFontName + (' .' + fontToAdjust));
- return A2(
- $elm$core$String$join,
- ' ',
- _Utils_ap(
- A3($mdgriffith$elm_ui$Internal$Model$fontRule, name, $mdgriffith$elm_ui$Internal$Style$classes.e2, capital),
- A3($mdgriffith$elm_ui$Internal$Model$fontRule, name, $mdgriffith$elm_ui$Internal$Style$classes.d8, full)));
- });
-var $mdgriffith$elm_ui$Internal$Model$renderNullAdjustmentRule = F2(
- function (fontToAdjust, otherFontName) {
- var name = _Utils_eq(fontToAdjust, otherFontName) ? fontToAdjust : (otherFontName + (' .' + fontToAdjust));
- return A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$bracket,
- '.' + (name + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.e2 + (', ' + ('.' + (name + (' .' + $mdgriffith$elm_ui$Internal$Style$classes.e2))))))),
- _List_fromArray(
- [
- _Utils_Tuple2('line-height', '1')
- ])),
- A2(
- $mdgriffith$elm_ui$Internal$Model$bracket,
- '.' + (name + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.e2 + ('> .' + ($mdgriffith$elm_ui$Internal$Style$classes.bY + (', .' + (name + (' .' + ($mdgriffith$elm_ui$Internal$Style$classes.e2 + (' > .' + $mdgriffith$elm_ui$Internal$Style$classes.bY)))))))))),
- _List_fromArray(
- [
- _Utils_Tuple2('vertical-align', '0'),
- _Utils_Tuple2('line-height', '1')
- ]))
- ]));
- });
-var $mdgriffith$elm_ui$Internal$Model$adjust = F3(
- function (size, height, vertical) {
- return {cl: height / size, bo: size, c9: vertical};
- });
-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 $elm$core$List$maximum = function (list) {
- if (list.b) {
- var x = list.a;
- var xs = list.b;
- return $elm$core$Maybe$Just(
- A3($elm$core$List$foldl, $elm$core$Basics$max, x, xs));
- } else {
- return $elm$core$Maybe$Nothing;
- }
-};
-var $elm$core$List$minimum = function (list) {
- if (list.b) {
- var x = list.a;
- var xs = list.b;
- return $elm$core$Maybe$Just(
- A3($elm$core$List$foldl, $elm$core$Basics$min, x, xs));
- } else {
- return $elm$core$Maybe$Nothing;
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$convertAdjustment = function (adjustment) {
- var lines = _List_fromArray(
- [adjustment.dO, adjustment.dA, adjustment.d$, adjustment.ex]);
- var lineHeight = 1.5;
- var normalDescender = (lineHeight - 1) / 2;
- var oldMiddle = lineHeight / 2;
- var descender = A2(
- $elm$core$Maybe$withDefault,
- adjustment.d$,
- $elm$core$List$minimum(lines));
- var newBaseline = A2(
- $elm$core$Maybe$withDefault,
- adjustment.dA,
- $elm$core$List$minimum(
- A2(
- $elm$core$List$filter,
- function (x) {
- return !_Utils_eq(x, descender);
- },
- lines)));
- var base = lineHeight;
- var ascender = A2(
- $elm$core$Maybe$withDefault,
- adjustment.dO,
- $elm$core$List$maximum(lines));
- var capitalSize = 1 / (ascender - newBaseline);
- var capitalVertical = 1 - ascender;
- var fullSize = 1 / (ascender - descender);
- var fullVertical = 1 - ascender;
- var newCapitalMiddle = ((ascender - newBaseline) / 2) + newBaseline;
- var newFullMiddle = ((ascender - descender) / 2) + descender;
- return {
- dO: A3($mdgriffith$elm_ui$Internal$Model$adjust, capitalSize, ascender - newBaseline, capitalVertical),
- ci: A3($mdgriffith$elm_ui$Internal$Model$adjust, fullSize, ascender - descender, fullVertical)
- };
-};
-var $mdgriffith$elm_ui$Internal$Model$fontAdjustmentRules = function (converted) {
- return _Utils_Tuple2(
- _List_fromArray(
- [
- _Utils_Tuple2('display', 'block')
- ]),
- _List_fromArray(
- [
- _Utils_Tuple2('display', 'inline-block'),
- _Utils_Tuple2(
- 'line-height',
- $elm$core$String$fromFloat(converted.cl)),
- _Utils_Tuple2(
- 'vertical-align',
- $elm$core$String$fromFloat(converted.c9) + 'em'),
- _Utils_Tuple2(
- 'font-size',
- $elm$core$String$fromFloat(converted.bo) + 'em')
- ]));
-};
-var $mdgriffith$elm_ui$Internal$Model$typefaceAdjustment = function (typefaces) {
- return A3(
- $elm$core$List$foldl,
- F2(
- function (face, found) {
- if (found.$ === 1) {
- if (face.$ === 5) {
- var _with = face.a;
- var _v2 = _with.dk;
- if (_v2.$ === 1) {
- return found;
- } else {
- var adjustment = _v2.a;
- return $elm$core$Maybe$Just(
- _Utils_Tuple2(
- $mdgriffith$elm_ui$Internal$Model$fontAdjustmentRules(
- function ($) {
- return $.ci;
- }(
- $mdgriffith$elm_ui$Internal$Model$convertAdjustment(adjustment))),
- $mdgriffith$elm_ui$Internal$Model$fontAdjustmentRules(
- function ($) {
- return $.dO;
- }(
- $mdgriffith$elm_ui$Internal$Model$convertAdjustment(adjustment)))));
- }
- } else {
- return found;
- }
- } else {
- return found;
- }
- }),
- $elm$core$Maybe$Nothing,
- typefaces);
-};
-var $mdgriffith$elm_ui$Internal$Model$renderTopLevelValues = function (rules) {
- var withImport = function (font) {
- if (font.$ === 4) {
- var url = font.b;
- return $elm$core$Maybe$Just('@import url(\'' + (url + '\');'));
- } else {
- return $elm$core$Maybe$Nothing;
- }
- };
- var fontImports = function (_v2) {
- var name = _v2.a;
- var typefaces = _v2.b;
- var imports = A2(
- $elm$core$String$join,
- '\n',
- A2($elm$core$List$filterMap, withImport, typefaces));
- return imports;
- };
- var allNames = A2($elm$core$List$map, $elm$core$Tuple$first, rules);
- var fontAdjustments = function (_v1) {
- var name = _v1.a;
- var typefaces = _v1.b;
- var _v0 = $mdgriffith$elm_ui$Internal$Model$typefaceAdjustment(typefaces);
- if (_v0.$ === 1) {
- return A2(
- $elm$core$String$join,
- '',
- A2(
- $elm$core$List$map,
- $mdgriffith$elm_ui$Internal$Model$renderNullAdjustmentRule(name),
- allNames));
- } else {
- var adjustment = _v0.a;
- return A2(
- $elm$core$String$join,
- '',
- A2(
- $elm$core$List$map,
- A2($mdgriffith$elm_ui$Internal$Model$renderFontAdjustmentRule, name, adjustment),
- allNames));
- }
- };
- return _Utils_ap(
- A2(
- $elm$core$String$join,
- '\n',
- A2($elm$core$List$map, fontImports, rules)),
- A2(
- $elm$core$String$join,
- '\n',
- A2($elm$core$List$map, fontAdjustments, rules)));
-};
-var $mdgriffith$elm_ui$Internal$Model$topLevelValue = function (rule) {
- if (rule.$ === 1) {
- var name = rule.a;
- var typefaces = rule.b;
- return $elm$core$Maybe$Just(
- _Utils_Tuple2(name, typefaces));
- } else {
- return $elm$core$Maybe$Nothing;
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$toStyleSheetString = F2(
- function (options, stylesheet) {
- var combine = F2(
- function (style, rendered) {
- return {
- bn: _Utils_ap(
- rendered.bn,
- A3($mdgriffith$elm_ui$Internal$Model$renderStyleRule, options, style, $elm$core$Maybe$Nothing)),
- a_: function () {
- var _v1 = $mdgriffith$elm_ui$Internal$Model$topLevelValue(style);
- if (_v1.$ === 1) {
- return rendered.a_;
- } else {
- var topLevel = _v1.a;
- return A2($elm$core$List$cons, topLevel, rendered.a_);
- }
- }()
- };
- });
- var _v0 = A3(
- $elm$core$List$foldl,
- combine,
- {bn: _List_Nil, a_: _List_Nil},
- stylesheet);
- var topLevel = _v0.a_;
- var rules = _v0.bn;
- return _Utils_ap(
- $mdgriffith$elm_ui$Internal$Model$renderTopLevelValues(topLevel),
- $elm$core$String$concat(rules));
- });
-var $mdgriffith$elm_ui$Internal$Model$toStyleSheet = F2(
- function (options, styleSheet) {
- var _v0 = options.eA;
- switch (_v0) {
- case 0:
- return A3(
- $elm$virtual_dom$VirtualDom$node,
- 'div',
- _List_Nil,
- _List_fromArray(
- [
- A3(
- $elm$virtual_dom$VirtualDom$node,
- 'style',
- _List_Nil,
- _List_fromArray(
- [
- $elm$virtual_dom$VirtualDom$text(
- A2($mdgriffith$elm_ui$Internal$Model$toStyleSheetString, options, styleSheet))
- ]))
- ]));
- case 1:
- return A3(
- $elm$virtual_dom$VirtualDom$node,
- 'div',
- _List_Nil,
- _List_fromArray(
- [
- A3(
- $elm$virtual_dom$VirtualDom$node,
- 'style',
- _List_Nil,
- _List_fromArray(
- [
- $elm$virtual_dom$VirtualDom$text(
- A2($mdgriffith$elm_ui$Internal$Model$toStyleSheetString, options, styleSheet))
- ]))
- ]));
- default:
- return A3(
- $elm$virtual_dom$VirtualDom$node,
- 'elm-ui-rules',
- _List_fromArray(
- [
- A2(
- $elm$virtual_dom$VirtualDom$property,
- 'rules',
- A2($mdgriffith$elm_ui$Internal$Model$encodeStyles, options, styleSheet))
- ]),
- _List_Nil);
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$embedKeyed = F4(
- function (_static, opts, styles, children) {
- var dynamicStyleSheet = A2(
- $mdgriffith$elm_ui$Internal$Model$toStyleSheet,
- opts,
- A3(
- $elm$core$List$foldl,
- $mdgriffith$elm_ui$Internal$Model$reduceStyles,
- _Utils_Tuple2(
- $elm$core$Set$empty,
- $mdgriffith$elm_ui$Internal$Model$renderFocusStyle(opts.d6)),
- styles).b);
- return _static ? A2(
- $elm$core$List$cons,
- _Utils_Tuple2(
- 'static-stylesheet',
- $mdgriffith$elm_ui$Internal$Model$staticRoot(opts)),
- A2(
- $elm$core$List$cons,
- _Utils_Tuple2('dynamic-stylesheet', dynamicStyleSheet),
- children)) : A2(
- $elm$core$List$cons,
- _Utils_Tuple2('dynamic-stylesheet', dynamicStyleSheet),
- children);
- });
-var $mdgriffith$elm_ui$Internal$Model$embedWith = F4(
- function (_static, opts, styles, children) {
- var dynamicStyleSheet = A2(
- $mdgriffith$elm_ui$Internal$Model$toStyleSheet,
- opts,
- A3(
- $elm$core$List$foldl,
- $mdgriffith$elm_ui$Internal$Model$reduceStyles,
- _Utils_Tuple2(
- $elm$core$Set$empty,
- $mdgriffith$elm_ui$Internal$Model$renderFocusStyle(opts.d6)),
- styles).b);
- return _static ? A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$staticRoot(opts),
- A2($elm$core$List$cons, dynamicStyleSheet, children)) : A2($elm$core$List$cons, dynamicStyleSheet, children);
- });
-var $mdgriffith$elm_ui$Internal$Flag$heightBetween = $mdgriffith$elm_ui$Internal$Flag$flag(45);
-var $mdgriffith$elm_ui$Internal$Flag$heightFill = $mdgriffith$elm_ui$Internal$Flag$flag(37);
-var $elm$virtual_dom$VirtualDom$keyedNode = function (tag) {
- return _VirtualDom_keyedNode(
- _VirtualDom_noScript(tag));
-};
-var $elm$html$Html$p = _VirtualDom_node('p');
-var $mdgriffith$elm_ui$Internal$Flag$present = F2(
- function (myFlag, _v0) {
- var fieldOne = _v0.a;
- var fieldTwo = _v0.b;
- if (!myFlag.$) {
- var first = myFlag.a;
- return _Utils_eq(first & fieldOne, first);
- } else {
- var second = myFlag.a;
- return _Utils_eq(second & fieldTwo, second);
- }
- });
-var $elm$html$Html$s = _VirtualDom_node('s');
-var $elm$html$Html$u = _VirtualDom_node('u');
-var $mdgriffith$elm_ui$Internal$Flag$widthBetween = $mdgriffith$elm_ui$Internal$Flag$flag(44);
-var $mdgriffith$elm_ui$Internal$Flag$widthFill = $mdgriffith$elm_ui$Internal$Flag$flag(39);
-var $mdgriffith$elm_ui$Internal$Model$finalizeNode = F6(
- function (has, node, attributes, children, embedMode, parentContext) {
- var createNode = F2(
- function (nodeName, attrs) {
- if (children.$ === 1) {
- var keyed = children.a;
- return A3(
- $elm$virtual_dom$VirtualDom$keyedNode,
- nodeName,
- attrs,
- function () {
- switch (embedMode.$) {
- case 0:
- return keyed;
- case 2:
- var opts = embedMode.a;
- var styles = embedMode.b;
- return A4($mdgriffith$elm_ui$Internal$Model$embedKeyed, false, opts, styles, keyed);
- default:
- var opts = embedMode.a;
- var styles = embedMode.b;
- return A4($mdgriffith$elm_ui$Internal$Model$embedKeyed, true, opts, styles, keyed);
- }
- }());
- } else {
- var unkeyed = children.a;
- return A2(
- function () {
- switch (nodeName) {
- case 'div':
- return $elm$html$Html$div;
- case 'p':
- return $elm$html$Html$p;
- default:
- return $elm$virtual_dom$VirtualDom$node(nodeName);
- }
- }(),
- attrs,
- function () {
- switch (embedMode.$) {
- case 0:
- return unkeyed;
- case 2:
- var opts = embedMode.a;
- var styles = embedMode.b;
- return A4($mdgriffith$elm_ui$Internal$Model$embedWith, false, opts, styles, unkeyed);
- default:
- var opts = embedMode.a;
- var styles = embedMode.b;
- return A4($mdgriffith$elm_ui$Internal$Model$embedWith, true, opts, styles, unkeyed);
- }
- }());
- }
- });
- var html = function () {
- switch (node.$) {
- case 0:
- return A2(createNode, 'div', attributes);
- case 1:
- var nodeName = node.a;
- return A2(createNode, nodeName, attributes);
- default:
- var nodeName = node.a;
- var internal = node.b;
- return A3(
- $elm$virtual_dom$VirtualDom$node,
- nodeName,
- attributes,
- _List_fromArray(
- [
- A2(
- createNode,
- internal,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class($mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.e1))
- ]))
- ]));
- }
- }();
- switch (parentContext) {
- case 0:
- return (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$widthFill, has) && (!A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$widthBetween, has))) ? html : (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$alignRight, has) ? A2(
- $elm$html$Html$u,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class(
- A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.dx, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.bb, $mdgriffith$elm_ui$Internal$Style$classes.I, $mdgriffith$elm_ui$Internal$Style$classes.ds])))
- ]),
- _List_fromArray(
- [html])) : (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$centerX, has) ? A2(
- $elm$html$Html$s,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class(
- A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.dx, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.bb, $mdgriffith$elm_ui$Internal$Style$classes.I, $mdgriffith$elm_ui$Internal$Style$classes.dq])))
- ]),
- _List_fromArray(
- [html])) : html));
- case 1:
- return (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$heightFill, has) && (!A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$heightBetween, has))) ? html : (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$centerY, has) ? A2(
- $elm$html$Html$s,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class(
- A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.dx, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.bb, $mdgriffith$elm_ui$Internal$Style$classes.dr])))
- ]),
- _List_fromArray(
- [html])) : (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$alignBottom, has) ? A2(
- $elm$html$Html$u,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class(
- A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.dx, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.bb, $mdgriffith$elm_ui$Internal$Style$classes.dp])))
- ]),
- _List_fromArray(
- [html])) : html));
- default:
- return html;
- }
- });
-var $elm$core$List$isEmpty = function (xs) {
- if (!xs.b) {
- return true;
- } else {
- return false;
- }
-};
-var $elm$html$Html$text = $elm$virtual_dom$VirtualDom$text;
-var $mdgriffith$elm_ui$Internal$Model$textElementClasses = $mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.bY + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.bZ + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.bE)))));
-var $mdgriffith$elm_ui$Internal$Model$textElement = function (str) {
- return A2(
- $elm$html$Html$div,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class($mdgriffith$elm_ui$Internal$Model$textElementClasses)
- ]),
- _List_fromArray(
- [
- $elm$html$Html$text(str)
- ]));
-};
-var $mdgriffith$elm_ui$Internal$Model$textElementFillClasses = $mdgriffith$elm_ui$Internal$Style$classes.dx + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.bY + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.b_ + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.bF)))));
-var $mdgriffith$elm_ui$Internal$Model$textElementFill = function (str) {
- return A2(
- $elm$html$Html$div,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class($mdgriffith$elm_ui$Internal$Model$textElementFillClasses)
- ]),
- _List_fromArray(
- [
- $elm$html$Html$text(str)
- ]));
-};
-var $mdgriffith$elm_ui$Internal$Model$createElement = F3(
- function (context, children, rendered) {
- var gatherKeyed = F2(
- function (_v8, _v9) {
- var key = _v8.a;
- var child = _v8.b;
- var htmls = _v9.a;
- var existingStyles = _v9.b;
- switch (child.$) {
- case 0:
- var html = child.a;
- return _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asParagraph) ? _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- _Utils_Tuple2(
- key,
- html(context)),
- htmls),
- existingStyles) : _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- _Utils_Tuple2(
- key,
- html(context)),
- htmls),
- existingStyles);
- case 1:
- var styled = child.a;
- return _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asParagraph) ? _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- _Utils_Tuple2(
- key,
- A2(styled.eg, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, context)),
- htmls),
- $elm$core$List$isEmpty(existingStyles) ? styled.fb : _Utils_ap(styled.fb, existingStyles)) : _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- _Utils_Tuple2(
- key,
- A2(styled.eg, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, context)),
- htmls),
- $elm$core$List$isEmpty(existingStyles) ? styled.fb : _Utils_ap(styled.fb, existingStyles));
- case 2:
- var str = child.a;
- return _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- _Utils_Tuple2(
- key,
- _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asEl) ? $mdgriffith$elm_ui$Internal$Model$textElementFill(str) : $mdgriffith$elm_ui$Internal$Model$textElement(str)),
- htmls),
- existingStyles);
- default:
- return _Utils_Tuple2(htmls, existingStyles);
- }
- });
- var gather = F2(
- function (child, _v6) {
- var htmls = _v6.a;
- var existingStyles = _v6.b;
- switch (child.$) {
- case 0:
- var html = child.a;
- return _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asParagraph) ? _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- html(context),
- htmls),
- existingStyles) : _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- html(context),
- htmls),
- existingStyles);
- case 1:
- var styled = child.a;
- return _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asParagraph) ? _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- A2(styled.eg, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, context),
- htmls),
- $elm$core$List$isEmpty(existingStyles) ? styled.fb : _Utils_ap(styled.fb, existingStyles)) : _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- A2(styled.eg, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, context),
- htmls),
- $elm$core$List$isEmpty(existingStyles) ? styled.fb : _Utils_ap(styled.fb, existingStyles));
- case 2:
- var str = child.a;
- return _Utils_Tuple2(
- A2(
- $elm$core$List$cons,
- _Utils_eq(context, $mdgriffith$elm_ui$Internal$Model$asEl) ? $mdgriffith$elm_ui$Internal$Model$textElementFill(str) : $mdgriffith$elm_ui$Internal$Model$textElement(str),
- htmls),
- existingStyles);
- default:
- return _Utils_Tuple2(htmls, existingStyles);
- }
- });
- if (children.$ === 1) {
- var keyedChildren = children.a;
- var _v1 = A3(
- $elm$core$List$foldr,
- gatherKeyed,
- _Utils_Tuple2(_List_Nil, _List_Nil),
- keyedChildren);
- var keyed = _v1.a;
- var styles = _v1.b;
- var newStyles = $elm$core$List$isEmpty(styles) ? rendered.fb : _Utils_ap(rendered.fb, styles);
- if (!newStyles.b) {
- return $mdgriffith$elm_ui$Internal$Model$Unstyled(
- A5(
- $mdgriffith$elm_ui$Internal$Model$finalizeNode,
- rendered.T,
- rendered.V,
- rendered.bw,
- $mdgriffith$elm_ui$Internal$Model$Keyed(
- A3($mdgriffith$elm_ui$Internal$Model$addKeyedChildren, 'nearby-element-pls', keyed, rendered.a8)),
- $mdgriffith$elm_ui$Internal$Model$NoStyleSheet));
- } else {
- var allStyles = newStyles;
- return $mdgriffith$elm_ui$Internal$Model$Styled(
- {
- eg: A4(
- $mdgriffith$elm_ui$Internal$Model$finalizeNode,
- rendered.T,
- rendered.V,
- rendered.bw,
- $mdgriffith$elm_ui$Internal$Model$Keyed(
- A3($mdgriffith$elm_ui$Internal$Model$addKeyedChildren, 'nearby-element-pls', keyed, rendered.a8))),
- fb: allStyles
- });
- }
- } else {
- var unkeyedChildren = children.a;
- var _v3 = A3(
- $elm$core$List$foldr,
- gather,
- _Utils_Tuple2(_List_Nil, _List_Nil),
- unkeyedChildren);
- var unkeyed = _v3.a;
- var styles = _v3.b;
- var newStyles = $elm$core$List$isEmpty(styles) ? rendered.fb : _Utils_ap(rendered.fb, styles);
- if (!newStyles.b) {
- return $mdgriffith$elm_ui$Internal$Model$Unstyled(
- A5(
- $mdgriffith$elm_ui$Internal$Model$finalizeNode,
- rendered.T,
- rendered.V,
- rendered.bw,
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- A2($mdgriffith$elm_ui$Internal$Model$addChildren, unkeyed, rendered.a8)),
- $mdgriffith$elm_ui$Internal$Model$NoStyleSheet));
- } else {
- var allStyles = newStyles;
- return $mdgriffith$elm_ui$Internal$Model$Styled(
- {
- eg: A4(
- $mdgriffith$elm_ui$Internal$Model$finalizeNode,
- rendered.T,
- rendered.V,
- rendered.bw,
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- A2($mdgriffith$elm_ui$Internal$Model$addChildren, unkeyed, rendered.a8))),
- fb: allStyles
- });
- }
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$Single = F3(
- function (a, b, c) {
- return {$: 3, a: a, b: b, c: c};
- });
-var $mdgriffith$elm_ui$Internal$Model$Transform = function (a) {
- return {$: 10, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Flag$Field = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Flag$add = F2(
- function (myFlag, _v0) {
- var one = _v0.a;
- var two = _v0.b;
- if (!myFlag.$) {
- var first = myFlag.a;
- return A2($mdgriffith$elm_ui$Internal$Flag$Field, first | one, two);
- } else {
- var second = myFlag.a;
- return A2($mdgriffith$elm_ui$Internal$Flag$Field, one, second | two);
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$ChildrenBehind = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront = F2(
- function (a, b) {
- return {$: 3, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Model$ChildrenInFront = function (a) {
- return {$: 2, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$nearbyElement = F2(
- function (location, elem) {
- return A2(
- $elm$html$Html$div,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class(
- function () {
- switch (location) {
- case 0:
- return A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.am, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.di]));
- case 1:
- return A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.am, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.dC]));
- case 2:
- return A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.am, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.eF]));
- case 3:
- return A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.am, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.eD]));
- case 4:
- return A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.am, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.ej]));
- default:
- return A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.am, $mdgriffith$elm_ui$Internal$Style$classes.e1, $mdgriffith$elm_ui$Internal$Style$classes.dB]));
- }
- }())
- ]),
- _List_fromArray(
- [
- function () {
- switch (elem.$) {
- case 3:
- return $elm$virtual_dom$VirtualDom$text('');
- case 2:
- var str = elem.a;
- return $mdgriffith$elm_ui$Internal$Model$textElement(str);
- case 0:
- var html = elem.a;
- return html($mdgriffith$elm_ui$Internal$Model$asEl);
- default:
- var styled = elem.a;
- return A2(styled.eg, $mdgriffith$elm_ui$Internal$Model$NoStyleSheet, $mdgriffith$elm_ui$Internal$Model$asEl);
- }
- }()
- ]));
- });
-var $mdgriffith$elm_ui$Internal$Model$addNearbyElement = F3(
- function (location, elem, existing) {
- var nearby = A2($mdgriffith$elm_ui$Internal$Model$nearbyElement, location, elem);
- switch (existing.$) {
- case 0:
- if (location === 5) {
- return $mdgriffith$elm_ui$Internal$Model$ChildrenBehind(
- _List_fromArray(
- [nearby]));
- } else {
- return $mdgriffith$elm_ui$Internal$Model$ChildrenInFront(
- _List_fromArray(
- [nearby]));
- }
- case 1:
- var existingBehind = existing.a;
- if (location === 5) {
- return $mdgriffith$elm_ui$Internal$Model$ChildrenBehind(
- A2($elm$core$List$cons, nearby, existingBehind));
- } else {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront,
- existingBehind,
- _List_fromArray(
- [nearby]));
- }
- case 2:
- var existingInFront = existing.a;
- if (location === 5) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront,
- _List_fromArray(
- [nearby]),
- existingInFront);
- } else {
- return $mdgriffith$elm_ui$Internal$Model$ChildrenInFront(
- A2($elm$core$List$cons, nearby, existingInFront));
- }
- default:
- var existingBehind = existing.a;
- var existingInFront = existing.b;
- if (location === 5) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront,
- A2($elm$core$List$cons, nearby, existingBehind),
- existingInFront);
- } else {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$ChildrenBehindAndInFront,
- existingBehind,
- A2($elm$core$List$cons, nearby, existingInFront));
- }
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$Embedded = F2(
- function (a, b) {
- return {$: 2, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Model$NodeName = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$addNodeName = F2(
- function (newNode, old) {
- switch (old.$) {
- case 0:
- return $mdgriffith$elm_ui$Internal$Model$NodeName(newNode);
- case 1:
- var name = old.a;
- return A2($mdgriffith$elm_ui$Internal$Model$Embedded, name, newNode);
- default:
- var x = old.a;
- var y = old.b;
- return A2($mdgriffith$elm_ui$Internal$Model$Embedded, x, y);
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$alignXName = function (align) {
- switch (align) {
- case 0:
- return $mdgriffith$elm_ui$Internal$Style$classes.bu + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.b2);
- case 2:
- return $mdgriffith$elm_ui$Internal$Style$classes.bu + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.b3);
- default:
- return $mdgriffith$elm_ui$Internal$Style$classes.bu + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.dn);
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$alignYName = function (align) {
- switch (align) {
- case 0:
- return $mdgriffith$elm_ui$Internal$Style$classes.bv + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.dt);
- case 2:
- return $mdgriffith$elm_ui$Internal$Style$classes.bv + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.dm);
- default:
- return $mdgriffith$elm_ui$Internal$Style$classes.bv + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.$7);
- }
-};
-var $elm$virtual_dom$VirtualDom$attribute = F2(
- function (key, value) {
- return A2(
- _VirtualDom_attribute,
- _VirtualDom_noOnOrFormAction(key),
- _VirtualDom_noJavaScriptOrHtmlUri(value));
- });
-var $mdgriffith$elm_ui$Internal$Model$FullTransform = F4(
- function (a, b, c, d) {
- return {$: 2, a: a, b: b, c: c, d: d};
- });
-var $mdgriffith$elm_ui$Internal$Model$Moved = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$composeTransformation = F2(
- function (transform, component) {
- switch (transform.$) {
- case 0:
- switch (component.$) {
- case 0:
- var x = component.a;
- return $mdgriffith$elm_ui$Internal$Model$Moved(
- _Utils_Tuple3(x, 0, 0));
- case 1:
- var y = component.a;
- return $mdgriffith$elm_ui$Internal$Model$Moved(
- _Utils_Tuple3(0, y, 0));
- case 2:
- var z = component.a;
- return $mdgriffith$elm_ui$Internal$Model$Moved(
- _Utils_Tuple3(0, 0, z));
- case 3:
- var xyz = component.a;
- return $mdgriffith$elm_ui$Internal$Model$Moved(xyz);
- case 4:
- var xyz = component.a;
- var angle = component.b;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$FullTransform,
- _Utils_Tuple3(0, 0, 0),
- _Utils_Tuple3(1, 1, 1),
- xyz,
- angle);
- default:
- var xyz = component.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$FullTransform,
- _Utils_Tuple3(0, 0, 0),
- xyz,
- _Utils_Tuple3(0, 0, 1),
- 0);
- }
- case 1:
- var moved = transform.a;
- var x = moved.a;
- var y = moved.b;
- var z = moved.c;
- switch (component.$) {
- case 0:
- var newX = component.a;
- return $mdgriffith$elm_ui$Internal$Model$Moved(
- _Utils_Tuple3(newX, y, z));
- case 1:
- var newY = component.a;
- return $mdgriffith$elm_ui$Internal$Model$Moved(
- _Utils_Tuple3(x, newY, z));
- case 2:
- var newZ = component.a;
- return $mdgriffith$elm_ui$Internal$Model$Moved(
- _Utils_Tuple3(x, y, newZ));
- case 3:
- var xyz = component.a;
- return $mdgriffith$elm_ui$Internal$Model$Moved(xyz);
- case 4:
- var xyz = component.a;
- var angle = component.b;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$FullTransform,
- moved,
- _Utils_Tuple3(1, 1, 1),
- xyz,
- angle);
- default:
- var scale = component.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$FullTransform,
- moved,
- scale,
- _Utils_Tuple3(0, 0, 1),
- 0);
- }
- default:
- var moved = transform.a;
- var x = moved.a;
- var y = moved.b;
- var z = moved.c;
- var scaled = transform.b;
- var origin = transform.c;
- var angle = transform.d;
- switch (component.$) {
- case 0:
- var newX = component.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$FullTransform,
- _Utils_Tuple3(newX, y, z),
- scaled,
- origin,
- angle);
- case 1:
- var newY = component.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$FullTransform,
- _Utils_Tuple3(x, newY, z),
- scaled,
- origin,
- angle);
- case 2:
- var newZ = component.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$FullTransform,
- _Utils_Tuple3(x, y, newZ),
- scaled,
- origin,
- angle);
- case 3:
- var newMove = component.a;
- return A4($mdgriffith$elm_ui$Internal$Model$FullTransform, newMove, scaled, origin, angle);
- case 4:
- var newOrigin = component.a;
- var newAngle = component.b;
- return A4($mdgriffith$elm_ui$Internal$Model$FullTransform, moved, scaled, newOrigin, newAngle);
- default:
- var newScale = component.a;
- return A4($mdgriffith$elm_ui$Internal$Model$FullTransform, moved, newScale, origin, angle);
- }
- }
- });
-var $mdgriffith$elm_ui$Internal$Flag$height = $mdgriffith$elm_ui$Internal$Flag$flag(7);
-var $mdgriffith$elm_ui$Internal$Flag$heightContent = $mdgriffith$elm_ui$Internal$Flag$flag(36);
-var $mdgriffith$elm_ui$Internal$Flag$merge = F2(
- function (_v0, _v1) {
- var one = _v0.a;
- var two = _v0.b;
- var three = _v1.a;
- var four = _v1.b;
- return A2($mdgriffith$elm_ui$Internal$Flag$Field, one | three, two | four);
- });
-var $mdgriffith$elm_ui$Internal$Flag$none = A2($mdgriffith$elm_ui$Internal$Flag$Field, 0, 0);
-var $mdgriffith$elm_ui$Internal$Model$renderHeight = function (h) {
- switch (h.$) {
- case 0:
- var px = h.a;
- var val = $elm$core$String$fromInt(px);
- var name = 'height-px-' + val;
- return _Utils_Tuple3(
- $mdgriffith$elm_ui$Internal$Flag$none,
- $mdgriffith$elm_ui$Internal$Style$classes.cm + (' ' + name),
- _List_fromArray(
- [
- A3($mdgriffith$elm_ui$Internal$Model$Single, name, 'height', val + 'px')
- ]));
- case 1:
- return _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightContent, $mdgriffith$elm_ui$Internal$Flag$none),
- $mdgriffith$elm_ui$Internal$Style$classes.bE,
- _List_Nil);
- case 2:
- var portion = h.a;
- return (portion === 1) ? _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightFill, $mdgriffith$elm_ui$Internal$Flag$none),
- $mdgriffith$elm_ui$Internal$Style$classes.bF,
- _List_Nil) : _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightFill, $mdgriffith$elm_ui$Internal$Flag$none),
- $mdgriffith$elm_ui$Internal$Style$classes.cn + (' height-fill-' + $elm$core$String$fromInt(portion)),
- _List_fromArray(
- [
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- $mdgriffith$elm_ui$Internal$Style$classes.dx + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.ca + (' > ' + $mdgriffith$elm_ui$Internal$Style$dot(
- 'height-fill-' + $elm$core$String$fromInt(portion))))),
- 'flex-grow',
- $elm$core$String$fromInt(portion * 100000))
- ]));
- case 3:
- var minSize = h.a;
- var len = h.b;
- var cls = 'min-height-' + $elm$core$String$fromInt(minSize);
- var style = A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- cls,
- 'min-height',
- $elm$core$String$fromInt(minSize) + 'px !important');
- var _v1 = $mdgriffith$elm_ui$Internal$Model$renderHeight(len);
- var newFlag = _v1.a;
- var newAttrs = _v1.b;
- var newStyle = _v1.c;
- return _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightBetween, newFlag),
- cls + (' ' + newAttrs),
- A2($elm$core$List$cons, style, newStyle));
- default:
- var maxSize = h.a;
- var len = h.b;
- var cls = 'max-height-' + $elm$core$String$fromInt(maxSize);
- var style = A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- cls,
- 'max-height',
- $elm$core$String$fromInt(maxSize) + 'px');
- var _v2 = $mdgriffith$elm_ui$Internal$Model$renderHeight(len);
- var newFlag = _v2.a;
- var newAttrs = _v2.b;
- var newStyle = _v2.c;
- return _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$heightBetween, newFlag),
- cls + (' ' + newAttrs),
- A2($elm$core$List$cons, style, newStyle));
- }
-};
-var $mdgriffith$elm_ui$Internal$Flag$widthContent = $mdgriffith$elm_ui$Internal$Flag$flag(38);
-var $mdgriffith$elm_ui$Internal$Model$renderWidth = function (w) {
- switch (w.$) {
- case 0:
- var px = w.a;
- return _Utils_Tuple3(
- $mdgriffith$elm_ui$Internal$Flag$none,
- $mdgriffith$elm_ui$Internal$Style$classes.dd + (' width-px-' + $elm$core$String$fromInt(px)),
- _List_fromArray(
- [
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- 'width-px-' + $elm$core$String$fromInt(px),
- 'width',
- $elm$core$String$fromInt(px) + 'px')
- ]));
- case 1:
- return _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthContent, $mdgriffith$elm_ui$Internal$Flag$none),
- $mdgriffith$elm_ui$Internal$Style$classes.bZ,
- _List_Nil);
- case 2:
- var portion = w.a;
- return (portion === 1) ? _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthFill, $mdgriffith$elm_ui$Internal$Flag$none),
- $mdgriffith$elm_ui$Internal$Style$classes.b_,
- _List_Nil) : _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthFill, $mdgriffith$elm_ui$Internal$Flag$none),
- $mdgriffith$elm_ui$Internal$Style$classes.de + (' width-fill-' + $elm$core$String$fromInt(portion)),
- _List_fromArray(
- [
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- $mdgriffith$elm_ui$Internal$Style$classes.dx + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.eU + (' > ' + $mdgriffith$elm_ui$Internal$Style$dot(
- 'width-fill-' + $elm$core$String$fromInt(portion))))),
- 'flex-grow',
- $elm$core$String$fromInt(portion * 100000))
- ]));
- case 3:
- var minSize = w.a;
- var len = w.b;
- var cls = 'min-width-' + $elm$core$String$fromInt(minSize);
- var style = A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- cls,
- 'min-width',
- $elm$core$String$fromInt(minSize) + 'px');
- var _v1 = $mdgriffith$elm_ui$Internal$Model$renderWidth(len);
- var newFlag = _v1.a;
- var newAttrs = _v1.b;
- var newStyle = _v1.c;
- return _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthBetween, newFlag),
- cls + (' ' + newAttrs),
- A2($elm$core$List$cons, style, newStyle));
- default:
- var maxSize = w.a;
- var len = w.b;
- var cls = 'max-width-' + $elm$core$String$fromInt(maxSize);
- var style = A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- cls,
- 'max-width',
- $elm$core$String$fromInt(maxSize) + 'px');
- var _v2 = $mdgriffith$elm_ui$Internal$Model$renderWidth(len);
- var newFlag = _v2.a;
- var newAttrs = _v2.b;
- var newStyle = _v2.c;
- return _Utils_Tuple3(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$widthBetween, newFlag),
- cls + (' ' + newAttrs),
- A2($elm$core$List$cons, style, newStyle));
- }
-};
-var $mdgriffith$elm_ui$Internal$Flag$borderWidth = $mdgriffith$elm_ui$Internal$Flag$flag(27);
-var $mdgriffith$elm_ui$Internal$Model$skippable = F2(
- function (flag, style) {
- if (_Utils_eq(flag, $mdgriffith$elm_ui$Internal$Flag$borderWidth)) {
- if (style.$ === 3) {
- var val = style.c;
- switch (val) {
- case '0px':
- return true;
- case '1px':
- return true;
- case '2px':
- return true;
- case '3px':
- return true;
- case '4px':
- return true;
- case '5px':
- return true;
- case '6px':
- return true;
- default:
- return false;
- }
- } else {
- return false;
- }
- } else {
- switch (style.$) {
- case 2:
- var i = style.a;
- return (i >= 8) && (i <= 32);
- case 7:
- var name = style.a;
- var t = style.b;
- var r = style.c;
- var b = style.d;
- var l = style.e;
- return _Utils_eq(t, b) && (_Utils_eq(t, r) && (_Utils_eq(t, l) && ((t >= 0) && (t <= 24))));
- default:
- return false;
- }
- }
- });
-var $mdgriffith$elm_ui$Internal$Flag$width = $mdgriffith$elm_ui$Internal$Flag$flag(6);
-var $mdgriffith$elm_ui$Internal$Flag$xAlign = $mdgriffith$elm_ui$Internal$Flag$flag(30);
-var $mdgriffith$elm_ui$Internal$Flag$yAlign = $mdgriffith$elm_ui$Internal$Flag$flag(29);
-var $mdgriffith$elm_ui$Internal$Model$gatherAttrRecursive = F8(
- function (classes, node, has, transform, styles, attrs, children, elementAttrs) {
- gatherAttrRecursive:
- while (true) {
- if (!elementAttrs.b) {
- var _v1 = $mdgriffith$elm_ui$Internal$Model$transformClass(transform);
- if (_v1.$ === 1) {
- return {
- bw: A2(
- $elm$core$List$cons,
- $elm$html$Html$Attributes$class(classes),
- attrs),
- a8: children,
- T: has,
- V: node,
- fb: styles
- };
- } else {
- var _class = _v1.a;
- return {
- bw: A2(
- $elm$core$List$cons,
- $elm$html$Html$Attributes$class(classes + (' ' + _class)),
- attrs),
- a8: children,
- T: has,
- V: node,
- fb: A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$Transform(transform),
- styles)
- };
- }
- } else {
- var attribute = elementAttrs.a;
- var remaining = elementAttrs.b;
- switch (attribute.$) {
- case 0:
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 3:
- var flag = attribute.a;
- var exactClassName = attribute.b;
- if (A2($mdgriffith$elm_ui$Internal$Flag$present, flag, has)) {
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- var $temp$classes = exactClassName + (' ' + classes),
- $temp$node = node,
- $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, flag, has),
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- case 1:
- var actualAttribute = attribute.a;
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = A2($elm$core$List$cons, actualAttribute, attrs),
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 4:
- var flag = attribute.a;
- var style = attribute.b;
- if (A2($mdgriffith$elm_ui$Internal$Flag$present, flag, has)) {
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- if (A2($mdgriffith$elm_ui$Internal$Model$skippable, flag, style)) {
- var $temp$classes = $mdgriffith$elm_ui$Internal$Model$getStyleName(style) + (' ' + classes),
- $temp$node = node,
- $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, flag, has),
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- var $temp$classes = $mdgriffith$elm_ui$Internal$Model$getStyleName(style) + (' ' + classes),
- $temp$node = node,
- $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, flag, has),
- $temp$transform = transform,
- $temp$styles = A2($elm$core$List$cons, style, styles),
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- }
- case 10:
- var flag = attribute.a;
- var component = attribute.b;
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, flag, has),
- $temp$transform = A2($mdgriffith$elm_ui$Internal$Model$composeTransformation, transform, component),
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 7:
- var width = attribute.a;
- if (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$width, has)) {
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- switch (width.$) {
- case 0:
- var px = width.a;
- var $temp$classes = ($mdgriffith$elm_ui$Internal$Style$classes.dd + (' width-px-' + $elm$core$String$fromInt(px))) + (' ' + classes),
- $temp$node = node,
- $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has),
- $temp$transform = transform,
- $temp$styles = A2(
- $elm$core$List$cons,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- 'width-px-' + $elm$core$String$fromInt(px),
- 'width',
- $elm$core$String$fromInt(px) + 'px'),
- styles),
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 1:
- var $temp$classes = classes + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.bZ),
- $temp$node = node,
- $temp$has = A2(
- $mdgriffith$elm_ui$Internal$Flag$add,
- $mdgriffith$elm_ui$Internal$Flag$widthContent,
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has)),
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 2:
- var portion = width.a;
- if (portion === 1) {
- var $temp$classes = classes + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.b_),
- $temp$node = node,
- $temp$has = A2(
- $mdgriffith$elm_ui$Internal$Flag$add,
- $mdgriffith$elm_ui$Internal$Flag$widthFill,
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has)),
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- var $temp$classes = classes + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.de + (' width-fill-' + $elm$core$String$fromInt(portion)))),
- $temp$node = node,
- $temp$has = A2(
- $mdgriffith$elm_ui$Internal$Flag$add,
- $mdgriffith$elm_ui$Internal$Flag$widthFill,
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has)),
- $temp$transform = transform,
- $temp$styles = A2(
- $elm$core$List$cons,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- $mdgriffith$elm_ui$Internal$Style$classes.dx + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.eU + (' > ' + $mdgriffith$elm_ui$Internal$Style$dot(
- 'width-fill-' + $elm$core$String$fromInt(portion))))),
- 'flex-grow',
- $elm$core$String$fromInt(portion * 100000)),
- styles),
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- default:
- var _v4 = $mdgriffith$elm_ui$Internal$Model$renderWidth(width);
- var addToFlags = _v4.a;
- var newClass = _v4.b;
- var newStyles = _v4.c;
- var $temp$classes = classes + (' ' + newClass),
- $temp$node = node,
- $temp$has = A2(
- $mdgriffith$elm_ui$Internal$Flag$merge,
- addToFlags,
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$width, has)),
- $temp$transform = transform,
- $temp$styles = _Utils_ap(newStyles, styles),
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- }
- case 8:
- var height = attribute.a;
- if (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$height, has)) {
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- switch (height.$) {
- case 0:
- var px = height.a;
- var val = $elm$core$String$fromInt(px) + 'px';
- var name = 'height-px-' + val;
- var $temp$classes = $mdgriffith$elm_ui$Internal$Style$classes.cm + (' ' + (name + (' ' + classes))),
- $temp$node = node,
- $temp$has = A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has),
- $temp$transform = transform,
- $temp$styles = A2(
- $elm$core$List$cons,
- A3($mdgriffith$elm_ui$Internal$Model$Single, name, 'height ', val),
- styles),
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 1:
- var $temp$classes = $mdgriffith$elm_ui$Internal$Style$classes.bE + (' ' + classes),
- $temp$node = node,
- $temp$has = A2(
- $mdgriffith$elm_ui$Internal$Flag$add,
- $mdgriffith$elm_ui$Internal$Flag$heightContent,
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has)),
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 2:
- var portion = height.a;
- if (portion === 1) {
- var $temp$classes = $mdgriffith$elm_ui$Internal$Style$classes.bF + (' ' + classes),
- $temp$node = node,
- $temp$has = A2(
- $mdgriffith$elm_ui$Internal$Flag$add,
- $mdgriffith$elm_ui$Internal$Flag$heightFill,
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has)),
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- var $temp$classes = classes + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.cn + (' height-fill-' + $elm$core$String$fromInt(portion)))),
- $temp$node = node,
- $temp$has = A2(
- $mdgriffith$elm_ui$Internal$Flag$add,
- $mdgriffith$elm_ui$Internal$Flag$heightFill,
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has)),
- $temp$transform = transform,
- $temp$styles = A2(
- $elm$core$List$cons,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- $mdgriffith$elm_ui$Internal$Style$classes.dx + ('.' + ($mdgriffith$elm_ui$Internal$Style$classes.ca + (' > ' + $mdgriffith$elm_ui$Internal$Style$dot(
- 'height-fill-' + $elm$core$String$fromInt(portion))))),
- 'flex-grow',
- $elm$core$String$fromInt(portion * 100000)),
- styles),
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- default:
- var _v6 = $mdgriffith$elm_ui$Internal$Model$renderHeight(height);
- var addToFlags = _v6.a;
- var newClass = _v6.b;
- var newStyles = _v6.c;
- var $temp$classes = classes + (' ' + newClass),
- $temp$node = node,
- $temp$has = A2(
- $mdgriffith$elm_ui$Internal$Flag$merge,
- addToFlags,
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$height, has)),
- $temp$transform = transform,
- $temp$styles = _Utils_ap(newStyles, styles),
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- }
- case 2:
- var description = attribute.a;
- switch (description.$) {
- case 0:
- var $temp$classes = classes,
- $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'main', node),
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 1:
- var $temp$classes = classes,
- $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'nav', node),
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 2:
- var $temp$classes = classes,
- $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'footer', node),
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 3:
- var $temp$classes = classes,
- $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'aside', node),
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 4:
- var i = description.a;
- if (i <= 1) {
- var $temp$classes = classes,
- $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'h1', node),
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- if (i < 7) {
- var $temp$classes = classes,
- $temp$node = A2(
- $mdgriffith$elm_ui$Internal$Model$addNodeName,
- 'h' + $elm$core$String$fromInt(i),
- node),
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- var $temp$classes = classes,
- $temp$node = A2($mdgriffith$elm_ui$Internal$Model$addNodeName, 'h6', node),
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- }
- case 9:
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 8:
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = A2(
- $elm$core$List$cons,
- A2($elm$virtual_dom$VirtualDom$attribute, 'role', 'button'),
- attrs),
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 5:
- var label = description.a;
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = A2(
- $elm$core$List$cons,
- A2($elm$virtual_dom$VirtualDom$attribute, 'aria-label', label),
- attrs),
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 6:
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = A2(
- $elm$core$List$cons,
- A2($elm$virtual_dom$VirtualDom$attribute, 'aria-live', 'polite'),
- attrs),
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- default:
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = A2(
- $elm$core$List$cons,
- A2($elm$virtual_dom$VirtualDom$attribute, 'aria-live', 'assertive'),
- attrs),
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- case 9:
- var location = attribute.a;
- var elem = attribute.b;
- var newStyles = function () {
- switch (elem.$) {
- case 3:
- return styles;
- case 2:
- var str = elem.a;
- return styles;
- case 0:
- var html = elem.a;
- return styles;
- default:
- var styled = elem.a;
- return _Utils_ap(styles, styled.fb);
- }
- }();
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = newStyles,
- $temp$attrs = attrs,
- $temp$children = A3($mdgriffith$elm_ui$Internal$Model$addNearbyElement, location, elem, children),
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- case 6:
- var x = attribute.a;
- if (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$xAlign, has)) {
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- var $temp$classes = $mdgriffith$elm_ui$Internal$Model$alignXName(x) + (' ' + classes),
- $temp$node = node,
- $temp$has = function (flags) {
- switch (x) {
- case 1:
- return A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$centerX, flags);
- case 2:
- return A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$alignRight, flags);
- default:
- return flags;
- }
- }(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$xAlign, has)),
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- default:
- var y = attribute.a;
- if (A2($mdgriffith$elm_ui$Internal$Flag$present, $mdgriffith$elm_ui$Internal$Flag$yAlign, has)) {
- var $temp$classes = classes,
- $temp$node = node,
- $temp$has = has,
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- } else {
- var $temp$classes = $mdgriffith$elm_ui$Internal$Model$alignYName(y) + (' ' + classes),
- $temp$node = node,
- $temp$has = function (flags) {
- switch (y) {
- case 1:
- return A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$centerY, flags);
- case 2:
- return A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$alignBottom, flags);
- default:
- return flags;
- }
- }(
- A2($mdgriffith$elm_ui$Internal$Flag$add, $mdgriffith$elm_ui$Internal$Flag$yAlign, has)),
- $temp$transform = transform,
- $temp$styles = styles,
- $temp$attrs = attrs,
- $temp$children = children,
- $temp$elementAttrs = remaining;
- classes = $temp$classes;
- node = $temp$node;
- has = $temp$has;
- transform = $temp$transform;
- styles = $temp$styles;
- attrs = $temp$attrs;
- children = $temp$children;
- elementAttrs = $temp$elementAttrs;
- continue gatherAttrRecursive;
- }
- }
- }
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$Untransformed = {$: 0};
-var $mdgriffith$elm_ui$Internal$Model$untransformed = $mdgriffith$elm_ui$Internal$Model$Untransformed;
-var $mdgriffith$elm_ui$Internal$Model$element = F4(
- function (context, node, attributes, children) {
- return A3(
- $mdgriffith$elm_ui$Internal$Model$createElement,
- context,
- children,
- A8(
- $mdgriffith$elm_ui$Internal$Model$gatherAttrRecursive,
- $mdgriffith$elm_ui$Internal$Model$contextClasses(context),
- node,
- $mdgriffith$elm_ui$Internal$Flag$none,
- $mdgriffith$elm_ui$Internal$Model$untransformed,
- _List_Nil,
- _List_Nil,
- $mdgriffith$elm_ui$Internal$Model$NoNearbyChildren,
- $elm$core$List$reverse(attributes)));
- });
-var $mdgriffith$elm_ui$Internal$Model$Height = function (a) {
- return {$: 8, a: a};
-};
-var $mdgriffith$elm_ui$Element$height = $mdgriffith$elm_ui$Internal$Model$Height;
-var $mdgriffith$elm_ui$Internal$Model$Attr = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$htmlClass = function (cls) {
- return $mdgriffith$elm_ui$Internal$Model$Attr(
- $elm$html$Html$Attributes$class(cls));
-};
-var $mdgriffith$elm_ui$Internal$Model$Content = {$: 1};
-var $mdgriffith$elm_ui$Element$shrink = $mdgriffith$elm_ui$Internal$Model$Content;
-var $mdgriffith$elm_ui$Internal$Model$Width = function (a) {
- return {$: 7, a: a};
-};
-var $mdgriffith$elm_ui$Element$width = $mdgriffith$elm_ui$Internal$Model$Width;
-var $mdgriffith$elm_ui$Element$column = F2(
- function (attrs, children) {
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asColumn,
- $mdgriffith$elm_ui$Internal$Model$div,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.dV + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.aA)),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink),
- attrs))),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(children));
- });
-var $elm$svg$Svg$trustedNode = _VirtualDom_nodeNS('http://www.w3.org/2000/svg');
-var $elm$svg$Svg$circle = $elm$svg$Svg$trustedNode('circle');
-var $elm$svg$Svg$Attributes$cx = _VirtualDom_attribute('cx');
-var $elm$svg$Svg$Attributes$cy = _VirtualDom_attribute('cy');
-var $elm$svg$Svg$Attributes$d = _VirtualDom_attribute('d');
-var $elm$svg$Svg$Attributes$fill = _VirtualDom_attribute('fill');
-var $elm$svg$Svg$g = $elm$svg$Svg$trustedNode('g');
-var $elm$svg$Svg$path = $elm$svg$Svg$trustedNode('path');
-var $elm$svg$Svg$Attributes$r = _VirtualDom_attribute('r');
-var $elm$svg$Svg$Attributes$strokeWidth = _VirtualDom_attribute('stroke-width');
-var $author$project$Echologo$echologo = _List_fromArray(
- [
- A2(
- $elm$svg$Svg$circle,
- _List_fromArray(
- [
- $elm$svg$Svg$Attributes$cx('15'),
- $elm$svg$Svg$Attributes$cy('15'),
- $elm$svg$Svg$Attributes$r('15'),
- $elm$svg$Svg$Attributes$fill('#64c29b'),
- $elm$svg$Svg$Attributes$strokeWidth('0')
- ]),
- _List_Nil),
- A2(
- $elm$svg$Svg$g,
- _List_fromArray(
- [
- $elm$svg$Svg$Attributes$fill('#fff'),
- $elm$svg$Svg$Attributes$strokeWidth('0')
- ]),
- _List_fromArray(
- [
- A2(
- $elm$svg$Svg$circle,
- _List_fromArray(
- [
- $elm$svg$Svg$Attributes$cx('13.8'),
- $elm$svg$Svg$Attributes$cy('9'),
- $elm$svg$Svg$Attributes$r('2')
- ]),
- _List_Nil),
- A2(
- $elm$svg$Svg$path,
- _List_fromArray(
- [
- $elm$svg$Svg$Attributes$d('M 12.3,6.4019238 A 3,3 0 0 0 11.201924,10.5 5,5 0 0 1 12.3,2.1592831 a 3,3 0 0 0 0,4.2426407')
- ]),
- _List_Nil),
- A2(
- $elm$svg$Svg$path,
- _List_fromArray(
- [
- $elm$svg$Svg$Attributes$d('m13.8 6a3 3 0 0 1 3 3 6 6 0 0 1 8.485281 0 8 8 0 0 0-11.485281-3')
- ]),
- _List_Nil),
- A2(
- $elm$svg$Svg$path,
- _List_fromArray(
- [
- $elm$svg$Svg$Attributes$d('M 12.3,11.598076 A 3,3 0 0 0 16.398076,10.5 13,13 0 0 1 12.3,28.568639 a 12,12 0 0 0 0,-16.970563')
- ]),
- _List_Nil)
- ]))
- ]);
-var $elm$svg$Svg$Attributes$fontFamily = _VirtualDom_attribute('font-family');
-var $elm$svg$Svg$Attributes$fontSize = _VirtualDom_attribute('font-size');
-var $elm$svg$Svg$Attributes$height = _VirtualDom_attribute('height');
-var $mdgriffith$elm_ui$Internal$Model$unstyled = A2($elm$core$Basics$composeL, $mdgriffith$elm_ui$Internal$Model$Unstyled, $elm$core$Basics$always);
-var $mdgriffith$elm_ui$Element$html = $mdgriffith$elm_ui$Internal$Model$unstyled;
-var $elm$svg$Svg$svg = $elm$svg$Svg$trustedNode('svg');
-var $elm$svg$Svg$text = $elm$virtual_dom$VirtualDom$text;
-var $elm$svg$Svg$text_ = $elm$svg$Svg$trustedNode('text');
-var $elm$svg$Svg$Attributes$viewBox = _VirtualDom_attribute('viewBox');
-var $elm$svg$Svg$Attributes$x = _VirtualDom_attribute('x');
-var $elm$svg$Svg$Attributes$y = _VirtualDom_attribute('y');
-var $author$project$Style$entete = F3(
- function (hauteur, largeur, titre) {
- return $mdgriffith$elm_ui$Element$html(
- A2(
- $elm$svg$Svg$svg,
- _List_fromArray(
- [
- $elm$svg$Svg$Attributes$viewBox(
- '0 0 ' + ($elm$core$String$fromInt(largeur) + ' 30')),
- $elm$svg$Svg$Attributes$height(
- $elm$core$String$fromInt(hauteur))
- ]),
- _Utils_ap(
- $author$project$Echologo$echologo,
- _List_fromArray(
- [
- A2(
- $elm$svg$Svg$text_,
- _List_fromArray(
- [
- $elm$svg$Svg$Attributes$x('40'),
- $elm$svg$Svg$Attributes$y('20'),
- $elm$svg$Svg$Attributes$fontFamily('Verdana'),
- $elm$svg$Svg$Attributes$fill('white'),
- $elm$svg$Svg$Attributes$fontSize('15')
- ]),
- _List_fromArray(
- [
- $elm$svg$Svg$text(titre)
- ]))
- ]))));
- });
-var $mdgriffith$elm_ui$Internal$Model$Fill = function (a) {
- return {$: 2, a: a};
-};
-var $mdgriffith$elm_ui$Element$fill = $mdgriffith$elm_ui$Internal$Model$Fill(1);
-var $mdgriffith$elm_ui$Internal$Model$OnlyDynamic = F2(
- function (a, b) {
- return {$: 2, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Model$StaticRootAndDynamic = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Model$AllowHover = 1;
-var $mdgriffith$elm_ui$Internal$Model$Layout = 0;
-var $mdgriffith$elm_ui$Internal$Model$Rgba = F4(
- function (a, b, c, d) {
- return {$: 0, a: a, b: b, c: c, d: d};
- });
-var $mdgriffith$elm_ui$Internal$Model$focusDefaultStyle = {
- dz: $elm$core$Maybe$Nothing,
- dH: $elm$core$Maybe$Nothing,
- e0: $elm$core$Maybe$Just(
- {
- a5: 0,
- ba: A4($mdgriffith$elm_ui$Internal$Model$Rgba, 155 / 255, 203 / 255, 1, 1),
- bl: _Utils_Tuple2(0, 0),
- bo: 3
- })
-};
-var $mdgriffith$elm_ui$Internal$Model$optionsToRecord = function (options) {
- var combine = F2(
- function (opt, record) {
- switch (opt.$) {
- case 0:
- var hoverable = opt.a;
- var _v4 = record.ef;
- if (_v4.$ === 1) {
- return _Utils_update(
- record,
- {
- ef: $elm$core$Maybe$Just(hoverable)
- });
- } else {
- return record;
- }
- case 1:
- var focusStyle = opt.a;
- var _v5 = record.d6;
- if (_v5.$ === 1) {
- return _Utils_update(
- record,
- {
- d6: $elm$core$Maybe$Just(focusStyle)
- });
- } else {
- return record;
- }
- default:
- var renderMode = opt.a;
- var _v6 = record.eA;
- if (_v6.$ === 1) {
- return _Utils_update(
- record,
- {
- eA: $elm$core$Maybe$Just(renderMode)
- });
- } else {
- return record;
- }
- }
- });
- var andFinally = function (record) {
- return {
- d6: function () {
- var _v0 = record.d6;
- if (_v0.$ === 1) {
- return $mdgriffith$elm_ui$Internal$Model$focusDefaultStyle;
- } else {
- var focusable = _v0.a;
- return focusable;
- }
- }(),
- ef: function () {
- var _v1 = record.ef;
- if (_v1.$ === 1) {
- return 1;
- } else {
- var hoverable = _v1.a;
- return hoverable;
- }
- }(),
- eA: function () {
- var _v2 = record.eA;
- if (_v2.$ === 1) {
- return 0;
- } else {
- var actualMode = _v2.a;
- return actualMode;
- }
- }()
- };
- };
- return andFinally(
- A3(
- $elm$core$List$foldr,
- combine,
- {d6: $elm$core$Maybe$Nothing, ef: $elm$core$Maybe$Nothing, eA: $elm$core$Maybe$Nothing},
- options));
-};
-var $mdgriffith$elm_ui$Internal$Model$toHtml = F2(
- function (mode, el) {
- switch (el.$) {
- case 0:
- var html = el.a;
- return html($mdgriffith$elm_ui$Internal$Model$asEl);
- case 1:
- var styles = el.a.fb;
- var html = el.a.eg;
- return A2(
- html,
- mode(styles),
- $mdgriffith$elm_ui$Internal$Model$asEl);
- case 2:
- var text = el.a;
- return $mdgriffith$elm_ui$Internal$Model$textElement(text);
- default:
- return $mdgriffith$elm_ui$Internal$Model$textElement('');
- }
- });
-var $mdgriffith$elm_ui$Internal$Model$renderRoot = F3(
- function (optionList, attributes, child) {
- var options = $mdgriffith$elm_ui$Internal$Model$optionsToRecord(optionList);
- var embedStyle = function () {
- var _v0 = options.eA;
- if (_v0 === 1) {
- return $mdgriffith$elm_ui$Internal$Model$OnlyDynamic(options);
- } else {
- return $mdgriffith$elm_ui$Internal$Model$StaticRootAndDynamic(options);
- }
- }();
- return A2(
- $mdgriffith$elm_ui$Internal$Model$toHtml,
- embedStyle,
- A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asEl,
- $mdgriffith$elm_ui$Internal$Model$div,
- attributes,
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [child]))));
- });
-var $mdgriffith$elm_ui$Internal$Model$FontFamily = F2(
- function (a, b) {
- return {$: 1, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Model$FontSize = function (a) {
- return {$: 2, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$SansSerif = {$: 1};
-var $mdgriffith$elm_ui$Internal$Model$Typeface = function (a) {
- return {$: 3, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Flag$fontColor = $mdgriffith$elm_ui$Internal$Flag$flag(14);
-var $mdgriffith$elm_ui$Internal$Flag$fontFamily = $mdgriffith$elm_ui$Internal$Flag$flag(5);
-var $mdgriffith$elm_ui$Internal$Flag$fontSize = $mdgriffith$elm_ui$Internal$Flag$flag(4);
-var $elm$core$String$toLower = _String_toLower;
-var $elm$core$String$words = _String_words;
-var $mdgriffith$elm_ui$Internal$Model$renderFontClassName = F2(
- function (font, current) {
- return _Utils_ap(
- current,
- function () {
- switch (font.$) {
- case 0:
- return 'serif';
- case 1:
- return 'sans-serif';
- case 2:
- return 'monospace';
- case 3:
- var name = font.a;
- return A2(
- $elm$core$String$join,
- '-',
- $elm$core$String$words(
- $elm$core$String$toLower(name)));
- case 4:
- var name = font.a;
- var url = font.b;
- return A2(
- $elm$core$String$join,
- '-',
- $elm$core$String$words(
- $elm$core$String$toLower(name)));
- default:
- var name = font.a.bj;
- return A2(
- $elm$core$String$join,
- '-',
- $elm$core$String$words(
- $elm$core$String$toLower(name)));
- }
- }());
- });
-var $mdgriffith$elm_ui$Internal$Model$rootStyle = function () {
- var families = _List_fromArray(
- [
- $mdgriffith$elm_ui$Internal$Model$Typeface('Open Sans'),
- $mdgriffith$elm_ui$Internal$Model$Typeface('Helvetica'),
- $mdgriffith$elm_ui$Internal$Model$Typeface('Verdana'),
- $mdgriffith$elm_ui$Internal$Model$SansSerif
- ]);
- return _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$bgColor,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Colored,
- 'bg-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(
- A4($mdgriffith$elm_ui$Internal$Model$Rgba, 1, 1, 1, 0)),
- 'background-color',
- A4($mdgriffith$elm_ui$Internal$Model$Rgba, 1, 1, 1, 0))),
- A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$fontColor,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Colored,
- 'fc-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(
- A4($mdgriffith$elm_ui$Internal$Model$Rgba, 0, 0, 0, 1)),
- 'color',
- A4($mdgriffith$elm_ui$Internal$Model$Rgba, 0, 0, 0, 1))),
- A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$fontSize,
- $mdgriffith$elm_ui$Internal$Model$FontSize(20)),
- A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$fontFamily,
- A2(
- $mdgriffith$elm_ui$Internal$Model$FontFamily,
- A3($elm$core$List$foldl, $mdgriffith$elm_ui$Internal$Model$renderFontClassName, 'font-', families),
- families))
- ]);
-}();
-var $mdgriffith$elm_ui$Element$layoutWith = F3(
- function (_v0, attrs, child) {
- var options = _v0.cI;
- return A3(
- $mdgriffith$elm_ui$Internal$Model$renderRoot,
- options,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass(
- A2(
- $elm$core$String$join,
- ' ',
- _List_fromArray(
- [$mdgriffith$elm_ui$Internal$Style$classes.eT, $mdgriffith$elm_ui$Internal$Style$classes.dx, $mdgriffith$elm_ui$Internal$Style$classes.e1]))),
- _Utils_ap($mdgriffith$elm_ui$Internal$Model$rootStyle, attrs)),
- child);
- });
-var $mdgriffith$elm_ui$Element$layout = $mdgriffith$elm_ui$Element$layoutWith(
- {cI: _List_Nil});
-var $mdgriffith$elm_ui$Internal$Model$PaddingStyle = F5(
- function (a, b, c, d, e) {
- return {$: 7, a: a, b: b, c: c, d: d, e: e};
- });
-var $mdgriffith$elm_ui$Internal$Flag$padding = $mdgriffith$elm_ui$Internal$Flag$flag(2);
-var $mdgriffith$elm_ui$Element$padding = function (x) {
- var f = x;
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$padding,
- A5(
- $mdgriffith$elm_ui$Internal$Model$PaddingStyle,
- 'p-' + $elm$core$String$fromInt(x),
- f,
- f,
- f,
- f));
-};
-var $mdgriffith$elm_ui$Internal$Flag$borderRound = $mdgriffith$elm_ui$Internal$Flag$flag(17);
-var $mdgriffith$elm_ui$Element$Border$rounded = function (radius) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$borderRound,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- 'br-' + $elm$core$String$fromInt(radius),
- 'border-radius',
- $elm$core$String$fromInt(radius) + 'px'));
-};
-var $mdgriffith$elm_ui$Internal$Model$AsRow = 0;
-var $mdgriffith$elm_ui$Internal$Model$asRow = 0;
-var $mdgriffith$elm_ui$Element$row = F2(
- function (attrs, children) {
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asRow,
- $mdgriffith$elm_ui$Internal$Model$div,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.aA + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.I)),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink),
- attrs))),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(children));
- });
-var $author$project$Style$petitEspacement = 20;
-var $author$project$Style$tresGrandEspacement = ((25 * $author$project$Style$petitEspacement) / 16) | 0;
-var $avh4$elm_color$Color$RgbaSpace = F4(
- function (a, b, c, d) {
- return {$: 0, a: a, b: b, c: c, d: d};
- });
-var $avh4$elm_color$Color$fromRgba = function (components) {
- return A4($avh4$elm_color$Color$RgbaSpace, components.eN, components.d9, components.dE, components.dv);
-};
-var $author$project$Style$echoVert = $avh4$elm_color$Color$fromRgba(
- {dv: 255 / 255, dE: 155 / 255, d9: 194 / 255, eN: 100 / 255});
-var $mdgriffith$elm_ui$Element$fromRgb = function (clr) {
- return A4($mdgriffith$elm_ui$Internal$Model$Rgba, clr.eN, clr.d9, clr.dE, clr.dv);
-};
-var $avh4$elm_color$Color$hsla = F4(
- function (hue, sat, light, alpha) {
- var _v0 = _Utils_Tuple3(hue, sat, light);
- var h = _v0.a;
- var s = _v0.b;
- var l = _v0.c;
- var m2 = (l <= 0.5) ? (l * (s + 1)) : ((l + s) - (l * s));
- var m1 = (l * 2) - m2;
- var hueToRgb = function (h__) {
- var h_ = (h__ < 0) ? (h__ + 1) : ((h__ > 1) ? (h__ - 1) : h__);
- return ((h_ * 6) < 1) ? (m1 + (((m2 - m1) * h_) * 6)) : (((h_ * 2) < 1) ? m2 : (((h_ * 3) < 2) ? (m1 + (((m2 - m1) * ((2 / 3) - h_)) * 6)) : m1));
- };
- var b = hueToRgb(h - (1 / 3));
- var g = hueToRgb(h);
- var r = hueToRgb(h + (1 / 3));
- return A4($avh4$elm_color$Color$RgbaSpace, r, g, b, alpha);
- });
-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 $noahzgordon$elm_color_extra$Color$Manipulate$limit = A2($elm$core$Basics$clamp, 0, 1);
-var $elm$core$Basics$isNaN = _Basics_isNaN;
-var $avh4$elm_color$Color$toHsla = function (_v0) {
- var r = _v0.a;
- var g = _v0.b;
- var b = _v0.c;
- var a = _v0.d;
- var minColor = A2(
- $elm$core$Basics$min,
- r,
- A2($elm$core$Basics$min, g, b));
- var maxColor = A2(
- $elm$core$Basics$max,
- r,
- A2($elm$core$Basics$max, g, b));
- var l = (minColor + maxColor) / 2;
- var s = _Utils_eq(minColor, maxColor) ? 0 : ((l < 0.5) ? ((maxColor - minColor) / (maxColor + minColor)) : ((maxColor - minColor) / ((2 - maxColor) - minColor)));
- var h1 = _Utils_eq(maxColor, r) ? ((g - b) / (maxColor - minColor)) : (_Utils_eq(maxColor, g) ? (2 + ((b - r) / (maxColor - minColor))) : (4 + ((r - g) / (maxColor - minColor))));
- var h2 = h1 * (1 / 6);
- var h3 = $elm$core$Basics$isNaN(h2) ? 0 : ((h2 < 0) ? (h2 + 1) : h2);
- return {dv: a, cp: h3, cx: l, cZ: s};
-};
-var $noahzgordon$elm_color_extra$Color$Manipulate$darken = F2(
- function (offset, cl) {
- var _v0 = $avh4$elm_color$Color$toHsla(cl);
- var hue = _v0.cp;
- var saturation = _v0.cZ;
- var lightness = _v0.cx;
- var alpha = _v0.dv;
- return A4(
- $avh4$elm_color$Color$hsla,
- hue,
- saturation,
- $noahzgordon$elm_color_extra$Color$Manipulate$limit(lightness - offset),
- alpha);
- });
-var $noahzgordon$elm_color_extra$Color$Manipulate$lighten = F2(
- function (offset, cl) {
- return A2($noahzgordon$elm_color_extra$Color$Manipulate$darken, -offset, cl);
- });
-var $avh4$elm_color$Color$toRgba = function (_v0) {
- var r = _v0.a;
- var g = _v0.b;
- var b = _v0.c;
- var a = _v0.d;
- return {dv: a, dE: b, d9: g, eN: r};
-};
-var $author$project$Style$vert = function (t) {
- return $mdgriffith$elm_ui$Element$fromRgb(
- $avh4$elm_color$Color$toRgba(
- A2($noahzgordon$elm_color_extra$Color$Manipulate$lighten, t, $author$project$Style$echoVert)));
-};
-var $author$project$Prof$designGeneral = F3(
- function (largeur, titre, elmt) {
- return A2(
- $mdgriffith$elm_ui$Element$layout,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$padding($author$project$Style$tresGrandEspacement),
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(0.2))
- ]),
- A2(
- $mdgriffith$elm_ui$Element$column,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(0)),
- $mdgriffith$elm_ui$Element$Border$rounded(13)
- ]),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Element$row,
- _List_Nil,
- _List_fromArray(
- [
- A3($author$project$Style$entete, 135, largeur, titre)
- ])),
- elmt
- ])));
- });
-var $author$project$Style$grandEspacement = ((5 * $author$project$Style$petitEspacement) / 4) | 0;
-var $mdgriffith$elm_ui$Internal$Model$Empty = {$: 3};
-var $mdgriffith$elm_ui$Internal$Model$Text = function (a) {
- return {$: 2, a: a};
-};
-var $elm$virtual_dom$VirtualDom$map = _VirtualDom_map;
-var $mdgriffith$elm_ui$Internal$Model$map = F2(
- function (fn, el) {
- switch (el.$) {
- case 1:
- var styled = el.a;
- return $mdgriffith$elm_ui$Internal$Model$Styled(
- {
- eg: F2(
- function (add, context) {
- return A2(
- $elm$virtual_dom$VirtualDom$map,
- fn,
- A2(styled.eg, add, context));
- }),
- fb: styled.fb
- });
- case 0:
- var html = el.a;
- return $mdgriffith$elm_ui$Internal$Model$Unstyled(
- A2(
- $elm$core$Basics$composeL,
- $elm$virtual_dom$VirtualDom$map(fn),
- html));
- case 2:
- var str = el.a;
- return $mdgriffith$elm_ui$Internal$Model$Text(str);
- default:
- return $mdgriffith$elm_ui$Internal$Model$Empty;
- }
- });
-var $mdgriffith$elm_ui$Element$map = $mdgriffith$elm_ui$Internal$Model$map;
-var $author$project$CalculateurDeNotes$titre = 'Calculateur de notes';
-var $author$project$GenerateurDeProblemes$titre = 'Générateur de proplèmes';
-var $author$project$CalculateurDeNotes$NouveauBareme = function (a) {
- return {$: 0, a: a};
-};
-var $author$project$CalculateurDeNotes$NouvellesReponsesCorrectes = function (a) {
- return {$: 1, a: a};
-};
-var $author$project$CalculateurDeNotes$NouvellesReponsesEleves = function (a) {
- return {$: 2, a: a};
-};
-var $author$project$CalculateurDeNotes$TelechargerNotes = {$: 3};
-var $mdgriffith$elm_ui$Internal$Model$Button = {$: 8};
-var $mdgriffith$elm_ui$Internal$Model$Describe = function (a) {
- return {$: 2, a: a};
-};
-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 $mdgriffith$elm_ui$Element$Input$enter = 'Enter';
-var $mdgriffith$elm_ui$Internal$Model$NoAttribute = {$: 0};
-var $mdgriffith$elm_ui$Element$Input$hasFocusStyle = function (attr) {
- if (((attr.$ === 4) && (attr.b.$ === 11)) && (!attr.b.a)) {
- var _v1 = attr.b;
- var _v2 = _v1.a;
- return true;
- } else {
- return false;
- }
-};
-var $mdgriffith$elm_ui$Element$Input$focusDefault = function (attrs) {
- return A2($elm$core$List$any, $mdgriffith$elm_ui$Element$Input$hasFocusStyle, attrs) ? $mdgriffith$elm_ui$Internal$Model$NoAttribute : $mdgriffith$elm_ui$Internal$Model$htmlClass('focusable');
-};
-var $elm$virtual_dom$VirtualDom$Normal = function (a) {
- return {$: 0, a: a};
-};
-var $elm$virtual_dom$VirtualDom$on = _VirtualDom_on;
-var $elm$html$Html$Events$on = F2(
- function (event, decoder) {
- return A2(
- $elm$virtual_dom$VirtualDom$on,
- event,
- $elm$virtual_dom$VirtualDom$Normal(decoder));
- });
-var $elm$html$Html$Events$onClick = function (msg) {
- return A2(
- $elm$html$Html$Events$on,
- 'click',
- $elm$json$Json$Decode$succeed(msg));
-};
-var $mdgriffith$elm_ui$Element$Events$onClick = A2($elm$core$Basics$composeL, $mdgriffith$elm_ui$Internal$Model$Attr, $elm$html$Html$Events$onClick);
-var $elm$json$Json$Decode$fail = _Json_fail;
-var $elm$virtual_dom$VirtualDom$MayPreventDefault = function (a) {
- return {$: 2, 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$json$Json$Decode$string = _Json_decodeString;
-var $mdgriffith$elm_ui$Element$Input$onKeyLookup = function (lookup) {
- var decode = function (code) {
- var _v0 = lookup(code);
- if (_v0.$ === 1) {
- return $elm$json$Json$Decode$fail('No key matched');
- } else {
- var msg = _v0.a;
- return $elm$json$Json$Decode$succeed(msg);
- }
- };
- var isKey = A2(
- $elm$json$Json$Decode$andThen,
- decode,
- A2($elm$json$Json$Decode$field, 'key', $elm$json$Json$Decode$string));
- return $mdgriffith$elm_ui$Internal$Model$Attr(
- A2(
- $elm$html$Html$Events$preventDefaultOn,
- 'keydown',
- A2(
- $elm$json$Json$Decode$map,
- function (fired) {
- return _Utils_Tuple2(fired, true);
- },
- isKey)));
-};
-var $mdgriffith$elm_ui$Internal$Model$Class = F2(
- function (a, b) {
- return {$: 3, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Flag$cursor = $mdgriffith$elm_ui$Internal$Flag$flag(21);
-var $mdgriffith$elm_ui$Element$pointer = A2($mdgriffith$elm_ui$Internal$Model$Class, $mdgriffith$elm_ui$Internal$Flag$cursor, $mdgriffith$elm_ui$Internal$Style$classes.dX);
-var $mdgriffith$elm_ui$Element$Input$space = ' ';
-var $elm$html$Html$Attributes$tabindex = function (n) {
- return A2(
- _VirtualDom_attribute,
- 'tabIndex',
- $elm$core$String$fromInt(n));
-};
-var $mdgriffith$elm_ui$Element$Input$button = F2(
- function (attrs, _v0) {
- var onPress = _v0.eE;
- var label = _v0.bH;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asEl,
- $mdgriffith$elm_ui$Internal$Model$div,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.bd + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.I + (' ' + ($mdgriffith$elm_ui$Internal$Style$classes.e_ + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.cF)))))),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$pointer,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$Input$focusDefault(attrs),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$Describe($mdgriffith$elm_ui$Internal$Model$Button),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$Attr(
- $elm$html$Html$Attributes$tabindex(0)),
- function () {
- if (onPress.$ === 1) {
- return A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$Attr(
- $elm$html$Html$Attributes$disabled(true)),
- attrs);
- } else {
- var msg = onPress.a;
- return A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$Events$onClick(msg),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$Input$onKeyLookup(
- function (code) {
- return _Utils_eq(code, $mdgriffith$elm_ui$Element$Input$enter) ? $elm$core$Maybe$Just(msg) : (_Utils_eq(code, $mdgriffith$elm_ui$Element$Input$space) ? $elm$core$Maybe$Just(msg) : $elm$core$Maybe$Nothing);
- }),
- attrs));
- }
- }()))))))),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [label])));
- });
-var $mdgriffith$elm_ui$Internal$Model$AlignY = function (a) {
- return {$: 5, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$CenterY = 1;
-var $mdgriffith$elm_ui$Element$centerY = $mdgriffith$elm_ui$Internal$Model$AlignY(1);
-var $mdgriffith$elm_ui$Element$rgb255 = F3(
- function (red, green, blue) {
- return A4($mdgriffith$elm_ui$Internal$Model$Rgba, red / 255, green / 255, blue / 255, 1);
- });
-var $mdgriffith$elm_ui$Internal$Model$boxShadowClass = function (shadow) {
- return $elm$core$String$concat(
- _List_fromArray(
- [
- shadow.ct ? 'box-inset' : 'box-',
- $mdgriffith$elm_ui$Internal$Model$floatClass(shadow.bl.a) + 'px',
- $mdgriffith$elm_ui$Internal$Model$floatClass(shadow.bl.b) + 'px',
- $mdgriffith$elm_ui$Internal$Model$floatClass(shadow.a5) + 'px',
- $mdgriffith$elm_ui$Internal$Model$floatClass(shadow.bo) + 'px',
- $mdgriffith$elm_ui$Internal$Model$formatColorClass(shadow.ba)
- ]));
-};
-var $mdgriffith$elm_ui$Internal$Flag$shadows = $mdgriffith$elm_ui$Internal$Flag$flag(19);
-var $mdgriffith$elm_ui$Element$Border$shadow = function (almostShade) {
- var shade = {a5: almostShade.a5, ba: almostShade.ba, ct: false, bl: almostShade.bl, bo: almostShade.bo};
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$shadows,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- $mdgriffith$elm_ui$Internal$Model$boxShadowClass(shade),
- 'box-shadow',
- $mdgriffith$elm_ui$Internal$Model$formatBoxShadow(shade)));
-};
-var $mdgriffith$elm_ui$Element$text = function (content) {
- return $mdgriffith$elm_ui$Internal$Model$Text(content);
-};
-var $author$project$Style$bouton = F2(
- function (fonction, label) {
- return A2(
- $mdgriffith$elm_ui$Element$Input$button,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$centerY,
- $mdgriffith$elm_ui$Element$padding($author$project$Style$petitEspacement),
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(-0.2)),
- $mdgriffith$elm_ui$Element$Border$rounded(8),
- $mdgriffith$elm_ui$Element$Border$shadow(
- {
- a5: 10,
- ba: A3($mdgriffith$elm_ui$Element$rgb255, 10, 10, 10),
- bl: _Utils_Tuple2(0.3, 0.4),
- bo: 2
- })
- ]),
- {
- bH: $mdgriffith$elm_ui$Element$text(label),
- eE: $elm$core$Maybe$Just(fonction)
- });
- });
-var $mdgriffith$elm_ui$Internal$Flag$overflow = $mdgriffith$elm_ui$Internal$Flag$flag(20);
-var $mdgriffith$elm_ui$Element$clip = A2($mdgriffith$elm_ui$Internal$Model$Class, $mdgriffith$elm_ui$Internal$Flag$overflow, $mdgriffith$elm_ui$Internal$Style$classes.dQ);
-var $author$project$CalculateurDeNotes$expurgerNotesManquantes = function (nts) {
- expurgerNotesManquantes:
- while (true) {
- if (!nts.b) {
- return _List_Nil;
- } else {
- if (nts.a.$ === 1) {
- var _v1 = nts.a;
- var ntss = nts.b;
- var $temp$nts = ntss;
- nts = $temp$nts;
- continue expurgerNotesManquantes;
- } else {
- var nt = nts.a.a;
- var ntss = nts.b;
- return A2(
- $elm$core$List$cons,
- nt,
- $author$project$CalculateurDeNotes$expurgerNotesManquantes(ntss));
- }
- }
- }
-};
-var $elm$core$Basics$sqrt = _Basics_sqrt;
-var $author$project$CalculateurDeNotes$ecartType = function (elvs) {
- var moy = function (nts) {
- return $elm$core$List$sum(nts) / $elm$core$List$length(nts);
- };
- var moyCarre = A2(
- $elm$core$Basics$composeL,
- moy,
- $elm$core$List$map(
- function (x) {
- return A2($elm$core$Basics$pow, x, 2);
- }));
- var ecTp = function (nts) {
- return $elm$core$Basics$sqrt(
- moyCarre(nts) - A2(
- $elm$core$Basics$pow,
- moy(nts),
- 2));
- };
- return ecTp(
- $author$project$CalculateurDeNotes$expurgerNotesManquantes(
- A2(
- $elm$core$List$map,
- function ($) {
- return $.an;
- },
- elvs)));
-};
-var $mdgriffith$elm_ui$Element$Border$innerShadow = function (almostShade) {
- var shade = {a5: almostShade.a5, ba: almostShade.ba, ct: true, bl: almostShade.bl, bo: almostShade.bo};
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$shadows,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Single,
- $mdgriffith$elm_ui$Internal$Model$boxShadowClass(shade),
- 'box-shadow',
- $mdgriffith$elm_ui$Internal$Model$formatBoxShadow(shade)));
-};
-var $mdgriffith$elm_ui$Element$Input$Above = 2;
-var $mdgriffith$elm_ui$Element$Input$Label = F3(
- function (a, b, c) {
- return {$: 0, a: a, b: b, c: c};
- });
-var $mdgriffith$elm_ui$Element$Input$labelAbove = $mdgriffith$elm_ui$Element$Input$Label(2);
-var $author$project$CalculateurDeNotes$moyenne = function (elvs) {
- var moy = function (nts) {
- return $elm$core$List$sum(nts) / $elm$core$List$length(nts);
- };
- return moy(
- $author$project$CalculateurDeNotes$expurgerNotesManquantes(
- A2(
- $elm$core$List$map,
- function ($) {
- return $.an;
- },
- elvs)));
-};
-var $mdgriffith$elm_ui$Element$Input$TextArea = {$: 1};
-var $mdgriffith$elm_ui$Internal$Model$LivePolite = {$: 6};
-var $mdgriffith$elm_ui$Element$Region$announce = $mdgriffith$elm_ui$Internal$Model$Describe($mdgriffith$elm_ui$Internal$Model$LivePolite);
-var $mdgriffith$elm_ui$Element$Input$applyLabel = F3(
- function (attrs, label, input) {
- if (label.$ === 1) {
- var labelText = label.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asColumn,
- $mdgriffith$elm_ui$Internal$Model$NodeName('label'),
- attrs,
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [input])));
- } else {
- var position = label.a;
- var labelAttrs = label.b;
- var labelChild = label.c;
- var labelElement = A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asEl,
- $mdgriffith$elm_ui$Internal$Model$div,
- labelAttrs,
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [labelChild])));
- switch (position) {
- case 2:
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asColumn,
- $mdgriffith$elm_ui$Internal$Model$NodeName('label'),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.bg),
- attrs),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [labelElement, input])));
- case 3:
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asColumn,
- $mdgriffith$elm_ui$Internal$Model$NodeName('label'),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.bg),
- attrs),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [input, labelElement])));
- case 0:
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asRow,
- $mdgriffith$elm_ui$Internal$Model$NodeName('label'),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.bg),
- attrs),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [input, labelElement])));
- default:
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asRow,
- $mdgriffith$elm_ui$Internal$Model$NodeName('label'),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.bg),
- attrs),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [labelElement, input])));
- }
- }
- });
-var $elm$html$Html$Attributes$attribute = $elm$virtual_dom$VirtualDom$attribute;
-var $mdgriffith$elm_ui$Element$Input$autofill = A2(
- $elm$core$Basics$composeL,
- $mdgriffith$elm_ui$Internal$Model$Attr,
- $elm$html$Html$Attributes$attribute('autocomplete'));
-var $mdgriffith$elm_ui$Internal$Model$Behind = 5;
-var $mdgriffith$elm_ui$Internal$Model$Nearby = F2(
- function (a, b) {
- return {$: 9, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Element$createNearby = F2(
- function (loc, element) {
- if (element.$ === 3) {
- return $mdgriffith$elm_ui$Internal$Model$NoAttribute;
- } else {
- return A2($mdgriffith$elm_ui$Internal$Model$Nearby, loc, element);
- }
- });
-var $mdgriffith$elm_ui$Element$behindContent = function (element) {
- return A2($mdgriffith$elm_ui$Element$createNearby, 5, element);
-};
-var $mdgriffith$elm_ui$Internal$Model$MoveY = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$TransformComponent = F2(
- function (a, b) {
- return {$: 10, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Flag$moveY = $mdgriffith$elm_ui$Internal$Flag$flag(26);
-var $mdgriffith$elm_ui$Element$moveUp = function (y) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$TransformComponent,
- $mdgriffith$elm_ui$Internal$Flag$moveY,
- $mdgriffith$elm_ui$Internal$Model$MoveY(-y));
-};
-var $mdgriffith$elm_ui$Element$Input$calcMoveToCompensateForPadding = function (attrs) {
- var gatherSpacing = F2(
- function (attr, found) {
- if ((attr.$ === 4) && (attr.b.$ === 5)) {
- var _v2 = attr.b;
- var x = _v2.b;
- var y = _v2.c;
- if (found.$ === 1) {
- return $elm$core$Maybe$Just(y);
- } else {
- return found;
- }
- } else {
- return found;
- }
- });
- var _v0 = A3($elm$core$List$foldr, gatherSpacing, $elm$core$Maybe$Nothing, attrs);
- if (_v0.$ === 1) {
- return $mdgriffith$elm_ui$Internal$Model$NoAttribute;
- } else {
- var vSpace = _v0.a;
- return $mdgriffith$elm_ui$Element$moveUp(
- $elm$core$Basics$floor(vSpace / 2));
- }
-};
-var $mdgriffith$elm_ui$Internal$Flag$borderColor = $mdgriffith$elm_ui$Internal$Flag$flag(28);
-var $mdgriffith$elm_ui$Element$Border$color = function (clr) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$borderColor,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Colored,
- 'bc-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(clr),
- 'border-color',
- clr));
-};
-var $mdgriffith$elm_ui$Element$rgb = F3(
- function (r, g, b) {
- return A4($mdgriffith$elm_ui$Internal$Model$Rgba, r, g, b, 1);
- });
-var $mdgriffith$elm_ui$Element$Input$darkGrey = A3($mdgriffith$elm_ui$Element$rgb, 186 / 255, 189 / 255, 182 / 255);
-var $mdgriffith$elm_ui$Element$paddingXY = F2(
- function (x, y) {
- if (_Utils_eq(x, y)) {
- var f = x;
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$padding,
- A5(
- $mdgriffith$elm_ui$Internal$Model$PaddingStyle,
- 'p-' + $elm$core$String$fromInt(x),
- f,
- f,
- f,
- f));
- } else {
- var yFloat = y;
- var xFloat = x;
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$padding,
- A5(
- $mdgriffith$elm_ui$Internal$Model$PaddingStyle,
- 'p-' + ($elm$core$String$fromInt(x) + ('-' + $elm$core$String$fromInt(y))),
- yFloat,
- xFloat,
- yFloat,
- xFloat));
- }
- });
-var $mdgriffith$elm_ui$Element$Input$defaultTextPadding = A2($mdgriffith$elm_ui$Element$paddingXY, 12, 12);
-var $mdgriffith$elm_ui$Internal$Model$SpacingStyle = F3(
- function (a, b, c) {
- return {$: 5, a: a, b: b, c: c};
- });
-var $mdgriffith$elm_ui$Internal$Flag$spacing = $mdgriffith$elm_ui$Internal$Flag$flag(3);
-var $mdgriffith$elm_ui$Internal$Model$spacingName = F2(
- function (x, y) {
- return 'spacing-' + ($elm$core$String$fromInt(x) + ('-' + $elm$core$String$fromInt(y)));
- });
-var $mdgriffith$elm_ui$Element$spacing = function (x) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$spacing,
- A3(
- $mdgriffith$elm_ui$Internal$Model$SpacingStyle,
- A2($mdgriffith$elm_ui$Internal$Model$spacingName, x, x),
- x,
- x));
-};
-var $mdgriffith$elm_ui$Element$Input$white = A3($mdgriffith$elm_ui$Element$rgb, 1, 1, 1);
-var $mdgriffith$elm_ui$Internal$Model$BorderWidth = F5(
- function (a, b, c, d, e) {
- return {$: 6, a: a, b: b, c: c, d: d, e: e};
- });
-var $mdgriffith$elm_ui$Element$Border$width = function (v) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$borderWidth,
- A5(
- $mdgriffith$elm_ui$Internal$Model$BorderWidth,
- 'b-' + $elm$core$String$fromInt(v),
- v,
- v,
- v,
- v));
-};
-var $mdgriffith$elm_ui$Element$Input$defaultTextBoxStyle = _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$Input$defaultTextPadding,
- $mdgriffith$elm_ui$Element$Border$rounded(3),
- $mdgriffith$elm_ui$Element$Border$color($mdgriffith$elm_ui$Element$Input$darkGrey),
- $mdgriffith$elm_ui$Element$Background$color($mdgriffith$elm_ui$Element$Input$white),
- $mdgriffith$elm_ui$Element$Border$width(1),
- $mdgriffith$elm_ui$Element$spacing(5),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink)
- ]);
-var $mdgriffith$elm_ui$Element$Input$getHeight = function (attr) {
- if (attr.$ === 8) {
- var h = attr.a;
- return $elm$core$Maybe$Just(h);
- } else {
- return $elm$core$Maybe$Nothing;
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$Label = function (a) {
- return {$: 5, a: a};
-};
-var $mdgriffith$elm_ui$Element$Input$hiddenLabelAttribute = function (label) {
- if (label.$ === 1) {
- var textLabel = label.a;
- return $mdgriffith$elm_ui$Internal$Model$Describe(
- $mdgriffith$elm_ui$Internal$Model$Label(textLabel));
- } else {
- return $mdgriffith$elm_ui$Internal$Model$NoAttribute;
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$InFront = 4;
-var $mdgriffith$elm_ui$Element$inFront = function (element) {
- return A2($mdgriffith$elm_ui$Element$createNearby, 4, element);
-};
-var $mdgriffith$elm_ui$Element$Input$isConstrained = function (len) {
- isConstrained:
- while (true) {
- switch (len.$) {
- case 1:
- return false;
- case 0:
- return true;
- case 2:
- return true;
- case 3:
- var l = len.b;
- var $temp$len = l;
- len = $temp$len;
- continue isConstrained;
- default:
- var l = len.b;
- return true;
- }
- }
-};
-var $mdgriffith$elm_ui$Element$Input$isHiddenLabel = function (label) {
- if (label.$ === 1) {
- return true;
- } else {
- return false;
- }
-};
-var $mdgriffith$elm_ui$Element$Input$isStacked = function (label) {
- if (!label.$) {
- var loc = label.a;
- switch (loc) {
- case 0:
- return false;
- case 1:
- return false;
- case 2:
- return true;
- default:
- return true;
- }
- } else {
- return true;
- }
-};
-var $mdgriffith$elm_ui$Element$Input$negateBox = function (box) {
- return {dL: -box.dL, eu: -box.eu, eS: -box.eS, fs: -box.fs};
-};
-var $elm$html$Html$Events$alwaysStop = function (x) {
- return _Utils_Tuple2(x, true);
-};
-var $elm$virtual_dom$VirtualDom$MayStopPropagation = function (a) {
- return {$: 1, 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 $mdgriffith$elm_ui$Internal$Model$paddingName = F4(
- function (top, right, bottom, left) {
- return 'pad-' + ($elm$core$String$fromInt(top) + ('-' + ($elm$core$String$fromInt(right) + ('-' + ($elm$core$String$fromInt(bottom) + ('-' + $elm$core$String$fromInt(left)))))));
- });
-var $mdgriffith$elm_ui$Element$paddingEach = function (_v0) {
- var top = _v0.fs;
- var right = _v0.eS;
- var bottom = _v0.dL;
- var left = _v0.eu;
- if (_Utils_eq(top, right) && (_Utils_eq(top, bottom) && _Utils_eq(top, left))) {
- var topFloat = top;
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$padding,
- A5(
- $mdgriffith$elm_ui$Internal$Model$PaddingStyle,
- 'p-' + $elm$core$String$fromInt(top),
- topFloat,
- topFloat,
- topFloat,
- topFloat));
- } else {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$padding,
- A5(
- $mdgriffith$elm_ui$Internal$Model$PaddingStyle,
- A4($mdgriffith$elm_ui$Internal$Model$paddingName, top, right, bottom, left),
- top,
- right,
- bottom,
- left));
- }
-};
-var $mdgriffith$elm_ui$Element$htmlAttribute = $mdgriffith$elm_ui$Internal$Model$Attr;
-var $mdgriffith$elm_ui$Element$Input$isFill = function (len) {
- isFill:
- while (true) {
- switch (len.$) {
- case 2:
- return true;
- case 1:
- return false;
- case 0:
- return false;
- case 3:
- var l = len.b;
- var $temp$len = l;
- len = $temp$len;
- continue isFill;
- default:
- var l = len.b;
- var $temp$len = l;
- len = $temp$len;
- continue isFill;
- }
- }
-};
-var $mdgriffith$elm_ui$Element$Input$isPixel = function (len) {
- isPixel:
- while (true) {
- switch (len.$) {
- case 1:
- return false;
- case 0:
- return true;
- case 2:
- return false;
- case 3:
- var l = len.b;
- var $temp$len = l;
- len = $temp$len;
- continue isPixel;
- default:
- var l = len.b;
- var $temp$len = l;
- len = $temp$len;
- continue isPixel;
- }
- }
-};
-var $mdgriffith$elm_ui$Internal$Model$paddingNameFloat = F4(
- function (top, right, bottom, left) {
- return 'pad-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(top) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(right) + ('-' + ($mdgriffith$elm_ui$Internal$Model$floatClass(bottom) + ('-' + $mdgriffith$elm_ui$Internal$Model$floatClass(left)))))));
- });
-var $elm$virtual_dom$VirtualDom$style = _VirtualDom_style;
-var $elm$html$Html$Attributes$style = $elm$virtual_dom$VirtualDom$style;
-var $mdgriffith$elm_ui$Element$Input$redistributeOver = F4(
- function (isMultiline, stacked, attr, els) {
- switch (attr.$) {
- case 9:
- return _Utils_update(
- els,
- {
- b: A2($elm$core$List$cons, attr, els.b)
- });
- case 7:
- var width = attr.a;
- return $mdgriffith$elm_ui$Element$Input$isFill(width) ? _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h),
- t: A2($elm$core$List$cons, attr, els.t),
- b: A2($elm$core$List$cons, attr, els.b)
- }) : (stacked ? _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h)
- }) : _Utils_update(
- els,
- {
- b: A2($elm$core$List$cons, attr, els.b)
- }));
- case 8:
- var height = attr.a;
- return (!stacked) ? _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h),
- b: A2($elm$core$List$cons, attr, els.b)
- }) : ($mdgriffith$elm_ui$Element$Input$isFill(height) ? _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h),
- b: A2($elm$core$List$cons, attr, els.b)
- }) : ($mdgriffith$elm_ui$Element$Input$isPixel(height) ? _Utils_update(
- els,
- {
- b: A2($elm$core$List$cons, attr, els.b)
- }) : _Utils_update(
- els,
- {
- b: A2($elm$core$List$cons, attr, els.b)
- })));
- case 6:
- return _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h)
- });
- case 5:
- return _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h)
- });
- case 4:
- switch (attr.b.$) {
- case 5:
- var _v1 = attr.b;
- return _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h),
- t: A2($elm$core$List$cons, attr, els.t),
- b: A2($elm$core$List$cons, attr, els.b),
- at: A2($elm$core$List$cons, attr, els.at)
- });
- case 7:
- var cls = attr.a;
- var _v2 = attr.b;
- var pad = _v2.a;
- var t = _v2.b;
- var r = _v2.c;
- var b = _v2.d;
- var l = _v2.e;
- if (isMultiline) {
- return _Utils_update(
- els,
- {
- q: A2($elm$core$List$cons, attr, els.q),
- b: A2($elm$core$List$cons, attr, els.b)
- });
- } else {
- var newTop = t - A2($elm$core$Basics$min, t, b);
- var newLineHeight = $mdgriffith$elm_ui$Element$htmlAttribute(
- A2(
- $elm$html$Html$Attributes$style,
- 'line-height',
- 'calc(1.0em + ' + ($elm$core$String$fromFloat(
- 2 * A2($elm$core$Basics$min, t, b)) + 'px)')));
- var newHeight = $mdgriffith$elm_ui$Element$htmlAttribute(
- A2(
- $elm$html$Html$Attributes$style,
- 'height',
- 'calc(1.0em + ' + ($elm$core$String$fromFloat(
- 2 * A2($elm$core$Basics$min, t, b)) + 'px)')));
- var newBottom = b - A2($elm$core$Basics$min, t, b);
- var reducedVerticalPadding = A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$padding,
- A5(
- $mdgriffith$elm_ui$Internal$Model$PaddingStyle,
- A4($mdgriffith$elm_ui$Internal$Model$paddingNameFloat, newTop, r, newBottom, l),
- newTop,
- r,
- newBottom,
- l));
- return _Utils_update(
- els,
- {
- q: A2($elm$core$List$cons, attr, els.q),
- t: A2(
- $elm$core$List$cons,
- newHeight,
- A2($elm$core$List$cons, newLineHeight, els.t)),
- b: A2($elm$core$List$cons, reducedVerticalPadding, els.b)
- });
- }
- case 6:
- var _v3 = attr.b;
- return _Utils_update(
- els,
- {
- q: A2($elm$core$List$cons, attr, els.q),
- b: A2($elm$core$List$cons, attr, els.b)
- });
- case 10:
- return _Utils_update(
- els,
- {
- q: A2($elm$core$List$cons, attr, els.q),
- b: A2($elm$core$List$cons, attr, els.b)
- });
- case 2:
- return _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h)
- });
- case 1:
- var _v4 = attr.b;
- return _Utils_update(
- els,
- {
- h: A2($elm$core$List$cons, attr, els.h)
- });
- default:
- var flag = attr.a;
- var cls = attr.b;
- return _Utils_update(
- els,
- {
- b: A2($elm$core$List$cons, attr, els.b)
- });
- }
- case 0:
- return els;
- case 1:
- var a = attr.a;
- return _Utils_update(
- els,
- {
- t: A2($elm$core$List$cons, attr, els.t)
- });
- case 2:
- return _Utils_update(
- els,
- {
- t: A2($elm$core$List$cons, attr, els.t)
- });
- case 3:
- return _Utils_update(
- els,
- {
- b: A2($elm$core$List$cons, attr, els.b)
- });
- default:
- return _Utils_update(
- els,
- {
- t: A2($elm$core$List$cons, attr, els.t)
- });
- }
- });
-var $mdgriffith$elm_ui$Element$Input$redistribute = F3(
- function (isMultiline, stacked, attrs) {
- return function (redist) {
- return {
- q: $elm$core$List$reverse(redist.q),
- h: $elm$core$List$reverse(redist.h),
- t: $elm$core$List$reverse(redist.t),
- b: $elm$core$List$reverse(redist.b),
- at: $elm$core$List$reverse(redist.at)
- };
- }(
- A3(
- $elm$core$List$foldl,
- A2($mdgriffith$elm_ui$Element$Input$redistributeOver, isMultiline, stacked),
- {q: _List_Nil, h: _List_Nil, t: _List_Nil, b: _List_Nil, at: _List_Nil},
- attrs));
- });
-var $mdgriffith$elm_ui$Element$Input$renderBox = function (_v0) {
- var top = _v0.fs;
- var right = _v0.eS;
- var bottom = _v0.dL;
- var left = _v0.eu;
- return $elm$core$String$fromInt(top) + ('px ' + ($elm$core$String$fromInt(right) + ('px ' + ($elm$core$String$fromInt(bottom) + ('px ' + ($elm$core$String$fromInt(left) + 'px'))))));
-};
-var $mdgriffith$elm_ui$Internal$Model$Transparency = F2(
- function (a, b) {
- return {$: 12, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Internal$Flag$transparency = $mdgriffith$elm_ui$Internal$Flag$flag(0);
-var $mdgriffith$elm_ui$Element$alpha = function (o) {
- var transparency = function (x) {
- return 1 - x;
- }(
- A2(
- $elm$core$Basics$min,
- 1.0,
- A2($elm$core$Basics$max, 0.0, o)));
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$transparency,
- A2(
- $mdgriffith$elm_ui$Internal$Model$Transparency,
- 'transparency-' + $mdgriffith$elm_ui$Internal$Model$floatClass(transparency),
- transparency));
-};
-var $mdgriffith$elm_ui$Element$Input$charcoal = A3($mdgriffith$elm_ui$Element$rgb, 136 / 255, 138 / 255, 133 / 255);
-var $mdgriffith$elm_ui$Element$Font$color = function (fontColor) {
- return A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$fontColor,
- A3(
- $mdgriffith$elm_ui$Internal$Model$Colored,
- 'fc-' + $mdgriffith$elm_ui$Internal$Model$formatColorClass(fontColor),
- 'color',
- fontColor));
-};
-var $mdgriffith$elm_ui$Element$el = F2(
- function (attrs, child) {
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asEl,
- $mdgriffith$elm_ui$Internal$Model$div,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$shrink),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$shrink),
- attrs)),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [child])));
- });
-var $mdgriffith$elm_ui$Element$rgba = $mdgriffith$elm_ui$Internal$Model$Rgba;
-var $mdgriffith$elm_ui$Element$Input$renderPlaceholder = F3(
- function (_v0, forPlaceholder, on) {
- var placeholderAttrs = _v0.a;
- var placeholderEl = _v0.b;
- return A2(
- $mdgriffith$elm_ui$Element$el,
- _Utils_ap(
- forPlaceholder,
- _Utils_ap(
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$Font$color($mdgriffith$elm_ui$Element$Input$charcoal),
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.cF + (' ' + $mdgriffith$elm_ui$Internal$Style$classes.eK)),
- $mdgriffith$elm_ui$Element$clip,
- $mdgriffith$elm_ui$Element$Border$color(
- A4($mdgriffith$elm_ui$Element$rgba, 0, 0, 0, 0)),
- $mdgriffith$elm_ui$Element$Background$color(
- A4($mdgriffith$elm_ui$Element$rgba, 0, 0, 0, 0)),
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$alpha(
- on ? 1 : 0)
- ]),
- placeholderAttrs)),
- placeholderEl);
- });
-var $mdgriffith$elm_ui$Element$scrollbarY = A2($mdgriffith$elm_ui$Internal$Model$Class, $mdgriffith$elm_ui$Internal$Flag$overflow, $mdgriffith$elm_ui$Internal$Style$classes.eZ);
-var $elm$html$Html$span = _VirtualDom_node('span');
-var $elm$html$Html$Attributes$spellcheck = $elm$html$Html$Attributes$boolProperty('spellcheck');
-var $mdgriffith$elm_ui$Element$Input$spellcheck = A2($elm$core$Basics$composeL, $mdgriffith$elm_ui$Internal$Model$Attr, $elm$html$Html$Attributes$spellcheck);
-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 $mdgriffith$elm_ui$Element$Input$value = A2($elm$core$Basics$composeL, $mdgriffith$elm_ui$Internal$Model$Attr, $elm$html$Html$Attributes$value);
-var $mdgriffith$elm_ui$Element$Input$textHelper = F3(
- function (textInput, attrs, textOptions) {
- var withDefaults = _Utils_ap($mdgriffith$elm_ui$Element$Input$defaultTextBoxStyle, attrs);
- var redistributed = A3(
- $mdgriffith$elm_ui$Element$Input$redistribute,
- _Utils_eq(textInput.o, $mdgriffith$elm_ui$Element$Input$TextArea),
- $mdgriffith$elm_ui$Element$Input$isStacked(textOptions.bH),
- withDefaults);
- var onlySpacing = function (attr) {
- if ((attr.$ === 4) && (attr.b.$ === 5)) {
- var _v9 = attr.b;
- return true;
- } else {
- return false;
- }
- };
- var heightConstrained = function () {
- var _v7 = textInput.o;
- if (!_v7.$) {
- var inputType = _v7.a;
- return false;
- } else {
- return A2(
- $elm$core$Maybe$withDefault,
- false,
- A2(
- $elm$core$Maybe$map,
- $mdgriffith$elm_ui$Element$Input$isConstrained,
- $elm$core$List$head(
- $elm$core$List$reverse(
- A2($elm$core$List$filterMap, $mdgriffith$elm_ui$Element$Input$getHeight, withDefaults)))));
- }
- }();
- var getPadding = function (attr) {
- if ((attr.$ === 4) && (attr.b.$ === 7)) {
- var cls = attr.a;
- var _v6 = attr.b;
- var pad = _v6.a;
- var t = _v6.b;
- var r = _v6.c;
- var b = _v6.d;
- var l = _v6.e;
- return $elm$core$Maybe$Just(
- {
- dL: A2(
- $elm$core$Basics$max,
- 0,
- $elm$core$Basics$floor(b - 3)),
- eu: A2(
- $elm$core$Basics$max,
- 0,
- $elm$core$Basics$floor(l - 3)),
- eS: A2(
- $elm$core$Basics$max,
- 0,
- $elm$core$Basics$floor(r - 3)),
- fs: A2(
- $elm$core$Basics$max,
- 0,
- $elm$core$Basics$floor(t - 3))
- });
- } else {
- return $elm$core$Maybe$Nothing;
- }
- };
- var parentPadding = A2(
- $elm$core$Maybe$withDefault,
- {dL: 0, eu: 0, eS: 0, fs: 0},
- $elm$core$List$head(
- $elm$core$List$reverse(
- A2($elm$core$List$filterMap, getPadding, withDefaults))));
- var inputElement = A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asEl,
- function () {
- var _v3 = textInput.o;
- if (!_v3.$) {
- var inputType = _v3.a;
- return $mdgriffith$elm_ui$Internal$Model$NodeName('input');
- } else {
- return $mdgriffith$elm_ui$Internal$Model$NodeName('textarea');
- }
- }(),
- _Utils_ap(
- function () {
- var _v4 = textInput.o;
- if (!_v4.$) {
- var inputType = _v4.a;
- return _List_fromArray(
- [
- $mdgriffith$elm_ui$Internal$Model$Attr(
- $elm$html$Html$Attributes$type_(inputType)),
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.eq)
- ]);
- } else {
- return _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$clip,
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.em),
- $mdgriffith$elm_ui$Element$Input$calcMoveToCompensateForPadding(withDefaults),
- $mdgriffith$elm_ui$Element$paddingEach(parentPadding),
- $mdgriffith$elm_ui$Internal$Model$Attr(
- A2(
- $elm$html$Html$Attributes$style,
- 'margin',
- $mdgriffith$elm_ui$Element$Input$renderBox(
- $mdgriffith$elm_ui$Element$Input$negateBox(parentPadding)))),
- $mdgriffith$elm_ui$Internal$Model$Attr(
- A2($elm$html$Html$Attributes$style, 'box-sizing', 'content-box'))
- ]);
- }
- }(),
- _Utils_ap(
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$Input$value(textOptions.bY),
- $mdgriffith$elm_ui$Internal$Model$Attr(
- $elm$html$Html$Events$onInput(textOptions.bR)),
- $mdgriffith$elm_ui$Element$Input$hiddenLabelAttribute(textOptions.bH),
- $mdgriffith$elm_ui$Element$Input$spellcheck(textInput.B),
- A2(
- $elm$core$Maybe$withDefault,
- $mdgriffith$elm_ui$Internal$Model$NoAttribute,
- A2($elm$core$Maybe$map, $mdgriffith$elm_ui$Element$Input$autofill, textInput.x))
- ]),
- redistributed.t)),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(_List_Nil));
- var wrappedInput = function () {
- var _v0 = textInput.o;
- if (_v0.$ === 1) {
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asEl,
- $mdgriffith$elm_ui$Internal$Model$div,
- _Utils_ap(
- (heightConstrained ? $elm$core$List$cons($mdgriffith$elm_ui$Element$scrollbarY) : $elm$core$Basics$identity)(
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- A2($elm$core$List$any, $mdgriffith$elm_ui$Element$Input$hasFocusStyle, withDefaults) ? $mdgriffith$elm_ui$Internal$Model$NoAttribute : $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.ch),
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.ep)
- ])),
- redistributed.b),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [
- A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asParagraph,
- $mdgriffith$elm_ui$Internal$Model$div,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$inFront(inputElement),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.eo),
- redistributed.at)))),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- function () {
- if (textOptions.bY === '') {
- var _v1 = textOptions.bS;
- if (_v1.$ === 1) {
- return _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$text('\u00A0')
- ]);
- } else {
- var place = _v1.a;
- return _List_fromArray(
- [
- A3($mdgriffith$elm_ui$Element$Input$renderPlaceholder, place, _List_Nil, textOptions.bY === '')
- ]);
- }
- } else {
- return _List_fromArray(
- [
- $mdgriffith$elm_ui$Internal$Model$unstyled(
- A2(
- $elm$html$Html$span,
- _List_fromArray(
- [
- $elm$html$Html$Attributes$class($mdgriffith$elm_ui$Internal$Style$classes.en)
- ]),
- _List_fromArray(
- [
- $elm$html$Html$text(textOptions.bY + '\u00A0')
- ])))
- ]);
- }
- }()))
- ])));
- } else {
- var inputType = _v0.a;
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asEl,
- $mdgriffith$elm_ui$Internal$Model$div,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- A2(
- $elm$core$List$cons,
- A2($elm$core$List$any, $mdgriffith$elm_ui$Element$Input$hasFocusStyle, withDefaults) ? $mdgriffith$elm_ui$Internal$Model$NoAttribute : $mdgriffith$elm_ui$Internal$Model$htmlClass($mdgriffith$elm_ui$Internal$Style$classes.ch),
- $elm$core$List$concat(
- _List_fromArray(
- [
- redistributed.b,
- function () {
- var _v2 = textOptions.bS;
- if (_v2.$ === 1) {
- return _List_Nil;
- } else {
- var place = _v2.a;
- return _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$behindContent(
- A3($mdgriffith$elm_ui$Element$Input$renderPlaceholder, place, redistributed.q, textOptions.bY === ''))
- ]);
- }
- }()
- ])))),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [inputElement])));
- }
- }();
- return A3(
- $mdgriffith$elm_ui$Element$Input$applyLabel,
- A2(
- $elm$core$List$cons,
- A2($mdgriffith$elm_ui$Internal$Model$Class, $mdgriffith$elm_ui$Internal$Flag$cursor, $mdgriffith$elm_ui$Internal$Style$classes.dY),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$Input$isHiddenLabel(textOptions.bH) ? $mdgriffith$elm_ui$Internal$Model$NoAttribute : $mdgriffith$elm_ui$Element$spacing(5),
- A2($elm$core$List$cons, $mdgriffith$elm_ui$Element$Region$announce, redistributed.h))),
- textOptions.bH,
- wrappedInput);
- });
-var $mdgriffith$elm_ui$Element$Input$multiline = F2(
- function (attrs, multi) {
- return A3(
- $mdgriffith$elm_ui$Element$Input$textHelper,
- {x: $elm$core$Maybe$Nothing, B: multi.bW, o: $mdgriffith$elm_ui$Element$Input$TextArea},
- attrs,
- {bH: multi.bH, bR: multi.bR, bS: multi.bS, bY: multi.bY});
- });
-var $mdgriffith$elm_ui$Element$Input$Placeholder = F2(
- function (a, b) {
- return {$: 0, a: a, b: b};
- });
-var $mdgriffith$elm_ui$Element$Input$placeholder = $mdgriffith$elm_ui$Element$Input$Placeholder;
-var $mdgriffith$elm_ui$Element$scrollbars = A2($mdgriffith$elm_ui$Internal$Model$Class, $mdgriffith$elm_ui$Internal$Flag$overflow, $mdgriffith$elm_ui$Internal$Style$classes.eX);
-var $mdgriffith$elm_ui$Element$InternalColumn = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$GridPosition = function (a) {
- return {$: 9, a: a};
-};
-var $mdgriffith$elm_ui$Internal$Model$GridTemplateStyle = function (a) {
- return {$: 8, a: a};
-};
-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 $mdgriffith$elm_ui$Internal$Model$AsGrid = 3;
-var $mdgriffith$elm_ui$Internal$Model$asGrid = 3;
-var $mdgriffith$elm_ui$Internal$Model$getSpacing = F2(
- function (attrs, _default) {
- return A2(
- $elm$core$Maybe$withDefault,
- _default,
- A3(
- $elm$core$List$foldr,
- F2(
- function (attr, acc) {
- if (!acc.$) {
- var x = acc.a;
- return $elm$core$Maybe$Just(x);
- } else {
- if ((attr.$ === 4) && (attr.b.$ === 5)) {
- var _v2 = attr.b;
- var x = _v2.b;
- var y = _v2.c;
- return $elm$core$Maybe$Just(
- _Utils_Tuple2(x, y));
- } else {
- return $elm$core$Maybe$Nothing;
- }
- }
- }),
- $elm$core$Maybe$Nothing,
- attrs));
- });
-var $mdgriffith$elm_ui$Internal$Flag$gridPosition = $mdgriffith$elm_ui$Internal$Flag$flag(35);
-var $mdgriffith$elm_ui$Internal$Flag$gridTemplate = $mdgriffith$elm_ui$Internal$Flag$flag(34);
-var $mdgriffith$elm_ui$Internal$Model$Px = function (a) {
- return {$: 0, a: a};
-};
-var $mdgriffith$elm_ui$Element$px = $mdgriffith$elm_ui$Internal$Model$Px;
-var $elm$core$List$repeatHelp = F3(
- function (result, n, value) {
- repeatHelp:
- while (true) {
- if (n <= 0) {
- return result;
- } else {
- var $temp$result = A2($elm$core$List$cons, value, result),
- $temp$n = n - 1,
- $temp$value = value;
- result = $temp$result;
- n = $temp$n;
- value = $temp$value;
- continue repeatHelp;
- }
- }
- });
-var $elm$core$List$repeat = F2(
- function (n, value) {
- return A3($elm$core$List$repeatHelp, _List_Nil, n, value);
- });
-var $mdgriffith$elm_ui$Element$tableHelper = F2(
- function (attrs, config) {
- var onGrid = F3(
- function (rowLevel, columnLevel, elem) {
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asEl,
- $mdgriffith$elm_ui$Internal$Model$div,
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$gridPosition,
- $mdgriffith$elm_ui$Internal$Model$GridPosition(
- {dT: columnLevel, cl: 1, eU: rowLevel, dc: 1}))
- ]),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- _List_fromArray(
- [elem])));
- });
- var columnWidth = function (col) {
- if (!col.$) {
- var colConfig = col.a;
- return colConfig.dc;
- } else {
- var colConfig = col.a;
- return colConfig.dc;
- }
- };
- var columnHeader = function (col) {
- if (!col.$) {
- var colConfig = col.a;
- return colConfig.cj;
- } else {
- var colConfig = col.a;
- return colConfig.cj;
- }
- };
- var maybeHeaders = function (headers) {
- return A2(
- $elm$core$List$all,
- $elm$core$Basics$eq($mdgriffith$elm_ui$Internal$Model$Empty),
- headers) ? $elm$core$Maybe$Nothing : $elm$core$Maybe$Just(
- A2(
- $elm$core$List$indexedMap,
- F2(
- function (col, header) {
- return A3(onGrid, 1, col + 1, header);
- }),
- headers));
- }(
- A2($elm$core$List$map, columnHeader, config.dU));
- var add = F3(
- function (cell, columnConfig, cursor) {
- if (!columnConfig.$) {
- var col = columnConfig.a;
- return _Utils_update(
- cursor,
- {
- ca: cursor.ca + 1,
- C: A2(
- $elm$core$List$cons,
- A3(
- onGrid,
- cursor.eU,
- cursor.ca,
- A2(
- col.da,
- _Utils_eq(maybeHeaders, $elm$core$Maybe$Nothing) ? (cursor.eU - 1) : (cursor.eU - 2),
- cell)),
- cursor.C)
- });
- } else {
- var col = columnConfig.a;
- return {
- ca: cursor.ca + 1,
- C: A2(
- $elm$core$List$cons,
- A3(
- onGrid,
- cursor.eU,
- cursor.ca,
- col.da(cell)),
- cursor.C),
- eU: cursor.eU
- };
- }
- });
- var build = F3(
- function (columns, rowData, cursor) {
- var newCursor = A3(
- $elm$core$List$foldl,
- add(rowData),
- cursor,
- columns);
- return {ca: 1, C: newCursor.C, eU: cursor.eU + 1};
- });
- var children = A3(
- $elm$core$List$foldl,
- build(config.dU),
- {
- ca: 1,
- C: _List_Nil,
- eU: _Utils_eq(maybeHeaders, $elm$core$Maybe$Nothing) ? 1 : 2
- },
- config.d_);
- var _v0 = A2(
- $mdgriffith$elm_ui$Internal$Model$getSpacing,
- attrs,
- _Utils_Tuple2(0, 0));
- var sX = _v0.a;
- var sY = _v0.b;
- var template = A2(
- $mdgriffith$elm_ui$Internal$Model$StyleClass,
- $mdgriffith$elm_ui$Internal$Flag$gridTemplate,
- $mdgriffith$elm_ui$Internal$Model$GridTemplateStyle(
- {
- dU: A2($elm$core$List$map, columnWidth, config.dU),
- eV: A2(
- $elm$core$List$repeat,
- $elm$core$List$length(config.d_),
- $mdgriffith$elm_ui$Internal$Model$Content),
- e5: _Utils_Tuple2(
- $mdgriffith$elm_ui$Element$px(sX),
- $mdgriffith$elm_ui$Element$px(sY))
- }));
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asGrid,
- $mdgriffith$elm_ui$Internal$Model$div,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- A2($elm$core$List$cons, template, attrs)),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(
- function () {
- if (maybeHeaders.$ === 1) {
- return children.C;
- } else {
- var renderedHeaders = maybeHeaders.a;
- return _Utils_ap(
- renderedHeaders,
- $elm$core$List$reverse(children.C));
- }
- }()));
- });
-var $mdgriffith$elm_ui$Element$table = F2(
- function (attrs, config) {
- return A2(
- $mdgriffith$elm_ui$Element$tableHelper,
- attrs,
- {
- dU: A2($elm$core$List$map, $mdgriffith$elm_ui$Element$InternalColumn, config.dU),
- d_: config.d_
- });
- });
-var $author$project$CalculateurDeNotes$voirNotes = function (rpnsEleves) {
- return A2(
- $mdgriffith$elm_ui$Element$table,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$clip,
- $mdgriffith$elm_ui$Element$scrollbars,
- $mdgriffith$elm_ui$Element$padding($author$project$Style$petitEspacement),
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(0.2)),
- $mdgriffith$elm_ui$Element$Border$rounded(8),
- $mdgriffith$elm_ui$Element$Border$innerShadow(
- {
- a5: 10,
- ba: A3($mdgriffith$elm_ui$Element$rgb255, 10, 10, 10),
- bl: _Utils_Tuple2(0.3, 0.4),
- bo: 2
- })
- ]),
- {
- dU: _List_fromArray(
- [
- {
- cj: $mdgriffith$elm_ui$Element$text('Numéro étudiant'),
- da: function (rpns) {
- return $mdgriffith$elm_ui$Element$text(rpns.bk);
- },
- dc: $mdgriffith$elm_ui$Element$fill
- },
- {
- cj: $mdgriffith$elm_ui$Element$text('Note'),
- da: function (rpns) {
- var _v0 = rpns.an;
- if (_v0.$ === 1) {
- return $mdgriffith$elm_ui$Element$text('');
- } else {
- var nt = _v0.a;
- return $mdgriffith$elm_ui$Element$text(
- $elm$core$String$fromFloat(nt));
- }
- },
- dc: $mdgriffith$elm_ui$Element$fill
- }
- ]),
- d_: rpnsEleves
- });
-};
-var $author$project$CalculateurDeNotes$view = function (model) {
- return A2(
- $mdgriffith$elm_ui$Element$row,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$spacing($author$project$Style$grandEspacement),
- $mdgriffith$elm_ui$Element$padding($author$project$Style$tresGrandEspacement),
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill)
- ]),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Element$column,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$spacing($author$project$Style$petitEspacement),
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$scrollbars,
- $mdgriffith$elm_ui$Element$clip
- ]),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Element$Input$multiline,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$clip,
- $mdgriffith$elm_ui$Element$scrollbars,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(0.2)),
- $mdgriffith$elm_ui$Element$Border$rounded(8),
- $mdgriffith$elm_ui$Element$Border$innerShadow(
- {
- a5: 10,
- ba: A3($mdgriffith$elm_ui$Element$rgb255, 10, 10, 10),
- bl: _Utils_Tuple2(0.3, 0.4),
- bo: 2
- })
- ]),
- {
- bH: A2(
- $mdgriffith$elm_ui$Element$Input$labelAbove,
- _List_Nil,
- $mdgriffith$elm_ui$Element$text('Barème')),
- bR: $author$project$CalculateurDeNotes$NouveauBareme,
- bS: $elm$core$Maybe$Just(
- A2(
- $mdgriffith$elm_ui$Element$Input$placeholder,
- _List_Nil,
- $mdgriffith$elm_ui$Element$text('Entrer le barème sous la forme +3 -1, +2 -1'))),
- bW: false,
- bY: model.ay
- }),
- A2(
- $mdgriffith$elm_ui$Element$Input$multiline,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$clip,
- $mdgriffith$elm_ui$Element$scrollbars,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(0.2)),
- $mdgriffith$elm_ui$Element$Border$rounded(8),
- $mdgriffith$elm_ui$Element$Border$innerShadow(
- {
- a5: 10,
- ba: A3($mdgriffith$elm_ui$Element$rgb255, 10, 10, 10),
- bl: _Utils_Tuple2(0.3, 0.4),
- bo: 2
- })
- ]),
- {
- bH: A2(
- $mdgriffith$elm_ui$Element$Input$labelAbove,
- _List_Nil,
- $mdgriffith$elm_ui$Element$text('Réponses correctes')),
- bR: $author$project$CalculateurDeNotes$NouvellesReponsesCorrectes,
- bS: $elm$core$Maybe$Just(
- A2(
- $mdgriffith$elm_ui$Element$Input$placeholder,
- _List_Nil,
- $mdgriffith$elm_ui$Element$text('Entrer les réponses correctes pour chaque sujet'))),
- bW: false,
- bY: model.aM
- }),
- A2(
- $mdgriffith$elm_ui$Element$Input$multiline,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$clip,
- $mdgriffith$elm_ui$Element$scrollbars,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(0.2)),
- $mdgriffith$elm_ui$Element$Border$rounded(8),
- $mdgriffith$elm_ui$Element$Border$innerShadow(
- {
- a5: 10,
- ba: A3($mdgriffith$elm_ui$Element$rgb255, 10, 10, 10),
- bl: _Utils_Tuple2(0.3, 0.4),
- bo: 2
- })
- ]),
- {
- bH: A2(
- $mdgriffith$elm_ui$Element$Input$labelAbove,
- _List_Nil,
- $mdgriffith$elm_ui$Element$text('Réponses des élèves')),
- bR: $author$project$CalculateurDeNotes$NouvellesReponsesEleves,
- bS: $elm$core$Maybe$Just(
- A2(
- $mdgriffith$elm_ui$Element$Input$placeholder,
- _List_Nil,
- $mdgriffith$elm_ui$Element$text('Entrer les réponses des élèves'))),
- bW: false,
- bY: model.aN
- })
- ])),
- A2(
- $mdgriffith$elm_ui$Element$column,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$spacing($author$project$Style$petitEspacement),
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill)
- ]),
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$text(
- 'Moyenne : ' + ($elm$core$String$fromFloat(
- $author$project$CalculateurDeNotes$moyenne(model.D)) + (' Écart type : ' + $elm$core$String$fromFloat(
- $author$project$CalculateurDeNotes$ecartType(model.D))))),
- A2($author$project$Style$bouton, $author$project$CalculateurDeNotes$TelechargerNotes, 'Télécharger le fichier de notes'),
- $author$project$CalculateurDeNotes$voirNotes(model.D)
- ]))
- ]));
-};
-var $author$project$GenerateurDeProblemes$GenererSujetAleatoire = {$: 1};
-var $author$project$GenerateurDeProblemes$GenererVariantesSujet = {$: 2};
-var $author$project$GenerateurDeProblemes$StructureDuSujet = function (a) {
- return {$: 0, a: a};
-};
-var $mdgriffith$elm_ui$Element$Input$HiddenLabel = function (a) {
- return {$: 1, a: a};
-};
-var $mdgriffith$elm_ui$Element$Input$labelHidden = $mdgriffith$elm_ui$Element$Input$HiddenLabel;
-var $mdgriffith$elm_ui$Internal$Model$Paragraph = {$: 9};
-var $mdgriffith$elm_ui$Element$paragraph = F2(
- function (attrs, children) {
- return A4(
- $mdgriffith$elm_ui$Internal$Model$element,
- $mdgriffith$elm_ui$Internal$Model$asParagraph,
- $mdgriffith$elm_ui$Internal$Model$div,
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Internal$Model$Describe($mdgriffith$elm_ui$Internal$Model$Paragraph),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- A2(
- $elm$core$List$cons,
- $mdgriffith$elm_ui$Element$spacing(5),
- attrs))),
- $mdgriffith$elm_ui$Internal$Model$Unkeyed(children));
- });
-var $author$project$GenerateurDeProblemes$view = function (model) {
- return A2(
- $mdgriffith$elm_ui$Element$row,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$spacing($author$project$Style$grandEspacement),
- $mdgriffith$elm_ui$Element$padding($author$project$Style$tresGrandEspacement),
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$scrollbars
- ]),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Element$Input$multiline,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$clip,
- $mdgriffith$elm_ui$Element$scrollbars,
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(0.2)),
- $mdgriffith$elm_ui$Element$Border$rounded(8),
- $mdgriffith$elm_ui$Element$Border$innerShadow(
- {
- a5: 10,
- ba: A3($mdgriffith$elm_ui$Element$rgb255, 10, 10, 10),
- bl: _Utils_Tuple2(0.3, 0.4),
- bo: 2
- })
- ]),
- {
- bH: $mdgriffith$elm_ui$Element$Input$labelHidden('chose'),
- bR: $author$project$GenerateurDeProblemes$StructureDuSujet,
- bS: $elm$core$Maybe$Just(
- A2(
- $mdgriffith$elm_ui$Element$Input$placeholder,
- _List_Nil,
- $mdgriffith$elm_ui$Element$text('Structure du sujet'))),
- bW: true,
- bY: model.ar
- }),
- A2(
- $mdgriffith$elm_ui$Element$column,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$spacing($author$project$Style$petitEspacement),
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$scrollbars
- ]),
- _List_fromArray(
- [
- A2(
- $mdgriffith$elm_ui$Element$paragraph,
- _List_Nil,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$text('\r\n Pour générer 89 sujets alétoires appuyer sur QuizScan et\r\n pour générer toutes les variantes du sujet appuyer sur EvalBox.\r\n ')
- ])),
- A2(
- $mdgriffith$elm_ui$Element$row,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$padding($author$project$Style$petitEspacement),
- $mdgriffith$elm_ui$Element$spacing($author$project$Style$tresGrandEspacement)
- ]),
- _List_fromArray(
- [
- A2($author$project$Style$bouton, $author$project$GenerateurDeProblemes$GenererSujetAleatoire, 'QuizScan'),
- A2($author$project$Style$bouton, $author$project$GenerateurDeProblemes$GenererVariantesSujet, 'EvalBox')
- ])),
- A2(
- $mdgriffith$elm_ui$Element$el,
- _List_fromArray(
- [
- $mdgriffith$elm_ui$Element$height($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$width($mdgriffith$elm_ui$Element$fill),
- $mdgriffith$elm_ui$Element$clip,
- $mdgriffith$elm_ui$Element$scrollbars,
- $mdgriffith$elm_ui$Element$padding($author$project$Style$petitEspacement),
- $mdgriffith$elm_ui$Element$Background$color(
- $author$project$Style$vert(0.2)),
- $mdgriffith$elm_ui$Element$Border$rounded(8),
- $mdgriffith$elm_ui$Element$Border$innerShadow(
- {
- a5: 10,
- ba: A3($mdgriffith$elm_ui$Element$rgb255, 10, 10, 10),
- bl: _Utils_Tuple2(0.3, 0.4),
- bo: 2
- })
- ]),
- $mdgriffith$elm_ui$Element$text(model.aX))
- ]))
- ]));
-};
-var $author$project$Prof$view = function (model) {
- var _v0 = model.ao;
- if (_v0 === 1) {
- return {
- b5: _List_fromArray(
- [
- A3(
- $author$project$Prof$designGeneral,
- model.bI - (2 * ($author$project$Style$petitEspacement + $author$project$Style$grandEspacement)),
- $author$project$CalculateurDeNotes$titre,
- A2(
- $mdgriffith$elm_ui$Element$map,
- $author$project$Prof$CalculateurDeNotesMsg,
- $author$project$CalculateurDeNotes$view(model.bh)))
- ]),
- c5: $author$project$CalculateurDeNotes$titre
- };
- } else {
- return {
- b5: _List_fromArray(
- [
- A3(
- $author$project$Prof$designGeneral,
- model.bI - (2 * ($author$project$Style$petitEspacement + $author$project$Style$grandEspacement)),
- $author$project$GenerateurDeProblemes$titre,
- A2(
- $mdgriffith$elm_ui$Element$map,
- $author$project$Prof$GenerateurDeProblemesMsg,
- $author$project$GenerateurDeProblemes$view(model.bi)))
- ]),
- c5: $author$project$GenerateurDeProblemes$titre
- };
- }
-};
-var $author$project$Prof$main = $elm$browser$Browser$application(
- {el: $author$project$Prof$init, eG: $author$project$Prof$UrlChanged, eH: $author$project$Prof$LinkClicked, fc: $author$project$Prof$subscriptions, fw: $author$project$Prof$update, da: $author$project$Prof$view});
-_Platform_export({'Prof':{'init':$author$project$Prof$main(
- A2(
- $elm$json$Json$Decode$andThen,
- function (l) {
- return A2(
- $elm$json$Json$Decode$andThen,
- function (h) {
- return $elm$json$Json$Decode$succeed(
- {aE: h, aI: l});
- },
- A2($elm$json$Json$Decode$field, 'h', $elm$json$Json$Decode$int));
- },
- A2($elm$json$Json$Decode$field, 'l', $elm$json$Json$Decode$int)))(0)}});
-
-//////////////////// HMR BEGIN ////////////////////
-
-/*
- MIT License http://www.opensource.org/licenses/mit-license.php
- Original Author: Flux Xu @fluxxu
-*/
-
-/*
- A note about the environment that this code runs in...
-
- assumed globals:
- - `module` (from Node.js module system and webpack)
-
- assumed in scope after injection into the Elm IIFE:
- - `scope` (has an 'Elm' property which contains the public Elm API)
- - various functions defined by Elm which we have to hook such as `_Platform_initialize` and `_Scheduler_binding`
- */
-
-if (module.hot) {
- (function () {
- "use strict";
-
- //polyfill for IE: https://github.com/fluxxu/elm-hot-loader/issues/16
- if (typeof Object.assign != 'function') {
- Object.assign = function (target) {
- 'use strict';
- if (target == null) {
- throw new TypeError('Cannot convert undefined or null to object');
- }
-
- target = Object(target);
- for (var index = 1; index < arguments.length; index++) {
- var source = arguments[index];
- if (source != null) {
- for (var key in source) {
- if (Object.prototype.hasOwnProperty.call(source, key)) {
- target[key] = source[key];
- }
- }
- }
- }
- return target;
- };
- }
-
- // Elm 0.19.1 introduced a '$' prefix at the beginning of the symbols it emits,
- // and we check for `Maybe.Just` because we expect it to be present in all Elm programs.
- var elmVersion;
- if (typeof elm$core$Maybe$Just !== 'undefined')
- elmVersion = '0.19.0';
- else if (typeof $elm$core$Maybe$Just !== 'undefined')
- elmVersion = '0.19.1';
- else
- throw new Error("Could not determine Elm version");
-
- function elmSymbol(symbol) {
- try {
- switch (elmVersion) {
- case '0.19.0':
- return eval(symbol);
- case '0.19.1':
- return eval('$' + symbol);
- default:
- throw new Error('Cannot resolve ' + symbol + '. Elm version unknown!')
- }
- } catch (e) {
- if (e instanceof ReferenceError) {
- return undefined;
- } else {
- throw e;
- }
- }
- }
-
- var instances = module.hot.data
- ? module.hot.data.instances || {}
- : {};
- var uid = module.hot.data
- ? module.hot.data.uid || 0
- : 0;
-
- if (Object.keys(instances).length === 0) {
- log("[elm-hot] Enabled");
- }
-
- var cancellers = [];
-
- // These 2 variables act as dynamically-scoped variables which are set only when the
- // Elm module's hooked init function is called.
- var initializingInstance = null;
- var swappingInstance = null;
-
- module.hot.accept();
- module.hot.dispose(function (data) {
- data.instances = instances;
- data.uid = uid;
-
- // Cleanup pending async tasks
-
- // First, make sure that no new tasks can be started until we finish replacing the code
- _Scheduler_binding = function () {
- return _Scheduler_fail(new Error('[elm-hot] Inactive Elm instance.'))
- };
-
- // Second, kill pending tasks belonging to the old instance
- if (cancellers.length) {
- log('[elm-hot] Killing ' + cancellers.length + ' running processes...');
- try {
- cancellers.forEach(function (cancel) {
- cancel();
- });
- } catch (e) {
- console.warn('[elm-hot] Kill process error: ' + e.message);
- }
- }
- });
-
- function log(message) {
- if (module.hot.verbose) {
- console.log(message)
- }
- }
-
- function getId() {
- return ++uid;
- }
-
- function findPublicModules(parent, path) {
- var modules = [];
- for (var key in parent) {
- var child = parent[key];
- var currentPath = path ? path + '.' + key : key;
- if ('init' in child) {
- modules.push({
- path: currentPath,
- module: child
- });
- } else {
- modules = modules.concat(findPublicModules(child, currentPath));
- }
- }
- return modules;
- }
-
- function registerInstance(domNode, flags, path, portSubscribes, portSends) {
- var id = getId();
-
- var instance = {
- id: id,
- path: path,
- domNode: domNode,
- flags: flags,
- portSubscribes: portSubscribes,
- portSends: portSends,
- lastState: null // last Elm app state (root model)
- };
-
- return instances[id] = instance
- }
-
- function isFullscreenApp() {
- // Returns true if the Elm app will take over the entire DOM body.
- return typeof elmSymbol("elm$browser$Browser$application") !== 'undefined'
- || typeof elmSymbol("elm$browser$Browser$document") !== 'undefined';
- }
-
- function wrapDomNode(node) {
- // When embedding an Elm app into a specific DOM node, Elm will replace the provided
- // DOM node with the Elm app's content. When the Elm app is compiled normally, the
- // original DOM node is reused (its attributes and content changes, but the object
- // in memory remains the same). But when compiled using `--debug`, Elm will completely
- // destroy the original DOM node and instead replace it with 2 brand new nodes: one
- // for your Elm app's content and the other for the Elm debugger UI. In this case,
- // if you held a reference to the DOM node provided for embedding, it would be orphaned
- // after Elm module initialization.
- //
- // So in order to make both cases consistent and isolate us from changes in how Elm
- // does this, we will insert a dummy node to wrap the node for embedding and hold
- // a reference to the dummy node.
- //
- // We will also put a tag on the dummy node so that the Elm developer knows who went
- // behind their back and rudely put stuff in their DOM.
- var dummyNode = document.createElement("div");
- dummyNode.setAttribute("data-elm-hot", "true");
- dummyNode.style.height = "inherit";
- var parentNode = node.parentNode;
- parentNode.replaceChild(dummyNode, node);
- dummyNode.appendChild(node);
- return dummyNode;
- }
-
- function wrapPublicModule(path, module) {
- var originalInit = module.init;
- if (originalInit) {
- module.init = function (args) {
- var elm;
- var portSubscribes = {};
- var portSends = {};
- var domNode = null;
- var flags = null;
- if (typeof args !== 'undefined') {
- // normal case
- domNode = args['node'] && !isFullscreenApp()
- ? wrapDomNode(args['node'])
- : document.body;
- flags = args['flags'];
- } else {
- // rare case: Elm allows init to be called without any arguments at all
- domNode = document.body;
- flags = undefined
- }
- initializingInstance = registerInstance(domNode, flags, path, portSubscribes, portSends);
- elm = originalInit(args);
- wrapPorts(elm, portSubscribes, portSends);
- initializingInstance = null;
- return elm;
- };
- } else {
- console.error("Could not find a public module to wrap at path " + path)
- }
- }
-
- function swap(Elm, instance) {
- log('[elm-hot] Hot-swapping module: ' + instance.path);
-
- swappingInstance = instance;
-
- // remove from the DOM everything that had been created by the old Elm app
- var containerNode = instance.domNode;
- while (containerNode.lastChild) {
- containerNode.removeChild(containerNode.lastChild);
- }
-
- var m = getAt(instance.path.split('.'), Elm);
- var elm;
- if (m) {
- // prepare to initialize the new Elm module
- var args = {flags: instance.flags};
- if (containerNode === document.body) {
- // fullscreen case: no additional args needed
- } else {
- // embed case: provide a new node for Elm to use
- var nodeForEmbed = document.createElement("div");
- containerNode.appendChild(nodeForEmbed);
- args['node'] = nodeForEmbed;
- }
-
- elm = m.init(args);
-
- Object.keys(instance.portSubscribes).forEach(function (portName) {
- if (portName in elm.ports && 'subscribe' in elm.ports[portName]) {
- var handlers = instance.portSubscribes[portName];
- if (!handlers.length) {
- return;
- }
- log('[elm-hot] Reconnect ' + handlers.length + ' handler(s) to port \''
- + portName + '\' (' + instance.path + ').');
- handlers.forEach(function (handler) {
- elm.ports[portName].subscribe(handler);
- });
- } else {
- delete instance.portSubscribes[portName];
- log('[elm-hot] Port was removed: ' + portName);
- }
- });
-
- Object.keys(instance.portSends).forEach(function (portName) {
- if (portName in elm.ports && 'send' in elm.ports[portName]) {
- log('[elm-hot] Replace old port send with the new send');
- instance.portSends[portName] = elm.ports[portName].send;
- } else {
- delete instance.portSends[portName];
- log('[elm-hot] Port was removed: ' + portName);
- }
- });
- } else {
- log('[elm-hot] Module was removed: ' + instance.path);
- }
-
- swappingInstance = null;
- }
-
- function wrapPorts(elm, portSubscribes, portSends) {
- var portNames = Object.keys(elm.ports || {});
- //hook ports
- if (portNames.length) {
- // hook outgoing ports
- portNames
- .filter(function (name) {
- return 'subscribe' in elm.ports[name];
- })
- .forEach(function (portName) {
- var port = elm.ports[portName];
- var subscribe = port.subscribe;
- var unsubscribe = port.unsubscribe;
- elm.ports[portName] = Object.assign(port, {
- subscribe: function (handler) {
- log('[elm-hot] ports.' + portName + '.subscribe called.');
- if (!portSubscribes[portName]) {
- portSubscribes[portName] = [handler];
- } else {
- //TODO handle subscribing to single handler more than once?
- portSubscribes[portName].push(handler);
- }
- return subscribe.call(port, handler);
- },
- unsubscribe: function (handler) {
- log('[elm-hot] ports.' + portName + '.unsubscribe called.');
- var list = portSubscribes[portName];
- if (list && list.indexOf(handler) !== -1) {
- list.splice(list.lastIndexOf(handler), 1);
- } else {
- console.warn('[elm-hot] ports.' + portName + '.unsubscribe: handler not subscribed');
- }
- return unsubscribe.call(port, handler);
- }
- });
- });
-
- // hook incoming ports
- portNames
- .filter(function (name) {
- return 'send' in elm.ports[name];
- })
- .forEach(function (portName) {
- var port = elm.ports[portName];
- portSends[portName] = port.send;
- elm.ports[portName] = Object.assign(port, {
- send: function (val) {
- return portSends[portName].call(port, val);
- }
- });
- });
- }
- return portSubscribes;
- }
-
- /*
- Breadth-first search for a `Browser.Navigation.Key` in the user's app model.
- Returns the key and keypath or null if not found.
- */
- function findNavKey(rootModel) {
- var queue = [];
- if (isDebuggerModel(rootModel)) {
- /*
- Extract the user's app model from the Elm Debugger's model. The Elm debugger
- can hold multiple references to the user's model (e.g. in its "history"). So
- we must be careful to only search within the "state" part of the Debugger.
- */
- queue.push({value: rootModel['state'], keypath: ['state']});
- } else {
- queue.push({value: rootModel, keypath: []});
- }
-
- while (queue.length !== 0) {
- var item = queue.shift();
-
- if (typeof item.value === "undefined" || item.value === null) {
- continue;
- }
-
- // The nav key is identified by a runtime tag added by the elm-hot injector.
- if (item.value.hasOwnProperty("elm-hot-nav-key")) {
- // found it!
- return item;
- }
-
- if (typeof item.value !== "object") {
- continue;
- }
-
- for (var propName in item.value) {
- if (!item.value.hasOwnProperty(propName)) continue;
- var newKeypath = item.keypath.slice();
- newKeypath.push(propName);
- queue.push({value: item.value[propName], keypath: newKeypath})
- }
- }
-
- return null;
- }
-
-
- function isDebuggerModel(model) {
- // Up until elm/browser 1.0.2, the Elm debugger could be identified by a
- // property named "expando". But in version 1.0.2 that was renamed to "expandoModel"
- return model
- && (model.hasOwnProperty("expando") || model.hasOwnProperty("expandoModel"))
- && model.hasOwnProperty("state");
- }
-
- function getAt(keyPath, obj) {
- return keyPath.reduce(function (xs, x) {
- return (xs && xs[x]) ? xs[x] : null
- }, obj)
- }
-
- function removeNavKeyListeners(navKey) {
- window.removeEventListener('popstate', navKey.value);
- window.navigator.userAgent.indexOf('Trident') < 0 || window.removeEventListener('hashchange', navKey.value);
- }
-
- // hook program creation
- var initialize = _Platform_initialize;
- _Platform_initialize = function (flagDecoder, args, init, update, subscriptions, stepperBuilder) {
- var instance = initializingInstance || swappingInstance;
- var tryFirstRender = !!swappingInstance;
-
- var hookedInit = function (args) {
- var initialStateTuple = init(args);
- if (swappingInstance) {
- var oldModel = swappingInstance.lastState;
- var newModel = initialStateTuple.a;
-
- if (typeof elmSymbol("elm$browser$Browser$application") !== 'undefined') {
- var oldKeyLoc = findNavKey(oldModel);
-
- // attempt to find the Browser.Navigation.Key in the newly-constructed model
- // and bring it along with the rest of the old data.
- var newKeyLoc = findNavKey(newModel);
- var error = null;
- if (newKeyLoc === null) {
- error = "could not find Browser.Navigation.Key in the new app model";
- } else if (oldKeyLoc === null) {
- error = "could not find Browser.Navigation.Key in the old app model.";
- } else if (newKeyLoc.keypath.toString() !== oldKeyLoc.keypath.toString()) {
- error = "the location of the Browser.Navigation.Key in the model has changed.";
- } else {
- // remove event listeners attached to the old nav key
- removeNavKeyListeners(oldKeyLoc.value);
-
- // insert the new nav key into the old model in the exact same location
- var parentKeyPath = oldKeyLoc.keypath.slice(0, -1);
- var lastSegment = oldKeyLoc.keypath.slice(-1)[0];
- var oldParent = getAt(parentKeyPath, oldModel);
- oldParent[lastSegment] = newKeyLoc.value;
- }
-
- if (error !== null) {
- console.error("[elm-hot] Hot-swapping " + instance.path + " not possible: " + error);
- oldModel = newModel;
- }
- }
-
- // the heart of the app state hot-swap
- initialStateTuple.a = oldModel;
-
- // ignore any Cmds returned by the init during hot-swap
- initialStateTuple.b = elmSymbol("elm$core$Platform$Cmd$none");
- } else {
- // capture the initial state for later
- initializingInstance.lastState = initialStateTuple.a;
- }
-
- return initialStateTuple
- };
-
- var hookedStepperBuilder = function (sendToApp, model) {
- var result;
- // first render may fail if shape of model changed too much
- if (tryFirstRender) {
- tryFirstRender = false;
- try {
- result = stepperBuilder(sendToApp, model)
- } catch (e) {
- throw new Error('[elm-hot] Hot-swapping ' + instance.path +
- ' is not possible, please reload page. Error: ' + e.message)
- }
- } else {
- result = stepperBuilder(sendToApp, model)
- }
-
- return function (nextModel, isSync) {
- if (instance) {
- // capture the state after every step so that later we can restore from it during a hot-swap
- instance.lastState = nextModel
- }
- return result(nextModel, isSync)
- }
- };
-
- return initialize(flagDecoder, args, hookedInit, update, subscriptions, hookedStepperBuilder)
- };
-
- // hook process creation
- var originalBinding = _Scheduler_binding;
- _Scheduler_binding = function (originalCallback) {
- return originalBinding(function () {
- // start the scheduled process, which may return a cancellation function.
- var cancel = originalCallback.apply(this, arguments);
- if (cancel) {
- cancellers.push(cancel);
- return function () {
- cancellers.splice(cancellers.indexOf(cancel), 1);
- return cancel();
- };
- }
- return cancel;
- });
- };
-
- scope['_elm_hot_loader_init'] = function (Elm) {
- // swap instances
- var removedInstances = [];
- for (var id in instances) {
- var instance = instances[id];
- if (instance.domNode.parentNode) {
- swap(Elm, instance);
- } else {
- removedInstances.push(id);
- }
- }
-
- removedInstances.forEach(function (id) {
- delete instance[id];
- });
-
- // wrap all public modules
- var publicModules = findPublicModules(Elm);
- publicModules.forEach(function (m) {
- wrapPublicModule(m.path, m.module);
- });
- }
- })();
-
- scope['_elm_hot_loader_init'](scope['Elm']);
-}
-//////////////////// HMR END ////////////////////
-
-
-}(this));
\ No newline at end of file
diff --git a/src/GenerateurDeProblemes.elm b/src/GenerateurDeProblemes.elm
index 6713282..f651385 100644
--- a/src/GenerateurDeProblemes.elm
+++ b/src/GenerateurDeProblemes.elm
@@ -22,7 +22,7 @@ import Style exposing (..)
titre =
- "Générateur de proplèmes"
+ "Générateur de problèmes"
@@ -63,6 +63,7 @@ type Msg
| GenererSujetAleatoire
| GenererVariantesSujet
| SujetGenere String
+ | TelechargerSujet
update : Msg -> Model -> ( Model, Cmd Msg )
@@ -106,6 +107,11 @@ update msg model =
, Cmd.none
)
+ TelechargerSujet ->
+ ( model
+ , File.Download.string "Sujets.tex" "text/tex" model.sujetGenere
+ )
+
-- SUBSCRIPTIONS
@@ -176,6 +182,7 @@ view model =
]
[ bouton GenererSujetAleatoire "QuizScan"
, bouton GenererVariantesSujet "EvalBox"
+ , bouton TelechargerSujet "Télécharger"
]
, el
--^^ Cet élément ci
diff --git a/src/Prof.elm b/src/Prof.elm
index c55fd75..d7716b9 100644
--- a/src/Prof.elm
+++ b/src/Prof.elm
@@ -39,7 +39,13 @@ main =
--- MODEL
+{-
+ ███ ███ ██████ ██████ ███████ ██
+ ████ ████ ██ ██ ██ ██ ██ ██
+ ██ ████ ██ ██ ██ ██ ██ █████ ██
+ ██ ██ ██ ██ ██ ██ ██ ██ ██
+ ██ ██ ██████ ██████ ███████ ███████
+-}
type alias Model =
@@ -102,7 +108,13 @@ init flags url key =
--- UPDATE
+{-
+ ██ ██ ██████ ██████ █████ ████████ ███████
+ ██ ██ ██ ██ ██ ██ ██ ██ ██ ██
+ ██ ██ ██████ ██ ██ ███████ ██ █████
+ ██ ██ ██ ██ ██ ██ ██ ██ ██
+ ██████ ██ ██████ ██ ██ ██ ███████
+-}
type Msg
@@ -186,7 +198,14 @@ subscriptions _ =
--- VIEW
+{-
+
+ ██ ██ ██ ███████ ██ ██
+ ██ ██ ██ ██ ██ ██
+ ██ ██ ██ █████ ██ █ ██
+ ██ ██ ██ ██ ██ ███ ██
+ ████ ██ ███████ ███ ███
+-}
view : Model -> Browser.Document Msg
@@ -209,7 +228,7 @@ view model =
[ GenerateurDeProblemes.view model.modeleGenerateurDeProblemes
|> Element.map GenerateurDeProblemesMsg
|> designGeneral
- (model.largeur - 2 * (petitEspacement + grandEspacement))
+ (10 * (model.largeur - 2 * (petitEspacement + grandEspacement)) // 44)
GenerateurDeProblemes.titre
]
}
diff --git a/src/Style.elm b/src/Style.elm
index 98d37ca..51e7d46 100644
--- a/src/Style.elm
+++ b/src/Style.elm
@@ -72,7 +72,11 @@ bouton fonction label =
entete hauteur largeur titre =
html <|
- svg [ viewBox <| "0 0 " ++ String.fromInt largeur ++ " 30", SvgA.height <| String.fromInt hauteur ] <|
+ svg
+ [ viewBox <| "0 0 " ++ String.fromInt largeur ++ " 30"
+ , SvgA.height <| String.fromInt hauteur
+ ]
+ <|
echologo
++ [ text_
[ x "40"