From: David Vazquez Date: Mon, 11 Feb 2013 22:35:25 +0000 (+0000) Subject: !REDUCE use a keyword :INITIAL-VALUE X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=0c12793f4aefc5f9e54cf41331ce72306dd7e4d0;p=jscl.git !REDUCE use a keyword :INITIAL-VALUE --- diff --git a/ecmalisp.js b/ecmalisp.js index 517ba99..1cc079a 100644 --- a/ecmalisp.js +++ b/ecmalisp.js @@ -669,17 +669,33 @@ var l60 = {name: "LISTP"}; return l59; })(); var l61 = {name: "!REDUCE"}; +var l62 = {name: "INITIAL-VALUE", 'package': 'KEYWORD'}; (function(){ (l61).fvalue = (function(v72){ ((v72)["fname"] = "!REDUCE"); return v72; - })((function (values,v69,v70,v71){ - checkArgs(arguments, 4); + })((function (values,v69,v70){ + checkArgsAtLeast(arguments, 3); + var v71; + var i; + for (i=3; i") : l147.fvalue(values, "#")); + })() : (l86.fvalue(pv, v308) !== l5.value ? l18.fvalue(values, v308) : (((typeof(v308) == "string")?l4.value: l5.value) !== l5.value ? l148.fvalue(values, "\"", l158.fvalue(pv, v308), "\"") : (((typeof v308 == 'function')?l4.value: l5.value) !== l5.value ? (function(v314){ + return (v314 !== l5.value ? l148.fvalue(values, "#") : l148.fvalue(values, "#")); })((function(){ var tmp = (v308)["fname"]; return tmp == undefined? l5.value: tmp ; - })()) : (l60.fvalue(pv, v308) !== l5.value ? l147.fvalue(values, "(", l150.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l156; + })()) : (l60.fvalue(pv, v308) !== l5.value ? l148.fvalue(values, "(", l151.fvalue(pv, l79.fvalue(pv, (function(){ + var symbol = l157; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), l91.fvalue(pv, v308)), " "), (function(v315){ + })(), l92.fvalue(pv, v308)), " "), (function(v315){ return (l13.fvalue(pv, (function(){ var tmp = v315; return tmp === l5.value? l5.value: tmp.cdr; - })()) !== l5.value ? l156.fvalue(pv, (function(){ + })()) !== l5.value ? l157.fvalue(pv, (function(){ var tmp = v315; return tmp === l5.value? l5.value: tmp.car; - })()) : l147.fvalue(pv, l156.fvalue(pv, (function(){ + })()) : l148.fvalue(pv, l157.fvalue(pv, (function(){ var tmp = v315; return tmp === l5.value? l5.value: tmp.car; - })()), " . ", l156.fvalue(pv, (function(){ + })()), " . ", l157.fvalue(pv, (function(){ var tmp = v315; return tmp === l5.value? l5.value: tmp.cdr; })()))); - })(l90.fvalue(pv, v308)), ")") : (((function(){ + })(l91.fvalue(pv, v308)), ")") : (((function(){ var x = v308; return typeof x === 'object' && 'length' in x; - })()?l4.value: l5.value) !== l5.value ? l147.fvalue(values, "#", l156.fvalue(pv, l152.fvalue(pv, v308))) : (l125.fvalue(pv, v308) !== l5.value ? l147.fvalue(values, "#") : l5.value))))))); + })()?l4.value: l5.value) !== l5.value ? l148.fvalue(values, "#", l157.fvalue(pv, l153.fvalue(pv, v308))) : (l126.fvalue(pv, v308) !== l5.value ? l148.fvalue(values, "#") : l5.value))))))); })(); })); - return l156; + return l157; })(); (function(){ - (l106).fvalue = (function(v318){ + (l107).fvalue = (function(v318){ ((v318)["fname"] = "WRITE-LINE"); return v318; })((function (values,v317){ @@ -2880,7 +2896,7 @@ var l157 = {name: "ESCAPE-STRING"}; })(); (function(){ var x = (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -2892,11 +2908,11 @@ var l157 = {name: "ESCAPE-STRING"}; return v317; })(); })); - return l106; + return l107; })(); -var l158 = {name: "WARN"}; +var l159 = {name: "WARN"}; (function(){ - (l158).fvalue = (function(v320){ + (l159).fvalue = (function(v320){ ((v320)["fname"] = "WARN"); return v320; })((function (values,v319){ @@ -2908,28 +2924,28 @@ var l158 = {name: "WARN"}; throw 'The value ' + x + ' is not a type string.'; return lisp.write(x); })(); - return l106.fvalue(values, v319); + return l107.fvalue(values, v319); })(); })); - return l158; + return l159; })(); -var l159 = {name: "PRINT"}; +var l160 = {name: "PRINT"}; (function(){ - (l159).fvalue = (function(v322){ + (l160).fvalue = (function(v322){ ((v322)["fname"] = "PRINT"); return v322; })((function (values,v321){ checkArgs(arguments, 2); return (function(){ - l106.fvalue(pv, l156.fvalue(pv, v321)); + l107.fvalue(pv, l157.fvalue(pv, v321)); return v321; })(); })); - return l159; + return l160; })(); -var l160 = {name: "MAKE-STRING-STREAM"}; +var l161 = {name: "MAKE-STRING-STREAM"}; (function(){ - (l160).fvalue = (function(v324){ + (l161).fvalue = (function(v324){ ((v324)["fname"] = "MAKE-STRING-STREAM"); return v324; })((function (values,v323){ @@ -2938,11 +2954,11 @@ var l160 = {name: "MAKE-STRING-STREAM"}; return ({car: v323, cdr: 0}); })(); })); - return l160; + return l161; })(); -var l161 = {name: "%PEEK-CHAR"}; +var l162 = {name: "%PEEK-CHAR"}; (function(){ - (l161).fvalue = (function(v326){ + (l162).fvalue = (function(v326){ ((v326)["fname"] = "%PEEK-CHAR"); return v326; })((function (values,v325){ @@ -2954,7 +2970,7 @@ var l161 = {name: "%PEEK-CHAR"}; return tmp === l5.value? l5.value: tmp.cdr; })(); if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = l72.fvalue(pv, (function(){ + var x2 = l73.fvalue(pv, (function(){ var tmp = v325; return tmp === l5.value? l5.value: tmp.car; })()); @@ -2977,11 +2993,11 @@ var l161 = {name: "%PEEK-CHAR"}; })() : l5.value); })(); })); - return l161; + return l162; })(); -var l162 = {name: "%READ-CHAR"}; +var l163 = {name: "%READ-CHAR"}; (function(){ - (l162).fvalue = (function(v329){ + (l163).fvalue = (function(v329){ ((v329)["fname"] = "%READ-CHAR"); return v329; })((function (values,v327){ @@ -2993,7 +3009,7 @@ var l162 = {name: "%READ-CHAR"}; return tmp === l5.value? l5.value: tmp.cdr; })(); if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = l72.fvalue(pv, (function(){ + var x2 = l73.fvalue(pv, (function(){ var tmp = v327; return tmp === l5.value? l5.value: tmp.car; })()); @@ -3027,11 +3043,11 @@ var l162 = {name: "%READ-CHAR"}; })()) : l5.value); })(); })); - return l162; + return l163; })(); -var l163 = {name: "WHITESPACEP"}; +var l164 = {name: "WHITESPACEP"}; (function(){ - (l163).fvalue = (function(v333){ + (l164).fvalue = (function(v333){ ((v333)["fname"] = "WHITESPACEP"); return v333; })((function (values,v330){ @@ -3039,39 +3055,39 @@ var l163 = {name: "WHITESPACEP"}; return (function(){ return (function(v331){ return (v331 !== l5.value ? v331 : (function(v332){ - return (v332 !== l5.value ? v332 : l84.fvalue(values, v330, 9)); - })(l84.fvalue(pv, v330, 10))); - })(l84.fvalue(pv, v330, 32)); + return (v332 !== l5.value ? v332 : l85.fvalue(values, v330, 9)); + })(l85.fvalue(pv, v330, 10))); + })(l85.fvalue(pv, v330, 32)); })(); })); - return l163; + return l164; })(); -var l164 = {name: "SKIP-WHITESPACES"}; +var l165 = {name: "SKIP-WHITESPACES"}; (function(){ - (l164).fvalue = (function(v336){ + (l165).fvalue = (function(v336){ ((v336)["fname"] = "SKIP-WHITESPACES"); return v336; })((function (values,v334){ checkArgs(arguments, 2); return (function(){ return (function(v335){ - (v335 = l161.fvalue(pv, v334)); + (v335 = l162.fvalue(pv, v334)); return (function(){ return (function(){ - while((v335 !== l5.value ? l163.fvalue(pv, v335) : l5.value) !== l5.value){ - l162.fvalue(pv, v334); - (v335 = l161.fvalue(pv, v334)); + while((v335 !== l5.value ? l164.fvalue(pv, v335) : l5.value) !== l5.value){ + l163.fvalue(pv, v334); + (v335 = l162.fvalue(pv, v334)); }return l5.value; })(); })(); })(l5.value); })(); })); - return l164; + return l165; })(); -var l165 = {name: "TERMINALP"}; +var l166 = {name: "TERMINALP"}; (function(){ - (l165).fvalue = (function(v341){ + (l166).fvalue = (function(v341){ ((v341)["fname"] = "TERMINALP"); return v341; })((function (values,v337){ @@ -3080,30 +3096,30 @@ var l165 = {name: "TERMINALP"}; return (function(v338){ return (v338 !== l5.value ? v338 : (function(v339){ return (v339 !== l5.value ? v339 : (function(v340){ - return (v340 !== l5.value ? v340 : l84.fvalue(values, 40, v337)); - })(l84.fvalue(pv, 41, v337))); - })(l163.fvalue(pv, v337))); + return (v340 !== l5.value ? v340 : l85.fvalue(values, 40, v337)); + })(l85.fvalue(pv, 41, v337))); + })(l164.fvalue(pv, v337))); })(l13.fvalue(pv, v337)); })(); })); - return l165; + return l166; })(); -var l166 = {name: "READ-UNTIL"}; +var l167 = {name: "READ-UNTIL"}; (function(){ - (l166).fvalue = (function(v346){ + (l167).fvalue = (function(v346){ ((v346)["fname"] = "READ-UNTIL"); return v346; })((function (values,v342,v343){ checkArgs(arguments, 3); return (function(){ return (function(v344,v345){ - (v345 = l161.fvalue(pv, v342)); + (v345 = l162.fvalue(pv, v342)); (function(){ return (function(){ while((v345 !== l5.value ? l28.fvalue(pv, (v343)(pv, v345)) : l5.value) !== l5.value){ - (v344 = l147.fvalue(pv, v344, l102.fvalue(pv, v345))); - l162.fvalue(pv, v342); - (v345 = l161.fvalue(pv, v342)); + (v344 = l148.fvalue(pv, v344, l103.fvalue(pv, v345))); + l163.fvalue(pv, v342); + (v345 = l162.fvalue(pv, v342)); }return l5.value; })(); })(); @@ -3111,86 +3127,86 @@ var l166 = {name: "READ-UNTIL"}; })("",l5.value); })(); })); - return l166; + return l167; })(); -var l167 = {name: "SKIP-WHITESPACES-AND-COMMENTS"}; +var l168 = {name: "SKIP-WHITESPACES-AND-COMMENTS"}; (function(){ - (l167).fvalue = (function(v350){ + (l168).fvalue = (function(v350){ ((v350)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS"); return v350; })((function (values,v347){ checkArgs(arguments, 2); return (function(){ return (function(v348){ - l164.fvalue(pv, v347); - (v348 = l161.fvalue(pv, v347)); + l165.fvalue(pv, v347); + (v348 = l162.fvalue(pv, v347)); return (function(){ return (function(){ - while((v348 !== l5.value ? l84.fvalue(pv, v348, 59) : l5.value) !== l5.value){ - l166.fvalue(pv, v347, (function (values,v349){ + while((v348 !== l5.value ? l85.fvalue(pv, v348, 59) : l5.value) !== l5.value){ + l167.fvalue(pv, v347, (function (values,v349){ checkArgs(arguments, 2); - return l84.fvalue(values, v349, 10); + return l85.fvalue(values, v349, 10); })); - l164.fvalue(pv, v347); - (v348 = l161.fvalue(pv, v347)); + l165.fvalue(pv, v347); + (v348 = l162.fvalue(pv, v347)); }return l5.value; })(); })(); })(l5.value); })(); })); - return l167; + return l168; })(); -var l168 = {name: "%READ-LIST"}; -var l169 = {name: "LS-READ"}; +var l169 = {name: "%READ-LIST"}; +var l170 = {name: "LS-READ"}; (function(){ - (l168).fvalue = (function(v354){ + (l169).fvalue = (function(v354){ ((v354)["fname"] = "%READ-LIST"); return v354; })((function (values,v351){ checkArgs(arguments, 2); return (function(){ - l167.fvalue(pv, v351); + l168.fvalue(pv, v351); return (function(v352){ return (l13.fvalue(pv, v352) !== l5.value ? (function(){ throw "Unspected EOF"; - })() : (l84.fvalue(pv, v352, 41) !== l5.value ? (function(){ - l162.fvalue(pv, v351); + })() : (l85.fvalue(pv, v352, 41) !== l5.value ? (function(){ + l163.fvalue(pv, v351); return l5.value; - })() : (l84.fvalue(pv, v352, 46) !== l5.value ? (function(){ - l162.fvalue(pv, v351); + })() : (l85.fvalue(pv, v352, 46) !== l5.value ? (function(){ + l163.fvalue(pv, v351); return (function(v353){ - l167.fvalue(pv, v351); - (l84.fvalue(pv, l162.fvalue(pv, v351), 41) !== l5.value ? l5.value : (function(){ + l168.fvalue(pv, v351); + (l85.fvalue(pv, l163.fvalue(pv, v351), 41) !== l5.value ? l5.value : (function(){ throw "')' was expected."; })()); return v353; - })(l169.fvalue(pv, v351)); - })() : ({car: l169.fvalue(pv, v351), cdr: l168.fvalue(pv, v351)})))); - })(l161.fvalue(pv, v351)); + })(l170.fvalue(pv, v351)); + })() : ({car: l170.fvalue(pv, v351), cdr: l169.fvalue(pv, v351)})))); + })(l162.fvalue(pv, v351)); })(); })); - return l168; + return l169; })(); -var l170 = {name: "READ-STRING"}; +var l171 = {name: "READ-STRING"}; (function(){ - (l170).fvalue = (function(v358){ + (l171).fvalue = (function(v358){ ((v358)["fname"] = "READ-STRING"); return v358; })((function (values,v355){ checkArgs(arguments, 2); return (function(){ return (function(v356,v357){ - (v357 = l162.fvalue(pv, v355)); + (v357 = l163.fvalue(pv, v355)); (function(){ return (function(){ while(l28.fvalue(pv, l27.fvalue(pv, v357, 34)) !== l5.value){ (l13.fvalue(pv, v357) !== l5.value ? (function(){ throw "Unexpected EOF"; })() : l5.value); - (l27.fvalue(pv, v357, 92) !== l5.value ? (v357 = l162.fvalue(pv, v355)) : l5.value); - (v356 = l147.fvalue(pv, v356, l102.fvalue(pv, v357))); - (v357 = l162.fvalue(pv, v355)); + (l27.fvalue(pv, v357, 92) !== l5.value ? (v357 = l163.fvalue(pv, v355)) : l5.value); + (v356 = l148.fvalue(pv, v356, l103.fvalue(pv, v357))); + (v357 = l163.fvalue(pv, v355)); }return l5.value; })(); })(); @@ -3198,22 +3214,22 @@ var l170 = {name: "READ-STRING"}; })("",l5.value); })(); })); - return l170; + return l171; })(); -var l171 = {name: "READ-SHARP"}; +var l172 = {name: "READ-SHARP"}; (function(){ - (l171).fvalue = (function(v363){ + (l172).fvalue = (function(v363){ ((v363)["fname"] = "READ-SHARP"); return v363; })((function (values,v359){ checkArgs(arguments, 2); return (function(){ - l162.fvalue(pv, v359); + l163.fvalue(pv, v359); return (function(v360){ - return (l27.fvalue(pv, v360, 39) !== l5.value ? l45.fvalue(values, l108, l169.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 40) !== l5.value ? l153.fvalue(values, l168.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 58) !== l5.value ? (function(){ + return (l27.fvalue(pv, v360, 39) !== l5.value ? l45.fvalue(values, l109, l170.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 40) !== l5.value ? l154.fvalue(values, l169.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 58) !== l5.value ? (function(){ var name = (function(){ - var x = l166.fvalue(pv, v359, (function(){ - var symbol = l165; + var x = l167.fvalue(pv, v359, (function(){ + var symbol = l166; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; @@ -3226,7 +3242,7 @@ var l171 = {name: "READ-SHARP"}; throw 'The value ' + name + ' is not a type string.'; return ({name: name}); })() : (l27.fvalue(pv, v360, 92) !== l5.value ? (function(v361){ - return (l103.fvalue(pv, v361, "space") !== l5.value ? l83.fvalue(values, 32) : (l103.fvalue(pv, v361, "tab") !== l5.value ? l83.fvalue(values, 9) : (l103.fvalue(pv, v361, "newline") !== l5.value ? l83.fvalue(values, 10) : l83.fvalue(values, (function(){ + return (l104.fvalue(pv, v361, "space") !== l5.value ? l84.fvalue(values, 32) : (l104.fvalue(pv, v361, "tab") !== l5.value ? l84.fvalue(values, 9) : (l104.fvalue(pv, v361, "newline") !== l5.value ? l84.fvalue(values, 10) : l84.fvalue(values, (function(){ var string = v361; var index = 0; if (typeof string != 'string') @@ -3235,34 +3251,34 @@ var l171 = {name: "READ-SHARP"}; throw 'The value ' + index + ' is not a type number.'; return string.charCodeAt(index); })())))); - })(l147.fvalue(pv, l102.fvalue(pv, l162.fvalue(pv, v359)), l166.fvalue(pv, v359, (function(){ - var symbol = l165; + })(l148.fvalue(pv, l103.fvalue(pv, l163.fvalue(pv, v359)), l167.fvalue(pv, v359, (function(){ + var symbol = l166; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()))) : (l27.fvalue(pv, v360, 43) !== l5.value ? (function(v362){ - return (l103.fvalue(pv, v362, "common-lisp") !== l5.value ? (function(){ - l169.fvalue(pv, v359); - return l169.fvalue(values, v359); - })() : (l103.fvalue(pv, v362, "ecmalisp") !== l5.value ? l169.fvalue(values, v359) : (function(){ + return (l104.fvalue(pv, v362, "common-lisp") !== l5.value ? (function(){ + l170.fvalue(pv, v359); + return l170.fvalue(values, v359); + })() : (l104.fvalue(pv, v362, "ecmalisp") !== l5.value ? l170.fvalue(values, v359) : (function(){ throw "Unknown reader form."; })())); - })(l166.fvalue(pv, v359, (function(){ - var symbol = l165; + })(l167.fvalue(pv, v359, (function(){ + var symbol = l166; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })())) : (function(){ throw "ECASE expression failed."; })()))))); - })(l162.fvalue(pv, v359)); + })(l163.fvalue(pv, v359)); })(); })); - return l171; + return l172; })(); -var l172 = {name: "READ-SYMBOL"}; +var l173 = {name: "READ-SYMBOL"}; (function(){ - (l172).fvalue = (function(v371){ + (l173).fvalue = (function(v371){ ((v371)["fname"] = "READ-SYMBOL"); return v371; })((function (values,v364){ @@ -3278,7 +3294,7 @@ var l172 = {name: "READ-SYMBOL"}; var x2 = v365; if (typeof x2 !== 'number') throw 'Not a number!'; return (x1=1; i--) v568 = {car: arguments[i], cdr: @@ -4949,7 +4965,7 @@ var l245 = {name: "SET"}; })()) !== l5.value ? (function(){ throw "Odd paris in SETQ"; })() : (function(){ - (v569 = l147.fvalue(pv, v569, l147.fvalue(pv, l244.fvalue(pv, (function(){ + (v569 = l148.fvalue(pv, v569, l148.fvalue(pv, l245.fvalue(pv, (function(){ var tmp = v568; return tmp === l5.value? l5.value: tmp.car; })(), l34.fvalue(pv, v568)), (l13.fvalue(pv, l36.fvalue(pv, v568)) !== l5.value ? "" : ", ")))); @@ -4965,41 +4981,41 @@ var l245 = {name: "SET"}; throw cf; } })(); - return l181.fvalue(values, "(", v569, ")"); + return l182.fvalue(values, "(", v569, ")"); })(""); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l246 = {name: "JS-VREF"}; -((l220).value = ({car: l45.fvalue(pv, l246, (function (values,v570){ +var l247 = {name: "JS-VREF"}; +((l221).value = ({car: l45.fvalue(pv, l247, (function (values,v570){ checkArgs(arguments, 2); return (function(){ return v570; })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l247 = {name: "JS-VSET"}; -((l220).value = ({car: l45.fvalue(pv, l247, (function (values,v571,v572){ +var l248 = {name: "JS-VSET"}; +((l221).value = ({car: l45.fvalue(pv, l248, (function (values,v571,v572){ checkArgs(arguments, 3); return (function(){ - return l181.fvalue(values, "(", v571, " = ", l183.fvalue(pv, v572), ")"); + return l182.fvalue(values, "(", v571, " = ", l184.fvalue(pv, v572), ")"); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); (function(){ - (l157).fvalue = (function(v579){ + (l158).fvalue = (function(v579){ ((v579)["fname"] = "ESCAPE-STRING"); return v579; })((function (values,v573){ @@ -5017,13 +5033,13 @@ var l247 = {name: "JS-VSET"}; })() !== l5.value){ (function(v577){ ((function(v578){ - return (v578 !== l5.value ? v578 : l84.fvalue(pv, v577, 92)); - })(l84.fvalue(pv, v577, 34)) !== l5.value ? (v574 = l147.fvalue(pv, v574, "\\")) : l5.value); - (l84.fvalue(pv, v577, 10) !== l5.value ? (function(){ - (v574 = l147.fvalue(pv, v574, "\\")); + return (v578 !== l5.value ? v578 : l85.fvalue(pv, v577, 92)); + })(l85.fvalue(pv, v577, 34)) !== l5.value ? (v574 = l148.fvalue(pv, v574, "\\")) : l5.value); + (l85.fvalue(pv, v577, 10) !== l5.value ? (function(){ + (v574 = l148.fvalue(pv, v574, "\\")); return (v577 = 110); })() : l5.value); - return (v574 = l147.fvalue(pv, v574, l102.fvalue(pv, v577))); + return (v574 = l148.fvalue(pv, v574, l103.fvalue(pv, v577))); })((function(){ var string = v573; var index = v575; @@ -5042,32 +5058,32 @@ var l247 = {name: "JS-VSET"}; })(); })(); return v574; - })("",0,l72.fvalue(pv, v573)); + })("",0,l73.fvalue(pv, v573)); })(); })); - return l157; + return l158; })(); -var l248 = {name: "*LITERAL-SYMBOLS*"}; +var l249 = {name: "*LITERAL-SYMBOLS*"}; (function(){ - (((l248.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l248).value = l5.value)); - return l248; + (((l249.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l249).value = l5.value)); + return l249; })(); -var l249 = {name: "*LITERAL-COUNTER*"}; +var l250 = {name: "*LITERAL-COUNTER*"}; (function(){ - (((l249.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l249).value = 0)); - return l249; + (((l250.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l250).value = 0)); + return l250; })(); -var l250 = {name: "GENLIT"}; +var l251 = {name: "GENLIT"}; (function(){ - (l250).fvalue = (function(v580){ + (l251).fvalue = (function(v580){ ((v580)["fname"] = "GENLIT"); return v580; })((function (values){ checkArgsAtMost(arguments, 1); return (function(){ - return l181.fvalue(values, "l", ((l249).value = (function(){ + return l182.fvalue(values, "l", ((l250).value = (function(){ var x1 = (function(){ - var symbol = l249; + var symbol = l250; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5077,11 +5093,11 @@ var l250 = {name: "GENLIT"}; })())); })(); })); - return l250; + return l251; })(); -var l251 = {name: "LITERAL"}; +var l252 = {name: "LITERAL"}; (function(){ - (l251).fvalue = (function(v595){ + (l252).fvalue = (function(v595){ ((v595)["fname"] = "LITERAL"); return v595; })((function (values,v581,v582){ @@ -5093,25 +5109,25 @@ var l251 = {name: "LITERAL"}; default: break; } return (function(){ - return (l85.fvalue(pv, v581) !== l5.value ? l18.fvalue(values, v581) : (((typeof(v581) == "string")?l4.value: l5.value) !== l5.value ? l181.fvalue(values, "\"", l157.fvalue(pv, v581), "\"") : (((function(){ + return (l86.fvalue(pv, v581) !== l5.value ? l18.fvalue(values, v581) : (((typeof(v581) == "string")?l4.value: l5.value) !== l5.value ? l182.fvalue(values, "\"", l158.fvalue(pv, v581), "\"") : (((function(){ var tmp = v581; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(v583){ return (v583 !== l5.value ? v583 : (function(v585,v586){ - ((l248).value = ({car: ({car: v581, cdr: v585}), cdr: (function(){ - var symbol = l248; + ((l249).value = ({car: ({car: v581, cdr: v585}), cdr: (function(){ + var symbol = l249; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); - l208.fvalue(pv, l181.fvalue(pv, "var ", v585, " = ", v586)); + l209.fvalue(pv, l182.fvalue(pv, "var ", v585, " = ", v586)); return v585; - })(l250.fvalue(pv),(function(v584){ - return (l13.fvalue(pv, v584) !== l5.value ? l181.fvalue(pv, "{name: \"", l157.fvalue(pv, (v581).name), "\"}") : l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l143), l45.fvalue(pv, (v581).name), l45.fvalue(pv, l127.fvalue(pv, v584))))); - })(l135.fvalue(pv, v581)))); + })(l251.fvalue(pv),(function(v584){ + return (l13.fvalue(pv, v584) !== l5.value ? l182.fvalue(pv, "{name: \"", l158.fvalue(pv, (v581).name), "\"}") : l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l144), l45.fvalue(pv, (v581).name), l45.fvalue(pv, l128.fvalue(pv, v584))))); + })(l136.fvalue(pv, v581)))); })((function(){ - var tmp = l101.fvalue(pv, v581, (function(){ - var symbol = l248; + var tmp = l102.fvalue(pv, v581, (function(){ + var symbol = l249; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5121,131 +5137,131 @@ var l251 = {name: "LITERAL"}; var tmp = v581; return (typeof tmp == 'object' && 'car' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(){ - var v587 = l91.fvalue(pv, v581); - var v588 = l90.fvalue(pv, v581); - var v589 = l181.fvalue(pv, "QIList(", l150.fvalue(pv, l78.fvalue(pv, (function (values,v590){ + var v587 = l92.fvalue(pv, v581); + var v588 = l91.fvalue(pv, v581); + var v589 = l182.fvalue(pv, "QIList(", l151.fvalue(pv, l79.fvalue(pv, (function (values,v590){ checkArgs(arguments, 2); - return l251.fvalue(values, v590, l4.value); - }), v587), ","), l251.fvalue(pv, (function(){ + return l252.fvalue(values, v590, l4.value); + }), v587), ","), l252.fvalue(pv, (function(){ var tmp = v588; return tmp === l5.value? l5.value: tmp.car; - })(), l4.value), ",", l251.fvalue(pv, (function(){ + })(), l4.value), ",", l252.fvalue(pv, (function(){ var tmp = v588; return tmp === l5.value? l5.value: tmp.cdr; })(), l4.value), ")"); return (v582 !== l5.value ? v589 : (function(v591){ - l208.fvalue(pv, l181.fvalue(pv, "var ", v591, " = ", v589)); + l209.fvalue(pv, l182.fvalue(pv, "var ", v591, " = ", v589)); return v591; - })(l250.fvalue(pv))); + })(l251.fvalue(pv))); })() : (((function(){ var x = v581; return typeof x === 'object' && 'length' in x; })()?l4.value: l5.value) !== l5.value ? (function(v592){ return (function(v593){ return (v582 !== l5.value ? v593 : (function(v594){ - l208.fvalue(pv, l181.fvalue(pv, "var ", v594, " = ", v593)); + l209.fvalue(pv, l182.fvalue(pv, "var ", v594, " = ", v593)); return v594; - })(l250.fvalue(pv))); - })(l147.fvalue(pv, "[", l149.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l251; + })(l251.fvalue(pv))); + })(l148.fvalue(pv, "[", l150.fvalue(pv, l79.fvalue(pv, (function(){ + var symbol = l252; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v592), ", "), "]")); - })(l152.fvalue(pv, v581)) : l5.value))))); + })(l153.fvalue(pv, v581)) : l5.value))))); })(); })); - return l251; + return l252; })(); -((l220).value = ({car: l45.fvalue(pv, l176, (function (values,v596){ +((l221).value = ({car: l45.fvalue(pv, l177, (function (values,v596){ checkArgs(arguments, 2); return (function(){ - return l251.fvalue(values, v596); + return l252.fvalue(values, v596); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l252 = {name: "%WHILE"}; -((l220).value = ({car: l45.fvalue(pv, l252, (function (values,v598){ +var l253 = {name: "%WHILE"}; +((l221).value = ({car: l45.fvalue(pv, l253, (function (values,v598){ checkArgsAtLeast(arguments, 2); var v597= l5.value; for (var i = arguments.length-1; i>=2; i--) v597 = {car: arguments[i], cdr: v597}; return (function(){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "while(", l183.fvalue(pv, v598), " !== ", l183.fvalue(pv, l5.value), "){", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "while(", l184.fvalue(pv, v598), " !== ", l184.fvalue(pv, l5.value), "){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l243.fvalue(pv, v597)), "}", "return ", l183.fvalue(pv, l5.value), ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l244.fvalue(pv, v597)), "}", "return ", l184.fvalue(pv, l5.value), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l253 = {name: "SYMBOL-FUNCTION"}; -((l220).value = ({car: l45.fvalue(pv, l108, (function (values,v599){ +var l254 = {name: "SYMBOL-FUNCTION"}; +((l221).value = ({car: l45.fvalue(pv, l109, (function (values,v599){ checkArgs(arguments, 2); return (function(){ return ((l60.fvalue(pv, v599) !== l5.value ? (((function(){ var tmp = v599; return tmp === l5.value? l5.value: tmp.car; - })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l242.fvalue(values, l34.fvalue(pv, v599), l36.fvalue(pv, v599)) : (((function(){ + })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l243.fvalue(values, l34.fvalue(pv, v599), l36.fvalue(pv, v599)) : (((function(){ var tmp = v599; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(v600){ - return (v600 !== l5.value ? l190.fvalue(values, v600) : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l253), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v599)))))); - })(l201.fvalue(pv, v599, (function(){ - var symbol = l202; + return (v600 !== l5.value ? l191.fvalue(values, v600) : l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l254), l45.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v599)))))); + })(l202.fvalue(pv, v599, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l108)) : l5.value)); + })(), l109)) : l5.value)); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l254 = {name: "MAKE-FUNCTION-BINDING"}; +var l255 = {name: "MAKE-FUNCTION-BINDING"}; (function(){ - (l254).fvalue = (function(v602){ + (l255).fvalue = (function(v602){ ((v602)["fname"] = "MAKE-FUNCTION-BINDING"); return v602; })((function (values,v601){ checkArgs(arguments, 2); return (function(){ - return l187.fvalue(values, v601, l108, l204.fvalue(pv, v601)); + return l188.fvalue(values, v601, l109, l205.fvalue(pv, v601)); })(); })); - return l254; + return l255; })(); -var l255 = {name: "COMPILE-FUNCTION-DEFINITION"}; +var l256 = {name: "COMPILE-FUNCTION-DEFINITION"}; (function(){ - (l255).fvalue = (function(v604){ + (l256).fvalue = (function(v604){ ((v604)["fname"] = "COMPILE-FUNCTION-DEFINITION"); return v604; })((function (values,v603){ checkArgs(arguments, 2); return (function(){ - return l242.fvalue(values, (function(){ + return l243.fvalue(values, (function(){ var tmp = v603; return tmp === l5.value? l5.value: tmp.car; })(), (function(){ @@ -5254,30 +5270,30 @@ var l255 = {name: "COMPILE-FUNCTION-DEFINITION"}; })()); })(); })); - return l255; + return l256; })(); -var l256 = {name: "TRANSLATE-FUNCTION"}; +var l257 = {name: "TRANSLATE-FUNCTION"}; (function(){ - (l256).fvalue = (function(v607){ + (l257).fvalue = (function(v607){ ((v607)["fname"] = "TRANSLATE-FUNCTION"); return v607; })((function (values,v605){ checkArgs(arguments, 2); return (function(){ return (function(v606){ - return l190.fvalue(values, v606); - })(l201.fvalue(pv, v605, (function(){ - var symbol = l202; + return l191.fvalue(values, v606); + })(l202.fvalue(pv, v605, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l108)); + })(), l109)); })(); })); - return l256; + return l257; })(); -var l257 = {name: "FLET"}; -((l220).value = ({car: l45.fvalue(pv, l257, (function (values,v609){ +var l258 = {name: "FLET"}; +((l221).value = ({car: l45.fvalue(pv, l258, (function (values,v609){ checkArgsAtLeast(arguments, 2); var v608= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -5286,63 +5302,63 @@ var l257 = {name: "FLET"}; return (function(){ return (function(){ try { - var v614 = l202.value; - var v610 = l78.fvalue(pv, (function(){ + var v614 = l203.value; + var v610 = l79.fvalue(pv, (function(){ var symbol = l31; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v609); - var v611 = l78.fvalue(pv, (function(){ + var v611 = l79.fvalue(pv, (function(){ var symbol = l32; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v609); - var v612 = l78.fvalue(pv, (function(){ - var symbol = l255; + var v612 = l79.fvalue(pv, (function(){ + var symbol = l256; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v611); - ((l202).value = l200.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l254; + ((l203).value = l201.fvalue(pv, l79.fvalue(pv, (function(){ + var symbol = l255; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v610), (function(){ - var symbol = l202; + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l108)); - return l181.fvalue(values, "(function(", l149.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l256; + })(), l109)); + return l182.fvalue(values, "(function(", l150.fvalue(pv, l79.fvalue(pv, (function(){ + var symbol = l257; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v610), ","), "){", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), (function(v613){ - return l185.fvalue(pv, v613); - })(l243.fvalue(pv, v608, l4.value)), "})(", l149.fvalue(pv, v612, ","), ")"); + return l186.fvalue(pv, v613); + })(l244.fvalue(pv, v608, l4.value)), "})(", l150.fvalue(pv, v612, ","), ")"); } finally { - l202.value = v614; + l203.value = v614; } })(); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l258 = {name: "LABELS"}; -((l220).value = ({car: l45.fvalue(pv, l258, (function (values,v616){ +var l259 = {name: "LABELS"}; +((l221).value = ({car: l45.fvalue(pv, l259, (function (values,v616){ checkArgsAtLeast(arguments, 2); var v615= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -5351,85 +5367,85 @@ var l258 = {name: "LABELS"}; return (function(){ return (function(){ try { - var v619 = l202.value; - var v617 = l78.fvalue(pv, (function(){ + var v619 = l203.value; + var v617 = l79.fvalue(pv, (function(){ var symbol = l31; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v616); - ((l202).value = l200.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l254; + ((l203).value = l201.fvalue(pv, l79.fvalue(pv, (function(){ + var symbol = l255; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v617), (function(){ - var symbol = l202; + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l108)); - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + })(), l109)); + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v618){ + })(), l186.fvalue(pv, l152.fvalue(pv, (function (values,v618){ checkArgs(arguments, 2); - return l181.fvalue(values, "var ", l256.fvalue(pv, (function(){ + return l182.fvalue(values, "var ", l257.fvalue(pv, (function(){ var tmp = v618; return tmp === l5.value? l5.value: tmp.car; - })()), " = ", l242.fvalue(pv, l34.fvalue(pv, v618), l36.fvalue(pv, v618)), ";", (function(){ - var symbol = l146; + })()), " = ", l243.fvalue(pv, l34.fvalue(pv, v618), l36.fvalue(pv, v618)), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - }), v616), l243.fvalue(pv, v615, l4.value)), "})()"); + }), v616), l244.fvalue(pv, v615, l4.value)), "})()"); } finally { - l202.value = v619; + l203.value = v619; } })(); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l259 = {name: "*COMPILING-FILE*"}; +var l260 = {name: "*COMPILING-FILE*"}; (function(){ - (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = l5.value)); - return l259; + (((l260.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l260).value = l5.value)); + return l260; })(); -var l260 = {name: "EVAL-WHEN-COMPILE"}; -var l261 = {name: "EVAL"}; -((l220).value = ({car: l45.fvalue(pv, l260, (function (values){ +var l261 = {name: "EVAL-WHEN-COMPILE"}; +var l262 = {name: "EVAL"}; +((l221).value = ({car: l45.fvalue(pv, l261, (function (values){ var v620= l5.value; for (var i = arguments.length-1; i>=1; i--) v620 = {car: arguments[i], cdr: v620}; return (function(){ return ((function(){ - var symbol = l259; + var symbol = l260; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? (function(){ - l261.fvalue(pv, ({car: l117, cdr: v620})); + l262.fvalue(pv, ({car: l118, cdr: v620})); return l5.value; - })() : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l117), v620))); + })() : l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l118), v620))); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l262 = {name: "DEFINE-TRANSFORMATION"}; -l262; -((l220).value = ({car: l45.fvalue(pv, l117, (function (values){ +var l263 = {name: "DEFINE-TRANSFORMATION"}; +l263; +((l221).value = ({car: l45.fvalue(pv, l118, (function (values){ var v621= l5.value; for (var i = arguments.length-1; i>=1; i--) v621 = {car: arguments[i], cdr: @@ -5438,43 +5454,43 @@ l262; return (l13.fvalue(pv, (function(){ var tmp = v621; return tmp === l5.value? l5.value: tmp.cdr; - })()) !== l5.value ? l183.fvalue(values, (function(){ + })()) !== l5.value ? l184.fvalue(values, (function(){ var tmp = v621; return tmp === l5.value? l5.value: tmp.car; })(), (function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) : l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + })()) : l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l243.fvalue(pv, v621, l4.value)), "})()")); + })(), l186.fvalue(pv, l244.fvalue(pv, v621, l4.value)), "})()")); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l263 = {name: "SPECIAL-VARIABLE-P"}; +var l264 = {name: "SPECIAL-VARIABLE-P"}; (function(){ - (l263).fvalue = (function(v623){ + (l264).fvalue = (function(v623){ ((v623)["fname"] = "SPECIAL-VARIABLE-P"); return v623; })((function (values,v622){ checkArgs(arguments, 2); return (function(){ - return (l214.fvalue(pv, v622, l109, l216) !== l5.value ? l4.value : l5.value); + return (l215.fvalue(pv, v622, l110, l217) !== l5.value ? l4.value : l5.value); })(); })); - return l263; + return l264; })(); -var l264 = {name: "LET-BINDING-WRAPPER"}; +var l265 = {name: "LET-BINDING-WRAPPER"}; (function(){ - (l264).fvalue = (function(v630){ + (l265).fvalue = (function(v630){ ((v630)["fname"] = "LET-BINDING-WRAPPER"); return v630; })((function (values,v624,v625){ @@ -5485,21 +5501,21 @@ var l264 = {name: "LET-BINDING-WRAPPER"}; var values = mv; throw ({type: 'block', id: 218, values: v625, message: 'Return from unknown block LET-BINDING-WRAPPER.'}) })() : l5.value); - return l181.fvalue(values, "try {", (function(){ - var symbol = l146; + return l182.fvalue(values, "try {", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var tmp;", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var tmp;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l151.fvalue(pv, (function (values,v626){ + })(), l152.fvalue(pv, (function (values,v626){ checkArgs(arguments, 2); return (function(v627){ - return l181.fvalue(values, "tmp = ", v627, ".value;", (function(){ - var symbol = l146; + return l182.fvalue(values, "tmp = ", v627, ".value;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5507,7 +5523,7 @@ var l264 = {name: "LET-BINDING-WRAPPER"}; var tmp = v626; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5515,48 +5531,48 @@ var l264 = {name: "LET-BINDING-WRAPPER"}; var tmp = v626; return tmp === l5.value? l5.value: tmp.cdr; })(), " = tmp;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){ + })(l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, (function(){ var tmp = v626; return tmp === l5.value? l5.value: tmp.car; })())))); }), v624), v625, (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "finally {", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v628){ + })(), l186.fvalue(pv, l152.fvalue(pv, (function (values,v628){ checkArgs(arguments, 2); return (function(v629){ - return l181.fvalue(values, v629, ".value", " = ", (function(){ + return l182.fvalue(values, v629, ".value", " = ", (function(){ var tmp = v628; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){ + })(l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, (function(){ var tmp = v628; return tmp === l5.value? l5.value: tmp.car; })())))); }), v624)), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5570,10 +5586,10 @@ var l264 = {name: "LET-BINDING-WRAPPER"}; } })(); })); - return l264; + return l265; })(); -var l265 = {name: "LET"}; -((l220).value = ({car: l45.fvalue(pv, l265, (function (values,v632){ +var l266 = {name: "LET"}; +((l221).value = ({car: l45.fvalue(pv, l266, (function (values,v632){ checkArgsAtLeast(arguments, 2); var v631= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -5582,90 +5598,90 @@ var l265 = {name: "LET"}; return (function(){ return (function(){ try { - var v640 = l202.value; - var v633 = l78.fvalue(pv, (function(){ + var v640 = l203.value; + var v633 = l79.fvalue(pv, (function(){ var symbol = l59; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v632); - var v634 = l78.fvalue(pv, (function(){ + var v634 = l79.fvalue(pv, (function(){ var symbol = l40; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v633); - var v635 = l78.fvalue(pv, (function(){ - var symbol = l183; + var v635 = l79.fvalue(pv, (function(){ + var symbol = l184; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), l78.fvalue(pv, (function(){ + })(), l79.fvalue(pv, (function(){ var symbol = l41; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v633)); - ((l202).value = l206.fvalue(pv, l94.fvalue(pv, (function(){ - var symbol = l263; + ((l203).value = l207.fvalue(pv, l95.fvalue(pv, (function(){ + var symbol = l264; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v634))); var v636 = l5.value; - return l181.fvalue(values, "(function(", l149.fvalue(pv, l78.fvalue(pv, (function (values,v637){ + return l182.fvalue(values, "(function(", l150.fvalue(pv, l79.fvalue(pv, (function (values,v637){ checkArgs(arguments, 2); - return (l263.fvalue(pv, v637) !== l5.value ? (function(v638){ + return (l264.fvalue(pv, v637) !== l5.value ? (function(v638){ (v636 = ({car: ({car: v637, cdr: v638}), cdr: v636})); return v638; - })(l204.fvalue(pv, v637)) : l205.fvalue(values, v637)); + })(l205.fvalue(pv, v637)) : l206.fvalue(values, v637)); }), v634), ","), "){", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), (function(v639){ - return l185.fvalue(pv, l264.fvalue(pv, v636, v639)); - })(l243.fvalue(pv, v631, l4.value)), "})(", l149.fvalue(pv, v635, ","), ")"); + return l186.fvalue(pv, l265.fvalue(pv, v636, v639)); + })(l244.fvalue(pv, v631, l4.value)), "})(", l150.fvalue(pv, v635, ","), ")"); } finally { - l202.value = v640; + l203.value = v640; } })(); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l266 = {name: "LET*-INITIALIZE-VALUE"}; +var l267 = {name: "LET*-INITIALIZE-VALUE"}; (function(){ - (l266).fvalue = (function(v647){ + (l267).fvalue = (function(v647){ ((v647)["fname"] = "LET*-INITIALIZE-VALUE"); return v647; })((function (values,v641){ checkArgs(arguments, 2); return (function(){ return (function(v642,v643){ - return (l263.fvalue(pv, v642) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l114), l45.fvalue(pv, v642), l45.fvalue(pv, v643))), ";", (function(){ - var symbol = l146; + return (l264.fvalue(pv, v642) !== l5.value ? l182.fvalue(values, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l115), l45.fvalue(pv, v642), l45.fvalue(pv, v643))), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : (function(){ - var v644 = l204.fvalue(pv, v642); - var v645 = l187.fvalue(pv, v642, l109, v644); + var v644 = l205.fvalue(pv, v642); + var v645 = l188.fvalue(pv, v642, l110, v644); return (function(v646){ - l197.fvalue(pv, v645, (function(){ - var symbol = l202; + l198.fvalue(pv, v645, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l109); + })(), l110); return v646; - })(l181.fvalue(pv, "var ", v644, " = ", l183.fvalue(pv, v643), ";", (function(){ - var symbol = l146; + })(l182.fvalue(pv, "var ", v644, " = ", l184.fvalue(pv, v643), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5674,11 +5690,11 @@ var l266 = {name: "LET*-INITIALIZE-VALUE"}; })(l40.fvalue(pv, v641),l41.fvalue(pv, v641)); })(); })); - return l266; + return l267; })(); -var l267 = {name: "LET*-BINDING-WRAPPER"}; +var l268 = {name: "LET*-BINDING-WRAPPER"}; (function(){ - (l267).fvalue = (function(v656){ + (l268).fvalue = (function(v656){ ((v656)["fname"] = "LET*-BINDING-WRAPPER"); return v656; })((function (values,v648,v649){ @@ -5690,64 +5706,64 @@ var l267 = {name: "LET*-BINDING-WRAPPER"}; throw ({type: 'block', id: 221, values: v649, message: 'Return from unknown block LET*-BINDING-WRAPPER.'}) })() : l5.value); return (function(v651){ - return l181.fvalue(values, "try {", (function(){ - var symbol = l146; + return l182.fvalue(values, "try {", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v652){ + })(), l186.fvalue(pv, l152.fvalue(pv, (function (values,v652){ checkArgs(arguments, 2); return (function(v653){ - return l181.fvalue(values, "var ", (function(){ + return l182.fvalue(values, "var ", (function(){ var tmp = v652; return tmp === l5.value? l5.value: tmp.cdr; })(), " = ", v653, ".value;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){ + })(l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, (function(){ var tmp = v652; return tmp === l5.value? l5.value: tmp.car; })())))); }), v651), v649), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "finally {", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v654){ + })(), l186.fvalue(pv, l152.fvalue(pv, (function (values,v654){ checkArgs(arguments, 2); return (function(v655){ - return l181.fvalue(values, v655, ".value", " = ", (function(){ + return l182.fvalue(values, v655, ".value", " = ", (function(){ var tmp = v654; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){ + })(l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, (function(){ var tmp = v654; return tmp === l5.value? l5.value: tmp.car; })())))); }), v651)), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l78.fvalue(pv, (function (values,v650){ + })(l79.fvalue(pv, (function (values,v650){ checkArgs(arguments, 2); - return ({car: v650, cdr: l204.fvalue(pv, v650)}); - }), l95.fvalue(pv, (function(){ - var symbol = l263; + return ({car: v650, cdr: l205.fvalue(pv, v650)}); + }), l96.fvalue(pv, (function(){ + var symbol = l264; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; @@ -5761,10 +5777,10 @@ var l267 = {name: "LET*-BINDING-WRAPPER"}; } })(); })); - return l267; + return l268; })(); -var l268 = {name: "LET*"}; -((l220).value = ({car: l45.fvalue(pv, l268, (function (values,v658){ +var l269 = {name: "LET*"}; +((l221).value = ({car: l45.fvalue(pv, l269, (function (values,v658){ checkArgsAtLeast(arguments, 2); var v657= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -5774,62 +5790,62 @@ var l268 = {name: "LET*"}; return (function(v659,v660){ try { var tmp; - tmp = l202.value; - l202.value = v660; + tmp = l203.value; + l203.value = v660; v660 = tmp; - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, (function(v661,v662){ - return l267.fvalue(pv, v661, v662); - })(l95.fvalue(pv, (function(){ - var symbol = l263; + })(), l186.fvalue(pv, (function(v661,v662){ + return l268.fvalue(pv, v661, v662); + })(l96.fvalue(pv, (function(){ + var symbol = l264; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), l78.fvalue(pv, (function(){ + })(), l79.fvalue(pv, (function(){ var symbol = l40; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v659)),l147.fvalue(pv, l151.fvalue(pv, (function(){ - var symbol = l266; + })(), v659)),l148.fvalue(pv, l152.fvalue(pv, (function(){ + var symbol = l267; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v659), l243.fvalue(pv, v657, l4.value)))), "})()"); + })(), v659), l244.fvalue(pv, v657, l4.value)))), "})()"); } finally { - l202.value = v660; + l203.value = v660; } - })(l78.fvalue(pv, (function(){ + })(l79.fvalue(pv, (function(){ var symbol = l59; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v658),l196.fvalue(pv, (function(){ - var symbol = l202; + })(), v658),l197.fvalue(pv, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l269 = {name: "*BLOCK-COUNTER*"}; +var l270 = {name: "*BLOCK-COUNTER*"}; (function(){ - (((l269.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l269).value = 0)); - return l269; + (((l270.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l270).value = 0)); + return l270; })(); -var l270 = {name: "MULTIPLE-VALUE"}; -var l271 = {name: "USED"}; -((l220).value = ({car: l45.fvalue(pv, l198, (function (values,v664){ +var l271 = {name: "MULTIPLE-VALUE"}; +var l272 = {name: "USED"}; +((l221).value = ({car: l45.fvalue(pv, l199, (function (values,v664){ checkArgsAtLeast(arguments, 2); var v663= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -5837,9 +5853,9 @@ var l271 = {name: "USED"}; v663}; return (function(){ return (function(){ - var v665 = ((l269).value = (function(){ + var v665 = ((l270).value = (function(){ var x1 = (function(){ - var symbol = l269; + var symbol = l270; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5847,94 +5863,94 @@ var l271 = {name: "USED"}; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; })()); - var v666 = l187.fvalue(pv, v664, l198, v665); + var v666 = l188.fvalue(pv, v664, l199, v665); ((function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l194.fvalue(pv, l270, v666) : l5.value); + })() !== l5.value ? l195.fvalue(pv, l271, v666) : l5.value); return (function(){ try { - var v668 = l202.value; - ((l202).value = l200.fvalue(pv, l45.fvalue(pv, v666), (function(){ - var symbol = l202; + var v668 = l203.value; + ((l203).value = l201.fvalue(pv, l45.fvalue(pv, v666), (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l198)); - var v667 = l243.fvalue(pv, v663, l4.value); - return (l92.fvalue(pv, l271, l191.fvalue(pv, v666)) !== l5.value ? l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + })(), l199)); + var v667 = l244.fvalue(pv, v663, l4.value); + return (l93.fvalue(pv, l272, l192.fvalue(pv, v666)) !== l5.value ? l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "try {", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "try {", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, v667), "}", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, v667), "}", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "catch (cf){", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " if (cf.type == 'block' && cf.id == ", v665, ")", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), ((function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? " return values.apply(this, forcemv(cf.values));" : " return cf.values;"), (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " else", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " throw cf;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), "})()") : l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + })()), "})()") : l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, v667), "})()")); + })(), l186.fvalue(pv, v667), "})()")); } finally { - l202.value = v668; + l203.value = v668; } })(); })(); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l272 = {name: "RETURN-FROM"}; -((l220).value = ({car: l45.fvalue(pv, l272, (function (values,v669,v670){ +var l273 = {name: "RETURN-FROM"}; +((l221).value = ({car: l45.fvalue(pv, l273, (function (values,v669,v670){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); switch(arguments.length-1){ @@ -5944,147 +5960,147 @@ var l272 = {name: "RETURN-FROM"}; } return (function(){ return (function(){ - var v671 = l201.fvalue(pv, v669, (function(){ - var symbol = l202; + var v671 = l202.fvalue(pv, v669, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l198); - var v672 = l92.fvalue(pv, l270, l191.fvalue(pv, v671)); + })(), l199); + var v672 = l93.fvalue(pv, l271, l192.fvalue(pv, v671)); (l13.fvalue(pv, v671) !== l5.value ? (function(){ - throw l147.fvalue(pv, "Unknown block `", (v669).name, "'."); + throw l148.fvalue(pv, "Unknown block `", (v669).name, "'."); })() : l5.value); - l194.fvalue(pv, l271, v671); - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + l195.fvalue(pv, l272, v671); + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, (v672 !== l5.value ? l181.fvalue(pv, "var values = mv;", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, (v672 !== l5.value ? l182.fvalue(pv, "var values = mv;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l190.fvalue(pv, v671), ", ", "values: ", l183.fvalue(pv, v670, v672), ", ", "message: 'Return from unknown block ", (v669).name, ".'", "})"), "})()"); + })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l191.fvalue(pv, v671), ", ", "values: ", l184.fvalue(pv, v670, v672), ", ", "message: 'Return from unknown block ", (v669).name, ".'", "})"), "})()"); })(); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l273 = {name: "CATCH"}; -((l220).value = ({car: l45.fvalue(pv, l273, (function (values,v674){ +var l274 = {name: "CATCH"}; +((l221).value = ({car: l45.fvalue(pv, l274, (function (values,v674){ checkArgsAtLeast(arguments, 2); var v673= l5.value; for (var i = arguments.length-1; i>=2; i--) v673 = {car: arguments[i], cdr: v673}; return (function(){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var id = ", l183.fvalue(pv, v674), ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var id = ", l184.fvalue(pv, v674), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "try {", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l243.fvalue(pv, v673, l4.value)), (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l244.fvalue(pv, v673, l4.value)), (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "catch (cf){", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " if (cf.type == 'catch' && cf.id == id)", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), ((function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? " return values.apply(this, forcemv(cf.values));" : " return pv.apply(this, forcemv(cf.values));"), (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " else", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " throw cf;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l274 = {name: "THROW"}; -((l220).value = ({car: l45.fvalue(pv, l274, (function (values,v675,v676){ +var l275 = {name: "THROW"}; +((l221).value = ({car: l45.fvalue(pv, l275, (function (values,v675,v676){ checkArgs(arguments, 3); return (function(){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var values = mv;", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var values = mv;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "throw ({", "type: 'catch', ", "id: ", l183.fvalue(pv, v675), ", ", "values: ", l183.fvalue(pv, v676, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()"); + })(), "throw ({", "type: 'catch', ", "id: ", l184.fvalue(pv, v675), ", ", "values: ", l184.fvalue(pv, v676, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()"); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l275 = {name: "*TAGBODY-COUNTER*"}; -(function(){ - (((l275.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l275).value = 0)); - return l275; -})(); -var l276 = {name: "*GO-TAG-COUNTER*"}; +var l276 = {name: "*TAGBODY-COUNTER*"}; (function(){ (((l276.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l276).value = 0)); return l276; })(); -var l277 = {name: "GO-TAG-P"}; +var l277 = {name: "*GO-TAG-COUNTER*"}; (function(){ - (l277).fvalue = (function(v679){ + (((l277.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l277).value = 0)); + return l277; +})(); +var l278 = {name: "GO-TAG-P"}; +(function(){ + (l278).fvalue = (function(v679){ ((v679)["fname"] = "GO-TAG-P"); return v679; })((function (values,v677){ @@ -6095,33 +6111,33 @@ var l277 = {name: "GO-TAG-P"}; var tmp = v677; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value)); - })(l85.fvalue(pv, v677)); + })(l86.fvalue(pv, v677)); })(); })); - return l277; + return l278; })(); -var l278 = {name: "DECLARE-TAGBODY-TAGS"}; +var l279 = {name: "DECLARE-TAGBODY-TAGS"}; (function(){ - (l278).fvalue = (function(v685){ + (l279).fvalue = (function(v685){ ((v685)["fname"] = "DECLARE-TAGBODY-TAGS"); return v685; })((function (values,v680,v681){ checkArgs(arguments, 3); return (function(){ return (function(v684){ - return l200.fvalue(values, v684, (function(){ - var symbol = l202; + return l201.fvalue(values, v684, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l199); - })(l78.fvalue(pv, (function (values,v682){ + })(), l200); + })(l79.fvalue(pv, (function (values,v682){ checkArgs(arguments, 2); return (function(v683){ - return l187.fvalue(values, v682, l199, l45.fvalue(pv, v680, v683)); - })(l18.fvalue(pv, ((l276).value = (function(){ + return l188.fvalue(values, v682, l200, l45.fvalue(pv, v680, v683)); + })(l18.fvalue(pv, ((l277).value = (function(){ var x1 = (function(){ - var symbol = l276; + var symbol = l277; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6129,34 +6145,34 @@ var l278 = {name: "DECLARE-TAGBODY-TAGS"}; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; })()))); - }), l95.fvalue(pv, (function(){ - var symbol = l277; + }), l96.fvalue(pv, (function(){ + var symbol = l278; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v681))); })(); })); - return l278; + return l279; })(); -var l279 = {name: "TAGBODY"}; -((l220).value = ({car: l45.fvalue(pv, l279, (function (values){ +var l280 = {name: "TAGBODY"}; +((l221).value = ({car: l45.fvalue(pv, l280, (function (values){ var v686= l5.value; for (var i = arguments.length-1; i>=1; i--) v686 = {car: arguments[i], cdr: v686}; return (function(){ try { - (l99.fvalue(pv, (function(){ - var symbol = l277; + (l100.fvalue(pv, (function(){ + var symbol = l278; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v686) !== l5.value ? l5.value : (function(){ var values = mv; - throw ({type: 'block', id: 229, values: l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l117), v686, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'}) + throw ({type: 'block', id: 229, values: l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l118), v686, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'}) })()); - (l277.fvalue(pv, (function(){ + (l278.fvalue(pv, (function(){ var tmp = v686; return tmp === l5.value? l5.value: tmp.car; })()) !== l5.value ? l5.value : (v686 = ({car: l17.fvalue(pv, "START"), cdr: v686}))); @@ -6164,50 +6180,50 @@ var l279 = {name: "TAGBODY"}; return (function(v689,v688){ try { var tmp; - tmp = l202.value; - l202.value = v689; + tmp = l203.value; + l203.value = v689; v689 = tmp; (function(v690){ - return (v688 = l41.fvalue(pv, l190.fvalue(pv, v690))); - })(l201.fvalue(pv, l40.fvalue(pv, v686), (function(){ - var symbol = l202; + return (v688 = l41.fvalue(pv, l191.fvalue(pv, v690))); + })(l202.fvalue(pv, l40.fvalue(pv, v686), (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l199)); - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + })(), l200)); + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var tagbody_", v687, " = ", v688, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var tagbody_", v687, " = ", v688, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "tbloop:", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "while (true) {", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "try {", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "try {", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, (function(v691){ - return l181.fvalue(pv, "switch(tagbody_", v687, "){", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, (function(v691){ + return l182.fvalue(pv, "switch(tagbody_", v687, "){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "case ", v688, ":", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6220,24 +6236,24 @@ var l279 = {name: "TAGBODY"}; return tmp === l5.value? l5.value: tmp.car; })()); (function(){ - (v691 = l147.fvalue(pv, v691, (l28.fvalue(pv, l277.fvalue(pv, v693)) !== l5.value ? l185.fvalue(pv, l183.fvalue(pv, v693), ";", (function(){ - var symbol = l146; + (v691 = l148.fvalue(pv, v691, (l28.fvalue(pv, l278.fvalue(pv, v693)) !== l5.value ? l186.fvalue(pv, l184.fvalue(pv, v693), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : (function(v694){ - return l181.fvalue(pv, "case ", l41.fvalue(pv, l190.fvalue(pv, v694)), ":", (function(){ - var symbol = l146; + return l182.fvalue(pv, "case ", l41.fvalue(pv, l191.fvalue(pv, v694)), ":", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l201.fvalue(pv, v693, (function(){ - var symbol = l202; + })(l202.fvalue(pv, v693, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l199))))); + })(), l200))))); return l5.value; })(); (v692 = (function(){ @@ -6252,74 +6268,74 @@ var l279 = {name: "TAGBODY"}; return tmp === l5.value? l5.value: tmp.cdr; })(),l5.value); })(), "default:", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " break tbloop;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); })("")), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "catch (jump) {", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " if (jump.type == 'tagbody' && jump.id == ", v687, ")", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " tagbody_", v687, " = jump.label;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " else", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " throw(jump);", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return ", l183.fvalue(pv, l5.value), ";", (function(){ - var symbol = l146; + })(), "return ", l184.fvalue(pv, l5.value), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); } finally { - l202.value = v689; + l203.value = v689; } - })(l278.fvalue(pv, v687, v686),l5.value); + })(l279.fvalue(pv, v687, v686),l5.value); })((function(){ - var symbol = l275; + var symbol = l276; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6333,225 +6349,225 @@ var l279 = {name: "TAGBODY"}; } })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l280 = {name: "GO"}; -((l220).value = ({car: l45.fvalue(pv, l280, (function (values,v695){ +var l281 = {name: "GO"}; +((l221).value = ({car: l45.fvalue(pv, l281, (function (values,v695){ checkArgs(arguments, 2); return (function(){ return (function(v696,v697){ (l13.fvalue(pv, v696) !== l5.value ? (function(){ - throw l147.fvalue(pv, "Unknown tag `", v697, "'."); + throw l148.fvalue(pv, "Unknown tag `", v697, "'."); })() : l5.value); - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l190.fvalue(pv, v696)), ", ", "label: ", l41.fvalue(pv, l190.fvalue(pv, v696)), ", ", "message: 'Attempt to GO to non-existing tag ", v697, "'", "})", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l191.fvalue(pv, v696)), ", ", "label: ", l41.fvalue(pv, l191.fvalue(pv, v696)), ", ", "message: 'Attempt to GO to non-existing tag ", v697, "'", "})", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l201.fvalue(pv, v695, (function(){ - var symbol = l202; + })(l202.fvalue(pv, v695, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l199),(((function(){ + })(), l200),(((function(){ var tmp = v695; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? (v695).name : (l85.fvalue(pv, v695) !== l5.value ? l18.fvalue(pv, v695) : l5.value))); + })()?l4.value: l5.value) !== l5.value ? (v695).name : (l86.fvalue(pv, v695) !== l5.value ? l18.fvalue(pv, v695) : l5.value))); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l281 = {name: "UNWIND-PROTECT"}; -((l220).value = ({car: l45.fvalue(pv, l281, (function (values,v699){ +var l282 = {name: "UNWIND-PROTECT"}; +((l221).value = ({car: l45.fvalue(pv, l282, (function (values,v699){ checkArgsAtLeast(arguments, 2); var v698= l5.value; for (var i = arguments.length-1; i>=2; i--) v698 = {car: arguments[i], cdr: v698}; return (function(){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var ret = ", l183.fvalue(pv, l5.value), ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var ret = ", l184.fvalue(pv, l5.value), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "try {", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "ret = ", l183.fvalue(pv, v699), ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "ret = ", l184.fvalue(pv, v699), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "} finally {", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l243.fvalue(pv, v698)), "}", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l244.fvalue(pv, v698)), "}", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return ret;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l282 = {name: "MULTIPLE-VALUE-CALL"}; -((l220).value = ({car: l45.fvalue(pv, l282, (function (values,v701){ +var l283 = {name: "MULTIPLE-VALUE-CALL"}; +((l221).value = ({car: l45.fvalue(pv, l283, (function (values,v701){ checkArgsAtLeast(arguments, 2); var v700= l5.value; for (var i = arguments.length-1; i>=2; i--) v700 = {car: arguments[i], cdr: v700}; return (function(){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var func = ", l183.fvalue(pv, v701), ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var func = ", l184.fvalue(pv, v701), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var args = [", ((function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? "values" : "pv"), "];", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return ", l181.fvalue(pv, "(function(){", (function(){ - var symbol = l146; + })(), "return ", l182.fvalue(pv, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var values = mv;", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var values = mv;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var vs;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l151.fvalue(pv, (function (values,v702){ + })(), l152.fvalue(pv, (function (values,v702){ checkArgs(arguments, 2); - return l181.fvalue(values, "vs = ", l183.fvalue(pv, v702, l4.value), ";", (function(){ - var symbol = l146; + return l182.fvalue(values, "vs = ", l184.fvalue(pv, v702, l4.value), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "args = args.concat(vs);", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "args = args.concat(vs);", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "else", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "args.push(vs);", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "args.push(vs);", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())); }), v700), "return func.apply(window, args);", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"), ";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l283 = {name: "MULTIPLE-VALUE-PROG1"}; -((l220).value = ({car: l45.fvalue(pv, l283, (function (values,v704){ +var l284 = {name: "MULTIPLE-VALUE-PROG1"}; +((l221).value = ({car: l45.fvalue(pv, l284, (function (values,v704){ checkArgsAtLeast(arguments, 2); var v703= l5.value; for (var i = arguments.length-1; i>=2; i--) v703 = {car: arguments[i], cdr: v703}; return (function(){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var args = ", l183.fvalue(pv, v704, (function(){ - var symbol = l186; + })(), l186.fvalue(pv, "var args = ", l184.fvalue(pv, v704, (function(){ + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), ";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l243.fvalue(pv, v703), "return args;", (function(){ - var symbol = l146; + })(), l244.fvalue(pv, v703), "return args;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l284 = {name: "BACKQUOTE-EXPAND-1"}; +var l285 = {name: "BACKQUOTE-EXPAND-1"}; (function(){ - (l284).fvalue = (function(v707){ + (l285).fvalue = (function(v707){ ((v707)["fname"] = "BACKQUOTE-EXPAND-1"); return v707; })((function (values,v705){ @@ -6560,32 +6576,32 @@ var l284 = {name: "BACKQUOTE-EXPAND-1"}; return (((function(){ var tmp = v705; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l176, v705) : (l46.fvalue(pv, v705) !== l5.value ? v705 : ((((function(){ + })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l177, v705) : (l46.fvalue(pv, v705) !== l5.value ? v705 : ((((function(){ var tmp = v705; return tmp === l5.value? l5.value: tmp.car; - })() === l179)?l4.value: l5.value) !== l5.value ? (function(){ + })() === l180)?l4.value: l5.value) !== l5.value ? (function(){ var tmp = v705; return tmp === l5.value? l5.value: tmp.car; })() : ((((function(){ var tmp = v705; return tmp === l5.value? l5.value: tmp.car; - })() === l177)?l4.value: l5.value) !== l5.value ? l284.fvalue(values, l284.fvalue(pv, l34.fvalue(pv, v705))) : ({car: l65, cdr: l78.fvalue(pv, (function (values,v706){ + })() === l178)?l4.value: l5.value) !== l5.value ? l285.fvalue(values, l285.fvalue(pv, l34.fvalue(pv, v705))) : ({car: l66, cdr: l79.fvalue(pv, (function (values,v706){ checkArgs(arguments, 2); return ((l60.fvalue(pv, v706) !== l5.value ? (((function(){ var tmp = v706; return tmp === l5.value? l5.value: tmp.car; - })() === l179)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v706)) : ((l60.fvalue(pv, v706) !== l5.value ? (((function(){ + })() === l180)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v706)) : ((l60.fvalue(pv, v706) !== l5.value ? (((function(){ var tmp = v706; return tmp === l5.value? l5.value: tmp.car; - })() === l178)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v706) : l45.fvalue(values, l45, l284.fvalue(pv, v706)))); + })() === l179)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v706) : l45.fvalue(values, l45, l285.fvalue(pv, v706)))); }), v705)}))))); })(); })); - return l284; + return l285; })(); -var l285 = {name: "BACKQUOTE-EXPAND"}; +var l286 = {name: "BACKQUOTE-EXPAND"}; (function(){ - (l285).fvalue = (function(v709){ + (l286).fvalue = (function(v709){ ((v709)["fname"] = "BACKQUOTE-EXPAND"); return v709; })((function (values,v708){ @@ -6594,37 +6610,37 @@ var l285 = {name: "BACKQUOTE-EXPAND"}; return ((l60.fvalue(pv, v708) !== l5.value ? (((function(){ var tmp = v708; return tmp === l5.value? l5.value: tmp.car; - })() === l177)?l4.value: l5.value) : l5.value) !== l5.value ? l284.fvalue(values, l34.fvalue(pv, v708)) : v708); + })() === l178)?l4.value: l5.value) : l5.value) !== l5.value ? l285.fvalue(values, l34.fvalue(pv, v708)) : v708); })(); })); - return l285; + return l286; })(); -l177; -((l220).value = ({car: l45.fvalue(pv, l177, (function (values,v710){ +l178; +((l221).value = ({car: l45.fvalue(pv, l178, (function (values,v710){ checkArgs(arguments, 2); return (function(){ - return l183.fvalue(values, l284.fvalue(pv, v710)); + return l184.fvalue(values, l285.fvalue(pv, v710)); })(); })), cdr: (function(){ - var symbol = l220; + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l286 = {name: "*BUILTINS*"}; +var l287 = {name: "*BUILTINS*"}; (function(){ - (((l286.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l286).value = l5.value)); - return l286; + (((l287.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l287).value = l5.value)); + return l287; })(); -var l287 = {name: "DEFINE-RAW-BUILTIN"}; -l287; -var l288 = {name: "DEFINE-BUILTIN"}; +var l288 = {name: "DEFINE-RAW-BUILTIN"}; l288; -var l289 = {name: "TYPE-CHECK"}; +var l289 = {name: "DEFINE-BUILTIN"}; l289; -var l290 = {name: "VARIABLE-ARITY-CALL"}; +var l290 = {name: "TYPE-CHECK"}; +l290; +var l291 = {name: "VARIABLE-ARITY-CALL"}; (function(){ - (l290).fvalue = (function(v719){ + (l291).fvalue = (function(v719){ ((v719)["fname"] = "VARIABLE-ARITY-CALL"); return v719; })((function (values,v711,v712){ @@ -6648,18 +6664,18 @@ var l290 = {name: "VARIABLE-ARITY-CALL"}; (function(){ (((typeof (v717) == "number")?l4.value: l5.value) !== l5.value ? (v714 = ({car: l18.fvalue(pv, v717), cdr: v714})) : (function(v718){ (v714 = ({car: v718, cdr: v714})); - return (v715 = l147.fvalue(pv, v715, l181.fvalue(pv, "var ", v718, " = ", l183.fvalue(pv, v717), ";", (function(){ - var symbol = l146; + return (v715 = l148.fvalue(pv, v715, l182.fvalue(pv, "var ", v718, " = ", l184.fvalue(pv, v717), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (typeof ", v718, " !== 'number') throw 'Not a number!';", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()))); - })(l181.fvalue(pv, "x", (v713 = (function(){ + })(l182.fvalue(pv, "x", (v713 = (function(){ var x1 = v713; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; @@ -6675,82 +6691,82 @@ var l290 = {name: "VARIABLE-ARITY-CALL"}; return l5.value; })(v711,l5.value); })(); - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, v715, (v712)(pv, l67.fvalue(pv, v714))), "})()"); + })(), l186.fvalue(pv, v715, (v712)(pv, l68.fvalue(pv, v714))), "})()"); })(0,l5,""); })(); })); - return l290; + return l291; })(); -var l291 = {name: "VARIABLE-ARITY"}; -l291; -var l292 = {name: "NUM-OP-NUM"}; +var l292 = {name: "VARIABLE-ARITY"}; +l292; +var l293 = {name: "NUM-OP-NUM"}; (function(){ - (l292).fvalue = (function(v723){ + (l293).fvalue = (function(v723){ ((v723)["fname"] = "NUM-OP-NUM"); return v723; })((function (values,v720,v721,v722){ checkArgs(arguments, 4); return (function(){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v720, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v720, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "var ", "y", " = ", v722, ";", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "var ", "y", " = ", v722, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "x", v721, "y"), ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", l182.fvalue(pv, "x", v721, "y"), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); })(); })); - return l292; + return l293; })(); -((l286).value = ({car: l45.fvalue(pv, l62, (function (values){ +((l287).value = ({car: l45.fvalue(pv, l63, (function (values){ var v724= l5.value; for (var i = arguments.length-1; i>=1; i--) v724 = {car: arguments[i], cdr: v724}; return (function(){ - return (l13.fvalue(pv, v724) !== l5.value ? "0" : l290.fvalue(values, v724, (function (values,v725){ + return (l13.fvalue(pv, v724) !== l5.value ? "0" : l291.fvalue(values, v724, (function (values,v725){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", l149.fvalue(pv, v725, "+"), ";", (function(){ - var symbol = l146; + return l182.fvalue(values, "return ", l150.fvalue(pv, v725, "+"), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6758,12 +6774,12 @@ var l292 = {name: "NUM-OP-NUM"}; }))); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l63, (function (values,v727){ +((l287).value = ({car: l45.fvalue(pv, l64, (function (values,v727){ checkArgsAtLeast(arguments, 2); var v726= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -6771,13 +6787,13 @@ var l292 = {name: "NUM-OP-NUM"}; v726}; return (function(){ return (function(v728){ - return l290.fvalue(values, v728, (function (values,v729){ + return l291.fvalue(values, v728, (function (values,v729){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", (l13.fvalue(pv, v726) !== l5.value ? l147.fvalue(pv, "-", (function(){ + return l182.fvalue(values, "return ", (l13.fvalue(pv, v726) !== l5.value ? l148.fvalue(pv, "-", (function(){ var tmp = v729; return tmp === l5.value? l5.value: tmp.car; - })()) : l149.fvalue(pv, v729, "-")), ";", (function(){ - var symbol = l146; + })()) : l150.fvalue(pv, v729, "-")), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6786,21 +6802,21 @@ var l292 = {name: "NUM-OP-NUM"}; })(({car: v727, cdr: v726})); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l21, (function (values){ +((l287).value = ({car: l45.fvalue(pv, l21, (function (values){ var v730= l5.value; for (var i = arguments.length-1; i>=1; i--) v730 = {car: arguments[i], cdr: v730}; return (function(){ - return (l13.fvalue(pv, v730) !== l5.value ? "1" : l290.fvalue(values, v730, (function (values,v731){ + return (l13.fvalue(pv, v730) !== l5.value ? "1" : l291.fvalue(values, v730, (function (values,v731){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", l149.fvalue(pv, v731, "*"), ";", (function(){ - var symbol = l146; + return l182.fvalue(values, "return ", l150.fvalue(pv, v731, "*"), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6808,12 +6824,12 @@ var l292 = {name: "NUM-OP-NUM"}; }))); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l22, (function (values,v733){ +((l287).value = ({car: l45.fvalue(pv, l22, (function (values,v733){ checkArgsAtLeast(arguments, 2); var v732= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -6821,13 +6837,13 @@ var l292 = {name: "NUM-OP-NUM"}; v732}; return (function(){ return (function(v734){ - return l290.fvalue(values, v734, (function (values,v735){ + return l291.fvalue(values, v734, (function (values,v735){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", (l13.fvalue(pv, v732) !== l5.value ? l147.fvalue(pv, "1 /", (function(){ + return l182.fvalue(values, "return ", (l13.fvalue(pv, v732) !== l5.value ? l148.fvalue(pv, "1 /", (function(){ var tmp = v735; return tmp === l5.value? l5.value: tmp.car; - })()) : l149.fvalue(pv, v735, "/")), ";", (function(){ - var symbol = l146; + })()) : l150.fvalue(pv, v735, "/")), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6836,28 +6852,28 @@ var l292 = {name: "NUM-OP-NUM"}; })(({car: v733, cdr: v732})); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l293 = {name: "MOD"}; -((l286).value = ({car: l45.fvalue(pv, l293, (function (values,v736,v737){ +var l294 = {name: "MOD"}; +((l287).value = ({car: l45.fvalue(pv, l294, (function (values,v736,v737){ checkArgs(arguments, 3); return (function(){ return (function(v738,v739){ - return l292.fvalue(values, v738, "%", v739); - })(l183.fvalue(pv, v736),l183.fvalue(pv, v737)); + return l293.fvalue(values, v738, "%", v739); + })(l184.fvalue(pv, v736),l184.fvalue(pv, v737)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l294 = {name: "COMPARISON-CONJUNTION"}; +var l295 = {name: "COMPARISON-CONJUNTION"}; (function(){ - (l294).fvalue = (function(v742){ + (l295).fvalue = (function(v742){ ((v742)["fname"] = "COMPARISON-CONJUNTION"); return v742; })((function (values,v740,v741){ @@ -6866,24 +6882,24 @@ var l294 = {name: "COMPARISON-CONJUNTION"}; return (l13.fvalue(pv, (function(){ var tmp = v740; return tmp === l5.value? l5.value: tmp.cdr; - })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v740)) !== l5.value ? l147.fvalue(values, (function(){ + })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v740)) !== l5.value ? l148.fvalue(values, (function(){ var tmp = v740; return tmp === l5.value? l5.value: tmp.car; - })(), v741, l34.fvalue(pv, v740)) : l147.fvalue(values, (function(){ + })(), v741, l34.fvalue(pv, v740)) : l148.fvalue(values, (function(){ var tmp = v740; return tmp === l5.value? l5.value: tmp.car; - })(), v741, l34.fvalue(pv, v740), " && ", l294.fvalue(pv, (function(){ + })(), v741, l34.fvalue(pv, v740), " && ", l295.fvalue(pv, (function(){ var tmp = v740; return tmp === l5.value? l5.value: tmp.cdr; })(), v741)))); })(); })); - return l294; + return l295; })(); -var l295 = {name: "DEFINE-BUILTIN-COMPARISON"}; -l295; -var l296 = {name: ">"}; -((l286).value = ({car: l45.fvalue(pv, l296, (function (values,v744){ +var l296 = {name: "DEFINE-BUILTIN-COMPARISON"}; +l296; +var l297 = {name: ">"}; +((l287).value = ({car: l45.fvalue(pv, l297, (function (values,v744){ checkArgsAtLeast(arguments, 2); var v743= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -6891,10 +6907,10 @@ var l296 = {name: ">"}; v743}; return (function(){ return (function(v745){ - return l290.fvalue(values, v745, (function (values,v746){ + return l291.fvalue(values, v745, (function (values,v746){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v746, ">")), ";", (function(){ - var symbol = l146; + return l182.fvalue(values, "return ", l183.fvalue(pv, l295.fvalue(pv, v746, ">")), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6903,13 +6919,13 @@ var l296 = {name: ">"}; })(({car: v744, cdr: v743})); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l297 = {name: "<"}; -((l286).value = ({car: l45.fvalue(pv, l297, (function (values,v748){ +var l298 = {name: "<"}; +((l287).value = ({car: l45.fvalue(pv, l298, (function (values,v748){ checkArgsAtLeast(arguments, 2); var v747= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -6917,10 +6933,10 @@ var l297 = {name: "<"}; v747}; return (function(){ return (function(v749){ - return l290.fvalue(values, v749, (function (values,v750){ + return l291.fvalue(values, v749, (function (values,v750){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v750, "<")), ";", (function(){ - var symbol = l146; + return l182.fvalue(values, "return ", l183.fvalue(pv, l295.fvalue(pv, v750, "<")), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6929,13 +6945,13 @@ var l297 = {name: "<"}; })(({car: v748, cdr: v747})); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l298 = {name: ">="}; -((l286).value = ({car: l45.fvalue(pv, l298, (function (values,v752){ +var l299 = {name: ">="}; +((l287).value = ({car: l45.fvalue(pv, l299, (function (values,v752){ checkArgsAtLeast(arguments, 2); var v751= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -6943,10 +6959,10 @@ var l298 = {name: ">="}; v751}; return (function(){ return (function(v753){ - return l290.fvalue(values, v753, (function (values,v754){ + return l291.fvalue(values, v753, (function (values,v754){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v754, ">=")), ";", (function(){ - var symbol = l146; + return l182.fvalue(values, "return ", l183.fvalue(pv, l295.fvalue(pv, v754, ">=")), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6955,13 +6971,13 @@ var l298 = {name: ">="}; })(({car: v752, cdr: v751})); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l299 = {name: "<="}; -((l286).value = ({car: l45.fvalue(pv, l299, (function (values,v756){ +var l300 = {name: "<="}; +((l287).value = ({car: l45.fvalue(pv, l300, (function (values,v756){ checkArgsAtLeast(arguments, 2); var v755= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -6969,10 +6985,10 @@ var l299 = {name: "<="}; v755}; return (function(){ return (function(v757){ - return l290.fvalue(values, v757, (function (values,v758){ + return l291.fvalue(values, v757, (function (values,v758){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v758, "<=")), ";", (function(){ - var symbol = l146; + return l182.fvalue(values, "return ", l183.fvalue(pv, l295.fvalue(pv, v758, "<=")), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6981,12 +6997,12 @@ var l299 = {name: "<="}; })(({car: v756, cdr: v755})); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l20, (function (values,v760){ +((l287).value = ({car: l45.fvalue(pv, l20, (function (values,v760){ checkArgsAtLeast(arguments, 2); var v759= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -6994,10 +7010,10 @@ var l299 = {name: "<="}; v759}; return (function(){ return (function(v761){ - return l290.fvalue(values, v761, (function (values,v762){ + return l291.fvalue(values, v761, (function (values,v762){ checkArgs(arguments, 2); - return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v762, "==")), ";", (function(){ - var symbol = l146; + return l182.fvalue(values, "return ", l183.fvalue(pv, l295.fvalue(pv, v762, "==")), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7006,625 +7022,625 @@ var l299 = {name: "<="}; })(({car: v760, cdr: v759})); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l300 = {name: "NUMBERP"}; -((l286).value = ({car: l45.fvalue(pv, l300, (function (values,v763){ +var l301 = {name: "NUMBERP"}; +((l287).value = ({car: l45.fvalue(pv, l301, (function (values,v763){ checkArgs(arguments, 2); return (function(){ return (function(v764){ - return l182.fvalue(values, l181.fvalue(pv, "(typeof (", v764, ") == \"number\")")); - })(l183.fvalue(pv, v763)); + return l183.fvalue(values, l182.fvalue(pv, "(typeof (", v764, ") == \"number\")")); + })(l184.fvalue(pv, v763)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l301 = {name: "FLOOR"}; -((l286).value = ({car: l45.fvalue(pv, l301, (function (values,v765){ +var l302 = {name: "FLOOR"}; +((l287).value = ({car: l45.fvalue(pv, l302, (function (values,v765){ checkArgs(arguments, 2); return (function(){ return (function(v766){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v766, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v766, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v765)); + })(l184.fvalue(pv, v765)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l29, (function (values,v767,v768){ +((l287).value = ({car: l45.fvalue(pv, l29, (function (values,v767,v768){ checkArgs(arguments, 3); return (function(){ return (function(v769,v770){ - return l181.fvalue(values, "({car: ", v769, ", cdr: ", v770, "})"); - })(l183.fvalue(pv, v767),l183.fvalue(pv, v768)); + return l182.fvalue(values, "({car: ", v769, ", cdr: ", v770, "})"); + })(l184.fvalue(pv, v767),l184.fvalue(pv, v768)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l30, (function (values,v771){ +((l287).value = ({car: l45.fvalue(pv, l30, (function (values,v771){ checkArgs(arguments, 2); return (function(){ return (function(v772){ - return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){ - var symbol = l146; + return l183.fvalue(values, l182.fvalue(pv, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var tmp = ", v772, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var tmp = ", v772, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()")); - })(l183.fvalue(pv, v771)); + })(l184.fvalue(pv, v771)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l31, (function (values,v773){ +((l287).value = ({car: l45.fvalue(pv, l31, (function (values,v773){ checkArgs(arguments, 2); return (function(){ return (function(v774){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var tmp = ", v774, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var tmp = ", v774, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return tmp === ", l183.fvalue(pv, l5.value), "? ", l183.fvalue(pv, l5.value), ": tmp.car;", (function(){ - var symbol = l146; + })(), "return tmp === ", l184.fvalue(pv, l5.value), "? ", l184.fvalue(pv, l5.value), ": tmp.car;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v773)); + })(l184.fvalue(pv, v773)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l32, (function (values,v775){ +((l287).value = ({car: l45.fvalue(pv, l32, (function (values,v775){ checkArgs(arguments, 2); return (function(){ return (function(v776){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var tmp = ", v776, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var tmp = ", v776, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return tmp === ", l183.fvalue(pv, l5.value), "? ", l183.fvalue(pv, l5.value), ": tmp.cdr;", (function(){ - var symbol = l146; + })(), "return tmp === ", l184.fvalue(pv, l5.value), "? ", l184.fvalue(pv, l5.value), ": tmp.cdr;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v775)); + })(l184.fvalue(pv, v775)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l118, (function (values,v777,v778){ +((l287).value = ({car: l45.fvalue(pv, l119, (function (values,v777,v778){ checkArgs(arguments, 3); return (function(){ return (function(v779,v780){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v779, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v779, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "(x.car = ", v780, ", x)"), ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", l182.fvalue(pv, "(x.car = ", v780, ", x)"), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v777),l183.fvalue(pv, v778)); + })(l184.fvalue(pv, v777),l184.fvalue(pv, v778)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l119, (function (values,v781,v782){ +((l287).value = ({car: l45.fvalue(pv, l120, (function (values,v781,v782){ checkArgs(arguments, 3); return (function(){ return (function(v783,v784){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v783, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v783, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "(x.cdr = ", v784, ", x)"), ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", l182.fvalue(pv, "(x.cdr = ", v784, ", x)"), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v781),l183.fvalue(pv, v782)); + })(l184.fvalue(pv, v781),l184.fvalue(pv, v782)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l302 = {name: "SYMBOLP"}; -((l286).value = ({car: l45.fvalue(pv, l302, (function (values,v785){ +var l303 = {name: "SYMBOLP"}; +((l287).value = ({car: l45.fvalue(pv, l303, (function (values,v785){ checkArgs(arguments, 2); return (function(){ return (function(v786){ - return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){ - var symbol = l146; + return l183.fvalue(values, l182.fvalue(pv, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var tmp = ", v786, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var tmp = ", v786, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()")); - })(l183.fvalue(pv, v785)); + })(l184.fvalue(pv, v785)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l303 = {name: "MAKE-SYMBOL"}; -((l286).value = ({car: l45.fvalue(pv, l303, (function (values,v787){ +var l304 = {name: "MAKE-SYMBOL"}; +((l287).value = ({car: l45.fvalue(pv, l304, (function (values,v787){ checkArgs(arguments, 2); return (function(){ return (function(v788){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "name", " = ", v788, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "name", " = ", v788, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", "({name: name})", ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", "({name: name})", ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v787)); + })(l184.fvalue(pv, v787)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l304 = {name: "SYMBOL-NAME"}; -((l286).value = ({car: l45.fvalue(pv, l304, (function (values,v789){ +var l305 = {name: "SYMBOL-NAME"}; +((l287).value = ({car: l45.fvalue(pv, l305, (function (values,v789){ checkArgs(arguments, 2); return (function(){ return (function(v790){ - return l181.fvalue(values, "(", v790, ").name"); - })(l183.fvalue(pv, v789)); + return l182.fvalue(values, "(", v790, ").name"); + })(l184.fvalue(pv, v789)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l245, (function (values,v791,v792){ +((l287).value = ({car: l45.fvalue(pv, l246, (function (values,v791,v792){ checkArgs(arguments, 3); return (function(){ return (function(v793,v794){ - return l181.fvalue(values, "(", v793, ").value = ", v794); - })(l183.fvalue(pv, v791),l183.fvalue(pv, v792)); + return l182.fvalue(values, "(", v793, ").value = ", v794); + })(l184.fvalue(pv, v791),l184.fvalue(pv, v792)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l305 = {name: "FSET"}; -((l286).value = ({car: l45.fvalue(pv, l305, (function (values,v795,v796){ +var l306 = {name: "FSET"}; +((l287).value = ({car: l45.fvalue(pv, l306, (function (values,v795,v796){ checkArgs(arguments, 3); return (function(){ return (function(v797,v798){ - return l181.fvalue(values, "(", v797, ").fvalue = ", v798); - })(l183.fvalue(pv, v795),l183.fvalue(pv, v796)); + return l182.fvalue(values, "(", v797, ").fvalue = ", v798); + })(l184.fvalue(pv, v795),l184.fvalue(pv, v796)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l19, (function (values,v799){ +((l287).value = ({car: l45.fvalue(pv, l19, (function (values,v799){ checkArgs(arguments, 2); return (function(){ return (function(v800){ - return l182.fvalue(values, l181.fvalue(pv, "(", v800, ".value !== undefined)")); - })(l183.fvalue(pv, v799)); + return l183.fvalue(values, l182.fvalue(pv, "(", v800, ".value !== undefined)")); + })(l184.fvalue(pv, v799)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l306 = {name: "SYMBOL-VALUE"}; -((l286).value = ({car: l45.fvalue(pv, l306, (function (values,v801){ +var l307 = {name: "SYMBOL-VALUE"}; +((l287).value = ({car: l45.fvalue(pv, l307, (function (values,v801){ checkArgs(arguments, 2); return (function(){ return (function(v802){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var symbol = ", v802, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var symbol = ", v802, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var value = symbol.value;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return value;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v801)); + })(l184.fvalue(pv, v801)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l253, (function (values,v803){ +((l287).value = ({car: l45.fvalue(pv, l254, (function (values,v803){ checkArgs(arguments, 2); return (function(){ return (function(v804){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var symbol = ", v804, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var symbol = ", v804, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var func = symbol.fvalue;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return func;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v803)); + })(l184.fvalue(pv, v803)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l307 = {name: "SYMBOL-PLIST"}; -((l286).value = ({car: l45.fvalue(pv, l307, (function (values,v805){ +var l308 = {name: "SYMBOL-PLIST"}; +((l287).value = ({car: l45.fvalue(pv, l308, (function (values,v805){ checkArgs(arguments, 2); return (function(){ return (function(v806){ - return l181.fvalue(values, "((", v806, ").plist || ", l183.fvalue(pv, l5.value), ")"); - })(l183.fvalue(pv, v805)); + return l182.fvalue(values, "((", v806, ").plist || ", l184.fvalue(pv, l5.value), ")"); + })(l184.fvalue(pv, v805)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l308 = {name: "LAMBDA-CODE"}; -((l286).value = ({car: l45.fvalue(pv, l308, (function (values,v807){ +var l309 = {name: "LAMBDA-CODE"}; +((l287).value = ({car: l45.fvalue(pv, l309, (function (values,v807){ checkArgs(arguments, 2); return (function(){ return (function(v808){ - return l181.fvalue(values, "(", v808, ").toString()"); - })(l183.fvalue(pv, v807)); + return l182.fvalue(values, "(", v808, ").toString()"); + })(l184.fvalue(pv, v807)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l309 = {name: "EQ"}; -((l286).value = ({car: l45.fvalue(pv, l309, (function (values,v809,v810){ +var l310 = {name: "EQ"}; +((l287).value = ({car: l45.fvalue(pv, l310, (function (values,v809,v810){ checkArgs(arguments, 3); return (function(){ return (function(v811,v812){ - return l182.fvalue(values, l181.fvalue(pv, "(", v811, " === ", v812, ")")); - })(l183.fvalue(pv, v809),l183.fvalue(pv, v810)); + return l183.fvalue(values, l182.fvalue(pv, "(", v811, " === ", v812, ")")); + })(l184.fvalue(pv, v809),l184.fvalue(pv, v810)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l310 = {name: "EQUAL"}; -((l286).value = ({car: l45.fvalue(pv, l310, (function (values,v813,v814){ +var l311 = {name: "EQUAL"}; +((l287).value = ({car: l45.fvalue(pv, l311, (function (values,v813,v814){ checkArgs(arguments, 3); return (function(){ return (function(v815,v816){ - return l182.fvalue(values, l181.fvalue(pv, "(", v815, " == ", v816, ")")); - })(l183.fvalue(pv, v813),l183.fvalue(pv, v814)); + return l183.fvalue(values, l182.fvalue(pv, "(", v815, " == ", v816, ")")); + })(l184.fvalue(pv, v813),l184.fvalue(pv, v814)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l311 = {name: "CHAR-TO-STRING"}; -((l286).value = ({car: l45.fvalue(pv, l311, (function (values,v817){ +var l312 = {name: "CHAR-TO-STRING"}; +((l287).value = ({car: l45.fvalue(pv, l312, (function (values,v817){ checkArgs(arguments, 2); return (function(){ return (function(v818){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v818, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v818, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v817)); + })(l184.fvalue(pv, v817)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l312 = {name: "STRINGP"}; -((l286).value = ({car: l45.fvalue(pv, l312, (function (values,v819){ +var l313 = {name: "STRINGP"}; +((l287).value = ({car: l45.fvalue(pv, l313, (function (values,v819){ checkArgs(arguments, 2); return (function(){ return (function(v820){ - return l182.fvalue(values, l181.fvalue(pv, "(typeof(", v820, ") == \"string\")")); - })(l183.fvalue(pv, v819)); + return l183.fvalue(values, l182.fvalue(pv, "(typeof(", v820, ") == \"string\")")); + })(l184.fvalue(pv, v819)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l313 = {name: "STRING-UPCASE"}; -((l286).value = ({car: l45.fvalue(pv, l313, (function (values,v821){ +var l314 = {name: "STRING-UPCASE"}; +((l287).value = ({car: l45.fvalue(pv, l314, (function (values,v821){ checkArgs(arguments, 2); return (function(){ return (function(v822){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v822, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v822, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v821)); + })(l184.fvalue(pv, v821)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l314 = {name: "STRING-LENGTH"}; -((l286).value = ({car: l45.fvalue(pv, l314, (function (values,v823){ +var l315 = {name: "STRING-LENGTH"}; +((l287).value = ({car: l45.fvalue(pv, l315, (function (values,v823){ checkArgs(arguments, 2); return (function(){ return (function(v824){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v824, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v824, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", "x.length", ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", "x.length", ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v823)); + })(l184.fvalue(pv, v823)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l315 = {name: "SLICE"}; -((l286).value = ({car: l45.fvalue(pv, l315, (function (values,v825,v826,v827){ +var l316 = {name: "SLICE"}; +((l287).value = ({car: l45.fvalue(pv, l316, (function (values,v825,v826,v827){ checkArgsAtLeast(arguments, 3); checkArgsAtMost(arguments, 4); switch(arguments.length-1){ @@ -7633,358 +7649,358 @@ var l315 = {name: "SLICE"}; default: break; } return (function(){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var str = ", l183.fvalue(pv, v825), ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var str = ", l184.fvalue(pv, v825), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var a = ", l183.fvalue(pv, v826), ";", (function(){ - var symbol = l146; + })(), "var a = ", l184.fvalue(pv, v826), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var b;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), (v827 !== l5.value ? l181.fvalue(pv, "b = ", l183.fvalue(pv, v827), ";", (function(){ - var symbol = l146; + })(), (v827 !== l5.value ? l182.fvalue(pv, "b = ", l184.fvalue(pv, v827), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : l5.value), "return str.slice(a,b);", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l316 = {name: "CHAR"}; -((l286).value = ({car: l45.fvalue(pv, l316, (function (values,v828,v829){ +var l317 = {name: "CHAR"}; +((l287).value = ({car: l45.fvalue(pv, l317, (function (values,v828,v829){ checkArgs(arguments, 3); return (function(){ return (function(v830,v831){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string", " = ", v830, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "string", " = ", v830, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "var ", "index", " = ", v831, ";", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "var ", "index", " = ", v831, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v828),l183.fvalue(pv, v829)); + })(l184.fvalue(pv, v828),l184.fvalue(pv, v829)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l73, (function (values,v832,v833){ +((l287).value = ({car: l45.fvalue(pv, l74, (function (values,v832,v833){ checkArgs(arguments, 3); return (function(){ return (function(v834,v835){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string1", " = ", v834, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "string1", " = ", v834, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "var ", "string2", " = ", v835, ";", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "var ", "string2", " = ", v835, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v832),l183.fvalue(pv, v833)); + })(l184.fvalue(pv, v832),l184.fvalue(pv, v833)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l317 = {name: "FUNCALL"}; -((l286).value = ({car: l45.fvalue(pv, l317, (function (values,v837){ +var l318 = {name: "FUNCALL"}; +((l287).value = ({car: l45.fvalue(pv, l318, (function (values,v837){ checkArgsAtLeast(arguments, 2); var v836= l5.value; for (var i = arguments.length-1; i>=2; i--) v836 = {car: arguments[i], cdr: v836}; return (function(){ - return l181.fvalue(values, "(", l183.fvalue(pv, v837), ")(", l149.fvalue(pv, ({car: ((function(){ - var symbol = l186; + return l182.fvalue(values, "(", l184.fvalue(pv, v837), ")(", l150.fvalue(pv, ({car: ((function(){ + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? "values" : "pv"), cdr: l78.fvalue(pv, (function(){ - var symbol = l183; + })() !== l5.value ? "values" : "pv"), cdr: l79.fvalue(pv, (function(){ + var symbol = l184; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v836)}), ", "), ")"); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l318 = {name: "APPLY"}; -((l286).value = ({car: l45.fvalue(pv, l318, (function (values,v839){ +var l319 = {name: "APPLY"}; +((l287).value = ({car: l45.fvalue(pv, l319, (function (values,v839){ checkArgsAtLeast(arguments, 2); var v838= l5.value; for (var i = arguments.length-1; i>=2; i--) v838 = {car: arguments[i], cdr: v838}; return (function(){ - return (l13.fvalue(pv, v838) !== l5.value ? l181.fvalue(values, "(", l183.fvalue(pv, v839), ")()") : (function(v840,v841){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return (l13.fvalue(pv, v838) !== l5.value ? l182.fvalue(values, "(", l184.fvalue(pv, v839), ")()") : (function(v840,v841){ + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var f = ", l183.fvalue(pv, v839), ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var f = ", l184.fvalue(pv, v839), ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var args = [", l149.fvalue(pv, ({car: ((function(){ - var symbol = l186; + })(), "var args = [", l150.fvalue(pv, ({car: ((function(){ + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? "values" : "pv"), cdr: l78.fvalue(pv, (function(){ - var symbol = l183; + })() !== l5.value ? "values" : "pv"), cdr: l79.fvalue(pv, (function(){ + var symbol = l184; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v840)}), ", "), "];", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var tail = (", l183.fvalue(pv, v841), ");", (function(){ - var symbol = l146; + })(), "var tail = (", l184.fvalue(pv, v841), ");", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "while (tail != ", l183.fvalue(pv, l5.value), "){", (function(){ - var symbol = l146; + })(), "while (tail != ", l184.fvalue(pv, l5.value), "){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " args.push(tail.car);", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " tail = tail.cdr;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return f.apply(this, args);", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l91.fvalue(pv, v838),(function(){ - var tmp = l90.fvalue(pv, v838); + })(l92.fvalue(pv, v838),(function(){ + var tmp = l91.fvalue(pv, v838); return tmp === l5.value? l5.value: tmp.car; })())); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l319 = {name: "JS-EVAL"}; -((l286).value = ({car: l45.fvalue(pv, l319, (function (values,v842){ +var l320 = {name: "JS-EVAL"}; +((l287).value = ({car: l45.fvalue(pv, l320, (function (values,v842){ checkArgs(arguments, 2); return (function(){ return (function(v843){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string", " = ", v843, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "string", " = ", v843, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", ((function(){ - var symbol = l186; + })())), l182.fvalue(pv, "return ", ((function(){ + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l181.fvalue(pv, "(function(){", (function(){ - var symbol = l146; + })() !== l5.value ? l182.fvalue(pv, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "v = [v];", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "v = [v];", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "v['multiple-value'] = true;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "}", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return values.apply(this, v);", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()") : "eval.apply(window, [string])"), ";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v842)); + })(l184.fvalue(pv, v842)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l320 = {name: "ERROR"}; -((l286).value = ({car: l45.fvalue(pv, l320, (function (values,v844){ +var l321 = {name: "ERROR"}; +((l287).value = ({car: l45.fvalue(pv, l321, (function (values,v844){ checkArgs(arguments, 2); return (function(){ return (function(v845){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw ", v845, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw ", v845, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v844)); + })(l184.fvalue(pv, v844)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l321 = {name: "NEW"}; -((l286).value = ({car: l45.fvalue(pv, l321, (function (values){ +var l322 = {name: "NEW"}; +((l287).value = ({car: l45.fvalue(pv, l322, (function (values){ checkArgsAtMost(arguments, 1); return (function(){ return (function(){ @@ -7992,335 +8008,335 @@ var l321 = {name: "NEW"}; })(); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l322 = {name: "OBJECTP"}; -((l286).value = ({car: l45.fvalue(pv, l322, (function (values,v846){ +var l323 = {name: "OBJECTP"}; +((l287).value = ({car: l45.fvalue(pv, l323, (function (values,v846){ checkArgs(arguments, 2); return (function(){ return (function(v847){ - return l182.fvalue(values, l181.fvalue(pv, "(typeof (", v847, ") === 'object')")); - })(l183.fvalue(pv, v846)); + return l183.fvalue(values, l182.fvalue(pv, "(typeof (", v847, ") === 'object')")); + })(l184.fvalue(pv, v846)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l323 = {name: "OGET"}; -((l286).value = ({car: l45.fvalue(pv, l323, (function (values,v848,v849){ +var l324 = {name: "OGET"}; +((l287).value = ({car: l45.fvalue(pv, l324, (function (values,v848,v849){ checkArgs(arguments, 3); return (function(){ return (function(v850,v851){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var tmp = ", "(", v850, ")[", v851, "];", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var tmp = ", "(", v850, ")[", v851, "];", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return tmp == undefined? ", l183.fvalue(pv, l5.value), ": tmp ;", (function(){ - var symbol = l146; + })(), "return tmp == undefined? ", l184.fvalue(pv, l5.value), ": tmp ;", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v848),l183.fvalue(pv, v849)); + })(l184.fvalue(pv, v848),l184.fvalue(pv, v849)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l324 = {name: "OSET"}; -((l286).value = ({car: l45.fvalue(pv, l324, (function (values,v852,v853,v854){ +var l325 = {name: "OSET"}; +((l287).value = ({car: l45.fvalue(pv, l325, (function (values,v852,v853,v854){ checkArgs(arguments, 4); return (function(){ return (function(v855,v856,v857){ - return l181.fvalue(values, "((", v855, ")[", v856, "] = ", v857, ")"); - })(l183.fvalue(pv, v852),l183.fvalue(pv, v853),l183.fvalue(pv, v854)); + return l182.fvalue(values, "((", v855, ")[", v856, "] = ", v857, ")"); + })(l184.fvalue(pv, v852),l184.fvalue(pv, v853),l184.fvalue(pv, v854)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l325 = {name: "IN"}; -((l286).value = ({car: l45.fvalue(pv, l325, (function (values,v858,v859){ +var l326 = {name: "IN"}; +((l287).value = ({car: l45.fvalue(pv, l326, (function (values,v858,v859){ checkArgs(arguments, 3); return (function(){ return (function(v860,v861){ - return l182.fvalue(values, l181.fvalue(pv, "((", v860, ") in (", v861, "))")); - })(l183.fvalue(pv, v858),l183.fvalue(pv, v859)); + return l183.fvalue(values, l182.fvalue(pv, "((", v860, ") in (", v861, "))")); + })(l184.fvalue(pv, v858),l184.fvalue(pv, v859)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l326 = {name: "FUNCTIONP"}; -((l286).value = ({car: l45.fvalue(pv, l326, (function (values,v862){ +var l327 = {name: "FUNCTIONP"}; +((l287).value = ({car: l45.fvalue(pv, l327, (function (values,v862){ checkArgs(arguments, 2); return (function(){ return (function(v863){ - return l182.fvalue(values, l181.fvalue(pv, "(typeof ", v863, " == 'function')")); - })(l183.fvalue(pv, v862)); + return l183.fvalue(values, l182.fvalue(pv, "(typeof ", v863, " == 'function')")); + })(l184.fvalue(pv, v862)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l327 = {name: "WRITE-STRING"}; -((l286).value = ({car: l45.fvalue(pv, l327, (function (values,v864){ +var l328 = {name: "WRITE-STRING"}; +((l287).value = ({car: l45.fvalue(pv, l328, (function (values,v864){ checkArgs(arguments, 2); return (function(){ return (function(v865){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v865, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v865, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ - var symbol = l146; + })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l181.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){ - var symbol = l146; + })())), l182.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l183.fvalue(pv, v864)); + })(l184.fvalue(pv, v864)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l328 = {name: "MAKE-ARRAY"}; -((l286).value = ({car: l45.fvalue(pv, l328, (function (values,v866){ +var l329 = {name: "MAKE-ARRAY"}; +((l287).value = ({car: l45.fvalue(pv, l329, (function (values,v866){ checkArgs(arguments, 2); return (function(){ return (function(v867){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var r = [];", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var r = [];", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "for (var i = 0; i < ", v867, "; i++)", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "r.push(", l183.fvalue(pv, l5.value), ");", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "r.push(", l184.fvalue(pv, l5.value), ");", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "return r;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v866)); + })(l184.fvalue(pv, v866)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l329 = {name: "ARRAYP"}; -((l286).value = ({car: l45.fvalue(pv, l329, (function (values,v868){ +var l330 = {name: "ARRAYP"}; +((l287).value = ({car: l45.fvalue(pv, l330, (function (values,v868){ checkArgs(arguments, 2); return (function(){ return (function(v869){ - return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){ - var symbol = l146; + return l183.fvalue(values, l182.fvalue(pv, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var x = ", v869, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var x = ", v869, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return typeof x === 'object' && 'length' in x;"), "})()")); - })(l183.fvalue(pv, v868)); + })(l184.fvalue(pv, v868)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l330 = {name: "AREF"}; -((l286).value = ({car: l45.fvalue(pv, l330, (function (values,v870,v871){ +var l331 = {name: "AREF"}; +((l287).value = ({car: l45.fvalue(pv, l331, (function (values,v870,v871){ checkArgs(arguments, 3); return (function(){ return (function(v872,v873){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var x = ", "(", v872, ")[", v873, "];", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var x = ", "(", v872, ")[", v873, "];", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (x === undefined) throw 'Out of range';", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return x;", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v870),l183.fvalue(pv, v871)); + })(l184.fvalue(pv, v870),l184.fvalue(pv, v871)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l331 = {name: "ASET"}; -((l286).value = ({car: l45.fvalue(pv, l331, (function (values,v874,v875,v876){ +var l332 = {name: "ASET"}; +((l287).value = ({car: l45.fvalue(pv, l332, (function (values,v874,v875,v876){ checkArgs(arguments, 4); return (function(){ return (function(v877,v878,v879){ - return l181.fvalue(values, "(function(){", (function(){ - var symbol = l146; + return l182.fvalue(values, "(function(){", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l185.fvalue(pv, "var x = ", v877, ";", (function(){ - var symbol = l146; + })(), l186.fvalue(pv, "var x = ", v877, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var i = ", v878, ";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return x[i] = ", v879, ";", (function(){ - var symbol = l146; + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l183.fvalue(pv, v874),l183.fvalue(pv, v875),l183.fvalue(pv, v876)); + })(l184.fvalue(pv, v874),l184.fvalue(pv, v875),l184.fvalue(pv, v876)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l332 = {name: "GET-UNIX-TIME"}; -((l286).value = ({car: l45.fvalue(pv, l332, (function (values){ +var l333 = {name: "GET-UNIX-TIME"}; +((l287).value = ({car: l45.fvalue(pv, l333, (function (values){ checkArgsAtMost(arguments, 1); return (function(){ return (function(){ - return l181.fvalue(values, "(Math.round(new Date() / 1000))"); + return l182.fvalue(values, "(Math.round(new Date() / 1000))"); })(); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l333 = {name: "VALUES-ARRAY"}; -((l286).value = ({car: l45.fvalue(pv, l333, (function (values,v880){ +var l334 = {name: "VALUES-ARRAY"}; +((l287).value = ({car: l45.fvalue(pv, l334, (function (values,v880){ checkArgs(arguments, 2); return (function(){ return (function(v881){ return ((function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l181.fvalue(values, "values.apply(this, ", v881, ")") : l181.fvalue(values, "pv.apply(this, ", v881, ")")); - })(l183.fvalue(pv, v880)); + })() !== l5.value ? l182.fvalue(values, "values.apply(this, ", v881, ")") : l182.fvalue(values, "pv.apply(this, ", v881, ")")); + })(l184.fvalue(pv, v880)); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l286).value = ({car: l45.fvalue(pv, l155, (function (values){ +((l287).value = ({car: l45.fvalue(pv, l156, (function (values){ var v882= l5.value; for (var i = arguments.length-1; i>=1; i--) v882 = {car: arguments[i], cdr: v882}; return (function(){ return ((function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l181.fvalue(values, "values(", l149.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l183; + })() !== l5.value ? l182.fvalue(values, "values(", l150.fvalue(pv, l79.fvalue(pv, (function(){ + var symbol = l184; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v882), ", "), ")") : l181.fvalue(values, "pv(", l149.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l183; + })(), v882), ", "), ")") : l182.fvalue(values, "pv(", l150.fvalue(pv, l79.fvalue(pv, (function(){ + var symbol = l184; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v882), ", "), ")")); })(); })), cdr: (function(){ - var symbol = l286; + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); (function(){ - (l212).fvalue = (function(v885){ + (l213).fvalue = (function(v885){ ((v885)["fname"] = "MACRO"); return v885; })((function (values,v883){ @@ -8330,20 +8346,20 @@ var l333 = {name: "VALUES-ARRAY"}; var tmp = v883; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(v884){ - return (((l189.fvalue(pv, v884) === l212)?l4.value: l5.value) !== l5.value ? v884 : l5.value); - })(l201.fvalue(pv, v883, (function(){ - var symbol = l202; + return (((l190.fvalue(pv, v884) === l213)?l4.value: l5.value) !== l5.value ? v884 : l5.value); + })(l202.fvalue(pv, v883, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l108)) : l5.value); + })(), l109)) : l5.value); })(); })); - return l212; + return l213; })(); -var l334 = {name: "LS-MACROEXPAND-1"}; +var l335 = {name: "LS-MACROEXPAND-1"}; (function(){ - (l334).fvalue = (function(v890){ + (l335).fvalue = (function(v890){ ((v890)["fname"] = "LS-MACROEXPAND-1"); return v890; })((function (values,v886){ @@ -8352,9 +8368,9 @@ var l334 = {name: "LS-MACROEXPAND-1"}; return (function(v887){ return (v887 !== l5.value ? (function(v888){ (l60.fvalue(pv, v888) !== l5.value ? (function(v889){ - l192.fvalue(pv, v887, v889); + l193.fvalue(pv, v887, v889); return (v888 = v889); - })(l261.fvalue(pv, v888)) : l5.value); + })(l262.fvalue(pv, v888)) : l5.value); return (function(){ var f = v888; var args = [values]; @@ -8368,19 +8384,19 @@ var l334 = {name: "LS-MACROEXPAND-1"}; } return f.apply(this, args); })(); - })(l190.fvalue(pv, v887)) : v886); - })(l212.fvalue(pv, (function(){ + })(l191.fvalue(pv, v887)) : v886); + })(l213.fvalue(pv, (function(){ var tmp = v886; return tmp === l5.value? l5.value: tmp.car; })())); })(); })); - return l334; + return l335; })(); -var l335 = {name: "COMPILE-FUNCALL"}; -var l336 = {name: "G870"}; +var l336 = {name: "COMPILE-FUNCALL"}; +var l337 = {name: "G764"}; (function(){ - (l335).fvalue = (function(v895){ + (l336).fvalue = (function(v895){ ((v895)["fname"] = "COMPILE-FUNCALL"); return v895; })((function (values,v891,v892){ @@ -8388,33 +8404,33 @@ var l336 = {name: "G870"}; return (function(){ return (function(){ var v893 = ((function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? "values" : "pv"); - var v894 = l147.fvalue(pv, "(", l149.fvalue(pv, ({car: v893, cdr: l78.fvalue(pv, (function(){ - var symbol = l183; + var v894 = l148.fvalue(pv, "(", l150.fvalue(pv, ({car: v893, cdr: l79.fvalue(pv, (function(){ + var symbol = l184; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v892)}), ", "), ")"); - return (l256.fvalue(pv, v891) !== l5.value ? l147.fvalue(values, l256.fvalue(pv, v891), v894) : ((((function(){ + return (l257.fvalue(pv, v891) !== l5.value ? l148.fvalue(values, l257.fvalue(pv, v891), v894) : ((((function(){ var tmp = v891; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? (((l135.fvalue(pv, v891) === l126.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){ - var symbol = l336; + })()?l4.value: l5.value) !== l5.value ? (((l136.fvalue(pv, v891) === l127.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){ + var symbol = l337; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() : l5.value) : l5.value) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v891))), ".fvalue", v894) : l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l108), l45.fvalue(pv, v891))), v894))); + })() : l5.value) : l5.value) !== l5.value ? l182.fvalue(values, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v891))), ".fvalue", v894) : l182.fvalue(values, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l109), l45.fvalue(pv, v891))), v894))); })(); })(); })); - return l335; + return l336; })(); (function(){ - (l243).fvalue = (function(v898){ + (l244).fvalue = (function(v898){ ((v898)["fname"] = "LS-COMPILE-BLOCK"); return v898; })((function (values,v896,v897){ @@ -8426,36 +8442,36 @@ var l336 = {name: "G870"}; default: break; } return (function(){ - return (v897 !== l5.value ? l181.fvalue(values, l243.fvalue(pv, l91.fvalue(pv, v896)), "return ", l183.fvalue(pv, (function(){ - var tmp = l90.fvalue(pv, v896); + return (v897 !== l5.value ? l182.fvalue(values, l244.fvalue(pv, l92.fvalue(pv, v896)), "return ", l184.fvalue(pv, (function(){ + var tmp = l91.fvalue(pv, v896); return tmp === l5.value? l5.value: tmp.car; })(), (function(){ - var symbol = l186; + var symbol = l187; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), ";") : l150.fvalue(values, l94.fvalue(pv, (function(){ - var symbol = l209; + })()), ";") : l151.fvalue(values, l95.fvalue(pv, (function(){ + var symbol = l210; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), l78.fvalue(pv, (function(){ - var symbol = l183; + })(), l79.fvalue(pv, (function(){ + var symbol = l184; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v896)), l147.fvalue(pv, ";", (function(){ - var symbol = l146; + })(), v896)), l148.fvalue(pv, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()))); })(); })); - return l243; + return l244; })(); (function(){ - (l183).fvalue = (function(v908){ + (l184).fvalue = (function(v908){ ((v908)["fname"] = "LS-COMPILE"); return v908; })((function (values,v899,v900){ @@ -8470,27 +8486,27 @@ var l336 = {name: "G870"}; return (function(v901){ try { var tmp; - tmp = l186.value; - l186.value = v901; + tmp = l187.value; + l187.value = v901; v901 = tmp; return (((function(){ var tmp = v899; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(v902){ - return ((v902 !== l5.value ? l28.fvalue(pv, l92.fvalue(pv, l216, l191.fvalue(pv, v902))) : l5.value) !== l5.value ? l190.fvalue(values, v902) : ((function(v903){ - return (v903 !== l5.value ? v903 : l92.fvalue(pv, l218, l191.fvalue(pv, v902))); - })(l134.fvalue(pv, v899)) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v899))), ".value") : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l306), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v899))))))); - })(l201.fvalue(pv, v899, (function(){ - var symbol = l202; + return ((v902 !== l5.value ? l28.fvalue(pv, l93.fvalue(pv, l217, l192.fvalue(pv, v902))) : l5.value) !== l5.value ? l191.fvalue(values, v902) : ((function(v903){ + return (v903 !== l5.value ? v903 : l93.fvalue(pv, l219, l192.fvalue(pv, v902))); + })(l135.fvalue(pv, v899)) !== l5.value ? l182.fvalue(values, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v899))), ".value") : l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l307), l45.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v899))))))); + })(l202.fvalue(pv, v899, (function(){ + var symbol = l203; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l109)) : (l85.fvalue(pv, v899) !== l5.value ? l18.fvalue(values, v899) : (((typeof(v899) == "string")?l4.value: l5.value) !== l5.value ? l181.fvalue(values, "\"", l157.fvalue(pv, v899), "\"") : (((function(){ + })(), l110)) : (l86.fvalue(pv, v899) !== l5.value ? l18.fvalue(values, v899) : (((typeof(v899) == "string")?l4.value: l5.value) !== l5.value ? l182.fvalue(values, "\"", l158.fvalue(pv, v899), "\"") : (((function(){ var x = v899; return typeof x === 'object' && 'length' in x; - })()?l4.value: l5.value) !== l5.value ? l251.fvalue(values, v899) : (l60.fvalue(pv, v899) !== l5.value ? (function(v904,v905){ - return (l101.fvalue(pv, v904, (function(){ - var symbol = l220; + })()?l4.value: l5.value) !== l5.value ? l252.fvalue(values, v899) : (l60.fvalue(pv, v899) !== l5.value ? (function(v904,v905){ + return (l102.fvalue(pv, v904, (function(){ + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -8505,17 +8521,17 @@ var l336 = {name: "G870"}; } return f.apply(this, args); })(); - })(l41.fvalue(pv, l101.fvalue(pv, v904, (function(){ - var symbol = l220; + })(l41.fvalue(pv, l102.fvalue(pv, v904, (function(){ + var symbol = l221; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()))) : ((l101.fvalue(pv, v904, (function(){ - var symbol = l286; + })()))) : ((l102.fvalue(pv, v904, (function(){ + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) !== l5.value ? l28.fvalue(pv, l214.fvalue(pv, v904, l108, l217)) : l5.value) !== l5.value ? (function(v907){ + })()) !== l5.value ? l28.fvalue(pv, l215.fvalue(pv, v904, l109, l218)) : l5.value) !== l5.value ? (function(v907){ return (function(){ var f = v907; var args = [values]; @@ -8526,12 +8542,12 @@ var l336 = {name: "G870"}; } return f.apply(this, args); })(); - })(l41.fvalue(pv, l101.fvalue(pv, v904, (function(){ - var symbol = l286; + })(l41.fvalue(pv, l102.fvalue(pv, v904, (function(){ + var symbol = l287; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()))) : (l212.fvalue(pv, v904) !== l5.value ? l183.fvalue(values, l334.fvalue(pv, v899), v900) : l335.fvalue(values, v904, v905)))); + })()))) : (l213.fvalue(pv, v904) !== l5.value ? l184.fvalue(values, l335.fvalue(pv, v899), v900) : l336.fvalue(values, v904, v905)))); })((function(){ var tmp = v899; return tmp === l5.value? l5.value: tmp.car; @@ -8543,16 +8559,16 @@ var l336 = {name: "G870"}; })()))))); } finally { - l186.value = v901; + l187.value = v901; } })(v900); })(); })); - return l183; + return l184; })(); -var l337 = {name: "LS-COMPILE-TOPLEVEL"}; +var l338 = {name: "LS-COMPILE-TOPLEVEL"}; (function(){ - (l337).fvalue = (function(v915){ + (l338).fvalue = (function(v915){ ((v915)["fname"] = "LS-COMPILE-TOPLEVEL"); return v915; })((function (values,v909,v910){ @@ -8567,8 +8583,8 @@ var l337 = {name: "LS-COMPILE-TOPLEVEL"}; return (function(v911){ try { var tmp; - tmp = l207.value; - l207.value = v911; + tmp = l208.value; + l208.value = v911; v911 = tmp; return ((((function(){ var tmp = v909; @@ -8576,50 +8592,50 @@ var l337 = {name: "LS-COMPILE-TOPLEVEL"}; })()?l4.value: l5.value) !== l5.value ? (((function(){ var tmp = v909; return tmp === l5.value? l5.value: tmp.car; - })() === l117)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v913){ - return l149.fvalue(values, l94.fvalue(pv, (function(){ - var symbol = l209; + })() === l118)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v913){ + return l150.fvalue(values, l95.fvalue(pv, (function(){ + var symbol = l210; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v913)); - })(l78.fvalue(pv, (function (values,v912){ + })(l79.fvalue(pv, (function (values,v912){ checkArgs(arguments, 2); - return l337.fvalue(values, v912, l4.value); + return l338.fvalue(values, v912, l4.value); }), (function(){ var tmp = v909; return tmp === l5.value? l5.value: tmp.cdr; })())) : (function(v914){ - return l181.fvalue(values, l150.fvalue(pv, l210.fvalue(pv), l181.fvalue(pv, ";", (function(){ - var symbol = l146; + return l182.fvalue(values, l151.fvalue(pv, l211.fvalue(pv), l182.fvalue(pv, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), (v914 !== l5.value ? l181.fvalue(pv, v914, ";", (function(){ - var symbol = l146; + })())), (v914 !== l5.value ? l182.fvalue(pv, v914, ";", (function(){ + var symbol = l147; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : l5.value)); - })(l183.fvalue(pv, v909, v910))); + })(l184.fvalue(pv, v909, v910))); } finally { - l207.value = v911; + l208.value = v911; } })(l5.value); })(); })); - return l337; + return l338; })(); (function(){ - (l261).fvalue = (function(v917){ + (l262).fvalue = (function(v917){ ((v917)["fname"] = "EVAL"); return v917; })((function (values,v916){ checkArgs(arguments, 2); return (function(){ return (function(){ - var string = l337.fvalue(pv, v916, l4.value); + var string = l338.fvalue(pv, v916, l4.value); if (typeof string != 'string') throw 'The value ' + string + ' is not a type string.'; return (function(){ @@ -8633,13 +8649,13 @@ var l337 = {name: "LS-COMPILE-TOPLEVEL"}; })(); })(); })); - return l261; + return l262; })(); -var l338 = {name: "&BODY"}; -var l339 = QIList(l225,l226,l224,l338,l21,l16,l136,l62,l63,l22,l23,l24,l297,l299,l20,l20,l296,l298,l55,l65,l318,l330,l329,l101,l46,l198,l19,l19,l91,l33,l39,l37,l34,l31,l31,l53,l273,l35,l38,l36,l32,l32,l316,l83,l84,l82,l52,l29,l30,l80,l81,l48,l2,l3,l10,l12,l1,l9,l97,l96,l105,l69,l70,l107,l50,l51,l54,l309,l27,l310,l320,l261,l100,l144,l104,l126,l139,l40,l257,l43,l305,l317,l108,l326,l17,l145,l280,l79,l222,l137,l47,l85,l85,l143,l134,l258,l6,l90,l72,l265,l268,l121,l45,l60,l328,l122,l303,l78,l92,l87,l293,l110,l282,l111,l283,l5,l28,l89,l88,l13,l300,l56,l127,l129,l125,l174,l86,l156,l159,l219,l57,l58,l117,l68,l49,l176,l93,l94,l95,l14,l272,l66,l67,l118,l119,l41,l245,l116,l114,l99,l313,l102,l103,l312,l98,l253,l304,l135,l307,l306,l302,l4,l279,l42,l274,l26,l8,l281,l155,l154,l109,l158,l7,l106,l327,l25,l5); -l144.fvalue(values, l339); -((l136).value = (function(){ - var symbol = l132; +var l339 = {name: "&BODY"}; +var l340 = QIList(l226,l227,l225,l339,l21,l16,l137,l63,l64,l22,l23,l24,l298,l300,l20,l20,l297,l299,l55,l66,l319,l331,l330,l102,l46,l199,l19,l19,l92,l33,l39,l37,l34,l31,l31,l53,l274,l35,l38,l36,l32,l32,l317,l84,l85,l83,l52,l29,l30,l81,l82,l48,l2,l3,l10,l12,l1,l9,l98,l97,l106,l70,l71,l108,l50,l51,l54,l310,l27,l311,l321,l262,l101,l145,l105,l127,l140,l40,l258,l43,l306,l318,l109,l327,l17,l146,l281,l80,l223,l138,l47,l86,l86,l144,l135,l259,l6,l91,l73,l266,l269,l122,l45,l60,l329,l123,l304,l79,l93,l88,l294,l111,l283,l112,l284,l5,l28,l90,l89,l13,l301,l56,l128,l130,l126,l175,l87,l157,l160,l220,l57,l58,l118,l69,l49,l177,l94,l95,l96,l14,l273,l67,l68,l119,l120,l41,l246,l117,l115,l100,l314,l103,l104,l313,l99,l254,l305,l136,l308,l307,l303,l4,l280,l42,l275,l26,l8,l282,l156,l155,l110,l159,l7,l107,l328,l25,l5); +l145.fvalue(values, l340); +((l137).value = (function(){ + var symbol = l133; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -8659,469 +8675,470 @@ l144.fvalue(values, l339); })(); (lisp = {}); (lisp.read = (function(){ - var symbol = l180; + var symbol = l181; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()); (lisp.print = (function(){ - var symbol = l156; + var symbol = l157; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()); (lisp.eval = (function(){ - var symbol = l261; + var symbol = l262; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()); (lisp.compile = (function (values,v918){ checkArgs(arguments, 2); - return l337.fvalue(values, v918, l4.value); + return l338.fvalue(values, v918, l4.value); })); (lisp.evalString = (function (values,v919){ checkArgs(arguments, 2); - return l261.fvalue(values, l180.fvalue(pv, v919)); + return l262.fvalue(values, l181.fvalue(pv, v919)); })); (lisp.compileString = (function (values,v920){ checkArgs(arguments, 2); - return l337.fvalue(values, l180.fvalue(pv, v920), l4.value); + return l338.fvalue(values, l181.fvalue(pv, v920), l4.value); })); -var l340 = {name: "OP"}; -var l341 = {name: "SYM"}; -var l342 = {name: "X"}; -var l343 = {name: "ARGS"}; -var l344 = {name: "BODY"}; -var l345 = {name: "DECLS"}; -var l346 = {name: "DECL"}; -var l347 = {name: "NAME"}; -var l348 = {name: "ARG"}; -var l349 = {name: "FORM"}; -var l350 = {name: "PACKAGE-DESIGNATOR"}; -var l351 = {name: "PAIRS"}; -var l352 = {name: "PLACE"}; -var l353 = {name: "VALUE"}; -var l354 = {name: "VARS"}; -var l355 = {name: "VALS"}; -var l356 = {name: "STORE-VARS"}; -var l357 = {name: "WRITER-FORM"}; -var l358 = {name: "READER-FORM"}; -var l359 = {name: "RESULT"}; -var l360 = {name: "ACCESS-FN"}; -var l361 = {name: "LAMBDA-LIST"}; -var l362 = {name: "VALUE-FROM"}; -var l363 = {name: "VARIABLES"}; -var l364 = {name: "HEAD"}; -var l365 = {name: "TAIL"}; -var l366 = {name: "COLLECT"}; -var l367 = {name: "VARLIST"}; -var l368 = {name: "ENDLIST"}; -var l369 = {name: "V"}; -var l370 = {name: "ASSIGNMENTS"}; -var l371 = {name: "FORM1"}; -var l372 = {name: "FORMS"}; -var l373 = {name: "G"}; -var l374 = {name: "CLAUSULES"}; -var l375 = {name: "!FORM"}; -var l376 = {name: "CLAUSULE"}; -var l377 = {name: "ITER"}; -var l378 = {name: "G!TO"}; -var l379 = {name: "VAR"}; -var l380 = {name: "TO"}; -var l381 = {name: "G!LIST"}; -var l382 = {name: "DELTA"}; -var l383 = {name: "CONDITION"}; -var l384 = {name: "DOCSTRING"}; -var l385 = QIList(QIList(QIList(l286,l109,l5,QIList(l216,l5),l5),QIList(l276,l109,l5,QIList(l216,l5),l5),QIList(l275,l109,l5,QIList(l216,l5),l5),QIList(l269,l109,l5,QIList(l216,l5),l5),QIList(l259,l109,l5,QIList(l216,l5),l5),QIList(l249,l109,l5,QIList(l216,l5),l5),QIList(l248,l109,l5,QIList(l216,l5),l5),QIList(l223,l109,l5,QIList(l216,l5),l5),QIList(l220,l109,l5,QIList(l216,l5),l5),QIList(l207,l109,l5,QIList(l216,l5),l5),QIList(l203,l109,l5,QIList(l216,l5),l5),QIList(l202,l109,l5,QIList(l216,l5),l5),QIList(l186,l109,l5,QIList(l216,l5),l5),QIList(l175,l109,l5,QIList(l216,l5),l5),QIList(l146,l109,l5,QIList(l216,l5),l5),QIList(l136,l109,l5,QIList(l216,l5),l5),QIList(l133,l109,l5,QIList(l216,l5),l5),QIList(l132,l109,l5,QIList(l216,l5),l5),QIList(l131,l109,l5,QIList(l216,l5),l5),QIList(l120,l109,l5,QIList(l216,l5),l5),QIList(l112,l109,l5,QIList(l216,l5),l5),QIList(l16,l109,l5,QIList(l216,l5),l5),QIList(l5,l109,l5,QIList(l218,l216,l5),l5),QIList(l4,l109,l5,QIList(l218,l216,l5),l5),l5),QIList(QIList(l295,l212,QIList(l108,QIList(l6,QIList(l340,l341,l5),QIList(l177,QIList(l287,QIList(l179,l340,l5),QIList(l342,l225,l343,l5),QIList(l265,QIList(QIList(l343,QIList(l29,l342,l343,l5),l5),l5),QIList(l291,l343,QIList(l182,QIList(l294,l343,QIList(l179,l341,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l291,l212,QIList(l108,QIList(l6,QIList(l343,l225,l344,l5),QIList(l8,QIList(l302,l343,l5),QIList(l320,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l177,QIList(l290,QIList(l179,l343,l5),QIList(l6,QIList(QIList(l179,l343,l5),l5),QIList(l181,"return ",QIList(l178,l344,l5),";",l146,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l289,l212,QIList(l108,QIList(l6,QIList(l345,l225,l344,l5),QIList(l177,QIList(l184,QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l181,"var ",QIList(l179,QIList(l40,l346,l5),l5)," = ",QIList(l179,QIList(l42,l346,l5),l5),";",l146,l5),l5),l5),l345,l5),l5),QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l181,"if (typeof ",QIList(l179,QIList(l40,l346,l5),l5)," != '",QIList(l179,QIList(l41,l346,l5),l5),"')",l146,QIList(l185,"throw 'The value ' + ",QIList(l179,QIList(l40,l346,l5),l5)," + ' is not a type ",QIList(l179,QIList(l41,l346,l5),l5),".';",l146,l5),l5),l5),l5),l345,l5),l5),QIList(l181,"return ",QIList(l117,QIList(l178,l344,l5),l5),";",l146,l5),l5),l5),l5),l5),l5,l5),QIList(l288,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l117,QIList(l287,QIList(l179,l347,l5),QIList(l179,l343,l5),QIList(l265,QIList(l179,QIList(l78,QIList(l6,QIList(l348,l5),QIList(l177,QIList(QIList(l179,l348,l5),QIList(l183,QIList(l179,l348,l5),l5),l5),l5),l5),l343,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l287,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l49,QIList(l45,QIList(l176,QIList(l179,l347,l5),l5),QIList(l6,QIList(l179,l343,l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l286,l5),l5),l5),l5),l5,l5),QIList(l177,l212,QIList(l108,QIList(l6,QIList(l349,l5),QIList(l284,l349,l5),l5),l5),l5,l5),QIList(l262,l212,QIList(l108,QIList(l6,QIList(l347,l343,l349,l5),QIList(l177,QIList(l221,QIList(l179,l347,l5),QIList(l179,l343,l5),QIList(l183,QIList(l179,l349,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l221,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l49,QIList(l45,QIList(l176,QIList(l179,l347,l5),l5),QIList(l6,QIList(l179,l343,l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l220,l5),l5),l5),l5),l5,l5),QIList(l184,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l177,QIList(l181,"(function(){",l146,QIList(l185,QIList(l178,l344,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l148,l212,QIList(l108,QIList(l6,QIList(l109,l225,l349,l5),QIList(l177,QIList(l114,QIList(l179,l109,l5),QIList(l147,QIList(l179,l109,l5),QIList(l117,QIList(l178,l349,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l137,l212,QIList(l108,QIList(l6,QIList(l350,l5),QIList(l177,QIList(l260,QIList(l114,l136,QIList(l124,QIList(l179,l350,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l212,QIList(l108,QIList(l6,QIList(l225,l351,l5),QIList(l52,QIList(QIList(l13,l351,l5),l5,l5),QIList(QIList(l13,QIList(l32,l351,l5),l5),QIList(l320,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l36,l351,l5),l5),QIList(l265,QIList(QIList(l352,QIList(l40,l351,l5),l5),QIList(l353,QIList(l41,l351,l5),l5),l5),QIList(l110,QIList(l354,l355,l356,l357,l358,l5),QIList(l113,l352,l5),QIList(l177,QIList(l268,QIList(l179,QIList(l78,QIList(l108,l45,l5),l354,l355,l5),l5),QIList(l110,QIList(l179,l356,l5),QIList(l179,l353,l5),QIList(l179,l357,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l177,QIList(l117,QIList(l178,QIList(l69,QIList(QIList(l351,l351,QIList(l36,l351,l5),l5),QIList(l359,QIList(l176,l5,l5),QIList(l29,QIList(l177,QIList(l116,QIList(l179,QIList(l31,l351,l5),l5),QIList(l179,QIList(l34,l351,l5),l5),l5),l5),l359,l5),l5),l5),QIList(QIList(l13,l351,l5),QIList(l67,l359,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l115,l212,QIList(l108,QIList(l6,QIList(l360,l361,l225,l344,l5),QIList(l8,QIList(l302,l360,l5),QIList(l320,"ACCESS-FN must be a symbol.",l5),l5),QIList(l177,QIList(l117,QIList(l49,QIList(l29,QIList(l176,QIList(l179,l360,l5),l5),QIList(l6,QIList(l179,l361,l5),QIList(l178,l344,l5),l5),l5),l112,l5),QIList(l176,QIList(l179,l360,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l111,l212,QIList(l108,QIList(l6,QIList(l362,l5),QIList(l177,QIList(l282,QIList(l108,l45,l5),QIList(l179,l362,l5),l5),l5),l5),l5),l5,l5),QIList(l110,l212,QIList(l108,QIList(l6,QIList(l363,l362,l225,l344,l5),QIList(l177,QIList(l282,QIList(l6,QIList(l224,QIList(l178,l363,l5),l225,QIList(l179,QIList(l17,l5),l5),l5),QIList(l178,l344,l5),l5),QIList(l179,l362,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l177,QIList(l15,l4,QIList(l178,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l74,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l265,QIList(QIList(l364,QIList(l17,l5),l5),QIList(l365,QIList(l17,l5),l5),l5),QIList(l177,QIList(l268,QIList(QIList(QIList(l179,l364,l5),QIList(l29,QIList(l176,l76,l5),l5,l5),l5),QIList(QIList(l179,l365,l5),QIList(l179,l364,l5),l5),l5),QIList(l257,QIList(QIList(l366,QIList(l342,l5),QIList(l119,QIList(l179,l365,l5),QIList(l29,l342,l5,l5),l5),QIList(l114,QIList(l179,l365,l5),QIList(l32,QIList(l179,l365,l5),l5),l5),l342,l5),l5),QIList(l178,l344,l5),l5),QIList(l32,QIList(l179,l364,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l70,l212,QIList(l108,QIList(l6,QIList(l367,l368,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l268,QIList(l179,QIList(l78,QIList(l6,QIList(l342,l5),QIList(l45,QIList(l40,l342,l5),QIList(l41,l342,l5),l5),l5),l367,l5),l5),QIList(l15,l4,QIList(l7,QIList(l179,QIList(l31,l368,l5),l5),QIList(l14,QIList(l117,QIList(l179,QIList(l32,l368,l5),l5),l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l114,QIList(l178,QIList(l318,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l369,l5),QIList(l55,QIList(l30,QIList(l36,l369,l5),l5),QIList(l45,QIList(l40,l369,l5),QIList(l42,l369,l5),l5),l5),l5),l367,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l69,l212,QIList(l108,QIList(l6,QIList(l367,l368,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(l179,QIList(l78,QIList(l6,QIList(l342,l5),QIList(l45,QIList(l40,l342,l5),QIList(l41,l342,l5),l5),l5),l367,l5),l5),QIList(l15,l4,QIList(l7,QIList(l179,QIList(l31,l368,l5),l5),QIList(l14,QIList(l117,QIList(l179,QIList(l32,l368,l5),l5),l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l68,QIList(l178,QIList(l318,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l369,l5),QIList(l55,QIList(l30,QIList(l36,l369,l5),l5),QIList(l45,QIList(l40,l369,l5),QIList(l42,l369,l5),l5),l5),l5),l367,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l68,l212,QIList(l108,QIList(l6,QIList(l225,l351,l5),QIList(l265,QIList(QIList(l370,QIList(l176,l5,l5),l5),l5),QIList(l15,l4,QIList(l52,QIList(QIList(l13,l351,l5),QIList(l14,l5),l5),QIList(QIList(l13,QIList(l32,l351,l5),l5),QIList(l320,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l265,QIList(QIList(l109,QIList(l31,l351,l5),l5),QIList(l353,QIList(l34,l351,l5),l5),l5),QIList(l49,QIList(l177,QIList(QIList(l179,l109,l5),QIList(l179,QIList(l17,l5),l5),QIList(l179,l353,l5),l5),l5),l370,l5),QIList(l114,l351,QIList(l36,l351,l5),l5),l5),l5),l5),l5),QIList(l114,l370,QIList(l67,l370,l5),l5),QIList(l177,QIList(l265,QIList(l179,QIList(l78,QIList(l108,l32,l5),l370,l5),l5),QIList(l114,QIList(l178,QIList(l61,QIList(l108,l65,l5),QIList(l78,QIList(l108,l91,l5),l370,l5),QIList(l176,l5,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l212,QIList(l108,QIList(l6,QIList(l371,l359,l225,l344,l5),QIList(l177,QIList(l57,QIList(l117,QIList(l179,l371,l5),QIList(l179,l359,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l212,QIList(l108,QIList(l6,QIList(l349,l225,l344,l5),QIList(l265,QIList(QIList(l353,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l353,l5),QIList(l179,l349,l5),l5),l5),QIList(l178,l344,l5),QIList(l179,l353,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l212,QIList(l108,QIList(l6,QIList(l225,l372,l5),QIList(l52,QIList(QIList(l13,l372,l5),l5,l5),QIList(QIList(l13,QIList(l32,l372,l5),l5),QIList(l31,l372,l5),l5),QIList(l4,QIList(l265,QIList(QIList(l373,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l373,l5),QIList(l179,QIList(l31,l372,l5),l5),l5),l5),QIList(l222,QIList(l179,l373,l5),QIList(l179,l373,l5),QIList(l56,QIList(l178,QIList(l32,l372,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l212,QIList(l108,QIList(l6,QIList(l225,l372,l5),QIList(l52,QIList(QIList(l13,l372,l5),l4,l5),QIList(QIList(l13,QIList(l32,l372,l5),l5),QIList(l31,l372,l5),l5),QIList(l4,QIList(l177,QIList(l222,QIList(l179,QIList(l31,l372,l5),l5),QIList(l55,QIList(l178,QIList(l32,l372,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l212,QIList(l108,QIList(l6,QIList(l349,l225,l374,l5),QIList(l177,QIList(l53,QIList(l179,l349,l5),QIList(l178,QIList(l65,l374,QIList(l177,QIList(QIList(l4,QIList(l320,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l212,QIList(l108,QIList(l6,QIList(l349,l225,l374,l5),QIList(l265,QIList(QIList(l375,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l375,l5),QIList(l179,l349,l5),l5),l5),QIList(l52,QIList(l178,QIList(l78,QIList(l6,QIList(l376,l5),QIList(l222,QIList(l309,QIList(l31,l376,l5),l4,l5),l376,QIList(l177,QIList(QIList(l27,QIList(l179,l375,l5),QIList(l176,QIList(l179,QIList(l31,l376,l5),l5),l5),l5),QIList(l178,QIList(l32,l376,l5),l5),l5),l5),l5),l5),l374,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l212,QIList(l108,QIList(l6,QIList(l225,l374,l5),QIList(l222,QIList(l13,l374,l5),l5,QIList(l222,QIList(l309,QIList(l33,l374,l5),l4,l5),QIList(l177,QIList(l117,QIList(l178,QIList(l35,l374,l5),l5),l5),l5),QIList(l177,QIList(l222,QIList(l179,QIList(l33,l374,l5),l5),QIList(l117,QIList(l178,QIList(l35,l374,l5),l5),l5),QIList(l52,QIList(l178,QIList(l32,l374,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l212,QIList(l108,QIList(l6,QIList(l377,l225,l344,l5),QIList(l265,QIList(QIList(l378,QIList(l17,l5),l5),QIList(l379,QIList(l40,l377,l5),l5),QIList(l380,QIList(l41,l377,l5),l5),QIList(l359,QIList(l42,l377,l5),l5),l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(QIList(QIList(l179,l379,l5),0,l5),QIList(QIList(l179,l378,l5),QIList(l179,l380,l5),l5),l5),QIList(l252,QIList(l297,QIList(l179,l379,l5),QIList(l179,l378,l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l47,QIList(l179,l379,l5),l5),l5),QIList(l179,l359,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l212,QIList(l108,QIList(l6,QIList(l377,l225,l344,l5),QIList(l265,QIList(QIList(l379,QIList(l40,l377,l5),l5),QIList(l381,QIList(l17,l5),l5),l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(QIList(QIList(l179,l381,l5),QIList(l179,QIList(l41,l377,l5),l5),l5),QIList(QIList(l179,l379,l5),l5,l5),l5),QIList(l252,QIList(l179,l381,l5),QIList(l114,QIList(l179,l379,l5),QIList(l31,QIList(l179,l381,l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l114,QIList(l179,l381,l5),QIList(l32,QIList(l179,l381,l5),l5),l5),l5),QIList(l179,QIList(l42,l377,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l212,QIList(l108,QIList(l6,QIList(l342,l352,l5),QIList(l177,QIList(l114,QIList(l179,l352,l5),QIList(l29,QIList(l179,l342,l5),QIList(l179,l352,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l212,QIList(l108,QIList(l6,QIList(l342,l224,QIList(l382,1,l5),l5),QIList(l177,QIList(l114,QIList(l179,l342,l5),QIList(l63,QIList(l179,l342,l5),QIList(l179,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l212,QIList(l108,QIList(l6,QIList(l342,l224,QIList(l382,1,l5),l5),QIList(l177,QIList(l114,QIList(l179,l342,l5),QIList(l62,QIList(l179,l342,l5),QIList(l179,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l252,QIList(l179,l383,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l212,QIList(l108,QIList(l6,QIList(l224,l353,l5),QIList(l177,QIList(l272,l5,QIList(l179,l353,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l117,QIList(l305,QIList(l176,QIList(l179,l347,l5),l5),QIList(l11,QIList(l179,QIList(l304,l347,l5),l5),QIList(l179,l343,l5),QIList(l178,QIList(l222,QIList(l55,QIList(l312,QIList(l31,l344,l5),l5),QIList(l28,QIList(l13,QIList(l32,l344,l5),l5),l5),l5),QIList(l177,QIList(QIList(l179,QIList(l31,l344,l5),l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,QIList(l32,l344,l5),l5),l5),l5),l5),QIList(l177,QIList(QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l265,QIList(QIList(l342,QIList(l17,"FN",l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l342,l5),QIList(l6,QIList(l179,l343,l5),QIList(l178,l344,l5),l5),l5),l5),QIList(l324,QIList(l179,l342,l5),"fname",QIList(l179,l347,l5),l5),QIList(l179,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l2,QIList(l216,QIList(l179,l347,l5),l5),l5),QIList(l8,QIList(l19,QIList(l176,QIList(l179,l347,l5),l5),l5),QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l222,QIList(l179,l383,l5),l5,QIList(l117,QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l222,QIList(l179,l383,l5),QIList(l117,QIList(l178,l344,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l212,QIList(l108,QIList(l6,QIList(l343,l225,l344,l5),QIList(l177,QIList(l108,QIList(l6,QIList(l179,l343,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l2,QIList(l216,QIList(l179,l347,l5),l5),l5),QIList(l2,QIList(l218,QIList(l179,l347,l5),l5),l5),QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l212,QIList(l108,QIList(l6,QIList(l225,l345,l5),QIList(l177,QIList(l260,QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l215,QIList(l176,QIList(l179,l346,l5),l5),l5),l5),l5),l345,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l260,QIList(l211,QIList(l176,QIList(l179,l347,l5),l5),QIList(l176,QIList(l108,QIList(l6,QIList(l179,QIList(l78,QIList(l108,QIList(l6,QIList(l342,l5),QIList(l222,QIList(l309,l342,QIList(l176,l338,l5),l5),QIList(l176,l225,l5),l342,l5),l5),l5),l343,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5); -((l202).value = l385); -var l386 = QIList(QIList(l384,"l384"),QIList(l383,"l383"),QIList(l382,"l382"),QIList(l381,"l381"),QIList(l380,"l380"),QIList(l379,"l379"),QIList(l378,"l378"),QIList(l377,"l377"),QIList(l376,"l376"),QIList(l375,"l375"),QIList(l374,"l374"),QIList(l373,"l373"),QIList(l372,"l372"),QIList(l371,"l371"),QIList(l370,"l370"),QIList(l369,"l369"),QIList(l368,"l368"),QIList(l367,"l367"),QIList(l366,"l366"),QIList(l365,"l365"),QIList(l364,"l364"),QIList(l363,"l363"),QIList(l362,"l362"),QIList(l361,"l361"),QIList(l360,"l360"),QIList(l359,"l359"),QIList(l358,"l358"),QIList(l357,"l357"),QIList(l356,"l356"),QIList(l355,"l355"),QIList(l354,"l354"),QIList(l353,"l353"),QIList(l352,"l352"),QIList(l351,"l351"),QIList(l350,"l350"),QIList(l349,"l349"),QIList(l348,"l348"),QIList(l347,"l347"),QIList(l346,"l346"),QIList(l345,"l345"),QIList(l344,"l344"),QIList(l343,"l343"),QIList(l342,"l342"),QIList(l341,"l341"),QIList(l340,"l340"),QIList(l338,"l338"),QIList(l337,"l337"),QIList(l336,"l336"),QIList(l335,"l335"),QIList(l334,"l334"),QIList(l333,"l333"),QIList(l332,"l332"),QIList(l331,"l331"),QIList(l330,"l330"),QIList(l329,"l329"),QIList(l328,"l328"),QIList(l327,"l327"),QIList(l326,"l326"),QIList(l325,"l325"),QIList(l324,"l324"),QIList(l323,"l323"),QIList(l322,"l322"),QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l237,"l237"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l212,"l212"),QIList(l211,"l211"),QIList(l210,"l210"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l5); -(function(){ - l138.fvalue(pv, l384); - l138.fvalue(pv, l383); - l138.fvalue(pv, l382); - l138.fvalue(pv, l381); - l138.fvalue(pv, l380); - l138.fvalue(pv, l379); - l138.fvalue(pv, l378); - l138.fvalue(pv, l377); - l138.fvalue(pv, l376); - l138.fvalue(pv, l375); - l138.fvalue(pv, l374); - l138.fvalue(pv, l373); - l138.fvalue(pv, l372); - l138.fvalue(pv, l371); - l138.fvalue(pv, l370); - l138.fvalue(pv, l369); - l138.fvalue(pv, l368); - l138.fvalue(pv, l367); - l138.fvalue(pv, l366); - l138.fvalue(pv, l365); - l138.fvalue(pv, l364); - l138.fvalue(pv, l363); - l138.fvalue(pv, l362); - l138.fvalue(pv, l361); - l138.fvalue(pv, l360); - l138.fvalue(pv, l359); - l138.fvalue(pv, l358); - l138.fvalue(pv, l357); - l138.fvalue(pv, l356); - l138.fvalue(pv, l355); - l138.fvalue(pv, l354); - l138.fvalue(pv, l353); - l138.fvalue(pv, l352); - l138.fvalue(pv, l351); - l138.fvalue(pv, l350); - l138.fvalue(pv, l349); - l138.fvalue(pv, l348); - l138.fvalue(pv, l347); - l138.fvalue(pv, l346); - l138.fvalue(pv, l345); - l138.fvalue(pv, l344); - l138.fvalue(pv, l343); - l138.fvalue(pv, l342); - l138.fvalue(pv, l341); - l138.fvalue(pv, l340); - l138.fvalue(pv, l338); - l138.fvalue(pv, l337); - l138.fvalue(pv, l336); - l138.fvalue(pv, l335); - l138.fvalue(pv, l334); - l138.fvalue(pv, l333); - l138.fvalue(pv, l332); - l138.fvalue(pv, l331); - l138.fvalue(pv, l330); - l138.fvalue(pv, l329); - l138.fvalue(pv, l328); - l138.fvalue(pv, l327); - l138.fvalue(pv, l326); - l138.fvalue(pv, l325); - l138.fvalue(pv, l324); - l138.fvalue(pv, l323); - l138.fvalue(pv, l322); - l138.fvalue(pv, l321); - l138.fvalue(pv, l320); - l138.fvalue(pv, l319); - l138.fvalue(pv, l318); - l138.fvalue(pv, l317); - l138.fvalue(pv, l316); - l138.fvalue(pv, l315); - l138.fvalue(pv, l314); - l138.fvalue(pv, l313); - l138.fvalue(pv, l312); - l138.fvalue(pv, l311); - l138.fvalue(pv, l310); - l138.fvalue(pv, l309); - l138.fvalue(pv, l308); - l138.fvalue(pv, l307); - l138.fvalue(pv, l306); - l138.fvalue(pv, l305); - l138.fvalue(pv, l304); - l138.fvalue(pv, l303); - l138.fvalue(pv, l302); - l138.fvalue(pv, l301); - l138.fvalue(pv, l300); - l138.fvalue(pv, l299); - l138.fvalue(pv, l298); - l138.fvalue(pv, l297); - l138.fvalue(pv, l296); - l138.fvalue(pv, l295); - l138.fvalue(pv, l294); - l138.fvalue(pv, l293); - l138.fvalue(pv, l292); - l138.fvalue(pv, l291); - l138.fvalue(pv, l290); - l138.fvalue(pv, l289); - l138.fvalue(pv, l288); - l138.fvalue(pv, l287); - l138.fvalue(pv, l286); - l138.fvalue(pv, l285); - l138.fvalue(pv, l284); - l138.fvalue(pv, l283); - l138.fvalue(pv, l282); - l138.fvalue(pv, l281); - l138.fvalue(pv, l280); - l138.fvalue(pv, l279); - l138.fvalue(pv, l278); - l138.fvalue(pv, l277); - l138.fvalue(pv, l276); - l138.fvalue(pv, l275); - l138.fvalue(pv, l274); - l138.fvalue(pv, l273); - l138.fvalue(pv, l272); - l138.fvalue(pv, l271); - l138.fvalue(pv, l270); - l138.fvalue(pv, l269); - l138.fvalue(pv, l268); - l138.fvalue(pv, l267); - l138.fvalue(pv, l266); - l138.fvalue(pv, l265); - l138.fvalue(pv, l264); - l138.fvalue(pv, l263); - l138.fvalue(pv, l262); - l138.fvalue(pv, l261); - l138.fvalue(pv, l260); - l138.fvalue(pv, l259); - l138.fvalue(pv, l258); - l138.fvalue(pv, l257); - l138.fvalue(pv, l256); - l138.fvalue(pv, l255); - l138.fvalue(pv, l254); - l138.fvalue(pv, l253); - l138.fvalue(pv, l252); - l138.fvalue(pv, l251); - l138.fvalue(pv, l250); - l138.fvalue(pv, l249); - l138.fvalue(pv, l248); - l138.fvalue(pv, l247); - l138.fvalue(pv, l246); - l138.fvalue(pv, l245); - l138.fvalue(pv, l244); - l138.fvalue(pv, l243); - l138.fvalue(pv, l242); - l138.fvalue(pv, l241); - l138.fvalue(pv, l240); - l138.fvalue(pv, l239); - l138.fvalue(pv, l238); - l138.fvalue(pv, l237); - l138.fvalue(pv, l236); - l138.fvalue(pv, l235); - l138.fvalue(pv, l234); - l138.fvalue(pv, l233); - l138.fvalue(pv, l232); - l138.fvalue(pv, l231); - l138.fvalue(pv, l230); - l138.fvalue(pv, l229); - l138.fvalue(pv, l228); - l138.fvalue(pv, l226); - l138.fvalue(pv, l225); - l138.fvalue(pv, l224); - l138.fvalue(pv, l223); - l138.fvalue(pv, l222); - l138.fvalue(pv, l221); - l138.fvalue(pv, l220); - l138.fvalue(pv, l219); - l138.fvalue(pv, l218); - l138.fvalue(pv, l217); - l138.fvalue(pv, l216); - l138.fvalue(pv, l215); - l138.fvalue(pv, l214); - l138.fvalue(pv, l213); - l138.fvalue(pv, l212); - l138.fvalue(pv, l211); - l138.fvalue(pv, l210); - l138.fvalue(pv, l209); - l138.fvalue(pv, l208); - l138.fvalue(pv, l207); - l138.fvalue(pv, l206); - l138.fvalue(pv, l205); - l138.fvalue(pv, l204); - l138.fvalue(pv, l203); - l138.fvalue(pv, l202); - l138.fvalue(pv, l201); - l138.fvalue(pv, l200); - l138.fvalue(pv, l199); - l138.fvalue(pv, l198); - l138.fvalue(pv, l197); - l138.fvalue(pv, l196); - l138.fvalue(pv, l195); - l138.fvalue(pv, l194); - l138.fvalue(pv, l193); - l138.fvalue(pv, l192); - l138.fvalue(pv, l191); - l138.fvalue(pv, l190); - l138.fvalue(pv, l189); - l138.fvalue(pv, l188); - l138.fvalue(pv, l187); - l138.fvalue(pv, l186); - l138.fvalue(pv, l185); - l138.fvalue(pv, l184); - l138.fvalue(pv, l183); - l138.fvalue(pv, l182); - l138.fvalue(pv, l181); - l138.fvalue(pv, l180); - l138.fvalue(pv, l179); - l138.fvalue(pv, l178); - l138.fvalue(pv, l177); - l138.fvalue(pv, l176); - l138.fvalue(pv, l175); - l138.fvalue(pv, l174); - l138.fvalue(pv, l173); - l138.fvalue(pv, l172); - l138.fvalue(pv, l171); - l138.fvalue(pv, l170); - l138.fvalue(pv, l169); - l138.fvalue(pv, l168); - l138.fvalue(pv, l167); - l138.fvalue(pv, l166); - l138.fvalue(pv, l165); - l138.fvalue(pv, l164); - l138.fvalue(pv, l163); - l138.fvalue(pv, l162); - l138.fvalue(pv, l161); - l138.fvalue(pv, l160); - l138.fvalue(pv, l159); - l138.fvalue(pv, l158); - l138.fvalue(pv, l157); - l138.fvalue(pv, l156); - l138.fvalue(pv, l155); - l138.fvalue(pv, l154); - l138.fvalue(pv, l153); - l138.fvalue(pv, l152); - l138.fvalue(pv, l151); - l138.fvalue(pv, l150); - l138.fvalue(pv, l149); - l138.fvalue(pv, l148); - l138.fvalue(pv, l147); - l138.fvalue(pv, l146); - l138.fvalue(pv, l145); - l138.fvalue(pv, l144); - l138.fvalue(pv, l143); - l138.fvalue(pv, l142); - l138.fvalue(pv, l141); - l138.fvalue(pv, l140); - l138.fvalue(pv, l139); - l138.fvalue(pv, l138); - l138.fvalue(pv, l137); - l138.fvalue(pv, l136); - l138.fvalue(pv, l135); - l138.fvalue(pv, l134); - l138.fvalue(pv, l133); - l138.fvalue(pv, l132); - l138.fvalue(pv, l131); - l138.fvalue(pv, l130); - l138.fvalue(pv, l129); - l138.fvalue(pv, l128); - l138.fvalue(pv, l127); - l138.fvalue(pv, l126); - l138.fvalue(pv, l125); - l138.fvalue(pv, l124); - l138.fvalue(pv, l123); - l138.fvalue(pv, l122); - l138.fvalue(pv, l121); - l138.fvalue(pv, l120); - l138.fvalue(pv, l119); - l138.fvalue(pv, l118); - l138.fvalue(pv, l117); - l138.fvalue(pv, l116); - l138.fvalue(pv, l115); - l138.fvalue(pv, l114); - l138.fvalue(pv, l113); - l138.fvalue(pv, l112); - l138.fvalue(pv, l111); - l138.fvalue(pv, l110); - l138.fvalue(pv, l109); - l138.fvalue(pv, l108); - l138.fvalue(pv, l107); - l138.fvalue(pv, l106); - l138.fvalue(pv, l105); - l138.fvalue(pv, l104); - l138.fvalue(pv, l103); - l138.fvalue(pv, l102); - l138.fvalue(pv, l101); - l138.fvalue(pv, l100); - l138.fvalue(pv, l99); - l138.fvalue(pv, l98); - l138.fvalue(pv, l97); - l138.fvalue(pv, l96); - l138.fvalue(pv, l95); - l138.fvalue(pv, l94); - l138.fvalue(pv, l93); - l138.fvalue(pv, l92); - l138.fvalue(pv, l91); - l138.fvalue(pv, l90); - l138.fvalue(pv, l89); - l138.fvalue(pv, l88); - l138.fvalue(pv, l87); - l138.fvalue(pv, l86); - l138.fvalue(pv, l85); - l138.fvalue(pv, l84); - l138.fvalue(pv, l83); - l138.fvalue(pv, l82); - l138.fvalue(pv, l81); - l138.fvalue(pv, l80); - l138.fvalue(pv, l79); - l138.fvalue(pv, l78); - l138.fvalue(pv, l77); - l138.fvalue(pv, l76); - l138.fvalue(pv, l75); - l138.fvalue(pv, l74); - l138.fvalue(pv, l73); - l138.fvalue(pv, l72); - l138.fvalue(pv, l71); - l138.fvalue(pv, l70); - l138.fvalue(pv, l69); - l138.fvalue(pv, l68); - l138.fvalue(pv, l67); - l138.fvalue(pv, l66); - l138.fvalue(pv, l65); - l138.fvalue(pv, l64); - l138.fvalue(pv, l63); - l138.fvalue(pv, l62); - l138.fvalue(pv, l61); - l138.fvalue(pv, l60); - l138.fvalue(pv, l59); - l138.fvalue(pv, l58); - l138.fvalue(pv, l57); - l138.fvalue(pv, l56); - l138.fvalue(pv, l55); - l138.fvalue(pv, l54); - l138.fvalue(pv, l53); - l138.fvalue(pv, l52); - l138.fvalue(pv, l51); - l138.fvalue(pv, l50); - l138.fvalue(pv, l49); - l138.fvalue(pv, l48); - l138.fvalue(pv, l47); - l138.fvalue(pv, l46); - l138.fvalue(pv, l45); - l138.fvalue(pv, l44); - l138.fvalue(pv, l43); - l138.fvalue(pv, l42); - l138.fvalue(pv, l41); - l138.fvalue(pv, l40); - l138.fvalue(pv, l39); - l138.fvalue(pv, l38); - l138.fvalue(pv, l37); - l138.fvalue(pv, l36); - l138.fvalue(pv, l35); - l138.fvalue(pv, l34); - l138.fvalue(pv, l33); - l138.fvalue(pv, l32); - l138.fvalue(pv, l31); - l138.fvalue(pv, l30); - l138.fvalue(pv, l29); - l138.fvalue(pv, l28); - l138.fvalue(pv, l27); - l138.fvalue(pv, l26); - l138.fvalue(pv, l25); - l138.fvalue(pv, l24); - l138.fvalue(pv, l23); - l138.fvalue(pv, l22); - l138.fvalue(pv, l21); - l138.fvalue(pv, l20); - l138.fvalue(pv, l19); - l138.fvalue(pv, l18); - l138.fvalue(pv, l17); - l138.fvalue(pv, l16); - l138.fvalue(pv, l15); - l138.fvalue(pv, l14); - l138.fvalue(pv, l13); - l138.fvalue(pv, l12); - l138.fvalue(pv, l11); - l138.fvalue(pv, l10); - l138.fvalue(pv, l9); - l138.fvalue(pv, l8); - l138.fvalue(pv, l7); - l138.fvalue(pv, l6); - l138.fvalue(pv, l5); - l138.fvalue(pv, l4); - l138.fvalue(pv, l3); - l138.fvalue(pv, l2); - l138.fvalue(pv, l1); - ((l248).value = l386); - ((l203).value = 920); +var l341 = {name: "OP"}; +var l342 = {name: "SYM"}; +var l343 = {name: "X"}; +var l344 = {name: "ARGS"}; +var l345 = {name: "BODY"}; +var l346 = {name: "DECLS"}; +var l347 = {name: "DECL"}; +var l348 = {name: "NAME"}; +var l349 = {name: "ARG"}; +var l350 = {name: "FORM"}; +var l351 = {name: "PACKAGE-DESIGNATOR"}; +var l352 = {name: "PAIRS"}; +var l353 = {name: "PLACE"}; +var l354 = {name: "VALUE"}; +var l355 = {name: "VARS"}; +var l356 = {name: "VALS"}; +var l357 = {name: "STORE-VARS"}; +var l358 = {name: "WRITER-FORM"}; +var l359 = {name: "READER-FORM"}; +var l360 = {name: "RESULT"}; +var l361 = {name: "ACCESS-FN"}; +var l362 = {name: "LAMBDA-LIST"}; +var l363 = {name: "VALUE-FROM"}; +var l364 = {name: "VARIABLES"}; +var l365 = {name: "HEAD"}; +var l366 = {name: "TAIL"}; +var l367 = {name: "COLLECT"}; +var l368 = {name: "VARLIST"}; +var l369 = {name: "ENDLIST"}; +var l370 = {name: "V"}; +var l371 = {name: "ASSIGNMENTS"}; +var l372 = {name: "FORM1"}; +var l373 = {name: "FORMS"}; +var l374 = {name: "G"}; +var l375 = {name: "CLAUSULES"}; +var l376 = {name: "!FORM"}; +var l377 = {name: "CLAUSULE"}; +var l378 = {name: "ITER"}; +var l379 = {name: "G!TO"}; +var l380 = {name: "VAR"}; +var l381 = {name: "TO"}; +var l382 = {name: "G!LIST"}; +var l383 = {name: "DELTA"}; +var l384 = {name: "CONDITION"}; +var l385 = {name: "DOCSTRING"}; +var l386 = QIList(QIList(QIList(l287,l110,l5,QIList(l217,l5),l5),QIList(l277,l110,l5,QIList(l217,l5),l5),QIList(l276,l110,l5,QIList(l217,l5),l5),QIList(l270,l110,l5,QIList(l217,l5),l5),QIList(l260,l110,l5,QIList(l217,l5),l5),QIList(l250,l110,l5,QIList(l217,l5),l5),QIList(l249,l110,l5,QIList(l217,l5),l5),QIList(l224,l110,l5,QIList(l217,l5),l5),QIList(l221,l110,l5,QIList(l217,l5),l5),QIList(l208,l110,l5,QIList(l217,l5),l5),QIList(l204,l110,l5,QIList(l217,l5),l5),QIList(l203,l110,l5,QIList(l217,l5),l5),QIList(l187,l110,l5,QIList(l217,l5),l5),QIList(l176,l110,l5,QIList(l217,l5),l5),QIList(l147,l110,l5,QIList(l217,l5),l5),QIList(l137,l110,l5,QIList(l217,l5),l5),QIList(l134,l110,l5,QIList(l217,l5),l5),QIList(l133,l110,l5,QIList(l217,l5),l5),QIList(l132,l110,l5,QIList(l217,l5),l5),QIList(l121,l110,l5,QIList(l217,l5),l5),QIList(l113,l110,l5,QIList(l217,l5),l5),QIList(l16,l110,l5,QIList(l217,l5),l5),QIList(l5,l110,l5,QIList(l219,l217,l5),l5),QIList(l4,l110,l5,QIList(l219,l217,l5),l5),l5),QIList(QIList(l296,l213,QIList(l109,QIList(l6,QIList(l341,l342,l5),QIList(l178,QIList(l288,QIList(l180,l341,l5),QIList(l343,l226,l344,l5),QIList(l266,QIList(QIList(l344,QIList(l29,l343,l344,l5),l5),l5),QIList(l292,l344,QIList(l183,QIList(l295,l344,QIList(l180,l342,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l292,l213,QIList(l109,QIList(l6,QIList(l344,l226,l345,l5),QIList(l8,QIList(l303,l344,l5),QIList(l321,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l178,QIList(l291,QIList(l180,l344,l5),QIList(l6,QIList(QIList(l180,l344,l5),l5),QIList(l182,"return ",QIList(l179,l345,l5),";",l147,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l290,l213,QIList(l109,QIList(l6,QIList(l346,l226,l345,l5),QIList(l178,QIList(l185,QIList(l179,QIList(l79,QIList(l6,QIList(l347,l5),QIList(l178,QIList(l182,"var ",QIList(l180,QIList(l40,l347,l5),l5)," = ",QIList(l180,QIList(l42,l347,l5),l5),";",l147,l5),l5),l5),l346,l5),l5),QIList(l179,QIList(l79,QIList(l6,QIList(l347,l5),QIList(l178,QIList(l182,"if (typeof ",QIList(l180,QIList(l40,l347,l5),l5)," != '",QIList(l180,QIList(l41,l347,l5),l5),"')",l147,QIList(l186,"throw 'The value ' + ",QIList(l180,QIList(l40,l347,l5),l5)," + ' is not a type ",QIList(l180,QIList(l41,l347,l5),l5),".';",l147,l5),l5),l5),l5),l346,l5),l5),QIList(l182,"return ",QIList(l118,QIList(l179,l345,l5),l5),";",l147,l5),l5),l5),l5),l5),l5,l5),QIList(l289,l213,QIList(l109,QIList(l6,QIList(l348,l344,l226,l345,l5),QIList(l178,QIList(l118,QIList(l288,QIList(l180,l348,l5),QIList(l180,l344,l5),QIList(l266,QIList(l180,QIList(l79,QIList(l6,QIList(l349,l5),QIList(l178,QIList(QIList(l180,l349,l5),QIList(l184,QIList(l180,l349,l5),l5),l5),l5),l5),l344,l5),l5),QIList(l179,l345,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l288,l213,QIList(l109,QIList(l6,QIList(l348,l344,l226,l345,l5),QIList(l178,QIList(l49,QIList(l45,QIList(l177,QIList(l180,l348,l5),l5),QIList(l6,QIList(l180,l344,l5),QIList(l199,QIList(l180,l348,l5),QIList(l179,l345,l5),l5),l5),l5),l287,l5),l5),l5),l5),l5,l5),QIList(l178,l213,QIList(l109,QIList(l6,QIList(l350,l5),QIList(l285,l350,l5),l5),l5),l5,l5),QIList(l263,l213,QIList(l109,QIList(l6,QIList(l348,l344,l350,l5),QIList(l178,QIList(l222,QIList(l180,l348,l5),QIList(l180,l344,l5),QIList(l184,QIList(l180,l350,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l222,l213,QIList(l109,QIList(l6,QIList(l348,l344,l226,l345,l5),QIList(l178,QIList(l49,QIList(l45,QIList(l177,QIList(l180,l348,l5),l5),QIList(l6,QIList(l180,l344,l5),QIList(l199,QIList(l180,l348,l5),QIList(l179,l345,l5),l5),l5),l5),l221,l5),l5),l5),l5),l5,l5),QIList(l185,l213,QIList(l109,QIList(l6,QIList(l226,l345,l5),QIList(l178,QIList(l182,"(function(){",l147,QIList(l186,QIList(l179,l345,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l149,l213,QIList(l109,QIList(l6,QIList(l110,l226,l350,l5),QIList(l178,QIList(l115,QIList(l180,l110,l5),QIList(l148,QIList(l180,l110,l5),QIList(l118,QIList(l179,l350,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l138,l213,QIList(l109,QIList(l6,QIList(l351,l5),QIList(l178,QIList(l261,QIList(l115,l137,QIList(l125,QIList(l180,l351,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l117,l213,QIList(l109,QIList(l6,QIList(l226,l352,l5),QIList(l52,QIList(QIList(l13,l352,l5),l5,l5),QIList(QIList(l13,QIList(l32,l352,l5),l5),QIList(l321,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l36,l352,l5),l5),QIList(l266,QIList(QIList(l353,QIList(l40,l352,l5),l5),QIList(l354,QIList(l41,l352,l5),l5),l5),QIList(l111,QIList(l355,l356,l357,l358,l359,l5),QIList(l114,l353,l5),QIList(l178,QIList(l269,QIList(l180,QIList(l79,QIList(l109,l45,l5),l355,l356,l5),l5),QIList(l111,QIList(l180,l357,l5),QIList(l180,l354,l5),QIList(l180,l358,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l178,QIList(l118,QIList(l179,QIList(l70,QIList(QIList(l352,l352,QIList(l36,l352,l5),l5),QIList(l360,QIList(l177,l5,l5),QIList(l29,QIList(l178,QIList(l117,QIList(l180,QIList(l31,l352,l5),l5),QIList(l180,QIList(l34,l352,l5),l5),l5),l5),l360,l5),l5),l5),QIList(QIList(l13,l352,l5),QIList(l68,l360,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l213,QIList(l109,QIList(l6,QIList(l361,l362,l226,l345,l5),QIList(l8,QIList(l303,l361,l5),QIList(l321,"ACCESS-FN must be a symbol.",l5),l5),QIList(l178,QIList(l118,QIList(l49,QIList(l29,QIList(l177,QIList(l180,l361,l5),l5),QIList(l6,QIList(l180,l362,l5),QIList(l179,l345,l5),l5),l5),l113,l5),QIList(l177,QIList(l180,l361,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l112,l213,QIList(l109,QIList(l6,QIList(l363,l5),QIList(l178,QIList(l283,QIList(l109,l45,l5),QIList(l180,l363,l5),l5),l5),l5),l5),l5,l5),QIList(l111,l213,QIList(l109,QIList(l6,QIList(l364,l363,l226,l345,l5),QIList(l178,QIList(l283,QIList(l6,QIList(l225,QIList(l179,l364,l5),l226,QIList(l180,QIList(l17,l5),l5),l5),QIList(l179,l345,l5),l5),QIList(l180,l363,l5),l5),l5),l5),l5),l5,l5),QIList(l78,l213,QIList(l109,QIList(l6,QIList(l226,l345,l5),QIList(l178,QIList(l15,l4,QIList(l179,l345,l5),l5),l5),l5),l5),l5,l5),QIList(l75,l213,QIList(l109,QIList(l6,QIList(l226,l345,l5),QIList(l266,QIList(QIList(l365,QIList(l17,l5),l5),QIList(l366,QIList(l17,l5),l5),l5),QIList(l178,QIList(l269,QIList(QIList(QIList(l180,l365,l5),QIList(l29,QIList(l177,l77,l5),l5,l5),l5),QIList(QIList(l180,l366,l5),QIList(l180,l365,l5),l5),l5),QIList(l258,QIList(QIList(l367,QIList(l343,l5),QIList(l120,QIList(l180,l366,l5),QIList(l29,l343,l5,l5),l5),QIList(l115,QIList(l180,l366,l5),QIList(l32,QIList(l180,l366,l5),l5),l5),l343,l5),l5),QIList(l179,l345,l5),l5),QIList(l32,QIList(l180,l365,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l213,QIList(l109,QIList(l6,QIList(l368,l369,l226,l345,l5),QIList(l178,QIList(l199,l5,QIList(l269,QIList(l180,QIList(l79,QIList(l6,QIList(l343,l5),QIList(l45,QIList(l40,l343,l5),QIList(l41,l343,l5),l5),l5),l368,l5),l5),QIList(l15,l4,QIList(l7,QIList(l180,QIList(l31,l369,l5),l5),QIList(l14,QIList(l118,QIList(l180,QIList(l32,l369,l5),l5),l5),l5),l5),QIList(l280,QIList(l179,l345,l5),l5),QIList(l115,QIList(l179,QIList(l319,QIList(l109,l66,l5),QIList(l79,QIList(l6,QIList(l370,l5),QIList(l55,QIList(l30,QIList(l36,l370,l5),l5),QIList(l45,QIList(l40,l370,l5),QIList(l42,l370,l5),l5),l5),l5),l368,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l70,l213,QIList(l109,QIList(l6,QIList(l368,l369,l226,l345,l5),QIList(l178,QIList(l199,l5,QIList(l266,QIList(l180,QIList(l79,QIList(l6,QIList(l343,l5),QIList(l45,QIList(l40,l343,l5),QIList(l41,l343,l5),l5),l5),l368,l5),l5),QIList(l15,l4,QIList(l7,QIList(l180,QIList(l31,l369,l5),l5),QIList(l14,QIList(l118,QIList(l180,QIList(l32,l369,l5),l5),l5),l5),l5),QIList(l280,QIList(l179,l345,l5),l5),QIList(l69,QIList(l179,QIList(l319,QIList(l109,l66,l5),QIList(l79,QIList(l6,QIList(l370,l5),QIList(l55,QIList(l30,QIList(l36,l370,l5),l5),QIList(l45,QIList(l40,l370,l5),QIList(l42,l370,l5),l5),l5),l5),l368,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l69,l213,QIList(l109,QIList(l6,QIList(l226,l352,l5),QIList(l266,QIList(QIList(l371,QIList(l177,l5,l5),l5),l5),QIList(l15,l4,QIList(l52,QIList(QIList(l13,l352,l5),QIList(l14,l5),l5),QIList(QIList(l13,QIList(l32,l352,l5),l5),QIList(l321,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l266,QIList(QIList(l110,QIList(l31,l352,l5),l5),QIList(l354,QIList(l34,l352,l5),l5),l5),QIList(l49,QIList(l178,QIList(QIList(l180,l110,l5),QIList(l180,QIList(l17,l5),l5),QIList(l180,l354,l5),l5),l5),l371,l5),QIList(l115,l352,QIList(l36,l352,l5),l5),l5),l5),l5),l5),QIList(l115,l371,QIList(l68,l371,l5),l5),QIList(l178,QIList(l266,QIList(l180,QIList(l79,QIList(l109,l32,l5),l371,l5),l5),QIList(l115,QIList(l179,QIList(l61,QIList(l109,l66,l5),QIList(l79,QIList(l109,l92,l5),l371,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l213,QIList(l109,QIList(l6,QIList(l372,l360,l226,l345,l5),QIList(l178,QIList(l57,QIList(l118,QIList(l180,l372,l5),QIList(l180,l360,l5),l5),QIList(l179,l345,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l213,QIList(l109,QIList(l6,QIList(l350,l226,l345,l5),QIList(l266,QIList(QIList(l354,QIList(l17,l5),l5),l5),QIList(l178,QIList(l266,QIList(QIList(QIList(l180,l354,l5),QIList(l180,l350,l5),l5),l5),QIList(l179,l345,l5),QIList(l180,l354,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l213,QIList(l109,QIList(l6,QIList(l226,l373,l5),QIList(l52,QIList(QIList(l13,l373,l5),l5,l5),QIList(QIList(l13,QIList(l32,l373,l5),l5),QIList(l31,l373,l5),l5),QIList(l4,QIList(l266,QIList(QIList(l374,QIList(l17,l5),l5),l5),QIList(l178,QIList(l266,QIList(QIList(QIList(l180,l374,l5),QIList(l180,QIList(l31,l373,l5),l5),l5),l5),QIList(l223,QIList(l180,l374,l5),QIList(l180,l374,l5),QIList(l56,QIList(l179,QIList(l32,l373,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l213,QIList(l109,QIList(l6,QIList(l226,l373,l5),QIList(l52,QIList(QIList(l13,l373,l5),l4,l5),QIList(QIList(l13,QIList(l32,l373,l5),l5),QIList(l31,l373,l5),l5),QIList(l4,QIList(l178,QIList(l223,QIList(l180,QIList(l31,l373,l5),l5),QIList(l55,QIList(l179,QIList(l32,l373,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l213,QIList(l109,QIList(l6,QIList(l350,l226,l375,l5),QIList(l178,QIList(l53,QIList(l180,l350,l5),QIList(l179,QIList(l66,l375,QIList(l178,QIList(QIList(l4,QIList(l321,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l213,QIList(l109,QIList(l6,QIList(l350,l226,l375,l5),QIList(l266,QIList(QIList(l376,QIList(l17,l5),l5),l5),QIList(l178,QIList(l266,QIList(QIList(QIList(l180,l376,l5),QIList(l180,l350,l5),l5),l5),QIList(l52,QIList(l179,QIList(l79,QIList(l6,QIList(l377,l5),QIList(l223,QIList(l310,QIList(l31,l377,l5),l4,l5),l377,QIList(l178,QIList(QIList(l27,QIList(l180,l376,l5),QIList(l177,QIList(l180,QIList(l31,l377,l5),l5),l5),l5),QIList(l179,QIList(l32,l377,l5),l5),l5),l5),l5),l5),l375,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l213,QIList(l109,QIList(l6,QIList(l226,l375,l5),QIList(l223,QIList(l13,l375,l5),l5,QIList(l223,QIList(l310,QIList(l33,l375,l5),l4,l5),QIList(l178,QIList(l118,QIList(l179,QIList(l35,l375,l5),l5),l5),l5),QIList(l178,QIList(l223,QIList(l180,QIList(l33,l375,l5),l5),QIList(l118,QIList(l179,QIList(l35,l375,l5),l5),l5),QIList(l52,QIList(l179,QIList(l32,l375,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l213,QIList(l109,QIList(l6,QIList(l378,l226,l345,l5),QIList(l266,QIList(QIList(l379,QIList(l17,l5),l5),QIList(l380,QIList(l40,l378,l5),l5),QIList(l381,QIList(l41,l378,l5),l5),QIList(l360,QIList(l42,l378,l5),l5),l5),QIList(l178,QIList(l199,l5,QIList(l266,QIList(QIList(QIList(l180,l380,l5),0,l5),QIList(QIList(l180,l379,l5),QIList(l180,l381,l5),l5),l5),QIList(l253,QIList(l298,QIList(l180,l380,l5),QIList(l180,l379,l5),l5),QIList(l280,QIList(l179,l345,l5),l5),QIList(l47,QIList(l180,l380,l5),l5),l5),QIList(l180,l360,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l213,QIList(l109,QIList(l6,QIList(l378,l226,l345,l5),QIList(l266,QIList(QIList(l380,QIList(l40,l378,l5),l5),QIList(l382,QIList(l17,l5),l5),l5),QIList(l178,QIList(l199,l5,QIList(l266,QIList(QIList(QIList(l180,l382,l5),QIList(l180,QIList(l41,l378,l5),l5),l5),QIList(QIList(l180,l380,l5),l5,l5),l5),QIList(l253,QIList(l180,l382,l5),QIList(l115,QIList(l180,l380,l5),QIList(l31,QIList(l180,l382,l5),l5),l5),QIList(l280,QIList(l179,l345,l5),l5),QIList(l115,QIList(l180,l382,l5),QIList(l32,QIList(l180,l382,l5),l5),l5),l5),QIList(l180,QIList(l42,l378,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l213,QIList(l109,QIList(l6,QIList(l343,l353,l5),QIList(l178,QIList(l115,QIList(l180,l353,l5),QIList(l29,QIList(l180,l343,l5),QIList(l180,l353,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l213,QIList(l109,QIList(l6,QIList(l343,l225,QIList(l383,1,l5),l5),QIList(l178,QIList(l115,QIList(l180,l343,l5),QIList(l64,QIList(l180,l343,l5),QIList(l180,l383,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l213,QIList(l109,QIList(l6,QIList(l343,l225,QIList(l383,1,l5),l5),QIList(l178,QIList(l115,QIList(l180,l343,l5),QIList(l63,QIList(l180,l343,l5),QIList(l180,l383,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l213,QIList(l109,QIList(l6,QIList(l384,l226,l345,l5),QIList(l178,QIList(l199,l5,QIList(l253,QIList(l180,l384,l5),QIList(l179,l345,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l213,QIList(l109,QIList(l6,QIList(l225,l354,l5),QIList(l178,QIList(l273,l5,QIList(l180,l354,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l213,QIList(l109,QIList(l6,QIList(l348,l344,l226,l345,l5),QIList(l178,QIList(l118,QIList(l306,QIList(l177,QIList(l180,l348,l5),l5),QIList(l11,QIList(l180,QIList(l305,l348,l5),l5),QIList(l180,l344,l5),QIList(l179,QIList(l223,QIList(l55,QIList(l313,QIList(l31,l345,l5),l5),QIList(l28,QIList(l13,QIList(l32,l345,l5),l5),l5),l5),QIList(l178,QIList(QIList(l180,QIList(l31,l345,l5),l5),QIList(l199,QIList(l180,l348,l5),QIList(l179,QIList(l32,l345,l5),l5),l5),l5),l5),QIList(l178,QIList(QIList(l199,QIList(l180,l348,l5),QIList(l179,l345,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l177,QIList(l180,l348,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l213,QIList(l109,QIList(l6,QIList(l348,l344,l226,l345,l5),QIList(l266,QIList(QIList(l343,QIList(l17,"FN",l5),l5),l5),QIList(l178,QIList(l266,QIList(QIList(QIList(l180,l343,l5),QIList(l6,QIList(l180,l344,l5),QIList(l179,l345,l5),l5),l5),l5),QIList(l325,QIList(l180,l343,l5),"fname",QIList(l180,l348,l5),l5),QIList(l180,l343,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l213,QIList(l109,QIList(l6,QIList(l348,l354,l225,l385,l5),QIList(l178,QIList(l118,QIList(l115,QIList(l180,l348,l5),QIList(l180,l354,l5),l5),QIList(l179,QIList(l7,QIList(l313,l385,l5),QIList(l178,QIList(QIList(l325,QIList(l177,QIList(l180,l348,l5),l5),"vardoc",QIList(l180,l385,l5),l5),l5),l5),l5),l5),QIList(l177,QIList(l180,l348,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l213,QIList(l109,QIList(l6,QIList(l348,l354,l225,l385,l5),QIList(l178,QIList(l118,QIList(l2,QIList(l217,QIList(l180,l348,l5),l5),l5),QIList(l8,QIList(l19,QIList(l177,QIList(l180,l348,l5),l5),l5),QIList(l115,QIList(l180,l348,l5),QIList(l180,l354,l5),l5),l5),QIList(l179,QIList(l7,QIList(l313,l385,l5),QIList(l178,QIList(QIList(l325,QIList(l177,QIList(l180,l348,l5),l5),"vardoc",QIList(l180,l385,l5),l5),l5),l5),l5),l5),QIList(l177,QIList(l180,l348,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l213,QIList(l109,QIList(l6,QIList(l384,l226,l345,l5),QIList(l178,QIList(l223,QIList(l180,l384,l5),l5,QIList(l118,QIList(l179,l345,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l213,QIList(l109,QIList(l6,QIList(l384,l226,l345,l5),QIList(l178,QIList(l223,QIList(l180,l384,l5),QIList(l118,QIList(l179,l345,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l213,QIList(l109,QIList(l6,QIList(l344,l226,l345,l5),QIList(l178,QIList(l109,QIList(l6,QIList(l180,l344,l5),QIList(l179,l345,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l213,QIList(l109,QIList(l6,QIList(l348,l354,l225,l385,l5),QIList(l178,QIList(l118,QIList(l2,QIList(l217,QIList(l180,l348,l5),l5),l5),QIList(l2,QIList(l219,QIList(l180,l348,l5),l5),l5),QIList(l115,QIList(l180,l348,l5),QIList(l180,l354,l5),l5),QIList(l179,QIList(l7,QIList(l313,l385,l5),QIList(l178,QIList(QIList(l325,QIList(l177,QIList(l180,l348,l5),l5),"vardoc",QIList(l180,l385,l5),l5),l5),l5),l5),l5),QIList(l177,QIList(l180,l348,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l213,QIList(l109,QIList(l6,QIList(l226,l346,l5),QIList(l178,QIList(l261,QIList(l179,QIList(l79,QIList(l6,QIList(l347,l5),QIList(l178,QIList(l216,QIList(l177,QIList(l180,l347,l5),l5),l5),l5),l5),l346,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l213,QIList(l109,QIList(l6,QIList(l348,l344,l226,l345,l5),QIList(l178,QIList(l261,QIList(l212,QIList(l177,QIList(l180,l348,l5),l5),QIList(l177,QIList(l109,QIList(l6,QIList(l180,QIList(l79,QIList(l109,QIList(l6,QIList(l343,l5),QIList(l223,QIList(l310,l343,QIList(l177,l339,l5),l5),QIList(l177,l226,l5),l343,l5),l5),l5),l344,l5),l5),QIList(l179,l345,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5); +((l203).value = l386); +var l387 = QIList(QIList(l385,"l385"),QIList(l384,"l384"),QIList(l383,"l383"),QIList(l382,"l382"),QIList(l381,"l381"),QIList(l380,"l380"),QIList(l379,"l379"),QIList(l378,"l378"),QIList(l377,"l377"),QIList(l376,"l376"),QIList(l375,"l375"),QIList(l374,"l374"),QIList(l373,"l373"),QIList(l372,"l372"),QIList(l371,"l371"),QIList(l370,"l370"),QIList(l369,"l369"),QIList(l368,"l368"),QIList(l367,"l367"),QIList(l366,"l366"),QIList(l365,"l365"),QIList(l364,"l364"),QIList(l363,"l363"),QIList(l362,"l362"),QIList(l361,"l361"),QIList(l360,"l360"),QIList(l359,"l359"),QIList(l358,"l358"),QIList(l357,"l357"),QIList(l356,"l356"),QIList(l355,"l355"),QIList(l354,"l354"),QIList(l353,"l353"),QIList(l352,"l352"),QIList(l351,"l351"),QIList(l350,"l350"),QIList(l349,"l349"),QIList(l348,"l348"),QIList(l347,"l347"),QIList(l346,"l346"),QIList(l345,"l345"),QIList(l344,"l344"),QIList(l343,"l343"),QIList(l342,"l342"),QIList(l341,"l341"),QIList(l339,"l339"),QIList(l338,"l338"),QIList(l337,"l337"),QIList(l336,"l336"),QIList(l335,"l335"),QIList(l334,"l334"),QIList(l333,"l333"),QIList(l332,"l332"),QIList(l331,"l331"),QIList(l330,"l330"),QIList(l329,"l329"),QIList(l328,"l328"),QIList(l327,"l327"),QIList(l326,"l326"),QIList(l325,"l325"),QIList(l324,"l324"),QIList(l323,"l323"),QIList(l322,"l322"),QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l237,"l237"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l212,"l212"),QIList(l211,"l211"),QIList(l210,"l210"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l5); +(function(){ + l139.fvalue(pv, l385); + l139.fvalue(pv, l384); + l139.fvalue(pv, l383); + l139.fvalue(pv, l382); + l139.fvalue(pv, l381); + l139.fvalue(pv, l380); + l139.fvalue(pv, l379); + l139.fvalue(pv, l378); + l139.fvalue(pv, l377); + l139.fvalue(pv, l376); + l139.fvalue(pv, l375); + l139.fvalue(pv, l374); + l139.fvalue(pv, l373); + l139.fvalue(pv, l372); + l139.fvalue(pv, l371); + l139.fvalue(pv, l370); + l139.fvalue(pv, l369); + l139.fvalue(pv, l368); + l139.fvalue(pv, l367); + l139.fvalue(pv, l366); + l139.fvalue(pv, l365); + l139.fvalue(pv, l364); + l139.fvalue(pv, l363); + l139.fvalue(pv, l362); + l139.fvalue(pv, l361); + l139.fvalue(pv, l360); + l139.fvalue(pv, l359); + l139.fvalue(pv, l358); + l139.fvalue(pv, l357); + l139.fvalue(pv, l356); + l139.fvalue(pv, l355); + l139.fvalue(pv, l354); + l139.fvalue(pv, l353); + l139.fvalue(pv, l352); + l139.fvalue(pv, l351); + l139.fvalue(pv, l350); + l139.fvalue(pv, l349); + l139.fvalue(pv, l348); + l139.fvalue(pv, l347); + l139.fvalue(pv, l346); + l139.fvalue(pv, l345); + l139.fvalue(pv, l344); + l139.fvalue(pv, l343); + l139.fvalue(pv, l342); + l139.fvalue(pv, l341); + l139.fvalue(pv, l339); + l139.fvalue(pv, l338); + l139.fvalue(pv, l337); + l139.fvalue(pv, l336); + l139.fvalue(pv, l335); + l139.fvalue(pv, l334); + l139.fvalue(pv, l333); + l139.fvalue(pv, l332); + l139.fvalue(pv, l331); + l139.fvalue(pv, l330); + l139.fvalue(pv, l329); + l139.fvalue(pv, l328); + l139.fvalue(pv, l327); + l139.fvalue(pv, l326); + l139.fvalue(pv, l325); + l139.fvalue(pv, l324); + l139.fvalue(pv, l323); + l139.fvalue(pv, l322); + l139.fvalue(pv, l321); + l139.fvalue(pv, l320); + l139.fvalue(pv, l319); + l139.fvalue(pv, l318); + l139.fvalue(pv, l317); + l139.fvalue(pv, l316); + l139.fvalue(pv, l315); + l139.fvalue(pv, l314); + l139.fvalue(pv, l313); + l139.fvalue(pv, l312); + l139.fvalue(pv, l311); + l139.fvalue(pv, l310); + l139.fvalue(pv, l309); + l139.fvalue(pv, l308); + l139.fvalue(pv, l307); + l139.fvalue(pv, l306); + l139.fvalue(pv, l305); + l139.fvalue(pv, l304); + l139.fvalue(pv, l303); + l139.fvalue(pv, l302); + l139.fvalue(pv, l301); + l139.fvalue(pv, l300); + l139.fvalue(pv, l299); + l139.fvalue(pv, l298); + l139.fvalue(pv, l297); + l139.fvalue(pv, l296); + l139.fvalue(pv, l295); + l139.fvalue(pv, l294); + l139.fvalue(pv, l293); + l139.fvalue(pv, l292); + l139.fvalue(pv, l291); + l139.fvalue(pv, l290); + l139.fvalue(pv, l289); + l139.fvalue(pv, l288); + l139.fvalue(pv, l287); + l139.fvalue(pv, l286); + l139.fvalue(pv, l285); + l139.fvalue(pv, l284); + l139.fvalue(pv, l283); + l139.fvalue(pv, l282); + l139.fvalue(pv, l281); + l139.fvalue(pv, l280); + l139.fvalue(pv, l279); + l139.fvalue(pv, l278); + l139.fvalue(pv, l277); + l139.fvalue(pv, l276); + l139.fvalue(pv, l275); + l139.fvalue(pv, l274); + l139.fvalue(pv, l273); + l139.fvalue(pv, l272); + l139.fvalue(pv, l271); + l139.fvalue(pv, l270); + l139.fvalue(pv, l269); + l139.fvalue(pv, l268); + l139.fvalue(pv, l267); + l139.fvalue(pv, l266); + l139.fvalue(pv, l265); + l139.fvalue(pv, l264); + l139.fvalue(pv, l263); + l139.fvalue(pv, l262); + l139.fvalue(pv, l261); + l139.fvalue(pv, l260); + l139.fvalue(pv, l259); + l139.fvalue(pv, l258); + l139.fvalue(pv, l257); + l139.fvalue(pv, l256); + l139.fvalue(pv, l255); + l139.fvalue(pv, l254); + l139.fvalue(pv, l253); + l139.fvalue(pv, l252); + l139.fvalue(pv, l251); + l139.fvalue(pv, l250); + l139.fvalue(pv, l249); + l139.fvalue(pv, l248); + l139.fvalue(pv, l247); + l139.fvalue(pv, l246); + l139.fvalue(pv, l245); + l139.fvalue(pv, l244); + l139.fvalue(pv, l243); + l139.fvalue(pv, l242); + l139.fvalue(pv, l241); + l139.fvalue(pv, l240); + l139.fvalue(pv, l239); + l139.fvalue(pv, l238); + l139.fvalue(pv, l237); + l139.fvalue(pv, l236); + l139.fvalue(pv, l235); + l139.fvalue(pv, l234); + l139.fvalue(pv, l233); + l139.fvalue(pv, l232); + l139.fvalue(pv, l231); + l139.fvalue(pv, l230); + l139.fvalue(pv, l229); + l139.fvalue(pv, l227); + l139.fvalue(pv, l226); + l139.fvalue(pv, l225); + l139.fvalue(pv, l224); + l139.fvalue(pv, l223); + l139.fvalue(pv, l222); + l139.fvalue(pv, l221); + l139.fvalue(pv, l220); + l139.fvalue(pv, l219); + l139.fvalue(pv, l218); + l139.fvalue(pv, l217); + l139.fvalue(pv, l216); + l139.fvalue(pv, l215); + l139.fvalue(pv, l214); + l139.fvalue(pv, l213); + l139.fvalue(pv, l212); + l139.fvalue(pv, l211); + l139.fvalue(pv, l210); + l139.fvalue(pv, l209); + l139.fvalue(pv, l208); + l139.fvalue(pv, l207); + l139.fvalue(pv, l206); + l139.fvalue(pv, l205); + l139.fvalue(pv, l204); + l139.fvalue(pv, l203); + l139.fvalue(pv, l202); + l139.fvalue(pv, l201); + l139.fvalue(pv, l200); + l139.fvalue(pv, l199); + l139.fvalue(pv, l198); + l139.fvalue(pv, l197); + l139.fvalue(pv, l196); + l139.fvalue(pv, l195); + l139.fvalue(pv, l194); + l139.fvalue(pv, l193); + l139.fvalue(pv, l192); + l139.fvalue(pv, l191); + l139.fvalue(pv, l190); + l139.fvalue(pv, l189); + l139.fvalue(pv, l188); + l139.fvalue(pv, l187); + l139.fvalue(pv, l186); + l139.fvalue(pv, l185); + l139.fvalue(pv, l184); + l139.fvalue(pv, l183); + l139.fvalue(pv, l182); + l139.fvalue(pv, l181); + l139.fvalue(pv, l180); + l139.fvalue(pv, l179); + l139.fvalue(pv, l178); + l139.fvalue(pv, l177); + l139.fvalue(pv, l176); + l139.fvalue(pv, l175); + l139.fvalue(pv, l174); + l139.fvalue(pv, l173); + l139.fvalue(pv, l172); + l139.fvalue(pv, l171); + l139.fvalue(pv, l170); + l139.fvalue(pv, l169); + l139.fvalue(pv, l168); + l139.fvalue(pv, l167); + l139.fvalue(pv, l166); + l139.fvalue(pv, l165); + l139.fvalue(pv, l164); + l139.fvalue(pv, l163); + l139.fvalue(pv, l162); + l139.fvalue(pv, l161); + l139.fvalue(pv, l160); + l139.fvalue(pv, l159); + l139.fvalue(pv, l158); + l139.fvalue(pv, l157); + l139.fvalue(pv, l156); + l139.fvalue(pv, l155); + l139.fvalue(pv, l154); + l139.fvalue(pv, l153); + l139.fvalue(pv, l152); + l139.fvalue(pv, l151); + l139.fvalue(pv, l150); + l139.fvalue(pv, l149); + l139.fvalue(pv, l148); + l139.fvalue(pv, l147); + l139.fvalue(pv, l146); + l139.fvalue(pv, l145); + l139.fvalue(pv, l144); + l139.fvalue(pv, l143); + l139.fvalue(pv, l142); + l139.fvalue(pv, l141); + l139.fvalue(pv, l140); + l139.fvalue(pv, l139); + l139.fvalue(pv, l138); + l139.fvalue(pv, l137); + l139.fvalue(pv, l136); + l139.fvalue(pv, l135); + l139.fvalue(pv, l134); + l139.fvalue(pv, l133); + l139.fvalue(pv, l132); + l139.fvalue(pv, l131); + l139.fvalue(pv, l130); + l139.fvalue(pv, l129); + l139.fvalue(pv, l128); + l139.fvalue(pv, l127); + l139.fvalue(pv, l126); + l139.fvalue(pv, l125); + l139.fvalue(pv, l124); + l139.fvalue(pv, l123); + l139.fvalue(pv, l122); + l139.fvalue(pv, l121); + l139.fvalue(pv, l120); + l139.fvalue(pv, l119); + l139.fvalue(pv, l118); + l139.fvalue(pv, l117); + l139.fvalue(pv, l116); + l139.fvalue(pv, l115); + l139.fvalue(pv, l114); + l139.fvalue(pv, l113); + l139.fvalue(pv, l112); + l139.fvalue(pv, l111); + l139.fvalue(pv, l110); + l139.fvalue(pv, l109); + l139.fvalue(pv, l108); + l139.fvalue(pv, l107); + l139.fvalue(pv, l106); + l139.fvalue(pv, l105); + l139.fvalue(pv, l104); + l139.fvalue(pv, l103); + l139.fvalue(pv, l102); + l139.fvalue(pv, l101); + l139.fvalue(pv, l100); + l139.fvalue(pv, l99); + l139.fvalue(pv, l98); + l139.fvalue(pv, l97); + l139.fvalue(pv, l96); + l139.fvalue(pv, l95); + l139.fvalue(pv, l94); + l139.fvalue(pv, l93); + l139.fvalue(pv, l92); + l139.fvalue(pv, l91); + l139.fvalue(pv, l90); + l139.fvalue(pv, l89); + l139.fvalue(pv, l88); + l139.fvalue(pv, l87); + l139.fvalue(pv, l86); + l139.fvalue(pv, l85); + l139.fvalue(pv, l84); + l139.fvalue(pv, l83); + l139.fvalue(pv, l82); + l139.fvalue(pv, l81); + l139.fvalue(pv, l80); + l139.fvalue(pv, l79); + l139.fvalue(pv, l78); + l139.fvalue(pv, l77); + l139.fvalue(pv, l76); + l139.fvalue(pv, l75); + l139.fvalue(pv, l74); + l139.fvalue(pv, l73); + l139.fvalue(pv, l72); + l139.fvalue(pv, l71); + l139.fvalue(pv, l70); + l139.fvalue(pv, l69); + l139.fvalue(pv, l68); + l139.fvalue(pv, l67); + l139.fvalue(pv, l66); + l139.fvalue(pv, l65); + l139.fvalue(pv, l64); + l139.fvalue(pv, l63); + l139.fvalue(pv, l62); + l139.fvalue(pv, l61); + l139.fvalue(pv, l60); + l139.fvalue(pv, l59); + l139.fvalue(pv, l58); + l139.fvalue(pv, l57); + l139.fvalue(pv, l56); + l139.fvalue(pv, l55); + l139.fvalue(pv, l54); + l139.fvalue(pv, l53); + l139.fvalue(pv, l52); + l139.fvalue(pv, l51); + l139.fvalue(pv, l50); + l139.fvalue(pv, l49); + l139.fvalue(pv, l48); + l139.fvalue(pv, l47); + l139.fvalue(pv, l46); + l139.fvalue(pv, l45); + l139.fvalue(pv, l44); + l139.fvalue(pv, l43); + l139.fvalue(pv, l42); + l139.fvalue(pv, l41); + l139.fvalue(pv, l40); + l139.fvalue(pv, l39); + l139.fvalue(pv, l38); + l139.fvalue(pv, l37); + l139.fvalue(pv, l36); + l139.fvalue(pv, l35); + l139.fvalue(pv, l34); + l139.fvalue(pv, l33); + l139.fvalue(pv, l32); + l139.fvalue(pv, l31); + l139.fvalue(pv, l30); + l139.fvalue(pv, l29); + l139.fvalue(pv, l28); + l139.fvalue(pv, l27); + l139.fvalue(pv, l26); + l139.fvalue(pv, l25); + l139.fvalue(pv, l24); + l139.fvalue(pv, l23); + l139.fvalue(pv, l22); + l139.fvalue(pv, l21); + l139.fvalue(pv, l20); + l139.fvalue(pv, l19); + l139.fvalue(pv, l18); + l139.fvalue(pv, l17); + l139.fvalue(pv, l16); + l139.fvalue(pv, l15); + l139.fvalue(pv, l14); + l139.fvalue(pv, l13); + l139.fvalue(pv, l12); + l139.fvalue(pv, l11); + l139.fvalue(pv, l10); + l139.fvalue(pv, l9); + l139.fvalue(pv, l8); + l139.fvalue(pv, l7); + l139.fvalue(pv, l6); + l139.fvalue(pv, l5); + l139.fvalue(pv, l4); + l139.fvalue(pv, l3); + l139.fvalue(pv, l2); + l139.fvalue(pv, l1); + ((l249).value = l387); + ((l204).value = 920); ((l16).value = 234); - return ((l269).value = 303); + return ((l270).value = 303); })(); -((l249).value = 386); +((l250).value = 387); diff --git a/ecmalisp.lisp b/ecmalisp.lisp index 4285024..9ad5be6 100644 --- a/ecmalisp.lisp +++ b/ecmalisp.lisp @@ -248,12 +248,12 @@ x (list x))) -(defun !reduce (func list initial) +(defun !reduce (func list &key initial-value) (if (null list) - initial + initial-value (!reduce func (cdr list) - (funcall func initial (car list))))) + :initial-value (funcall func initial-value (car list))))) ;;; Go on growing the Lisp language in Ecmalisp, with more high ;;; level utilities as well as correct versions of other @@ -279,7 +279,7 @@ (append (cdr list1) list2)))) (defun append (&rest lists) - (!reduce #'append-two lists '())) + (!reduce #'append-two lists)) (defun revappend (list1 list2) (while list1 @@ -307,7 +307,7 @@ (setq assignments (reverse assignments)) ;; `(let ,(mapcar #'cdr assignments) - (setq ,@(!reduce #'append (mapcar #'butlast assignments) '()))))) + (setq ,@(!reduce #'append (mapcar #'butlast assignments)))))) (defmacro do (varlist endlist &body body) `(block nil @@ -781,7 +781,7 @@ (defvar *newline* (string (code-char 10))) (defun concat (&rest strs) - (!reduce #'concat-two strs "")) + (!reduce #'concat-two strs :initial-value "")) (defmacro concatf (variable &body form) `(setq ,variable (concat ,variable (progn ,@form))))