// This program was compiled from OCaml by js_of_ocaml 1.0 function caml_raise_with_arg (tag, arg) { throw [0, tag, arg]; } function caml_raise_with_string (tag, msg) { caml_raise_with_arg (tag, new MlWrappedString (msg)); } function caml_invalid_argument (msg) { caml_raise_with_string(caml_global_data[4], msg); } function caml_array_bound_error () { caml_invalid_argument("index out of bounds"); } function caml_str_repeat(n, s) { if (!n) { return ""; } if (n & 1) { return caml_str_repeat(n - 1, s) + s; } var r = caml_str_repeat(n >> 1, s); return r + r; } function MlString(param) { if (param != null) { this.bytes = this.fullBytes = param; this.last = this.len = param.length; } } MlString.prototype = { string:null, bytes:null, fullBytes:null, array:null, len:null, last:0, toJsString:function() { return this.string = decodeURIComponent (escape(this.getFullBytes())); }, toBytes:function() { if (this.string != null) var b = unescape (encodeURIComponent (this.string)); else { var b = "", a = this.array, l = a.length; for (var i = 0; i < l; i ++) b += String.fromCharCode (a[i]); } this.bytes = this.fullBytes = b; this.last = this.len = b.length; return b; }, getBytes:function() { var b = this.bytes; if (b == null) b = this.toBytes(); return b; }, getFullBytes:function() { var b = this.fullBytes; if (b !== null) return b; b = this.bytes; if (b == null) b = this.toBytes (); if (this.last < this.len) { this.bytes = (b += caml_str_repeat(this.len - this.last, '\0')); this.last = this.len; } this.fullBytes = b; return b; }, toArray:function() { var b = this.bytes; if (b == null) b = this.toBytes (); var a = [], l = this.last; for (var i = 0; i < l; i++) a[i] = b.charCodeAt(i); for (l = this.len; i < l; i++) a[i] = 0; this.string = this.bytes = this.fullBytes = null; this.last = this.len; this.array = a; return a; }, getArray:function() { var a = this.array; if (!a) a = this.toArray(); return a; }, getLen:function() { var len = this.len; if (len !== null) return len; this.toBytes(); return this.len; }, toString:function() { var s = this.string; return s?s:this.toJsString(); }, valueOf:function() { var s = this.string; return s?s:this.toJsString(); }, blitToArray:function(i1, a2, i2, l) { var a1 = this.array; if (a1) for (var i = 0; i < l; i++) a2 [i2 + i] = a1 [i1 + i]; else { var b = this.bytes; if (b == null) b = this.toBytes(); var l1 = this.last - i1; if (l <= l1) for (var i = 0; i < l; i++) a2 [i2 + i] = b.charCodeAt(i1 + i); else { for (var i = 0; i < l1; i++) a2 [i2 + i] = b.charCodeAt(i1 + i); for (; i < l; i++) a2 [i2 + i] = 0; } } }, get:function (i) { var a = this.array; if (a) return a[i]; var b = this.bytes; if (b == null) b = this.toBytes(); return (i= this.len)) caml_array_bound_error (); return this.get(i); }, set:function (i, c) { var a = this.array; if (!a) { if (this.last == i) { this.bytes += String.fromCharCode (c & 0xff); this.last ++; return 0; } a = this.toArray(); } else if (this.bytes != null) { this.bytes = this.fullBytes = this.string = null; } a[i] = c & 0xff; return 0; }, safeSet:function (i, c) { if (this.len == null) this.toBytes (); if ((i < 0) || (i >= this.len)) caml_array_bound_error (); this.set(i, c); }, fill:function (ofs, len, c) { if (ofs >= this.last && this.last && c == 0) return; var a = this.array; if (!a) a = this.toArray(); else if (this.bytes != null) { this.bytes = this.fullBytes = this.string = null; } var l = ofs + len; for (var i = ofs; i < l; i++) a[i] = c; }, compare:function (s2) { if (this.string != null && s2.string != null) { if (this.string < s2.string) return -1; if (this.string > s2.string) return 1; return 0; } var b1 = this.getFullBytes (); var b2 = s2.getFullBytes (); if (b1 < b2) return -1; if (b1 > b2) return 1; return 0; }, equal:function (s2) { if (this.string != null && s2.string != null) return this.string == s2.string; return this.getFullBytes () == s2.getFullBytes (); }, lessThan:function (s2) { if (this.string != null && s2.string != null) return this.string < s2.string; return this.getFullBytes () < s2.getFullBytes (); }, lessEqual:function (s2) { if (this.string != null && s2.string != null) return this.string <= s2.string; return this.getFullBytes () <= s2.getFullBytes (); } } function MlWrappedString (s) { this.string = s; } MlWrappedString.prototype = new MlString(); function MlMakeString (l) { this.bytes = ""; this.len = l; } MlMakeString.prototype = new MlString (); function caml_array_get (array, index) { if ((index < 0) || (index >= array.length - 1)) caml_array_bound_error(); return array[index+1]; } function caml_array_set (array, index, newval) { if ((index < 0) || (index >= array.length - 1)) caml_array_bound_error(); array[index+1]=newval; return 0; } function caml_blit_string(s1, i1, s2, i2, len) { if (len === 0) return; if (i2 === s2.last && s2.bytes != null) { var b = s1.bytes; if (b == null) b = s1.toBytes (); if (i1 > 0 || s1.last > len) b = b.slice(i1, i1 + len); s2.bytes += b; s2.last += b.length; return; } var a = s2.array; if (!a) a = s2.toArray(); else { s2.bytes = s2.string = null; } s1.blitToArray (i1, a, i2, len); } function caml_call_gen(f, args) { if(f.fun) return caml_call_gen(f.fun, args); var n = f.length; var d = n - args.length; if (d == 0) return f.apply(null, args); else if (d < 0) return caml_call_gen(f.apply(null, args.slice(0,n)), args.slice(n)); else return function (x){ return caml_call_gen(f, args.concat([x])); }; } function caml_classify_float (x) { if (isFinite (x)) { if (Math.abs(x) >= 2.2250738585072014e-308) return 0; if (x != 0) return 1; return 2; } return isNaN(x)?4:3; } function caml_int64_compare(x,y) { var x3 = x[3] << 16; var y3 = y[3] << 16; if (x3 > y3) return 1; if (x3 < y3) return -1; if (x[2] > y[2]) return 1; if (x[2] < y[2]) return -1; if (x[1] > y[1]) return 1; if (x[1] < y[1]) return -1; return 0; } function caml_int_compare (a, b) { if (a < b) return (-1); if (a == b) return 0; return 1; } function caml_compare_val (a, b, total) { var stack = []; for(;;) { if (!(total && a === b)) { if (a instanceof MlString) { if (b instanceof MlString) { if (a != b) { var x = a.compare(b); if (x != 0) return x; } } else return 1; } else if (a instanceof Array && a[0] === (a[0]|0)) { var ta = a[0]; if (ta === 250) { a = a[1]; continue; } else if (b instanceof Array && b[0] === (b[0]|0)) { var tb = b[0]; if (tb === 250) { b = b[1]; continue; } else if (ta != tb) { return (ta < tb)?-1:1; } else { switch (ta) { case 248: { var x = caml_int_compare(a[2], b[2]); if (x != 0) return x; break; } case 255: { var x = caml_int64_compare(a, b); if (x != 0) return x; break; } default: if (a.length != b.length) return (a.length < b.length)?-1:1; if (a.length > 1) stack.push(a, b, 1); } } } else return 1; } else if (b instanceof MlString || (b instanceof Array && b[0] === (b[0]|0))) { return -1; } else { if (a < b) return -1; if (a > b) return 1; if (total && a != b) { if (a == a) return 1; if (b == b) return -1; } } } if (stack.length == 0) return 0; var i = stack.pop(); b = stack.pop(); a = stack.pop(); if (i + 1 < a.length) stack.push(a, b, i + 1); a = a[i]; b = b[i]; } } function caml_compare (a, b) { return caml_compare_val (a, b, true); } function caml_create_string(len) { if (len < 0) caml_invalid_argument("String.create"); return new MlMakeString(len); } function caml_equal (x, y) { return +(caml_compare_val(x,y,false) == 0); } function caml_fill_string(s, i, l, c) { s.fill (i, l, c); } function caml_parse_format (fmt) { fmt = fmt.toString (); var len = fmt.length; if (len > 31) caml_invalid_argument("format_int: format too long"); var f = { justify:'+', signstyle:'-', filler:' ', alternate:false, base:0, signedconv:false, width:0, uppercase:false, sign:1, prec:6, conv:'f' }; for (var i = 0; i < len; i++) { var c = fmt.charAt(i); switch (c) { case '-': f.justify = '-'; break; case '+': case ' ': f.signstyle = c; break; case '0': f.filler = '0'; break; case '#': f.alternate = true; break; case '1': case '2': case '3': case '4': case '5': case '6': case '7': case '8': case '9': f.width = 0; while (c=fmt.charCodeAt(i) - 48, c >= 0 && c <= 9) { f.width = f.width * 10 + c; i++ } i--; break; case '.': f.prec = 0; i++; while (c=fmt.charCodeAt(i) - 48, c >= 0 && c <= 9) { f.prec = f.prec * 10 + c; i++ } i--; case 'd': case 'i': f.signedconv = true; /* fallthrough */ case 'u': f.base = 10; break; case 'x': f.base = 16; break; case 'X': f.base = 16; f.uppercase = true; break; case 'o': f.base = 8; break; case 'e': case 'f': case 'g': f.signedconv = true; f.conv = c; break; case 'E': case 'F': case 'G': f.signedconv = true; f.uppercase = true; f.conv = c.toLowerCase (); break; } } return f; } function caml_finish_formatting(f, rawbuffer) { if (f.uppercase) rawbuffer = rawbuffer.toUpperCase(); var len = rawbuffer.length; if (f.signedconv && (f.sign < 0 || f.signstyle != '-')) len++; if (f.alternate) { if (f.base == 8) len += 1; if (f.base == 16) len += 2; } var buffer = ""; if (f.justify == '+' && f.filler == ' ') for (var i = len; i < f.width; i++) buffer += ' '; if (f.signedconv) { if (f.sign < 0) buffer += '-'; else if (f.signstyle != '-') buffer += f.signstyle; } if (f.alternate && f.base == 8) buffer += '0'; if (f.alternate && f.base == 16) buffer += "0x"; if (f.justify == '+' && f.filler == '0') for (var i = len; i < f.width; i++) buffer += '0'; buffer += rawbuffer; if (f.justify == '-') for (var i = len; i < f.width; i++) buffer += ' '; return new MlWrappedString (buffer); } function caml_format_float (fmt, x) { var s, f = caml_parse_format(fmt); if (x < 0) { f.sign = -1; x = -x; } if (isNaN(x)) { s = "nan"; f.filler = ' '; } else if (!isFinite(x)) { s = "inf"; f.filler = ' '; } else switch (f.conv) { case 'e': var s = x.toExponential(f.prec); var i = s.length; if (s.charAt(i - 3) == 'e') s = s.slice (0, i - 1) + '0' + s.slice (i - 1); break; case 'f': s = x.toFixed(f.prec); break; case 'g': var prec = f.prec?f.prec:1; s = x.toExponential(prec - 1); var j = s.indexOf('e'); var exp = +s.slice(j + 1); if (exp < -4 || x.toFixed(0).length > prec) { var i = j - 1; while (s.charAt(i) == '0') i--; if (s.charAt(i) == '.') i--; s = s.slice(0, i + 1) + s.slice(j); i = s.length; if (s.charAt(i - 3) == 'e') s = s.slice (0, i - 1) + '0' + s.slice (i - 1); break; } else { var p = prec; if (exp < 0) { p -= exp + 1; s = x.toFixed(p); } else while (s = x.toFixed(p), s.length > prec + 1) p--; if (p) { var i = s.length - 1; while (s.charAt(i) == '0') i--; if (s.charAt(i) == '.') i--; s = s.slice(0, i + 1); } } break; } return caml_finish_formatting(f, s); } function caml_format_int(fmt, i) { if (fmt.toString() == "%d") return new MlWrappedString(""+i); var f = caml_parse_format(fmt); if (i < 0) { if (f.signedconv) { f.sign = -1; i = -i; } else i >>>= 0; } var s = i.toString(f.base); return caml_finish_formatting(f, s); } function caml_greaterequal (x, y) { return +(caml_compare(x,y,false) >= 0); } function caml_greaterthan (x, y) { return +(caml_compare(x,y,false) > 0); } function caml_hash_univ_param (count, limit, obj) { var hash_accu = 0; function hash_aux (obj) { limit --; if (count < 0 || limit < 0) return; if (obj instanceof Array && obj[0] === (obj[0]|0)) { switch (obj[0]) { case 248: count --; hash_accu = (hash_accu * 65599 + obj[2]) | 0; break case 250: limit++; hash_aux(obj); break; case 255: count --; hash_accu = (hash_accu * 65599 + obj[1] + (obj[2] << 24)) | 0; break; default: count --; hash_accu = (hash_accu * 19 + obj[0]) | 0; for (var i = obj.length - 1; i > 0; i--) hash_aux (obj[i]); } } else if (obj instanceof MlString) { count --; var a = obj.array, l = obj.getLen (); if (a) { for (var i = 0; i < l; i++) hash_accu = (hash_accu * 19 + a[i]) | 0; } else { var b = obj.getFullBytes (); for (var i = 0; i < l; i++) hash_accu = (hash_accu * 19 + b.charCodeAt(i)) | 0; } } else if (obj === (obj|0)) { count --; hash_accu = (hash_accu * 65599 + obj) | 0; } else if (obj === +obj) { count--; var p = caml_int64_to_bytes (caml_int64_bits_of_float (obj)); for (var i = 7; i >= 0; i--) hash_accu = (hash_accu * 19 + p[i]) | 0; } } hash_aux (obj); return hash_accu & 0x3FFFFFFF; } var caml_global_data = [0]; function caml_failwith (msg) { caml_raise_with_string(caml_global_data[3], msg); } function MlStringFromArray (a) { var len = a.length; this.array = a; this.len = this.last = len; } MlStringFromArray.prototype = new MlString (); var caml_marshal_constants = { PREFIX_SMALL_BLOCK: 0x80, PREFIX_SMALL_INT: 0x40, PREFIX_SMALL_STRING: 0x20, CODE_INT8: 0x00, CODE_INT16: 0x01, CODE_INT32: 0x02, CODE_INT64: 0x03, CODE_SHARED8: 0x04, CODE_SHARED16: 0x05, CODE_SHARED32: 0x06, CODE_BLOCK32: 0x08, CODE_BLOCK64: 0x13, CODE_STRING8: 0x09, CODE_STRING32: 0x0A, CODE_DOUBLE_BIG: 0x0B, CODE_DOUBLE_LITTLE: 0x0C, CODE_DOUBLE_ARRAY8_BIG: 0x0D, CODE_DOUBLE_ARRAY8_LITTLE: 0x0E, CODE_DOUBLE_ARRAY32_BIG: 0x0F, CODE_DOUBLE_ARRAY32_LITTLE: 0x07, CODE_CODEPOINTER: 0x10, CODE_INFIXPOINTER: 0x11, CODE_CUSTOM: 0x12 } function caml_int64_float_of_bits (x) { var exp = (x[3] & 0x7fff) >> 4; if (exp == 2047) { if ((x[1]|x[2]|(x[3]&0xf)) == 0) return (x[3] & 0x8000)?(-Infinity):Infinity; else return NaN; } var k = Math.pow(2,-24); var res = (x[1]*k+x[2])*k+(x[3]&0xf); if (exp > 0) { res += 16 res *= Math.pow(2,exp-1027); } else res *= Math.pow(2,-1026); if (x[3] & 0x8000) res = - res; return res; } function caml_int64_of_bytes(a) { return [255, a[7] | (a[6] << 8) | (a[5] << 16), a[4] | (a[3] << 8) | (a[2] << 16), a[1] | (a[0] << 8)]; } var caml_input_value_from_string = function (){ function ArrayReader (a, i) { this.a = a; this.i = i; } ArrayReader.prototype = { read8u:function () { return this.a[this.i++]; }, read8s:function () { return this.a[this.i++] << 24 >> 24; }, read16u:function () { var a = this.a, i = this.i; this.i = i + 2; return (a[i] << 8) | a[i + 1] }, read16s:function () { var a = this.a, i = this.i; this.i = i + 2; return (a[i] << 24 >> 16) | a[i + 1]; }, read32u:function () { var a = this.a, i = this.i; this.i = i + 4; return ((a[i] << 24) | (a[i+1] << 16) | (a[i+2] << 8) | a[i+3]) >>> 0; }, read32s:function () { var a = this.a, i = this.i; this.i = i + 4; return (a[i] << 24) | (a[i+1] << 16) | (a[i+2] << 8) | a[i+3]; }, readstr:function (len) { var i = this.i; this.i = i + len; return new MlStringFromArray(this.a.slice(i, i + len)); } } function StringReader (s, i) { this.s = s; this.i = i; } StringReader.prototype = { read8u:function () { return this.s.charCodeAt(this.i++); }, read8s:function () { return this.s.charCodeAt(this.i++) << 24 >> 24; }, read16u:function () { var s = this.s, i = this.i; this.i = i + 2; return (s.charCodeAt(i) << 8) | s.charCodeAt(i + 1) }, read16s:function () { var s = this.s, i = this.i; this.i = i + 2; return (s.charCodeAt(i) << 24 >> 16) | s.charCodeAt(i + 1); }, read32u:function () { var s = this.s, i = this.i; this.i = i + 4; return ((s.charCodeAt(i) << 24) | (s.charCodeAt(i+1) << 16) | (s.charCodeAt(i+2) << 8) | s.charCodeAt(i+3)) >>> 0; }, read32s:function () { var s = this.s, i = this.i; this.i = i + 4; return (s.charCodeAt(i) << 24) | (s.charCodeAt(i+1) << 16) | (s.charCodeAt(i+2) << 8) | s.charCodeAt(i+3); }, readstr:function (len) { var i = this.i; this.i = i + len; return new MlString(this.s.substring(i, i + len)); } } function caml_float_of_bytes (a) { return caml_int64_float_of_bits (caml_int64_of_bytes (a)); } return function (s, ofs) { var reader = s.array?new ArrayReader (s.array, ofs): new StringReader (s.getFullBytes(), ofs); var magic = reader.read32u (); var block_len = reader.read32u (); var num_objects = reader.read32u (); var size_32 = reader.read32u (); var size_64 = reader.read32u (); var stack = []; var intern_obj_table = (num_objects > 0)?[]:null; var obj_counter = 0; function intern_rec () { var cst = caml_marshal_constants; var code = reader.read8u (); if (code >= cst.PREFIX_SMALL_INT) { if (code >= cst.PREFIX_SMALL_BLOCK) { var tag = code & 0xF; var size = (code >> 4) & 0x7; var v = [tag]; if (size == 0) return v; if (intern_obj_table) intern_obj_table[obj_counter++] = v; stack.push(v, size); return v; } else return (code & 0x3F); } else { if (code >= cst.PREFIX_SMALL_STRING) { var len = code & 0x1F; var v = reader.readstr (len); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; } else { switch(code) { case cst.CODE_INT8: return reader.read8s (); case cst.CODE_INT16: return reader.read16s (); case cst.CODE_INT32: return reader.read32s (); case cst.CODE_INT64: caml_failwith("input_value: integer too large"); break; case cst.CODE_SHARED8: var ofs = reader.read8u (); return intern_obj_table[obj_counter - ofs]; case cst.CODE_SHARED16: var ofs = reader.read16u (); return intern_obj_table[obj_counter - ofs]; case cst.CODE_SHARED32: var ofs = reader.read32u (); return intern_obj_table[obj_counter - ofs]; case cst.CODE_BLOCK32: var header = reader.read32u (); var tag = header & 0xFF; var size = header >> 10; var v = [tag]; if (size == 0) return v; if (intern_obj_table) intern_obj_table[obj_counter++] = v; stack.push(v, size); return v; case cst.CODE_BLOCK64: caml_failwith ("input_value: data block too large"); break; case cst.CODE_STRING8: var len = reader.read8u(); var v = reader.readstr (len); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; case cst.CODE_STRING32: var len = reader.read32u(); var v = reader.readstr (len); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; case cst.CODE_DOUBLE_LITTLE: var t = []; for (var i = 0;i < 8;i++) t[7 - i] = reader.read8u (); var v = caml_float_of_bytes (t); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; case cst.CODE_DOUBLE_BIG: var t = []; for (var i = 0;i < 8;i++) t[i] = reader.read8u (); var v = caml_float_of_bytes (t); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; case cst.CODE_DOUBLE_ARRAY8_LITTLE: var len = reader.read8u(); var v = [0]; if (intern_obj_table) intern_obj_table[obj_counter++] = v; for (var i = 1;i <= len;i++) { var t = []; for (var j = 0;j < 8;j++) t[7 - j] = reader.read8u(); v[i] = caml_float_of_bytes (t); } return v; case cst.CODE_DOUBLE_ARRAY8_BIG: var len = reader.read8u(); var v = [0]; if (intern_obj_table) intern_obj_table[obj_counter++] = v; for (var i = 1;i <= len;i++) { var t = []; for (var j = 0;j < 8;j++) t[j] = reader.read8u(); v [i] = caml_float_of_bytes (t); } return v; case cst.CODE_DOUBLE_ARRAY32_LITTLE: var len = reader.read32u(); var v = [0]; if (intern_obj_table) intern_obj_table[obj_counter++] = v; for (var i = 1;i <= len;i++) { var t = []; for (var j = 0;j < 8;j++) t[7 - j] = reader.read8u(); v[i] = caml_float_of_bytes (t); } return v; case cst.CODE_DOUBLE_ARRAY32_BIG: var len = reader.read32u(); var v = [0]; for (var i = 1;i <= len;i++) { var t = []; for (var j = 0;j < 8;j++) t[j] = reader.read8u(); v [i] = caml_float_of_bytes (t); } return v; case cst.CODE_CODEPOINTER: case cst.CODE_INFIXPOINTER: caml_failwith ("input_value: code pointer"); break; case cst.CODE_CUSTOM: var c, s = ""; while ((c = reader.read8u ()) != 0) s += String.fromCharCode (c); switch(s) { case "_j": var t = []; for (var j = 0;j < 8;j++) t[j] = reader.read8u(); var v = caml_int64_of_bytes (t); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; case "_i": var v = reader.read32s (); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; default: caml_failwith("input_value: unknown custom block identifier"); } default: caml_failwith ("input_value: ill-formed message"); } } } } var res = intern_rec (); while (stack.length > 0) { var size = stack.pop(); var v = stack.pop(); var d = v.length; if (d < size) stack.push(v, size); v[d] = intern_rec (); } s.offset = reader.i; return res; } }(); function caml_int64_is_negative(x) { return (x[3] << 16) < 0; } function caml_int64_neg (x) { var y1 = - x[1]; var y2 = - x[2] + (y1 >> 24); var y3 = - x[3] + (y2 >> 24); return [255, y1 & 0xffffff, y2 & 0xffffff, y3 & 0xffff]; } function caml_int64_of_int32 (x) { return [255, x & 0xffffff, (x >> 24) & 0xffffff, (x >> 31) & 0xffff] } function caml_int64_ucompare(x,y) { if (x[3] > y[3]) return 1; if (x[3] < y[3]) return -1; if (x[2] > y[2]) return 1; if (x[2] < y[2]) return -1; if (x[1] > y[1]) return 1; if (x[1] < y[1]) return -1; return 0; } function caml_int64_lsl1 (x) { x[3] = (x[3] << 1) | (x[2] >> 23); x[2] = ((x[2] << 1) | (x[1] >> 23)) & 0xffffff; x[1] = (x[1] << 1) & 0xffffff; } function caml_int64_lsr1 (x) { x[1] = ((x[1] >>> 1) | (x[2] << 23)) & 0xffffff; x[2] = ((x[2] >>> 1) | (x[3] << 23)) & 0xffffff; x[3] = x[3] >>> 1; } function caml_int64_sub (x, y) { var z1 = x[1] - y[1]; var z2 = x[2] - y[2] + (z1 >> 24); var z3 = x[3] - y[3] + (z2 >> 24); return [255, z1 & 0xffffff, z2 & 0xffffff, z3 & 0xffff]; } function caml_int64_udivmod (x, y) { var offset = 0; var modulus = x.slice (); var divisor = y.slice (); var quotient = [255, 0, 0, 0]; while (caml_int64_ucompare (modulus, divisor) > 0) { offset++; caml_int64_lsl1 (divisor); } while (offset >= 0) { offset --; caml_int64_lsl1 (quotient); if (caml_int64_ucompare (modulus, divisor) >= 0) { quotient[1] ++; modulus = caml_int64_sub (modulus, divisor); } caml_int64_lsr1 (divisor); } return [0,quotient, modulus]; } function caml_int64_to_int32 (x) { return x[1] | (x[2] << 24); } function caml_int64_is_zero(x) { return (x[3]|x[2]|x[1]) == 0; } function caml_int64_format (fmt, x) { var f = caml_parse_format(fmt); if (f.signedconv && caml_int64_is_negative(x)) { f.sign = -1; x = caml_int64_neg(x); } var buffer = ""; var wbase = caml_int64_of_int32(f.base); var cvtbl = "0123456789abcdef"; do { var p = caml_int64_udivmod(x, wbase); x = p[1]; buffer = cvtbl.charAt(caml_int64_to_int32(p[2])) + buffer; } while (! caml_int64_is_zero(x)); return caml_finish_formatting(f, buffer); } function caml_parse_sign_and_base (s) { var i = 0, base = 10, sign = s.get(0) == 45?(i++,-1):1; if (s.get(i) == 48) switch (s.get(i + 1)) { case 120: case 88: base = 16; i += 2; break; case 111: case 79: base = 8; i += 2; break; case 98: case 66: base = 2; i += 2; break; } return [i, sign, base]; } function caml_parse_digit(c) { if (c >= 48 && c <= 57) return c - 48; if (c >= 65 && c <= 90) return c - 55; if (c >= 97 && c <= 122) return c - 87; return -1; } function caml_int_of_string (s) { var r = caml_parse_sign_and_base (s); var i = r[0], sign = r[1], base = r[2]; var threshold = -1 >>> 0; var c = s.get(i); var d = caml_parse_digit(c); if (d < 0 || d >= base) caml_failwith("int_of_string"); var res = d; for (;;) { i++; c = s.get(i); if (c == 95) continue; d = caml_parse_digit(c); if (d < 0 || d >= base) break; res = base * res + d; if (res > threshold) caml_failwith("int_of_string"); } if (i != s.getLen()) caml_failwith("int_of_string"); res = sign * res; if ((res | 0) != res) caml_failwith("int_of_string"); return res; } function caml_is_printable(c) { return +(c > 31 && c < 127); } function caml_js_call(f, o, args) { return f.apply(o, args.slice(1)); } function caml_js_eval_string () {return eval(arguments[0].toString());} function caml_js_from_byte_string (s) {return s.getFullBytes();} function caml_js_get_console () { var c = window.console?window.console:{}; var m = ["log", "debug", "info", "warn", "error", "assert", "dir", "dirxml", "trace", "group", "groupCollapsed", "groupEnd", "time", "timeEnd"]; function f () {} for (var i = 0; i < m.length; i++) if (!c[m[i]]) c[m[i]]=f; return c; } var caml_js_regexps = { amp:/&/g, lt:/ 0)?toArray.call (arguments):[undefined]; return caml_call_gen(f, args); } } function caml_js_wrap_meth_callback(f) { var toArray = Array.prototype.slice; return function () { var args = (arguments.length > 0)?toArray.call (arguments):[0]; args.unshift (this); return caml_call_gen(f, args); } } var JSON; if (!JSON) { JSON = {}; } (function () { "use strict"; function f(n) { return n < 10 ? '0' + n : n; } if (typeof Date.prototype.toJSON !== 'function') { Date.prototype.toJSON = function (key) { return isFinite(this.valueOf()) ? this.getUTCFullYear() + '-' + f(this.getUTCMonth() + 1) + '-' + f(this.getUTCDate()) + 'T' + f(this.getUTCHours()) + ':' + f(this.getUTCMinutes()) + ':' + f(this.getUTCSeconds()) + 'Z' : null; }; String.prototype.toJSON = Number.prototype.toJSON = Boolean.prototype.toJSON = function (key) { return this.valueOf(); }; } var cx = /[\u0000\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g, escapable = /[\\\"\x00-\x1f\x7f-\x9f\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g, gap, indent, meta = { // table of character substitutions '\b': '\\b', '\t': '\\t', '\n': '\\n', '\f': '\\f', '\r': '\\r', '"' : '\\"', '\\': '\\\\' }, rep; function quote(string) { escapable.lastIndex = 0; return escapable.test(string) ? '"' + string.replace(escapable, function (a) { var c = meta[a]; return typeof c === 'string' ? c : '\\u' + ('0000' + a.charCodeAt(0).toString(16)).slice(-4); }) + '"' : '"' + string + '"'; } function str(key, holder) { var i, // The loop counter. k, // The member key. v, // The member value. length, mind = gap, partial, value = holder[key]; if (value && typeof value === 'object' && typeof value.toJSON === 'function') { value = value.toJSON(key); } if (typeof rep === 'function') { value = rep.call(holder, key, value); } switch (typeof value) { case 'string': return quote(value); case 'number': return isFinite(value) ? String(value) : 'null'; case 'boolean': case 'null': return String(value); case 'object': if (!value) { return 'null'; } gap += indent; partial = []; if (Object.prototype.toString.apply(value) === '[object Array]') { length = value.length; for (i = 0; i < length; i += 1) { partial[i] = str(i, value) || 'null'; } v = partial.length === 0 ? '[]' : gap ? '[\n' + gap + partial.join(',\n' + gap) + '\n' + mind + ']' : '[' + partial.join(',') + ']'; gap = mind; return v; } if (rep && typeof rep === 'object') { length = rep.length; for (i = 0; i < length; i += 1) { k = rep[i]; if (typeof k === 'string') { v = str(k, value); if (v) { partial.push(quote(k) + (gap ? ': ' : ':') + v); } } } } else { for (k in value) { if (Object.prototype.hasOwnProperty.call(value, k)) { v = str(k, value); if (v) { partial.push(quote(k) + (gap ? ': ' : ':') + v); } } } } v = partial.length === 0 ? '{}' : gap ? '{\n' + gap + partial.join(',\n' + gap) + '\n' + mind + '}' : '{' + partial.join(',') + '}'; gap = mind; return v; } } if (typeof JSON.stringify !== 'function') { JSON.stringify = function (value, replacer, space) { var i; gap = ''; indent = ''; if (typeof space === 'number') { for (i = 0; i < space; i += 1) { indent += ' '; } } else if (typeof space === 'string') { indent = space; } rep = replacer; if (replacer && typeof replacer !== 'function' && (typeof replacer !== 'object' || typeof replacer.length !== 'number')) { throw new Error('JSON.stringify'); } return str('', {'': value}); }; } if (typeof JSON.parse !== 'function') { JSON.parse = function (text, reviver) { var j; function walk(holder, key) { var k, v, value = holder[key]; if (value && typeof value === 'object') { for (k in value) { if (Object.prototype.hasOwnProperty.call(value, k)) { v = walk(value, k); if (v !== undefined) { value[k] = v; } else { delete value[k]; } } } } return reviver.call(holder, key, value); } text = String(text); cx.lastIndex = 0; if (cx.test(text)) { text = text.replace(cx, function (a) { return '\\u' + ('0000' + a.charCodeAt(0).toString(16)).slice(-4); }); } if (/^[\],:{}\s]*$/ .test(text.replace(/\\(?:["\\\/bfnrt]|u[0-9a-fA-F]{4})/g, '@') .replace(/"[^"\\\n\r]*"|true|false|null|-?\d+(?:\.\d*)?(?:[eE][+\-]?\d+)?/g, ']') .replace(/(?:^|:|,)(?:\s*\[)+/g, ''))) { j = eval('(' + text + ')'); return typeof reviver === 'function' ? walk({'': j}, '') : j; } throw new SyntaxError('JSON.parse'); }; } }()); function caml_json() { return JSON; }// Js_of_ocaml runtime support function caml_lessequal (x, y) { return +(caml_compare(x,y,false) <= 0); } function caml_lessthan (x, y) { return +(caml_compare(x,y,false) < 0); } function caml_lex_array(s) { s = s.getFullBytes(); var a = [], l = s.length / 2; for (var i = 0; i < l; i++) a[i] = (s.charCodeAt(2 * i) | (s.charCodeAt(2 * i + 1) << 8)) << 16 >> 16; return a; } function caml_lex_engine(tbl, start_state, lexbuf) { var lex_buffer = 2; var lex_buffer_len = 3; var lex_start_pos = 5; var lex_curr_pos = 6; var lex_last_pos = 7; var lex_last_action = 8; var lex_eof_reached = 9; var lex_base = 1; var lex_backtrk = 2; var lex_default = 3; var lex_trans = 4; var lex_check = 5; if (!tbl.lex_default) { tbl.lex_base = caml_lex_array (tbl[lex_base]); tbl.lex_backtrk = caml_lex_array (tbl[lex_backtrk]); tbl.lex_check = caml_lex_array (tbl[lex_check]); tbl.lex_trans = caml_lex_array (tbl[lex_trans]); tbl.lex_default = caml_lex_array (tbl[lex_default]); } var c, state = start_state; var buffer = lexbuf[lex_buffer].getArray(); if (state >= 0) { lexbuf[lex_last_pos] = lexbuf[lex_start_pos] = lexbuf[lex_curr_pos]; lexbuf[lex_last_action] = -1; } else { state = -state - 1; } for(;;) { var base = tbl.lex_base[state]; if (base < 0) return -base-1; var backtrk = tbl.lex_backtrk[state]; if (backtrk >= 0) { lexbuf[lex_last_pos] = lexbuf[lex_curr_pos]; lexbuf[lex_last_action] = backtrk; } if (lexbuf[lex_curr_pos] >= lexbuf[lex_buffer_len]){ if (lexbuf[lex_eof_reached] == 0) return -state - 1; else c = 256; }else{ c = buffer[lexbuf[lex_curr_pos]]; lexbuf[lex_curr_pos] ++; } if (tbl.lex_check[base + c] == state) state = tbl.lex_trans[base + c]; else state = tbl.lex_default[state]; if (state < 0) { lexbuf[lex_curr_pos] = lexbuf[lex_last_pos]; if (lexbuf[lex_last_action] == -1) caml_failwith("lexing: empty token"); else return lexbuf[lex_last_action]; }else{ /* Erase the EOF condition only if the EOF pseudo-character was consumed by the automaton (i.e. there was no backtrack above) */ if (c == 256) lexbuf[lex_eof_reached] = 0; } } } function caml_make_vect (len, init) { var b = [0]; for (var i = 1; i <= len; i++) b[i] = init; return b; } function caml_marshal_data_size (s, ofs) { function get32(s,i) { return (s.get(i) << 24) | (s.get(i + 1) << 16) | (s.get(i + 2) << 8) | s.get(i + 3); } if (get32(s, ofs) != (0x8495A6BE|0)) caml_failwith("Marshal.data_size: bad object"); return (get32(s, ofs + 4)); } var caml_md5_string = function () { function add (x, y) { return (x + y) | 0; } function xx(q,a,b,x,s,t) { a = add(add(a, q), add(x, t)); return add((a << s) | (a >>> (32 - s)), b); } function ff(a,b,c,d,x,s,t) { return xx((b & c) | ((~b) & d), a, b, x, s, t); } function gg(a,b,c,d,x,s,t) { return xx((b & d) | (c & (~d)), a, b, x, s, t); } function hh(a,b,c,d,x,s,t) { return xx(b ^ c ^ d, a, b, x, s, t); } function ii(a,b,c,d,x,s,t) { return xx(c ^ (b | (~d)), a, b, x, s, t); } function md5(buffer, length) { var i = length; buffer[i >> 2] |= 0x80 << (8 * (i & 3)); for (i = (i & ~0x3) + 4;(i & 0x3F) < 56 ;i += 4) buffer[i >> 2] = 0; buffer[i >> 2] = length << 3; i += 4; buffer[i >> 2] = (length >> 29) & 0x1FFFFFFF; var w = [0x67452301, 0xEFCDAB89, 0x98BADCFE, 0x10325476]; for(i = 0; i < buffer.length; i += 16) { var a = w[0], b = w[1], c = w[2], d = w[3]; a = ff(a, b, c, d, buffer[i+ 0], 7, 0xD76AA478); d = ff(d, a, b, c, buffer[i+ 1], 12, 0xE8C7B756); c = ff(c, d, a, b, buffer[i+ 2], 17, 0x242070DB); b = ff(b, c, d, a, buffer[i+ 3], 22, 0xC1BDCEEE); a = ff(a, b, c, d, buffer[i+ 4], 7, 0xF57C0FAF); d = ff(d, a, b, c, buffer[i+ 5], 12, 0x4787C62A); c = ff(c, d, a, b, buffer[i+ 6], 17, 0xA8304613); b = ff(b, c, d, a, buffer[i+ 7], 22, 0xFD469501); a = ff(a, b, c, d, buffer[i+ 8], 7, 0x698098D8); d = ff(d, a, b, c, buffer[i+ 9], 12, 0x8B44F7AF); c = ff(c, d, a, b, buffer[i+10], 17, 0xFFFF5BB1); b = ff(b, c, d, a, buffer[i+11], 22, 0x895CD7BE); a = ff(a, b, c, d, buffer[i+12], 7, 0x6B901122); d = ff(d, a, b, c, buffer[i+13], 12, 0xFD987193); c = ff(c, d, a, b, buffer[i+14], 17, 0xA679438E); b = ff(b, c, d, a, buffer[i+15], 22, 0x49B40821); a = gg(a, b, c, d, buffer[i+ 1], 5, 0xF61E2562); d = gg(d, a, b, c, buffer[i+ 6], 9, 0xC040B340); c = gg(c, d, a, b, buffer[i+11], 14, 0x265E5A51); b = gg(b, c, d, a, buffer[i+ 0], 20, 0xE9B6C7AA); a = gg(a, b, c, d, buffer[i+ 5], 5, 0xD62F105D); d = gg(d, a, b, c, buffer[i+10], 9, 0x02441453); c = gg(c, d, a, b, buffer[i+15], 14, 0xD8A1E681); b = gg(b, c, d, a, buffer[i+ 4], 20, 0xE7D3FBC8); a = gg(a, b, c, d, buffer[i+ 9], 5, 0x21E1CDE6); d = gg(d, a, b, c, buffer[i+14], 9, 0xC33707D6); c = gg(c, d, a, b, buffer[i+ 3], 14, 0xF4D50D87); b = gg(b, c, d, a, buffer[i+ 8], 20, 0x455A14ED); a = gg(a, b, c, d, buffer[i+13], 5, 0xA9E3E905); d = gg(d, a, b, c, buffer[i+ 2], 9, 0xFCEFA3F8); c = gg(c, d, a, b, buffer[i+ 7], 14, 0x676F02D9); b = gg(b, c, d, a, buffer[i+12], 20, 0x8D2A4C8A); a = hh(a, b, c, d, buffer[i+ 5], 4, 0xFFFA3942); d = hh(d, a, b, c, buffer[i+ 8], 11, 0x8771F681); c = hh(c, d, a, b, buffer[i+11], 16, 0x6D9D6122); b = hh(b, c, d, a, buffer[i+14], 23, 0xFDE5380C); a = hh(a, b, c, d, buffer[i+ 1], 4, 0xA4BEEA44); d = hh(d, a, b, c, buffer[i+ 4], 11, 0x4BDECFA9); c = hh(c, d, a, b, buffer[i+ 7], 16, 0xF6BB4B60); b = hh(b, c, d, a, buffer[i+10], 23, 0xBEBFBC70); a = hh(a, b, c, d, buffer[i+13], 4, 0x289B7EC6); d = hh(d, a, b, c, buffer[i+ 0], 11, 0xEAA127FA); c = hh(c, d, a, b, buffer[i+ 3], 16, 0xD4EF3085); b = hh(b, c, d, a, buffer[i+ 6], 23, 0x04881D05); a = hh(a, b, c, d, buffer[i+ 9], 4, 0xD9D4D039); d = hh(d, a, b, c, buffer[i+12], 11, 0xE6DB99E5); c = hh(c, d, a, b, buffer[i+15], 16, 0x1FA27CF8); b = hh(b, c, d, a, buffer[i+ 2], 23, 0xC4AC5665); a = ii(a, b, c, d, buffer[i+ 0], 6, 0xF4292244); d = ii(d, a, b, c, buffer[i+ 7], 10, 0x432AFF97); c = ii(c, d, a, b, buffer[i+14], 15, 0xAB9423A7); b = ii(b, c, d, a, buffer[i+ 5], 21, 0xFC93A039); a = ii(a, b, c, d, buffer[i+12], 6, 0x655B59C3); d = ii(d, a, b, c, buffer[i+ 3], 10, 0x8F0CCC92); c = ii(c, d, a, b, buffer[i+10], 15, 0xFFEFF47D); b = ii(b, c, d, a, buffer[i+ 1], 21, 0x85845DD1); a = ii(a, b, c, d, buffer[i+ 8], 6, 0x6FA87E4F); d = ii(d, a, b, c, buffer[i+15], 10, 0xFE2CE6E0); c = ii(c, d, a, b, buffer[i+ 6], 15, 0xA3014314); b = ii(b, c, d, a, buffer[i+13], 21, 0x4E0811A1); a = ii(a, b, c, d, buffer[i+ 4], 6, 0xF7537E82); d = ii(d, a, b, c, buffer[i+11], 10, 0xBD3AF235); c = ii(c, d, a, b, buffer[i+ 2], 15, 0x2AD7D2BB); b = ii(b, c, d, a, buffer[i+ 9], 21, 0xEB86D391); w[0] = add(a, w[0]); w[1] = add(b, w[1]); w[2] = add(c, w[2]); w[3] = add(d, w[3]); } var t = []; for (var i = 0; i < 4; i++) for (var j = 0; j < 4; j++) t[i * 4 + j] = (w[i] >> (8 * j)) & 0xFF; return t; } return function (s, ofs, len) { var buf = []; if (s.array) { var a = s.array; for (var i = 0; i < len; i+=4) { var j = i + ofs; buf[i>>2] = a[j] | (a[j+1] << 8) | (a[j+2] << 16) | (a[j+3] << 24); } for (; i < len; i++) buf[i>>2] |= a[i + ofs] << (8 * (i & 3)); } else { var b = s.getFullBytes(); for (var i = 0; i < len; i+=4) { var j = i + ofs; buf[i>>2] = b.charCodeAt(j) | (b.charCodeAt(j+1) << 8) | (b.charCodeAt(j+2) << 16) | (b.charCodeAt(j+3) << 24); } for (; i < len; i++) buf[i>>2] |= b.charCodeAt(i + ofs) << (8 * (i & 3)); } return new MlStringFromArray(md5(buf, len)); } } (); function caml_ml_flush () { return 0; } function caml_ml_open_descriptor_out () { return 0; } function caml_ml_out_channels_list () { return 0; } function caml_ml_output () { return 0; } function caml_raise_constant (tag) { throw [0, tag]; } function caml_raise_zero_divide () { caml_raise_constant(caml_global_data[6]); } function caml_mod(x,y) { if (y == 0) caml_raise_zero_divide (); return x%y; } function caml_mul(x,y) { return ((((x >> 16) * y) << 16) + (x & 0xffff) * y)|0; } function caml_notequal (x, y) { return +(caml_compare_val(x,y,false) != 0); } function caml_obj_is_block (x) { return +(x instanceof Array); } function caml_obj_set_tag (x, tag) { x[0] = tag; return 0; } function caml_obj_tag (x) { return (x instanceof Array)?x[0]:1000; } function caml_register_global (n, v) { caml_global_data[n + 1] = v; } var caml_named_values = {}; function caml_register_named_value(nm,v) { caml_named_values[nm] = v; return 0; } function caml_string_compare(s1, s2) { return s1.compare(s2); } function caml_string_equal(s1, s2) { var b1 = s1.fullBytes; var b2 = s2.fullBytes; if (b1 != null && b2 != null) return (b1 == b2)?1:0; return (s1.getFullBytes () == s2.getFullBytes ())?1:0; } function caml_string_notequal(s1, s2) { return 1-caml_string_equal(s1, s2); } function caml_sys_get_config () { return [0, new MlWrappedString("Unix"), 32]; } var caml_initial_time = new Date() * 0.001; function caml_sys_time () { return new Date() * 0.001 - caml_initial_time; } var caml_unwrap_value_from_string = function (){ function ArrayReader (a, i) { this.a = a; this.i = i; } ArrayReader.prototype = { read8u:function () { return this.a[this.i++]; }, read8s:function () { return this.a[this.i++] << 24 >> 24; }, read16u:function () { var a = this.a, i = this.i; this.i = i + 2; return (a[i] << 8) | a[i + 1] }, read16s:function () { var a = this.a, i = this.i; this.i = i + 2; return (a[i] << 24 >> 16) | a[i + 1]; }, read32u:function () { var a = this.a, i = this.i; this.i = i + 4; return ((a[i] << 24) | (a[i+1] << 16) | (a[i+2] << 8) | a[i+3]) >>> 0; }, read32s:function () { var a = this.a, i = this.i; this.i = i + 4; return (a[i] << 24) | (a[i+1] << 16) | (a[i+2] << 8) | a[i+3]; }, readstr:function (len) { var i = this.i; this.i = i + len; return new MlStringFromArray(this.a.slice(i, i + len)); } } function StringReader (s, i) { this.s = s; this.i = i; } StringReader.prototype = { read8u:function () { return this.s.charCodeAt(this.i++); }, read8s:function () { return this.s.charCodeAt(this.i++) << 24 >> 24; }, read16u:function () { var s = this.s, i = this.i; this.i = i + 2; return (s.charCodeAt(i) << 8) | s.charCodeAt(i + 1) }, read16s:function () { var s = this.s, i = this.i; this.i = i + 2; return (s.charCodeAt(i) << 24 >> 16) | s.charCodeAt(i + 1); }, read32u:function () { var s = this.s, i = this.i; this.i = i + 4; return ((s.charCodeAt(i) << 24) | (s.charCodeAt(i+1) << 16) | (s.charCodeAt(i+2) << 8) | s.charCodeAt(i+3)) >>> 0; }, read32s:function () { var s = this.s, i = this.i; this.i = i + 4; return (s.charCodeAt(i) << 24) | (s.charCodeAt(i+1) << 16) | (s.charCodeAt(i+2) << 8) | s.charCodeAt(i+3); }, readstr:function (len) { var i = this.i; this.i = i + len; return new MlString(this.s.substring(i, i + len)); } } function caml_float_of_bytes (a) { return caml_int64_float_of_bits (caml_int64_of_bytes (a)); } return function (apply_unwrapper, s, ofs) { var reader = s.array?new ArrayReader (s.array, ofs): new StringReader (s.getFullBytes(), ofs); var magic = reader.read32u (); var block_len = reader.read32u (); var num_objects = reader.read32u (); var size_32 = reader.read32u (); var size_64 = reader.read32u (); var stack = []; var intern_obj_table = new Array(num_objects+1); var obj_counter = 1; intern_obj_table[0] = []; function intern_rec () { var cst = caml_marshal_constants; var code = reader.read8u (); if (code >= cst.PREFIX_SMALL_INT) { if (code >= cst.PREFIX_SMALL_BLOCK) { var tag = code & 0xF; var size = (code >> 4) & 0x7; var v = [tag]; if (size == 0) return v; intern_obj_table[obj_counter] = v; stack.push(obj_counter++, size); return v; } else return (code & 0x3F); } else { if (code >= cst.PREFIX_SMALL_STRING) { var len = code & 0x1F; var v = reader.readstr (len); intern_obj_table[obj_counter++] = v; return v; } else { switch(code) { case cst.CODE_INT8: return reader.read8s (); case cst.CODE_INT16: return reader.read16s (); case cst.CODE_INT32: return reader.read32s (); case cst.CODE_INT64: caml_failwith("unwrap_value: integer too large"); break; case cst.CODE_SHARED8: var ofs = reader.read8u (); return intern_obj_table[obj_counter - ofs]; case cst.CODE_SHARED16: var ofs = reader.read16u (); return intern_obj_table[obj_counter - ofs]; case cst.CODE_SHARED32: var ofs = reader.read32u (); return intern_obj_table[obj_counter - ofs]; case cst.CODE_BLOCK32: var header = reader.read32u (); var tag = header & 0xFF; var size = header >> 10; var v = [tag]; if (size == 0) return v; intern_obj_table[obj_counter] = v; stack.push(obj_counter++, size); return v; case cst.CODE_BLOCK64: caml_failwith ("unwrap_value: data block too large"); break; case cst.CODE_STRING8: var len = reader.read8u(); var v = reader.readstr (len); intern_obj_table[obj_counter++] = v; return v; case cst.CODE_STRING32: var len = reader.read32u(); var v = reader.readstr (len); intern_obj_table[obj_counter++] = v; return v; case cst.CODE_DOUBLE_LITTLE: var t = []; for (var i = 0;i < 8;i++) t[7 - i] = reader.read8u (); var v = caml_float_of_bytes (t); intern_obj_table[obj_counter++] = v; return v; case cst.CODE_DOUBLE_BIG: var t = []; for (var i = 0;i < 8;i++) t[i] = reader.read8u (); var v = caml_float_of_bytes (t); intern_obj_table[obj_counter++] = v; return v; case cst.CODE_DOUBLE_ARRAY8_LITTLE: var len = reader.read8u(); var v = [0]; intern_obj_table[obj_counter++] = v; for (var i = 1;i <= len;i++) { var t = []; for (var j = 0;j < 8;j++) t[7 - j] = reader.read8u(); v[i] = caml_float_of_bytes (t); } return v; case cst.CODE_DOUBLE_ARRAY8_BIG: var len = reader.read8u(); var v = [0]; intern_obj_table[obj_counter++] = v; for (var i = 1;i <= len;i++) { var t = []; for (var j = 0;j < 8;j++) t[j] = reader.read8u(); v [i] = caml_float_of_bytes (t); } return v; case cst.CODE_DOUBLE_ARRAY32_LITTLE: var len = reader.read32u(); var v = [0]; intern_obj_table[obj_counter++] = v; for (var i = 1;i <= len;i++) { var t = []; for (var j = 0;j < 8;j++) t[7 - j] = reader.read8u(); v[i] = caml_float_of_bytes (t); } return v; case cst.CODE_DOUBLE_ARRAY32_BIG: var len = reader.read32u(); var v = [0]; for (var i = 1;i <= len;i++) { var t = []; for (var j = 0;j < 8;j++) t[j] = reader.read8u(); v [i] = caml_float_of_bytes (t); } return v; case cst.CODE_CODEPOINTER: case cst.CODE_INFIXPOINTER: caml_failwith ("unwrap_value: code pointer"); break; case cst.CODE_CUSTOM: var c, s = ""; while ((c = reader.read8u ()) != 0) s += String.fromCharCode (c); switch(s) { case "_j": var t = []; for (var j = 0;j < 8;j++) t[j] = reader.read8u(); var v = caml_int64_of_bytes (t); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; case "_i": var v = reader.read32s (); if (intern_obj_table) intern_obj_table[obj_counter++] = v; return v; default: caml_failwith("input_value: unknown custom block identifier"); } default: caml_failwith ("unwrap_value: ill-formed message"); } } } } stack.push(0,0); while (stack.length > 0) { var size = stack.pop(); var ofs = stack.pop(); var v = intern_obj_table[ofs]; var d = v.length; if (size + 1 == d) { if (v[0] === 0 && size >= 2 && v[size][2] === intern_obj_table[2]) { var ancestor = intern_obj_table[stack[stack.length-2]]; var v = apply_unwrapper(v[size],v); intern_obj_table[ofs] = v; ancestor[ancestor.length-1] = v; } continue; } stack.push(ofs, size); v[d] = intern_rec (); } s.offset = reader.i; if(intern_obj_table[0][0].length != 3) caml_failwith ("unwrap_value: incorrect value"); return intern_obj_table[0][0][2]; } }(); function caml_update_dummy (x, y) { if( typeof y==="function" ) { x.fun = y; return 0; } if( y.fun ) { x.fun = y.fun; return 0; } var i = y.length; while (i--) x[i] = y[i]; return 0; } function caml_weak_blit(s, i, d, j, l) { for (var k = 0; k < l; k++) d[j + k] = s[i + k]; return 0; } function caml_weak_check(x, i) { return x[i]!==undefined && x[i] !==0; } function caml_weak_create (n) { var x = [0]; x.length = n + 2; return x; } function caml_weak_get(x, i) { return (x[i]===undefined)?0:x[i]; } function caml_weak_set(x, i, v) { x[i] = v; return 0; } (function(){function asA(aC$,aDa,aDb,aDc,aDd,aDe,aDf,aDg){return aC$.length==7?aC$(aDa,aDb,aDc,aDd,aDe,aDf,aDg):caml_call_gen(aC$,[aDa,aDb,aDc,aDd,aDe,aDf,aDg]);}function zV(aC4,aC5,aC6,aC7,aC8,aC9,aC_){return aC4.length==6?aC4(aC5,aC6,aC7,aC8,aC9,aC_):caml_call_gen(aC4,[aC5,aC6,aC7,aC8,aC9,aC_]);}function ams(aCY,aCZ,aC0,aC1,aC2,aC3){return aCY.length==5?aCY(aCZ,aC0,aC1,aC2,aC3):caml_call_gen(aCY,[aCZ,aC0,aC1,aC2,aC3]);}function y1(aCT,aCU,aCV,aCW,aCX){return aCT.length==4?aCT(aCU,aCV,aCW,aCX):caml_call_gen(aCT,[aCU,aCV,aCW,aCX]);}function qU(aCP,aCQ,aCR,aCS){return aCP.length==3?aCP(aCQ,aCR,aCS):caml_call_gen(aCP,[aCQ,aCR,aCS]);}function mw(aCM,aCN,aCO){return aCM.length==2?aCM(aCN,aCO):caml_call_gen(aCM,[aCN,aCO]);}function lX(aCK,aCL){return aCK.length==1?aCK(aCL):caml_call_gen(aCK,[aCL]);}var a=[0,new MlString("Failure")],b=[0,new MlString("Invalid_argument")],c=[0,new MlString("Not_found")],d=[0,new MlString("Assert_failure")],e=[0,new MlString(""),1,0,0],f=new MlString("File \"%s\", line %d, characters %d-%d: %s"),g=new MlString("input"),h=[0,new MlString("\0\0\xfc\xff\xfd\xff\xfe\xff\xff\xff\x01\0\xfe\xff\xff\xff\x02\0\xf7\xff\xf8\xff\b\0\xfa\xff\xfb\xff\xfc\xff\xfd\xff\xfe\xff\xff\xffH\0_\0\x85\0\xf9\xff\x03\0\xfd\xff\xfe\xff\xff\xff\x04\0\xfc\xff\xfd\xff\xfe\xff\xff\xff\b\0\xfc\xff\xfd\xff\xfe\xff\x04\0\xff\xff\x05\0\xff\xff\x06\0\0\0\xfd\xff\x18\0\xfe\xff\x07\0\xff\xff\x14\0\xfd\xff\xfe\xff\0\0\x03\0\x05\0\xff\xff3\0\xfc\xff\xfd\xff\x01\0\0\0\x0e\0\0\0\xff\xff\x07\0\x11\0\x01\0\xfe\xff\"\0\xfc\xff\xfd\xff\x9c\0\xff\xff\xa6\0\xfe\xff\xbc\0\xc6\0\xfd\xff\xfe\xff\xff\xff\xd9\0\xe6\0\xfd\xff\xfe\xff\xff\xff\xf3\0\x04\x01\x11\x01\xfd\xff\xfe\xff\xff\xff\x1b\x01%\x012\x01\xfa\xff\xfb\xff\"\0>\x01T\x01\x17\0\x02\0\x03\0\xff\xff \0\x1f\0,\x002\0(\0$\0\xfe\xff0\x009\0=\0:\0F\0<\x008\0\xfd\xffc\x01t\x01~\x01\x97\x01\x88\x01\xa1\x01\xb7\x01\xc1\x01\x06\0\xfd\xff\xfe\xff\xff\xff\xc5\0\xfd\xff\xfe\xff\xff\xff\xe2\0\xfd\xff\xfe\xff\xff\xff\xcb\x01\xfc\xff\xfd\xff\xfe\xff\xff\xff\xd5\x01\xe2\x01\xfc\xff\xfd\xff\xfe\xff\xff\xff\xec\x01"),new MlString("\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x07\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x03\0\xff\xff\x01\0\xff\xff\x04\0\x03\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x01\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x02\0\x02\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x02\0\xff\xff\0\0\xff\xff\x01\0\xff\xff\xff\xff\xff\xff\xff\xff\0\0\xff\xff\xff\xff\xff\xff\xff\xff\0\0\x01\0\xff\xff\xff\xff\xff\xff\xff\xff\0\0\x01\0\xff\xff\xff\xff\xff\xff\x03\0\x03\0\x04\0\x04\0\x04\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x03\0\xff\xff\x03\0\xff\xff\x03\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\0\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\0\0"),new MlString("\x02\0\0\0\0\0\0\0\0\0\x07\0\0\0\0\0\n\0\0\0\0\0\xff\xff\0\0\0\0\0\0\0\0\0\0\0\0\xff\xff\xff\xff\xff\xff\0\0\x18\0\0\0\0\0\0\0\x1c\0\0\0\0\0\0\0\0\0 \0\0\0\0\0\0\0\xff\xff\0\0\xff\xff\0\0\xff\xff\xff\xff\0\0\xff\xff\0\0,\0\0\x000\0\0\0\0\0\xff\xff\xff\xff\xff\xff\0\x007\0\0\0\0\0\xff\xff\xff\xff\xff\xff\xff\xff\0\0\xff\xff\xff\xff\xff\xff\0\0C\0\0\0\0\0\xff\xff\0\0\xff\xff\0\0\xff\xffK\0\0\0\0\0\0\0\xff\xffP\0\0\0\0\0\0\0\xff\xff\xff\xffV\0\0\0\0\0\0\0\xff\xff\xff\xff\\\0\0\0\0\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\0\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\0\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\0\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff}\0\0\0\0\0\0\0\x81\0\0\0\0\0\0\0\x85\0\0\0\0\0\0\0\x89\0\0\0\0\0\0\0\0\0\xff\xff\x8f\0\0\0\0\0\0\0\0\0\xff\xff"),new MlString("\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0(\0\0\0\0\0\0\0(\0\0\0(\0)\0-\0!\0(\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0(\0\0\0\x04\0\0\0\x11\0\0\0(\0\0\0~\0\0\0\0\0\0\0\0\0\0\0\0\0\x19\0\x1e\0\x11\0#\0$\0\0\0*\0\0\0\0\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0+\0\0\0\0\0\0\0\0\0,\0\0\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0D\0t\0c\0E\0F\0F\0F\0F\0F\0F\0F\0F\0F\0\x03\0\0\0\x11\0\0\0\0\0\x1d\0=\0b\0\x10\0<\0@\0s\0\x0f\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\x003\0\x0e\x004\0:\0>\0\r\x002\0\f\0\x0b\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\x001\0;\0?\0d\0e\0s\0f\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\x008\0g\0h\0i\0j\0l\0m\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0n\x009\0o\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0p\0q\0r\0\0\0\0\0\0\0\x15\0\x15\0\x15\0\x15\0\x15\0\x15\0\x15\0\x15\0\x15\0\x15\0\0\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x15\0\x15\0\x15\0\x15\0\x15\0\x15\0G\0H\0H\0H\0H\0H\0H\0H\0H\0H\0F\0F\0F\0F\0F\0F\0F\0F\0F\0F\0\0\0\0\0\0\0\0\0\0\0\0\0\x15\0\x15\0\x15\0\x15\0\x15\0\x15\0H\0H\0H\0H\0H\0H\0H\0H\0H\0H\0L\0M\0M\0M\0M\0M\0M\0M\0M\0M\0\x01\0\x06\0\t\0\x17\0\x1b\0&\0|\0-\0\"\0M\0M\0M\0M\0M\0M\0M\0M\0M\0M\0S\0/\0\0\0Q\0R\0R\0R\0R\0R\0R\0R\0R\0R\0\x82\0\0\0B\0R\0R\0R\0R\0R\0R\0R\0R\0R\0R\0\0\0\0\0\0\0\0\0\0\0\0\x006\0Q\0R\0R\0R\0R\0R\0R\0R\0R\0R\0Y\0\x86\0\0\0W\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0W\0X\0X\0X\0X\0X\0X\0X\0X\0X\0_\0\0\0\0\0]\0^\0^\0^\0^\0^\0^\0^\0^\0^\0t\0\0\0^\0^\0^\0^\0^\0^\0^\0^\0^\0^\0\0\0\0\0\0\0`\0\0\0\0\0\0\0\0\0a\0\0\0\0\0s\0]\0^\0^\0^\0^\0^\0^\0^\0^\0^\0z\0\0\0z\0\0\0\0\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0k\0\0\0\0\0\0\0\0\0\0\0s\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0x\0v\0x\0\x80\0J\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\x84\0v\0\0\0\0\0O\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0\x8b\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\0\0\0\0U\0\x91\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x8a\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0[\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\x90\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\x88\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\x8e\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0"),new MlString("\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff(\0\xff\xff\xff\xff\xff\xff(\0\xff\xff'\0'\0,\0\x1f\0'\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff(\0\xff\xff\0\0\xff\xff\b\0\xff\xff'\0\xff\xff{\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x16\0\x1a\0\b\0\x1f\0#\0\xff\xff'\0\xff\xff\xff\xff\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0*\0\xff\xff\xff\xff\xff\xff\xff\xff*\0\xff\xff\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0A\0]\0b\0A\0A\0A\0A\0A\0A\0A\0A\0A\0A\0\0\0\xff\xff\b\0\xff\xff\xff\xff\x1a\x008\0a\0\b\0;\0?\0]\0\b\0\x0b\0\x0b\0\x0b\0\x0b\0\x0b\0\x0b\x002\0\b\x003\x009\0=\0\b\x001\0\b\0\b\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0.\0:\0>\0`\0d\0]\0e\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\x005\0f\0g\0h\0i\0k\0l\0\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0m\x005\0n\0\x12\0\x12\0\x12\0\x12\0\x12\0\x12\0o\0p\0q\0\xff\xff\xff\xff\xff\xff\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0\xff\xff\x13\0\x13\0\x13\0\x13\0\x13\0\x13\0\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0D\0D\0D\0D\0D\0D\0D\0D\0D\0D\0F\0F\0F\0F\0F\0F\0F\0F\0F\0F\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x14\0\x14\0\x14\0\x14\0\x14\0\x14\0H\0H\0H\0H\0H\0H\0H\0H\0H\0H\0I\0I\0I\0I\0I\0I\0I\0I\0I\0I\0\0\0\x05\0\b\0\x16\0\x1a\0%\0{\0,\0\x1f\0M\0M\0M\0M\0M\0M\0M\0M\0M\0M\0N\0.\0\xff\xffN\0N\0N\0N\0N\0N\0N\0N\0N\0N\0\x7f\0\xff\xffA\0R\0R\0R\0R\0R\0R\0R\0R\0R\0R\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff5\0S\0S\0S\0S\0S\0S\0S\0S\0S\0S\0T\0\x83\0\xff\xffT\0T\0T\0T\0T\0T\0T\0T\0T\0T\0X\0X\0X\0X\0X\0X\0X\0X\0X\0X\0Y\0Y\0Y\0Y\0Y\0Y\0Y\0Y\0Y\0Y\0Z\0\xff\xff\xff\xffZ\0Z\0Z\0Z\0Z\0Z\0Z\0Z\0Z\0Z\0^\0\xff\xff^\0^\0^\0^\0^\0^\0^\0^\0^\0^\0\xff\xff\xff\xff\xff\xffZ\0\xff\xff\xff\xff\xff\xff\xff\xffZ\0\xff\xff\xff\xff^\0_\0_\0_\0_\0_\0_\0_\0_\0_\0_\0s\0\xff\xffs\0\xff\xff\xff\xffs\0s\0s\0s\0s\0s\0s\0s\0s\0s\0_\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff^\0t\0t\0t\0t\0t\0t\0t\0t\0t\0t\0u\0u\0u\0u\0u\0u\0u\0u\0u\0u\0w\0w\0w\0w\0w\0w\0w\0w\0w\0w\0v\0u\0v\0\x7f\0I\0v\0v\0v\0v\0v\0v\0v\0v\0v\0v\0x\0x\0x\0x\0x\0x\0x\0x\0x\0x\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x83\0u\0\xff\xff\xff\xffN\0y\0y\0y\0y\0y\0y\0y\0y\0y\0y\0z\0z\0z\0z\0z\0z\0z\0z\0z\0z\0\x87\0\x87\0\x87\0\x87\0\x87\0\x87\0\x87\0\x87\0\x87\0\x87\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\x8c\0\xff\xff\xff\xffT\0\x8d\0\x8d\0\x8d\0\x8d\0\x8d\0\x8d\0\x8d\0\x8d\0\x8d\0\x8d\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x92\0\x87\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xffZ\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x8d\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x87\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x8d\0\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff"),new MlString(""),new MlString(""),new MlString(""),new MlString(""),new MlString(""),new MlString("")],i=new MlString("caml_closure"),j=new MlString("caml_link"),k=new MlString("caml_unique"),l=new MlString("data-eliom-unique-id"),m=new MlString("caml_closure_id"),n=new MlString("__(suffix service)__"),o=new MlString("__eliom_na__num"),p=new MlString("__eliom_na__name"),q=new MlString("__eliom_n__"),r=new MlString("__eliom_np__"),s=new MlString("__nl_"),t=new MlString("X-Eliom-Application"),u=new MlString("([^\"'\\)]\\\\(\"|'|\\)))*"),v=[0,new MlString("article"),[0,new MlString("aside"),[0,new MlString("nav"),[0,new MlString("section"),0]]]],w=[0,new MlString("blockquote"),[0,new MlString("body"),[0,new MlString("details"),[0,new MlString("fieldset"),[0,new MlString("figure"),[0,new MlString("td"),0]]]]]];caml_register_global(5,[0,new MlString("Division_by_zero")]);caml_register_global(3,b);caml_register_global(2,a);var k_=[0,new MlString("Out_of_memory")],k9=[0,new MlString("Match_failure")],k8=[0,new MlString("Stack_overflow")],k7=new MlString("output"),k6=new MlString("%.12g"),k5=new MlString("."),k4=new MlString("%d"),k3=new MlString("true"),k2=new MlString("false"),k1=new MlString("Pervasives.Exit"),k0=[255,0,0,32752],kZ=[255,0,0,65520],kY=[255,1,0,32752],kX=new MlString("Pervasives.do_at_exit"),kW=new MlString("\\b"),kV=new MlString("\\t"),kU=new MlString("\\n"),kT=new MlString("\\r"),kS=new MlString("\\\\"),kR=new MlString("\\'"),kQ=new MlString("Char.chr"),kP=new MlString(""),kO=new MlString("String.blit"),kN=new MlString("String.sub"),kM=new MlString("Marshal.from_size"),kL=new MlString("Marshal.from_string"),kK=new MlString("%d"),kJ=new MlString("%d"),kI=new MlString(""),kH=new MlString("Set.remove_min_elt"),kG=new MlString("Set.bal"),kF=new MlString("Set.bal"),kE=new MlString("Set.bal"),kD=new MlString("Set.bal"),kC=new MlString("Map.remove_min_elt"),kB=[0,0,0,0],kA=[0,new MlString("map.ml"),267,10],kz=[0,0,0],ky=new MlString("Map.bal"),kx=new MlString("Map.bal"),kw=new MlString("Map.bal"),kv=new MlString("Map.bal"),ku=new MlString("Queue.Empty"),kt=new MlString("CamlinternalLazy.Undefined"),ks=new MlString("Buffer.add_substring"),kr=new MlString("Buffer.add: cannot grow buffer"),kq=new MlString("%"),kp=new MlString(""),ko=new MlString(""),kn=new MlString("\""),km=new MlString("\""),kl=new MlString("'"),kk=new MlString("'"),kj=new MlString("."),ki=new MlString("printf: bad positional specification (0)."),kh=new MlString("%_"),kg=[0,new MlString("printf.ml"),144,8],kf=new MlString("''"),ke=new MlString("Printf: premature end of format string ``"),kd=new MlString("''"),kc=new MlString(" in format string ``"),kb=new MlString(", at char number "),ka=new MlString("Printf: bad conversion %"),j$=new MlString("Sformat.index_of_int: negative argument "),j_=new MlString("bad box format"),j9=new MlString("bad box name ho"),j8=new MlString("bad tag name specification"),j7=new MlString("bad tag name specification"),j6=new MlString(""),j5=new MlString(""),j4=new MlString(""),j3=new MlString("bad integer specification"),j2=new MlString("bad format"),j1=new MlString(")."),j0=new MlString(" ("),jZ=new MlString("'', giving up at character number "),jY=new MlString(" ``"),jX=new MlString("fprintf: "),jW=[3,0,3],jV=new MlString("."),jU=new MlString(">"),jT=new MlString(""),jR=new MlString("<"),jQ=new MlString("\n"),jP=new MlString("Format.Empty_queue"),jO=[0,new MlString("")],jN=new MlString(""),jM=new MlString(", %s%s"),jL=new MlString("Out of memory"),jK=new MlString("Stack overflow"),jJ=new MlString("Pattern matching failed"),jI=new MlString("Assertion failed"),jH=new MlString("(%s%s)"),jG=new MlString(""),jF=new MlString(""),jE=new MlString("(%s)"),jD=new MlString("%d"),jC=new MlString("%S"),jB=new MlString("_"),jA=new MlString("Random.int"),jz=new MlString("x"),jy=new MlString("Lwt_sequence.Empty"),jx=[0,new MlString("src/core/lwt.ml"),573,20],jw=[0,new MlString("src/core/lwt.ml"),575,8],jv=[0,new MlString("src/core/lwt.ml"),782,8],ju=[0,new MlString("src/core/lwt.ml"),818,15],jt=[0,new MlString("src/core/lwt.ml"),587,25],js=[0,new MlString("src/core/lwt.ml"),594,8],jr=[0,new MlString("src/core/lwt.ml"),550,20],jq=[0,new MlString("src/core/lwt.ml"),553,8],jp=[0,new MlString("src/core/lwt.ml"),516,20],jo=[0,new MlString("src/core/lwt.ml"),518,8],jn=[0,new MlString("src/core/lwt.ml"),499,20],jm=[0,new MlString("src/core/lwt.ml"),502,8],jl=[0,new MlString("src/core/lwt.ml"),477,20],jk=[0,new MlString("src/core/lwt.ml"),480,8],jj=[0,new MlString("src/core/lwt.ml"),440,20],ji=[0,new MlString("src/core/lwt.ml"),443,8],jh=new MlString("Lwt.fast_connect"),jg=new MlString("Lwt.connect"),jf=new MlString("Lwt.wakeup_exn"),je=new MlString("Lwt.wakeup"),jd=new MlString("Lwt.Canceled"),jc=new MlString("a"),jb=new MlString("area"),ja=new MlString("base"),i$=new MlString("blockquote"),i_=new MlString("body"),i9=new MlString("br"),i8=new MlString("button"),i7=new MlString("canvas"),i6=new MlString("caption"),i5=new MlString("col"),i4=new MlString("colgroup"),i3=new MlString("del"),i2=new MlString("div"),i1=new MlString("dl"),i0=new MlString("fieldset"),iZ=new MlString("form"),iY=new MlString("frame"),iX=new MlString("frameset"),iW=new MlString("h1"),iV=new MlString("h2"),iU=new MlString("h3"),iT=new MlString("h4"),iS=new MlString("h5"),iR=new MlString("h6"),iQ=new MlString("head"),iP=new MlString("hr"),iO=new MlString("html"),iN=new MlString("iframe"),iM=new MlString("img"),iL=new MlString("input"),iK=new MlString("ins"),iJ=new MlString("label"),iI=new MlString("legend"),iH=new MlString("li"),iG=new MlString("link"),iF=new MlString("map"),iE=new MlString("meta"),iD=new MlString("object"),iC=new MlString("ol"),iB=new MlString("optgroup"),iA=new MlString("option"),iz=new MlString("p"),iy=new MlString("param"),ix=new MlString("pre"),iw=new MlString("q"),iv=new MlString("script"),iu=new MlString("select"),it=new MlString("style"),is=new MlString("table"),ir=new MlString("tbody"),iq=new MlString("td"),ip=new MlString("textarea"),io=new MlString("tfoot"),im=new MlString("th"),il=new MlString("thead"),ik=new MlString("title"),ij=new MlString("tr"),ii=new MlString("ul"),ih=[0,new MlString("dom_html.ml"),1263,62],ig=[0,new MlString("dom_html.ml"),1259,42],ie=new MlString("window.PopStateEvent"),id=new MlString("window.MouseScrollEvent"),ic=new MlString("window.WheelEvent"),ib=new MlString("window.KeyboardEvent"),ia=new MlString("window.MouseEvent"),h$=new MlString("link"),h_=new MlString("form"),h9=new MlString("a"),h8=new MlString("noscript"),h7=new MlString("a"),h6=new MlString("li"),h5=new MlString("ol"),h4=new MlString("form"),h3=new MlString("style"),h2=new MlString("head"),h1=new MlString("\""),h0=new MlString(" name=\""),hZ=new MlString("\""),hY=new MlString(" type=\""),hX=new MlString("<"),hW=new MlString(">"),hV=new MlString(""),hU=new MlString("on"),hT=new MlString("click"),hS=new MlString("\\$&"),hR=new MlString("$$$$"),hQ=[0,new MlString("regexp.ml"),28,64],hP=new MlString("g"),hO=new MlString("g"),hN=new MlString("[$]"),hM=new MlString("[\\][()\\\\|+*.?{}^$]"),hL=[0,new MlString(""),0],hK=new MlString(""),hJ=new MlString(""),hI=new MlString(""),hH=new MlString(""),hG=new MlString(""),hF=new MlString(""),hE=new MlString(""),hD=new MlString("="),hC=new MlString("&"),hB=new MlString("file"),hA=new MlString("file:"),hz=new MlString("http"),hy=new MlString("http:"),hx=new MlString("https"),hw=new MlString("https:"),hv=new MlString("%2B"),hu=new MlString("Url.Local_exn"),ht=new MlString("+"),hs=new MlString("Url.Not_an_http_protocol"),hr=new MlString("^([Hh][Tt][Tt][Pp][Ss]?)://([0-9a-zA-Z.-]+|\\[[0-9a-zA-Z.-]+\\]|\\[[0-9A-Fa-f:.]+\\])?(:([0-9]+))?/([^\\?#]*)(\\?([^#])*)?(#(.*))?$"),hq=new MlString("^([Ff][Ii][Ll][Ee])://([^\\?#]*)(\\?([^#])*)?(#(.*))?$"),hp=new MlString("browser can't read file: unimplemented"),ho=new MlString("utf8"),hn=[0,new MlString("file.ml"),109,15],hm=new MlString("string"),hl=new MlString("can't retrieve file name: not implemented"),hk=[0,new MlString("form.ml"),173,9],hj=[0,1],hi=new MlString("checkbox"),hh=new MlString("file"),hg=new MlString("password"),hf=new MlString("radio"),he=new MlString("reset"),hd=new MlString("submit"),hc=new MlString("text"),hb=new MlString(""),ha=new MlString(""),g$=new MlString("POST"),g_=new MlString("multipart/form-data; boundary="),g9=new MlString("POST"),g8=[0,new MlString("POST"),[0,new MlString("application/x-www-form-urlencoded")],126925477],g7=[0,new MlString("POST"),0,126925477],g6=new MlString("GET"),g5=new MlString("?"),g4=new MlString("Content-type"),g3=new MlString("="),g2=new MlString("="),g1=new MlString("&"),g0=new MlString("Content-Type: application/octet-stream\r\n"),gZ=new MlString("\"\r\n"),gY=new MlString("\"; filename=\""),gX=new MlString("Content-Disposition: form-data; name=\""),gW=new MlString("\r\n"),gV=new MlString("\r\n"),gU=new MlString("\r\n"),gT=new MlString("--"),gS=new MlString("\r\n"),gR=new MlString("\"\r\n\r\n"),gQ=new MlString("Content-Disposition: form-data; name=\""),gP=new MlString("--\r\n"),gO=new MlString("--"),gN=new MlString("js_of_ocaml-------------------"),gM=new MlString("Msxml2.XMLHTTP"),gL=new MlString("Msxml3.XMLHTTP"),gK=new MlString("Microsoft.XMLHTTP"),gJ=[0,new MlString("xmlHttpRequest.ml"),64,2],gI=new MlString("XmlHttpRequest.Wrong_headers"),gH=new MlString("foo"),gG=new MlString("Unexpected end of input"),gF=new MlString("Unexpected end of input"),gE=new MlString("Unexpected byte in string"),gD=new MlString("Unexpected byte in string"),gC=new MlString("Invalid escape sequence"),gB=new MlString("Unexpected end of input"),gA=new MlString("Expected ',' but found"),gz=new MlString("Unexpected end of input"),gy=new MlString("Expected ',' or ']' but found"),gx=new MlString("Unexpected end of input"),gw=new MlString("Unterminated comment"),gv=new MlString("Int overflow"),gu=new MlString("Int overflow"),gt=new MlString("Expected integer but found"),gs=new MlString("Unexpected end of input"),gr=new MlString("Int overflow"),gq=new MlString("Expected integer but found"),gp=new MlString("Unexpected end of input"),go=new MlString("Expected number but found"),gn=new MlString("Unexpected end of input"),gm=new MlString("Expected '\"' but found"),gl=new MlString("Unexpected end of input"),gk=new MlString("Expected '[' but found"),gj=new MlString("Unexpected end of input"),gi=new MlString("Expected ']' but found"),gh=new MlString("Unexpected end of input"),gg=new MlString("Int overflow"),gf=new MlString("Expected positive integer or '[' but found"),ge=new MlString("Unexpected end of input"),gd=new MlString("Int outside of bounds"),gc=new MlString("%s '%s'"),gb=new MlString("byte %i"),ga=new MlString("bytes %i-%i"),f$=new MlString("Line %i, %s:\n%s"),f_=new MlString("Deriving.Json: "),f9=[0,new MlString("deriving_json/deriving_Json_lexer.mll"),79,13],f8=new MlString("Deriving_Json_lexer.Int_overflow"),f7=new MlString("Json_array.read: unexpected constructor."),f6=new MlString("[0"),f5=new MlString("[0,%a]"),f4=new MlString("Json_option.read: unexpected constructor."),f3=new MlString("\\b"),f2=new MlString("\\t"),f1=new MlString("\\n"),f0=new MlString("\\f"),fZ=new MlString("\\r"),fY=new MlString("\\\\"),fX=new MlString("\\\""),fW=new MlString("\\u%04X"),fV=new MlString("%e"),fU=new MlString("%d"),fT=[0,new MlString("deriving_json/deriving_Json.ml"),85,30],fS=[0,new MlString("deriving_json/deriving_Json.ml"),84,27],fR=[0,new MlString("src/react.ml"),376,51],fQ=[0,new MlString("src/react.ml"),365,54],fP=new MlString("maximal rank exceeded"),fO=new MlString("\""),fN=new MlString("\""),fM=new MlString(">"),fL=new MlString(""),fK=new MlString(" "),fJ=new MlString(" PUBLIC "),fI=new MlString(""),fh=new MlString("./"),fg=new MlString("__eliom__"),ff=new MlString("__eliom_p__"),fe=new MlString("p_"),fd=new MlString("n_"),fc=new MlString("__eliom_appl_name"),fb=new MlString("X-Eliom-Location-Full"),fa=new MlString("X-Eliom-Location-Half"),e$=new MlString("X-Eliom-Location"),e_=new MlString("X-Eliom-Set-Process-Cookies"),e9=new MlString("X-Eliom-Process-Cookies"),e8=new MlString("X-Eliom-Process-Info"),e7=new MlString("X-Eliom-Expecting-Process-Page"),e6=[0,0],e5=[0,0],e4=new MlString("[0"),e3=new MlString(","),e2=new MlString(","),e1=new MlString("]"),e0=[0,0],eZ=[0,0],eY=new MlString("[0"),eX=new MlString(","),eW=new MlString(","),eV=new MlString("]"),eU=new MlString("[0"),eT=new MlString(","),eS=new MlString(","),eR=new MlString("]"),eQ=new MlString("Json_Json: Unexpected constructor."),eP=new MlString("[0"),eO=new MlString(","),eN=new MlString(","),eM=new MlString(","),eL=new MlString("]"),eK=new MlString("0"),eJ=new MlString("eliom_appl_sitedata"),eI=new MlString("eliom_appl_process_info"),eH=new MlString("get_request_data"),eG=new MlString("get_request_data"),eF=new MlString("eliom_request_cookies"),eE=[0,new MlString("eliom_request_info.ml"),79,11],eD=[0,new MlString("eliom_request_info.ml"),70,11],eC=new MlString("/"),eB=new MlString("/"),eA=new MlString(""),ez=new MlString(""),ey=new MlString("Eliom_request_info.get_sess_info called before initialization"),ex=new MlString("^/?([^\\?]*)(\\?.*)?$"),ew=[0,new MlString(""),0],ev=[0,new MlString(""),0],eu=[6,new MlString("")],et=[6,new MlString("")],es=[6,new MlString("")],er=[6,new MlString("")],eq=new MlString("Bad parameter type in suffix"),ep=new MlString("Lists or sets in suffixes must be last parameters"),eo=[0,new MlString(""),0],en=[0,new MlString(""),0],em=new MlString("Constructing an URL with raw POST data not possible"),el=new MlString("."),ek=new MlString("on"),ej=new MlString("Constructing an URL with file parameters not possible"),ei=new MlString(".y"),eh=new MlString(".x"),eg=new MlString("Bad use of suffix"),ef=new MlString(""),ee=new MlString(""),ed=new MlString("]"),ec=new MlString("["),eb=new MlString("CSRF coservice not implemented client side for now"),ea=new MlString("CSRF coservice not implemented client side for now"),d$=[0,-928754351,[0,2,3553398]],d_=[0,-928754351,[0,1,3553398]],d9=[0,-928754351,[0,1,3553398]],d8=new MlString("/"),d7=[0,0],d6=new MlString(""),d5=[0,0],d4=new MlString(""),d3=new MlString("/"),d2=[0,1],d1=[0,new MlString("eliom_uri.ml"),497,29],d0=[0,1],dZ=[0,new MlString("/")],dY=[0,new MlString("eliom_uri.ml"),547,22],dX=new MlString("?"),dW=new MlString("#"),dV=new MlString("/"),dU=[0,1],dT=[0,new MlString("/")],dS=new MlString("/"),dR=[0,new MlString("eliom_uri.ml"),274,20],dQ=new MlString("/"),dP=new MlString(".."),dO=new MlString(".."),dN=new MlString(""),dM=new MlString(""),dL=new MlString("./"),dK=new MlString(".."),dJ=new MlString(""),dI=new MlString(""),dH=new MlString(""),dG=new MlString(""),dF=new MlString("Eliom_request: no location header"),dE=new MlString(""),dD=[0,new MlString("eliom_request.ml"),203,7],dC=new MlString("Eliom_request: received content for application %S when running application %s"),dB=new MlString("Eliom_request: no application name? please report this bug"),dA=[0,new MlString("eliom_request.ml"),200,2],dz=new MlString("Eliom_request: non application content received"),dy=new MlString("Eliom_request: can't silently redirect a Post request to non application content"),dx=new MlString("application/xml"),dw=new MlString("application/xhtml+xml"),dv=new MlString("Accept"),du=[0,new MlString("eliom_request.ml"),232,19],dt=new MlString(""),ds=new MlString("can't do POST redirection with file parameters"),dr=new MlString("can't do POST redirection with file parameters"),dq=new MlString("text"),dp=new MlString("post"),dn=new MlString("none"),dm=[0,new MlString("eliom_request.ml"),42,20],dl=[0,new MlString("eliom_request.ml"),49,33],dk=new MlString(""),dj=new MlString("Eliom_request.Looping_redirection"),di=new MlString("Eliom_request.Failed_request"),dh=new MlString("Eliom_request.Program_terminated"),dg=new MlString("Eliom_request.Non_xml_content"),df=new MlString("^([^\\?]*)(\\?(.*))?$"),de=new MlString("^([Hh][Tt][Tt][Pp][Ss]?)://([0-9a-zA-Z.-]+|\\[[0-9A-Fa-f:.]+\\])(:([0-9]+))?/([^\\?]*)(\\?(.*))?$"),dd=new MlString("rewrite_CSS: "),dc=new MlString("rewrite_CSS: "),db=new MlString("Exc1: %s"),da=new MlString(""),c$=new MlString("@import url('%s') %s;\n"),c_=new MlString("@import url('%s') %s;\n"),c9=new MlString("Exc2: %s"),c8=new MlString("Unique CSS skipped..."),c7=new MlString("preload_css (fetch+rewrite)"),c6=new MlString("preload_css (fetch+rewrite)"),c5=new MlString("text/css"),c4=new MlString("url('"),c3=new MlString("')"),c2=[0,new MlString("private/eliommod_dom.ml"),342,64],c1=new MlString(".."),c0=new MlString("../"),cZ=new MlString(".."),cY=new MlString("../"),cX=new MlString("/"),cW=new MlString("/"),cV=new MlString("stylesheet"),cU=new MlString("text/css"),cT=new MlString("can't addopt node, import instead"),cS=new MlString("can't import node, copy instead"),cR=new MlString("can't addopt node, document not parsed as html. copy instead"),cQ=new MlString("class"),cP=new MlString("class"),cO=new MlString("copy_element"),cN=new MlString("add_childrens: not text node in tag %s"),cM=new MlString(""),cL=new MlString("add children: can't appendChild"),cK=new MlString("get_head"),cJ=new MlString("head"),cI=new MlString("HTMLEvents"),cH=new MlString("on"),cG=new MlString("%s element tagged as eliom link"),cF=new MlString(" "),cE=new MlString("a."),cD=new MlString("form."),cC=new MlString("."),cB=new MlString("."),cA=new MlString(" +"),cz=new MlString("^(([^/?]*/)*)([^/?]*)(\\?.*)?$"),cy=new MlString("[^\\\\\"]*\""),cx=new MlString("\""),cw=new MlString("[^\\\\']*'"),cv=new MlString("'"),cu=new MlString("[^\\\\\\)]*"),ct=new MlString("url\\(\\s*(%s|%s|%s)\\s*\\)\\s*"),cs=new MlString("\\s*(%s|%s)\\s*"),cr=new MlString("Eliommod_dom.Incorrect_url"),cq=new MlString("url\\((?!('|\")?(https?:\\/\\/|\\/))"),cp=new MlString("@import\\s*"),co=[0,1],cn=new MlString("./"),cm=[0,1],cl=[0,1],ck=[0,1],cj=[0,1],ci=new MlString("replace_child"),ch=new MlString("replace_child"),cg=new MlString("set_content_end"),cf=new MlString("set_content_end"),ce=new MlString("set_content"),cd=new MlString("set_content_beginning"),cc=new MlString("#"),cb=new MlString("loading: "),ca=new MlString("set_content_beginning"),b$=new MlString("set_content: exception raised: "),b_=new MlString("set_content"),b9=new MlString("set_content"),b8=new MlString(""),b7=new MlString("load_data_script"),b6=new MlString("load_data_script"),b5=new MlString("script"),b4=new MlString(" is not a script, its tag is"),b3=new MlString("get_data_script: the node "),b2=new MlString("get_data_script"),b1=new MlString("get_data_script wrong branch"),b0=new MlString("load_eliom_data failed: "),bZ=new MlString("load_eliom_data"),bY=new MlString("unload"),bX=new MlString("load_eliom_data"),bW=new MlString("submit"),bV=new MlString(""),bU=[0,new MlString("eliom_client.ml"),243,22],bT=new MlString(""),bS=new MlString(","),bR=new MlString(" "),bQ=new MlString(","),bP=new MlString(" "),bO=new MlString("load"),bN=new MlString("onload"),bM=new MlString("unique node without id attribute"),bL=new MlString("not a form element"),bK=new MlString("get"),bJ=new MlString("not an anchor element"),bI=new MlString("onload"),bH=new MlString("not an anchor element"),bG=new MlString("not a form element"),bF=new MlString("Closure not found (%Ld)"),bE=[0,1],bD=[0,0],bC=[0,1],bB=[0,0],bA=[0,new MlString("eliom_client.ml"),54,65],bz=[0,new MlString("eliom_client.ml"),53,64],by=[0,new MlString("eliom_client.ml"),52,54],bx=new MlString("script"),bw=new MlString(""),bv=new MlString(""),bu=new MlString("!"),bt=new MlString("#!"),bs=[0,0],br=new MlString("[0"),bq=new MlString(","),bp=new MlString(","),bo=new MlString("]"),bn=[0,0],bm=new MlString("[0"),bl=new MlString(","),bk=new MlString(","),bj=new MlString("]"),bi=[0,0],bh=[0,0],bg=new MlString("[0"),bf=new MlString(","),be=new MlString(","),bd=new MlString("]"),bc=new MlString("[0"),bb=new MlString(","),ba=new MlString(","),a$=new MlString("]"),a_=new MlString("Json_Json: Unexpected constructor."),a9=[0,0],a8=new MlString("[0"),a7=new MlString(","),a6=new MlString(","),a5=new MlString("]"),a4=[0,0],a3=new MlString("[0"),a2=new MlString(","),a1=new MlString(","),a0=new MlString("]"),aZ=[0,0],aY=[0,0],aX=new MlString("[0"),aW=new MlString(","),aV=new MlString(","),aU=new MlString("]"),aT=new MlString("[0"),aS=new MlString(","),aR=new MlString(","),aQ=new MlString("]"),aP=new MlString("0"),aO=new MlString("1"),aN=new MlString("[0"),aM=new MlString(","),aL=new MlString("]"),aK=new MlString("[1"),aJ=new MlString(","),aI=new MlString("]"),aH=new MlString("[2"),aG=new MlString(","),aF=new MlString("]"),aE=new MlString("Json_Json: Unexpected constructor."),aD=new MlString("1"),aC=new MlString("0"),aB=new MlString("[0"),aA=new MlString(","),az=new MlString("]"),ay=new MlString("Eliom_comet: check_position: channel kind and message do not match"),ax=[0,new MlString("eliom_comet.ml"),457,29],aw=new MlString("Eliom_comet: not corresponding position"),av=new MlString("Eliom_comet: trying to close a non existent channel: %s"),au=new MlString("Eliom_comet: request failed: exception %s"),at=new MlString(""),as=new MlString("Eliom_comet: should not append"),ar=new MlString("Eliom_comet: connection failure"),aq=new MlString("Eliom_comet: restart"),ap=new MlString("Eliom_comet: exception %s"),ao=new MlString("update_stateless_state on statefull one"),an=new MlString("Eliom_comet.update_statefull_state: received Closed: should not happen, this is an eliom bug, please report it"),am=new MlString("update_statefull_state on stateless one"),al=new MlString("blur"),ak=new MlString("focus"),aj=[0,0,0,0],ai=new MlString("Eliom_comet.Restart"),ah=new MlString("Eliom_comet.Process_closed"),ag=new MlString("Eliom_comet.Channel_closed"),af=new MlString("Eliom_comet.Channel_full"),ae=new MlString("Eliom_comet.Comet_error"),ad=new MlString("onload"),ac=new MlString("onload"),ab=new MlString("h1"),aa=new MlString("h2"),$=new MlString("h3"),_=new MlString("h4"),Z=new MlString("h5"),Y=new MlString("h6"),X=[0,new MlString("src/site/HTML5outliner.eliom"),79,11],W=[0,new MlString("src/site/HTML5outliner.eliom"),117,19],V=[0,[0,[0,6,0,0],0],0],U=[0,new MlString("src/site/HTML5outliner.eliom"),154,21],T=new MlString("href"),S=new MlString("toplevel"),R=[0,[0,[0,6,0,0],0],0],Q=[0,new MlString("src/site/HTML5outliner.eliom"),102,12],P=new MlString("Unnamed "),O=new MlString("id"),N=new MlString("id"),M=new MlString("h5o-%d"),L=[0,new MlString("h1"),[0,new MlString("h2"),[0,new MlString("h3"),[0,new MlString("h4"),[0,new MlString("h5"),[0,new MlString("h6"),0]]]]]],K=[0,new MlString("h1"),[0,new MlString("h2"),[0,new MlString("h3"),[0,new MlString("h4"),[0,new MlString("h5"),[0,new MlString("h6"),0]]]]]],J=[0,new MlString("h1"),[0,new MlString("h2"),[0,new MlString("h3"),[0,new MlString("h4"),[0,new MlString("h5"),[0,new MlString("h6"),[0,new MlString("hgroup"),0]]]]]]],I=new MlString("HTML5outliner.FoundNode"),H=new MlString("HTML5outliner.FoundFragment"),G=new MlString("nomenu"),F=[255,6400262,0,0],E=[255,6400263,0,0],D=new MlString("TODO: prevent default action and ask confirmation"),C=[255,13915828,19,0],B=new MlString("showcomment"),A=[255,8162879,9,0],z=new MlString("ocsimore loaded");function y(x){throw [0,a,x];}function la(k$){throw [0,b,k$];}var lb=[0,k1];function le(ld,lc){return caml_lessequal(ld,lc)?ld:lc;}function lh(lg,lf){return caml_greaterequal(lg,lf)?lg:lf;}var li=1<<31,lj=li-1|0,ls=caml_int64_float_of_bits(k0),lr=caml_int64_float_of_bits(kZ),lq=caml_int64_float_of_bits(kY);function lp(lk,lm){var ll=lk.getLen(),ln=lm.getLen(),lo=caml_create_string(ll+ln|0);caml_blit_string(lk,0,lo,0,ll);caml_blit_string(lm,0,lo,ll,ln);return lo;}function lu(lt){return lt?k3:k2;}function lw(lv){return caml_format_int(k4,lv);}function lF(lx){var ly=caml_format_float(k6,lx),lz=0,lA=ly.getLen();for(;;){if(lA<=lz)var lB=lp(ly,k5);else{var lC=ly.safeGet(lz),lD=48<=lC?58<=lC?0:1:45===lC?1:0;if(lD){var lE=lz+1|0,lz=lE;continue;}var lB=ly;}return lB;}}function lH(lG,lI){if(lG){var lJ=lG[1];return [0,lJ,lH(lG[2],lI)];}return lI;}var lP=caml_ml_open_descriptor_out(1),lO=caml_ml_open_descriptor_out(2);function lU(lN){var lK=caml_ml_out_channels_list(0);for(;;){if(lK){var lL=lK[2];try {}catch(lM){}var lK=lL;continue;}return 0;}}function lW(lT,lS,lQ,lR){if(0<=lQ&&0<=lR&&!((lS.getLen()-lR|0)>>25&31)|0;caml_array_set(J6[1],J6[2],Kz);var KA=Kz&1073741823,KB=caml_mod(KA,Kx);if(((1073741823-Kx|0)+1|0)<(KA-KB|0))continue;var KC=KB,Ky=1;break;}if(!Ky)var KC=la(jA);return [0,Ks(Kw,KC)];}var KE=IY([0,[0,function(KD){return mR(Iu,Kw);}]]),KF=[],KG=[];caml_update_dummy(KF,[0,[0,KG]]);caml_update_dummy(KG,function(KL){KF[1]=0;mR(function(KH){var KI=HB(KH)[1];{if(2===KI[0]){var KJ=KI[1],KK=KJ[3]+1|0;return Hs>>6));ub(Uy,nb(128|UA.safeGet(UC)&63));}else ub(Uy,UA.safeGet(UC));else qU(zW,Uy,fW,UD);}var UF=UC+1|0;if(UB!==UC){var UC=UF;continue;}break;}}return ub(Uy,34);}var UM=Ud([0,UL,function(UG){SP(UG,UG[4]);var UH=UG[4],UI=123;for(;;){var UJ=RL(h,UI,UH);if(UJ<0||2