Closes #7
authorDavid Vazquez <davazp@gmail.com>
Mon, 18 Feb 2013 01:32:10 +0000 (01:32 +0000)
committerDavid Vazquez <davazp@gmail.com>
Mon, 18 Feb 2013 01:32:10 +0000 (01:32 +0000)
Enable backquote simplifications

ecmalisp.js
ecmalisp.lisp

index 74beca4..4c5b7f8 100644 (file)
@@ -90,33 +90,51 @@ var l13 = {name: "NULL"};
     }));
     return l13;
 })();
-var l14 = {name: "RETURN"};
-l14;
-var l15 = {name: "WHILE"};
+var l14 = {name: "ENDP"};
+(function(){
+    (l14).fvalue = (function(v4){
+        ((v4)["fname"] = "ENDP");
+        return v4;
+    })((function (values,v3){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (l13.fvalue(pv, v3) !== l5.value ? l4.value : (((function(){
+                var tmp = v3;
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
+                throw "type-error";
+            })()));
+        })();
+    }));
+    return l14;
+})();
+var l15 = {name: "RETURN"};
 l15;
-var l16 = {name: "*GENSYM-COUNTER*"};
+var l16 = {name: "WHILE"};
+l16;
+var l17 = {name: "*GENSYM-COUNTER*"};
 (function(){
-    (((l16.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l16).value = 0));
-    return l16;
+    (((l17.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l17).value = 0));
+    return l17;
 })();
-var l17 = {name: "GENSYM"};
-var l18 = {name: "INTEGER-TO-STRING"};
+var l18 = {name: "GENSYM"};
+var l19 = {name: "INTEGER-TO-STRING"};
 (function(){
-    (l17).fvalue = (function(v4){
-        ((v4)["fname"] = "GENSYM");
-        return v4;
-    })((function (values,v3){
+    (l18).fvalue = (function(v6){
+        ((v6)["fname"] = "GENSYM");
+        return v6;
+    })((function (values,v5){
         checkArgsAtMost(arguments, 2);
-        var v3; 
+        var v5; 
         switch(arguments.length-1){
         case 0:
-            v3="G";
+            v5="G";
         default: break;
         }
         return (function(){
-            ((l16).value = (function(){
+            ((l17).value = (function(){
                 var x1 = (function(){
-                    var symbol = l16;
+                    var symbol = l17;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
@@ -126,9 +144,9 @@ var l18 = {name: "INTEGER-TO-STRING"};
             })());
             return (function(){
                 var name = (function(){
-                    var string1 = v3;
-                    var string2 = l18.fvalue(pv, (function(){
-                        var symbol = l16;
+                    var string1 = v5;
+                    var string2 = l19.fvalue(pv, (function(){
+                        var symbol = l17;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
@@ -145,142 +163,142 @@ var l18 = {name: "INTEGER-TO-STRING"};
             })();
         })();
     }));
-    return l17;
+    return l18;
 })();
-var l19 = {name: "BOUNDP"};
+var l20 = {name: "BOUNDP"};
 (function(){
-    (l19).fvalue = (function(v6){
-        ((v6)["fname"] = "BOUNDP");
-        return v6;
-    })((function (values,v5){
+    (l20).fvalue = (function(v8){
+        ((v8)["fname"] = "BOUNDP");
+        return v8;
+    })((function (values,v7){
         checkArgs(arguments, 2);
         return (function(){
-            return ((v5.value !== undefined)?l4.value: l5.value);
+            return ((v7.value !== undefined)?l4.value: l5.value);
         })();
     }));
-    return l19;
+    return l20;
 })();
-var l20 = {name: "="};
+var l21 = {name: "="};
 (function(){
-    (l20).fvalue = (function(v9){
-        ((v9)["fname"] = "=");
-        return v9;
-    })((function (values,v7,v8){
+    (l21).fvalue = (function(v11){
+        ((v11)["fname"] = "=");
+        return v11;
+    })((function (values,v9,v10){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
-                var x1 = v7;
+                var x1 = v9;
                 if (typeof x1 !== 'number') throw 'Not a number!';
-                var x2 = v8;
+                var x2 = v10;
                 if (typeof x2 !== 'number') throw 'Not a number!';
                 return (x1==x2?l4.value: l5.value);
             })();
         })();
     }));
-    return l20;
+    return l21;
 })();
-var l21 = {name: "*"};
+var l22 = {name: "*"};
 (function(){
-    (l21).fvalue = (function(v12){
-        ((v12)["fname"] = "*");
-        return v12;
-    })((function (values,v10,v11){
+    (l22).fvalue = (function(v14){
+        ((v14)["fname"] = "*");
+        return v14;
+    })((function (values,v12,v13){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
-                var x1 = v10;
+                var x1 = v12;
                 if (typeof x1 !== 'number') throw 'Not a number!';
-                var x2 = v11;
+                var x2 = v13;
                 if (typeof x2 !== 'number') throw 'Not a number!';
                 return x1*x2;
             })();
         })();
     }));
-    return l21;
+    return l22;
 })();
-var l22 = {name: "/"};
+var l23 = {name: "/"};
 (function(){
-    (l22).fvalue = (function(v15){
-        ((v15)["fname"] = "/");
-        return v15;
-    })((function (values,v13,v14){
+    (l23).fvalue = (function(v17){
+        ((v17)["fname"] = "/");
+        return v17;
+    })((function (values,v15,v16){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
-                var x1 = v13;
+                var x1 = v15;
                 if (typeof x1 !== 'number') throw 'Not a number!';
-                var x2 = v14;
+                var x2 = v16;
                 if (typeof x2 !== 'number') throw 'Not a number!';
                 return x1/x2;
             })();
         })();
     }));
-    return l22;
+    return l23;
 })();
-var l23 = {name: "1+"};
+var l24 = {name: "1+"};
 (function(){
-    (l23).fvalue = (function(v17){
-        ((v17)["fname"] = "1+");
-        return v17;
-    })((function (values,v16){
+    (l24).fvalue = (function(v19){
+        ((v19)["fname"] = "1+");
+        return v19;
+    })((function (values,v18){
         checkArgs(arguments, 2);
         return (function(){
             return (function(){
-                var x1 = v16;
+                var x1 = v18;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return x1+1;
             })();
         })();
     }));
-    return l23;
+    return l24;
 })();
-var l24 = {name: "1-"};
+var l25 = {name: "1-"};
 (function(){
-    (l24).fvalue = (function(v19){
-        ((v19)["fname"] = "1-");
-        return v19;
-    })((function (values,v18){
+    (l25).fvalue = (function(v21){
+        ((v21)["fname"] = "1-");
+        return v21;
+    })((function (values,v20){
         checkArgs(arguments, 2);
         return (function(){
             return (function(){
-                var x1 = v18;
+                var x1 = v20;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return x1-1;
             })();
         })();
     }));
-    return l24;
+    return l25;
 })();
-var l25 = {name: "ZEROP"};
+var l26 = {name: "ZEROP"};
 (function(){
-    (l25).fvalue = (function(v21){
-        ((v21)["fname"] = "ZEROP");
-        return v21;
-    })((function (values,v20){
+    (l26).fvalue = (function(v23){
+        ((v23)["fname"] = "ZEROP");
+        return v23;
+    })((function (values,v22){
         checkArgs(arguments, 2);
         return (function(){
             return (function(){
-                var x1 = v20;
+                var x1 = v22;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return (x1==0?l4.value: l5.value);
             })();
         })();
     }));
-    return l25;
+    return l26;
 })();
-var l26 = {name: "TRUNCATE"};
+var l27 = {name: "TRUNCATE"};
 (function(){
-    (l26).fvalue = (function(v24){
-        ((v24)["fname"] = "TRUNCATE");
-        return v24;
-    })((function (values,v22,v23){
+    (l27).fvalue = (function(v26){
+        ((v26)["fname"] = "TRUNCATE");
+        return v26;
+    })((function (values,v24,v25){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
                 var x = (function(){
-                    var x1 = v22;
+                    var x1 = v24;
                     if (typeof x1 !== 'number') throw 'Not a number!';
-                    var x2 = v23;
+                    var x2 = v25;
                     if (typeof x2 !== 'number') throw 'Not a number!';
                     return x1/x2;
                 })();
@@ -290,74 +308,74 @@ var l26 = {name: "TRUNCATE"};
             })();
         })();
     }));
-    return l26;
+    return l27;
 })();
-var l27 = {name: "EQL"};
+var l28 = {name: "EQL"};
 (function(){
-    (l27).fvalue = (function(v27){
-        ((v27)["fname"] = "EQL");
-        return v27;
-    })((function (values,v25,v26){
+    (l28).fvalue = (function(v29){
+        ((v29)["fname"] = "EQL");
+        return v29;
+    })((function (values,v27,v28){
         checkArgs(arguments, 3);
         return (function(){
-            return ((v25 === v26)?l4.value: l5.value);
+            return ((v27 === v28)?l4.value: l5.value);
         })();
     }));
-    return l27;
+    return l28;
 })();
-var l28 = {name: "NOT"};
+var l29 = {name: "NOT"};
 (function(){
-    (l28).fvalue = (function(v29){
-        ((v29)["fname"] = "NOT");
-        return v29;
-    })((function (values,v28){
+    (l29).fvalue = (function(v31){
+        ((v31)["fname"] = "NOT");
+        return v31;
+    })((function (values,v30){
         checkArgs(arguments, 2);
         return (function(){
-            return (v28 !== l5.value ? l5.value : l4.value);
+            return (v30 !== l5.value ? l5.value : l4.value);
         })();
     }));
-    return l28;
+    return l29;
 })();
-var l29 = {name: "CONS"};
+var l30 = {name: "CONS"};
 (function(){
-    (l29).fvalue = (function(v32){
-        ((v32)["fname"] = "CONS");
-        return v32;
-    })((function (values,v30,v31){
+    (l30).fvalue = (function(v34){
+        ((v34)["fname"] = "CONS");
+        return v34;
+    })((function (values,v32,v33){
         checkArgs(arguments, 3);
         return (function(){
-            return ({car: v30, cdr: v31});
+            return ({car: v32, cdr: v33});
         })();
     }));
-    return l29;
+    return l30;
 })();
-var l30 = {name: "CONSP"};
+var l31 = {name: "CONSP"};
 (function(){
-    (l30).fvalue = (function(v34){
-        ((v34)["fname"] = "CONSP");
-        return v34;
-    })((function (values,v33){
+    (l31).fvalue = (function(v36){
+        ((v36)["fname"] = "CONSP");
+        return v36;
+    })((function (values,v35){
         checkArgs(arguments, 2);
         return (function(){
             return ((function(){
-                var tmp = v33;
+                var tmp = v35;
                 return (typeof tmp == 'object' && 'car' in tmp);
             })()?l4.value: l5.value);
         })();
     }));
-    return l30;
+    return l31;
 })();
-var l31 = {name: "CAR"};
+var l32 = {name: "CAR"};
 (function(){
-    (l31).fvalue = (function(v36){
-        ((v36)["fname"] = "CAR");
-        return v36;
+    (l32).fvalue = (function(v38){
+        ((v38)["fname"] = "CAR");
+        return v38;
     })((function(){
-        var func = (function (values,v35){
+        var func = (function (values,v37){
             checkArgs(arguments, 2);
             return (function(){
                 return (function(){
-                    var tmp = v35;
+                    var tmp = v37;
                     return tmp === l5.value? l5.value: tmp.car;
                 })();
             })();
@@ -365,47 +383,28 @@ var l31 = {name: "CAR"};
         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
         return func;
     })());
-    return l31;
-})();
-var l32 = {name: "CDR"};
-(function(){
-    (l32).fvalue = (function(v38){
-        ((v38)["fname"] = "CDR");
-        return v38;
-    })((function (values,v37){
-        checkArgs(arguments, 2);
-        return (function(){
-            return (function(){
-                var tmp = v37;
-                return tmp === l5.value? l5.value: tmp.cdr;
-            })();
-        })();
-    }));
     return l32;
 })();
-var l33 = {name: "CAAR"};
+var l33 = {name: "CDR"};
 (function(){
     (l33).fvalue = (function(v40){
-        ((v40)["fname"] = "CAAR");
+        ((v40)["fname"] = "CDR");
         return v40;
     })((function (values,v39){
         checkArgs(arguments, 2);
         return (function(){
             return (function(){
-                var tmp = (function(){
-                    var tmp = v39;
-                    return tmp === l5.value? l5.value: tmp.car;
-                })();
-                return tmp === l5.value? l5.value: tmp.car;
+                var tmp = v39;
+                return tmp === l5.value? l5.value: tmp.cdr;
             })();
         })();
     }));
     return l33;
 })();
-var l34 = {name: "CADR"};
+var l34 = {name: "CAAR"};
 (function(){
     (l34).fvalue = (function(v42){
-        ((v42)["fname"] = "CADR");
+        ((v42)["fname"] = "CAAR");
         return v42;
     })((function (values,v41){
         checkArgs(arguments, 2);
@@ -413,7 +412,7 @@ var l34 = {name: "CADR"};
             return (function(){
                 var tmp = (function(){
                     var tmp = v41;
-                    return tmp === l5.value? l5.value: tmp.cdr;
+                    return tmp === l5.value? l5.value: tmp.car;
                 })();
                 return tmp === l5.value? l5.value: tmp.car;
             })();
@@ -421,10 +420,10 @@ var l34 = {name: "CADR"};
     }));
     return l34;
 })();
-var l35 = {name: "CDAR"};
+var l35 = {name: "CADR"};
 (function(){
     (l35).fvalue = (function(v44){
-        ((v44)["fname"] = "CDAR");
+        ((v44)["fname"] = "CADR");
         return v44;
     })((function (values,v43){
         checkArgs(arguments, 2);
@@ -432,18 +431,18 @@ var l35 = {name: "CDAR"};
             return (function(){
                 var tmp = (function(){
                     var tmp = v43;
-                    return tmp === l5.value? l5.value: tmp.car;
+                    return tmp === l5.value? l5.value: tmp.cdr;
                 })();
-                return tmp === l5.value? l5.value: tmp.cdr;
+                return tmp === l5.value? l5.value: tmp.car;
             })();
         })();
     }));
     return l35;
 })();
-var l36 = {name: "CDDR"};
+var l36 = {name: "CDAR"};
 (function(){
     (l36).fvalue = (function(v46){
-        ((v46)["fname"] = "CDDR");
+        ((v46)["fname"] = "CDAR");
         return v46;
     })((function (values,v45){
         checkArgs(arguments, 2);
@@ -451,7 +450,7 @@ var l36 = {name: "CDDR"};
             return (function(){
                 var tmp = (function(){
                     var tmp = v45;
-                    return tmp === l5.value? l5.value: tmp.cdr;
+                    return tmp === l5.value? l5.value: tmp.car;
                 })();
                 return tmp === l5.value? l5.value: tmp.cdr;
             })();
@@ -459,32 +458,29 @@ var l36 = {name: "CDDR"};
     }));
     return l36;
 })();
-var l37 = {name: "CADDR"};
+var l37 = {name: "CDDR"};
 (function(){
     (l37).fvalue = (function(v48){
-        ((v48)["fname"] = "CADDR");
+        ((v48)["fname"] = "CDDR");
         return v48;
     })((function (values,v47){
         checkArgs(arguments, 2);
         return (function(){
             return (function(){
                 var tmp = (function(){
-                    var tmp = (function(){
-                        var tmp = v47;
-                        return tmp === l5.value? l5.value: tmp.cdr;
-                    })();
+                    var tmp = v47;
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })();
-                return tmp === l5.value? l5.value: tmp.car;
+                return tmp === l5.value? l5.value: tmp.cdr;
             })();
         })();
     }));
     return l37;
 })();
-var l38 = {name: "CDDDR"};
+var l38 = {name: "CADAR"};
 (function(){
     (l38).fvalue = (function(v50){
-        ((v50)["fname"] = "CDDDR");
+        ((v50)["fname"] = "CADAR");
         return v50;
     })((function (values,v49){
         checkArgs(arguments, 2);
@@ -493,20 +489,20 @@ var l38 = {name: "CDDDR"};
                 var tmp = (function(){
                     var tmp = (function(){
                         var tmp = v49;
-                        return tmp === l5.value? l5.value: tmp.cdr;
+                        return tmp === l5.value? l5.value: tmp.car;
                     })();
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })();
-                return tmp === l5.value? l5.value: tmp.cdr;
+                return tmp === l5.value? l5.value: tmp.car;
             })();
         })();
     }));
     return l38;
 })();
-var l39 = {name: "CADDDR"};
+var l39 = {name: "CADDR"};
 (function(){
     (l39).fvalue = (function(v52){
-        ((v52)["fname"] = "CADDDR");
+        ((v52)["fname"] = "CADDR");
         return v52;
     })((function (values,v51){
         checkArgs(arguments, 2);
@@ -514,10 +510,7 @@ var l39 = {name: "CADDDR"};
             return (function(){
                 var tmp = (function(){
                     var tmp = (function(){
-                        var tmp = (function(){
-                            var tmp = v51;
-                            return tmp === l5.value? l5.value: tmp.cdr;
-                        })();
+                        var tmp = v51;
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })();
                     return tmp === l5.value? l5.value: tmp.cdr;
@@ -528,429 +521,476 @@ var l39 = {name: "CADDDR"};
     }));
     return l39;
 })();
-var l40 = {name: "FIRST"};
+var l40 = {name: "CDDDR"};
 (function(){
     (l40).fvalue = (function(v54){
-        ((v54)["fname"] = "FIRST");
+        ((v54)["fname"] = "CDDDR");
         return v54;
     })((function (values,v53){
         checkArgs(arguments, 2);
         return (function(){
             return (function(){
-                var tmp = v53;
-                return tmp === l5.value? l5.value: tmp.car;
+                var tmp = (function(){
+                    var tmp = (function(){
+                        var tmp = v53;
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })();
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })();
+                return tmp === l5.value? l5.value: tmp.cdr;
             })();
         })();
     }));
     return l40;
 })();
-var l41 = {name: "SECOND"};
+var l41 = {name: "CADDDR"};
 (function(){
     (l41).fvalue = (function(v56){
-        ((v56)["fname"] = "SECOND");
+        ((v56)["fname"] = "CADDDR");
         return v56;
     })((function (values,v55){
         checkArgs(arguments, 2);
         return (function(){
-            return l34.fvalue(values, v55);
+            return (function(){
+                var tmp = (function(){
+                    var tmp = (function(){
+                        var tmp = (function(){
+                            var tmp = v55;
+                            return tmp === l5.value? l5.value: tmp.cdr;
+                        })();
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })();
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })();
+                return tmp === l5.value? l5.value: tmp.car;
+            })();
         })();
     }));
     return l41;
 })();
-var l42 = {name: "THIRD"};
+var l42 = {name: "FIRST"};
 (function(){
     (l42).fvalue = (function(v58){
-        ((v58)["fname"] = "THIRD");
+        ((v58)["fname"] = "FIRST");
         return v58;
     })((function (values,v57){
         checkArgs(arguments, 2);
         return (function(){
-            return l37.fvalue(values, v57);
+            return (function(){
+                var tmp = v57;
+                return tmp === l5.value? l5.value: tmp.car;
+            })();
         })();
     }));
     return l42;
 })();
-var l43 = {name: "FOURTH"};
+var l43 = {name: "SECOND"};
 (function(){
     (l43).fvalue = (function(v60){
-        ((v60)["fname"] = "FOURTH");
+        ((v60)["fname"] = "SECOND");
         return v60;
     })((function (values,v59){
         checkArgs(arguments, 2);
         return (function(){
-            return l39.fvalue(values, v59);
+            return l35.fvalue(values, v59);
         })();
     }));
     return l43;
 })();
-var l44 = {name: "REST"};
+var l44 = {name: "THIRD"};
 (function(){
     (l44).fvalue = (function(v62){
-        ((v62)["fname"] = "REST");
+        ((v62)["fname"] = "THIRD");
         return v62;
     })((function (values,v61){
         checkArgs(arguments, 2);
         return (function(){
-            return (function(){
-                var tmp = v61;
-                return tmp === l5.value? l5.value: tmp.cdr;
-            })();
+            return l39.fvalue(values, v61);
         })();
     }));
     return l44;
 })();
-var l45 = {name: "LIST"};
+var l45 = {name: "FOURTH"};
 (function(){
     (l45).fvalue = (function(v64){
-        ((v64)["fname"] = "LIST");
+        ((v64)["fname"] = "FOURTH");
         return v64;
-    })((function (values){
-        var v63= l5.value;
-        for (var i = arguments.length-1; i>=1; i--)
-            v63 = {car: arguments[i], cdr: 
-        v63};
+    })((function (values,v63){
+        checkArgs(arguments, 2);
         return (function(){
-            return v63;
+            return l41.fvalue(values, v63);
         })();
     }));
     return l45;
 })();
-var l46 = {name: "ATOM"};
+var l46 = {name: "REST"};
 (function(){
     (l46).fvalue = (function(v66){
-        ((v66)["fname"] = "ATOM");
+        ((v66)["fname"] = "REST");
         return v66;
     })((function (values,v65){
         checkArgs(arguments, 2);
         return (function(){
-            return l28.fvalue(values, ((function(){
+            return (function(){
                 var tmp = v65;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })();
+        })();
+    }));
+    return l46;
+})();
+var l47 = {name: "LIST"};
+(function(){
+    (l47).fvalue = (function(v68){
+        ((v68)["fname"] = "LIST");
+        return v68;
+    })((function (values){
+        var v67= l5.value;
+        for (var i = arguments.length-1; i>=1; i--)
+            v67 = {car: arguments[i], cdr: 
+        v67};
+        return (function(){
+            return v67;
+        })();
+    }));
+    return l47;
+})();
+var l48 = {name: "ATOM"};
+(function(){
+    (l48).fvalue = (function(v70){
+        ((v70)["fname"] = "ATOM");
+        return v70;
+    })((function (values,v69){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l29.fvalue(values, ((function(){
+                var tmp = v69;
                 return (typeof tmp == 'object' && 'car' in tmp);
             })()?l4.value: l5.value));
         })();
     }));
-    return l46;
+    return l48;
 })();
-var l47 = {name: "INCF"};
-l47;
-var l48 = {name: "DECF"};
-l48;
-var l49 = {name: "PUSH"};
+var l49 = {name: "INCF"};
 l49;
-var l50 = {name: "DOLIST"};
+var l50 = {name: "DECF"};
 l50;
-var l51 = {name: "DOTIMES"};
+var l51 = {name: "PUSH"};
 l51;
-var l52 = {name: "COND"};
+var l52 = {name: "DOLIST"};
 l52;
-var l53 = {name: "CASE"};
+var l53 = {name: "DOTIMES"};
 l53;
-var l54 = {name: "ECASE"};
+var l54 = {name: "COND"};
 l54;
-var l55 = {name: "AND"};
+var l55 = {name: "CASE"};
 l55;
-var l56 = {name: "OR"};
+var l56 = {name: "ECASE"};
 l56;
-var l57 = {name: "PROG1"};
+var l57 = {name: "AND"};
 l57;
-var l58 = {name: "PROG2"};
+var l58 = {name: "OR"};
 l58;
-var l59 = {name: "ENSURE-LIST"};
-var l60 = {name: "LISTP"};
+var l59 = {name: "PROG1"};
+l59;
+var l60 = {name: "PROG2"};
+l60;
+var l61 = {name: "ENSURE-LIST"};
+var l62 = {name: "LISTP"};
 (function(){
-    (l59).fvalue = (function(v68){
-        ((v68)["fname"] = "ENSURE-LIST");
-        return v68;
-    })((function (values,v67){
+    (l61).fvalue = (function(v72){
+        ((v72)["fname"] = "ENSURE-LIST");
+        return v72;
+    })((function (values,v71){
         checkArgs(arguments, 2);
         return (function(){
-            return (l60.fvalue(pv, v67) !== l5.value ? v67 : l45.fvalue(values, v67));
+            return (l62.fvalue(pv, v71) !== l5.value ? v71 : l47.fvalue(values, v71));
         })();
     }));
-    return l59;
+    return l61;
 })();
-var l61 = {name: "!REDUCE"};
-var l62 = {name: "INITIAL-VALUE", 'package': 'KEYWORD'};
+var l63 = {name: "!REDUCE"};
+var l64 = {name: "INITIAL-VALUE", 'package': 'KEYWORD'};
 (function(){
-    (l61).fvalue = (function(v72){
-        ((v72)["fname"] = "!REDUCE");
-        return v72;
-    })((function (values,v69,v70){
+    (l63).fvalue = (function(v76){
+        ((v76)["fname"] = "!REDUCE");
+        return v76;
+    })((function (values,v73,v74){
         checkArgsAtLeast(arguments, 3);
-        var v71; 
+        var v75; 
         var i;
         for (i=3; i<arguments.length; i+=2){
-            if (arguments[i] === l62.value){
-                v71 = arguments[i+1];
+            if (arguments[i] === l64.value){
+                v75 = arguments[i+1];
                 break;
             }
         }
         if (i == arguments.length){
-            v71 = l5.value;
+            v75 = l5.value;
         }
         for (i=3; i<arguments.length; i+=2){
-            if (arguments[i] !== l62.value)
+            if (arguments[i] !== l64.value)
                 throw 'Unknown keyword argument ' + arguments[i].name;
         }
         return (function(){
-            return (l13.fvalue(pv, v70) !== l5.value ? v71 : l61.fvalue(values, v69, (function(){
-                var tmp = v70;
+            return (l13.fvalue(pv, v74) !== l5.value ? v75 : l63.fvalue(values, v73, (function(){
+                var tmp = v74;
                 return tmp === l5.value? l5.value: tmp.cdr;
-            })(), l62.value, (function(){
-                var f = v69;
-                return (typeof f === 'function'? f: f.fvalue)(pv, v71, (function(){
-                    var tmp = v70;
+            })(), l64.value, (function(){
+                var f = v73;
+                return (typeof f === 'function'? f: f.fvalue)(pv, v75, (function(){
+                    var tmp = v74;
                     return tmp === l5.value? l5.value: tmp.car;
                 })())
             })()));
         })();
     }));
-    return l61;
+    return l63;
 })();
-var l63 = {name: "+"};
+var l65 = {name: "+"};
 (function(){
-    (l63).fvalue = (function(v77){
-        ((v77)["fname"] = "+");
-        return v77;
+    (l65).fvalue = (function(v81){
+        ((v81)["fname"] = "+");
+        return v81;
     })((function (values){
-        var v73= l5.value;
+        var v77= l5.value;
         for (var i = arguments.length-1; i>=1; i--)
-            v73 = {car: arguments[i], cdr: 
-        v73};
+            v77 = {car: arguments[i], cdr: 
+        v77};
         return (function(){
-            return (function(v74){
+            return (function(v78){
                 return (function(){
-                    return (function(v75,v76){
+                    return (function(v79,v80){
                         (function(){
-                            while(v75 !== l5.value){
-                                (v76 = (function(){
-                                    var tmp = v75;
+                            while(v79 !== l5.value){
+                                (v80 = (function(){
+                                    var tmp = v79;
                                     return tmp === l5.value? l5.value: tmp.car;
                                 })());
                                 (function(){
-                                    (v74 = (function(){
-                                        var x1 = v74;
+                                    (v78 = (function(){
+                                        var x1 = v78;
                                         if (typeof x1 !== 'number') throw 'Not a number!';
-                                        var x2 = v76;
+                                        var x2 = v80;
                                         if (typeof x2 !== 'number') throw 'Not a number!';
                                         return x1+x2;
                                     })());
                                     return l5.value;
                                 })();
-                                (v75 = (function(){
-                                    var tmp = v75;
+                                (v79 = (function(){
+                                    var tmp = v79;
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
-                        return v74;
-                    })(v73,l5.value);
+                        return v78;
+                    })(v77,l5.value);
                 })();
             })(0);
         })();
     }));
-    return l63;
+    return l65;
 })();
-var l64 = {name: "-"};
+var l66 = {name: "-"};
 (function(){
-    (l64).fvalue = (function(v83){
-        ((v83)["fname"] = "-");
-        return v83;
-    })((function (values,v79){
+    (l66).fvalue = (function(v87){
+        ((v87)["fname"] = "-");
+        return v87;
+    })((function (values,v83){
         checkArgsAtLeast(arguments, 2);
-        var v78= l5.value;
+        var v82= l5.value;
         for (var i = arguments.length-1; i>=2; i--)
-            v78 = {car: arguments[i], cdr: 
-        v78};
+            v82 = {car: arguments[i], cdr: 
+        v82};
         return (function(){
-            return (l13.fvalue(pv, v78) !== l5.value ? (function(){
-                var x1 = v79;
+            return (l13.fvalue(pv, v82) !== l5.value ? (function(){
+                var x1 = v83;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return -x1;
-            })() : (function(v80){
+            })() : (function(v84){
                 return (function(){
-                    return (function(v81,v82){
+                    return (function(v85,v86){
                         (function(){
-                            while(v81 !== l5.value){
-                                (v82 = (function(){
-                                    var tmp = v81;
+                            while(v85 !== l5.value){
+                                (v86 = (function(){
+                                    var tmp = v85;
                                     return tmp === l5.value? l5.value: tmp.car;
                                 })());
                                 (function(){
-                                    (v80 = (function(){
-                                        var x1 = v80;
+                                    (v84 = (function(){
+                                        var x1 = v84;
                                         if (typeof x1 !== 'number') throw 'Not a number!';
-                                        var x2 = v82;
+                                        var x2 = v86;
                                         if (typeof x2 !== 'number') throw 'Not a number!';
                                         return x1-x2;
                                     })());
                                     return l5.value;
                                 })();
-                                (v81 = (function(){
-                                    var tmp = v81;
+                                (v85 = (function(){
+                                    var tmp = v85;
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
-                        return v80;
-                    })(v78,l5.value);
+                        return v84;
+                    })(v82,l5.value);
                 })();
-            })(v79));
+            })(v83));
         })();
     }));
-    return l64;
+    return l66;
 })();
-var l65 = {name: "APPEND-TWO"};
-var l66 = {name: "APPEND"};
+var l67 = {name: "APPEND-TWO"};
+var l68 = {name: "APPEND"};
 (function(){
-    (l65).fvalue = (function(v86){
-        ((v86)["fname"] = "APPEND-TWO");
-        return v86;
-    })((function (values,v84,v85){
+    (l67).fvalue = (function(v90){
+        ((v90)["fname"] = "APPEND-TWO");
+        return v90;
+    })((function (values,v88,v89){
         checkArgs(arguments, 3);
         return (function(){
-            return (l13.fvalue(pv, v84) !== l5.value ? v85 : ({car: (function(){
-                var tmp = v84;
+            return (l13.fvalue(pv, v88) !== l5.value ? v89 : ({car: (function(){
+                var tmp = v88;
                 return tmp === l5.value? l5.value: tmp.car;
-            })(), cdr: l66.fvalue(pv, (function(){
-                var tmp = v84;
+            })(), cdr: l68.fvalue(pv, (function(){
+                var tmp = v88;
                 return tmp === l5.value? l5.value: tmp.cdr;
-            })(), v85)}));
+            })(), v89)}));
         })();
     }));
-    return l65;
+    return l67;
 })();
 (function(){
-    (l66).fvalue = (function(v88){
-        ((v88)["fname"] = "APPEND");
-        return v88;
+    (l68).fvalue = (function(v92){
+        ((v92)["fname"] = "APPEND");
+        return v92;
     })((function (values){
-        var v87= l5.value;
+        var v91= l5.value;
         for (var i = arguments.length-1; i>=1; i--)
-            v87 = {car: arguments[i], cdr: 
-        v87};
+            v91 = {car: arguments[i], cdr: 
+        v91};
         return (function(){
-            return l61.fvalue(values, (function(){
-                var symbol = l65;
+            return l63.fvalue(values, (function(){
+                var symbol = l67;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
-            })(), v87);
+            })(), v91);
         })();
     }));
-    return l66;
+    return l68;
 })();
-var l67 = {name: "REVAPPEND"};
+var l69 = {name: "REVAPPEND"};
 (function(){
-    (l67).fvalue = (function(v91){
-        ((v91)["fname"] = "REVAPPEND");
-        return v91;
-    })((function (values,v89,v90){
+    (l69).fvalue = (function(v95){
+        ((v95)["fname"] = "REVAPPEND");
+        return v95;
+    })((function (values,v93,v94){
         checkArgs(arguments, 3);
         return (function(){
             (function(){
                 return (function(){
-                    while(v89 !== l5.value){
-                        (v90 = ({car: (function(){
-                            var tmp = v89;
+                    while(v93 !== l5.value){
+                        (v94 = ({car: (function(){
+                            var tmp = v93;
                             return tmp === l5.value? l5.value: tmp.car;
-                        })(), cdr: v90}));
-                        (v89 = (function(){
-                            var tmp = v89;
+                        })(), cdr: v94}));
+                        (v93 = (function(){
+                            var tmp = v93;
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })());
                     }return l5.value;
                 })();
             })();
-            return v90;
+            return v94;
         })();
     }));
-    return l67;
+    return l69;
 })();
-var l68 = {name: "REVERSE"};
+var l70 = {name: "REVERSE"};
 (function(){
-    (l68).fvalue = (function(v93){
-        ((v93)["fname"] = "REVERSE");
-        return v93;
-    })((function (values,v92){
+    (l70).fvalue = (function(v97){
+        ((v97)["fname"] = "REVERSE");
+        return v97;
+    })((function (values,v96){
         checkArgs(arguments, 2);
         return (function(){
-            return l67.fvalue(values, v92, l5);
+            return l69.fvalue(values, v96, l5);
         })();
     }));
-    return l68;
+    return l70;
 })();
-var l69 = {name: "PSETQ"};
-l69;
-var l70 = {name: "DO"};
-l70;
-var l71 = {name: "DO*"};
+var l71 = {name: "PSETQ"};
 l71;
-var l72 = {name: "LIST-LENGTH"};
-(function(){
-    (l72).fvalue = (function(v96){
-        ((v96)["fname"] = "LIST-LENGTH");
-        return v96;
-    })((function (values,v94){
+var l72 = {name: "DO"};
+l72;
+var l73 = {name: "DO*"};
+l73;
+var l74 = {name: "LIST-LENGTH"};
+(function(){
+    (l74).fvalue = (function(v100){
+        ((v100)["fname"] = "LIST-LENGTH");
+        return v100;
+    })((function (values,v98){
         checkArgs(arguments, 2);
         return (function(){
-            return (function(v95){
+            return (function(v99){
                 (function(){
                     return (function(){
-                        while(l28.fvalue(pv, l13.fvalue(pv, v94)) !== l5.value){
-                            (v95 = (function(){
-                                var x1 = v95;
+                        while(l29.fvalue(pv, l13.fvalue(pv, v98)) !== l5.value){
+                            (v99 = (function(){
+                                var x1 = v99;
                                 if (typeof x1 !== 'number') throw 'Not a number!';
                                 return x1+1;
                             })());
-                            (v94 = (function(){
-                                var tmp = v94;
+                            (v98 = (function(){
+                                var tmp = v98;
                                 return tmp === l5.value? l5.value: tmp.cdr;
                             })());
                         }return l5.value;
                     })();
                 })();
-                return v95;
+                return v99;
             })(0);
         })();
     }));
-    return l72;
+    return l74;
 })();
-var l73 = {name: "LENGTH"};
+var l75 = {name: "LENGTH"};
 (function(){
-    (l73).fvalue = (function(v98){
-        ((v98)["fname"] = "LENGTH");
-        return v98;
-    })((function (values,v97){
+    (l75).fvalue = (function(v102){
+        ((v102)["fname"] = "LENGTH");
+        return v102;
+    })((function (values,v101){
         checkArgs(arguments, 2);
         return (function(){
-            return (((typeof(v97) == "string")?l4.value: l5.value) !== l5.value ? (function(){
-                var x = v97;
+            return (((typeof(v101) == "string")?l4.value: l5.value) !== l5.value ? (function(){
+                var x = v101;
                 if (typeof x != 'string')
                     throw 'The value ' + x + ' is not a type string.';
                 return x.length;
             })() : (((function(){
-                var x = v97;
+                var x = v101;
                 return typeof x === 'object' && 'length' in x;
             })()?l4.value: l5.value) !== l5.value ? (function(){
-                var tmp = (v97)["length"];
+                var tmp = (v101)["length"];
                 return tmp == undefined? l5.value: tmp ;
-            })() : (l60.fvalue(pv, v97) !== l5.value ? l72.fvalue(values, v97) : l5.value)));
+            })() : (l62.fvalue(pv, v101) !== l5.value ? l74.fvalue(values, v101) : l5.value)));
         })();
     }));
-    return l73;
+    return l75;
 })();
-var l74 = {name: "CONCAT-TWO"};
+var l76 = {name: "CONCAT-TWO"};
 (function(){
-    (l74).fvalue = (function(v101){
-        ((v101)["fname"] = "CONCAT-TWO");
-        return v101;
-    })((function (values,v99,v100){
+    (l76).fvalue = (function(v105){
+        ((v105)["fname"] = "CONCAT-TWO");
+        return v105;
+    })((function (values,v103,v104){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
-                var string1 = v99;
-                var string2 = v100;
+                var string1 = v103;
+                var string2 = v104;
                 if (typeof string1 != 'string')
                     throw 'The value ' + string1 + ' is not a type string.';
                 if (typeof string2 != 'string')
@@ -959,473 +999,531 @@ var l74 = {name: "CONCAT-TWO"};
             })();
         })();
     }));
-    return l74;
+    return l76;
 })();
-var l75 = {name: "WITH-COLLECT"};
-l75;
-var l76 = {name: "MAP1"};
-var l77 = {name: "SENTINEL"};
+var l77 = {name: "WITH-COLLECT"};
+l77;
+var l78 = {name: "MAP1"};
+var l79 = {name: "SENTINEL"};
 (function(){
-    (l76).fvalue = (function(v108){
-        ((v108)["fname"] = "MAP1");
-        return v108;
-    })((function (values,v102,v103){
+    (l78).fvalue = (function(v112){
+        ((v112)["fname"] = "MAP1");
+        return v112;
+    })((function (values,v106,v107){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
-                var v104 = ({car: l77, cdr: l5.value});
-                var v105 = v104;
-                (function(v107){
+                var v108 = ({car: l79, cdr: l5.value});
+                var v109 = v108;
+                (function(v111){
                     return (function(){
                         return (function(){
-                            while(v103 !== l5.value){
-                                v107(pv, (function(){
-                                    var f = v102;
+                            while(v107 !== l5.value){
+                                v111(pv, (function(){
+                                    var f = v106;
                                     return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
-                                        var tmp = v103;
+                                        var tmp = v107;
                                         return tmp === l5.value? l5.value: tmp.car;
                                     })())
                                 })());
-                                (v103 = (function(){
-                                    var tmp = v103;
+                                (v107 = (function(){
+                                    var tmp = v107;
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
                     })();
-                })((function (values,v106){
+                })((function (values,v110){
                     checkArgs(arguments, 2);
                     (function(){
-                        var x = v105;
+                        var x = v109;
                         if (typeof x != 'object')
                             throw 'The value ' + x + ' is not a type object.';
-                        return (x.cdr = ({car: v106, cdr: l5.value}), x);
+                        return (x.cdr = ({car: v110, cdr: l5.value}), x);
                     })();
-                    (v105 = (function(){
-                        var tmp = v105;
+                    (v109 = (function(){
+                        var tmp = v109;
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })());
-                    return v106;
+                    return v110;
                 }));
                 return (function(){
-                    var tmp = v104;
+                    var tmp = v108;
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })();
             })();
         })();
     }));
-    return l76;
+    return l78;
 })();
-var l78 = {name: "LOOP"};
-l78;
-var l79 = {name: "MAPCAR"};
+var l80 = {name: "LOOP"};
+l80;
+var l81 = {name: "MAPCAR"};
 (function(){
-    (l79).fvalue = (function(v120){
-        ((v120)["fname"] = "MAPCAR");
-        return v120;
-    })((function (values,v110,v111){
+    (l81).fvalue = (function(v124){
+        ((v124)["fname"] = "MAPCAR");
+        return v124;
+    })((function (values,v114,v115){
         checkArgsAtLeast(arguments, 3);
-        var v109= l5.value;
+        var v113= l5.value;
         for (var i = arguments.length-1; i>=3; i--)
-            v109 = {car: arguments[i], cdr: 
-        v109};
+            v113 = {car: arguments[i], cdr: 
+        v113};
         return (function(){
-            return (function(v112){
+            return (function(v116){
                 return (function(){
-                    var v113 = ({car: l77, cdr: l5.value});
-                    var v114 = v113;
-                    (function(v116){
+                    var v117 = ({car: l79, cdr: l5.value});
+                    var v118 = v117;
+                    (function(v120){
                         return (function(){
                             try {
                                 return (function(){
                                     return (function(){
                                         while(l4.value !== l5.value){
-                                            (function(v117){
+                                            (function(v121){
                                                 (function(){
-                                                    return (function(v118){
+                                                    return (function(v122){
                                                         return (function(){
                                                             try {
                                                                 return (function(){
                                                                     while(l4.value !== l5.value){
-                                                                        (l13.fvalue(pv, v118) !== l5.value ? (function(){
-                                                                            throw ({type: 'block', id: 52, values: l5.value, message: 'Return from unknown block NIL.'})
+                                                                        (l13.fvalue(pv, v122) !== l5.value ? (function(){
+                                                                            throw ({type: 'block', id: 54, values: l5.value, message: 'Return from unknown block NIL.'})
                                                                         })() : l5.value);
                                                                         (function(){
                                                                             (l13.fvalue(pv, (function(){
-                                                                                var tmp = v118;
+                                                                                var tmp = v122;
                                                                                 return tmp === l5.value? l5.value: tmp.car;
                                                                             })()) !== l5.value ? (function(){
-                                                                                throw ({type: 'block', id: 49, values: l5.value, message: 'Return from unknown block LOOP.'})
+                                                                                throw ({type: 'block', id: 51, values: l5.value, message: 'Return from unknown block LOOP.'})
                                                                             })() : l5.value);
                                                                             (function(){
-                                                                                var x = v118;
+                                                                                var x = v122;
                                                                                 if (typeof x != 'object')
                                                                                     throw 'The value ' + x + ' is not a type object.';
-                                                                                return (x.car = l35.fvalue(pv, v118), x);
+                                                                                return (x.car = l36.fvalue(pv, v122), x);
                                                                             })();
                                                                             return l5.value;
                                                                         })();
-                                                                        (function(v119){
-                                                                            return (v118 = v119);
+                                                                        (function(v123){
+                                                                            return (v122 = v123);
                                                                         })((function(){
-                                                                            var tmp = v118;
+                                                                            var tmp = v122;
                                                                             return tmp === l5.value? l5.value: tmp.cdr;
                                                                         })());
                                                                     }return l5.value;
                                                                 })();
                                                             }
                                                             catch (cf){
-                                                                if (cf.type == 'block' && cf.id == 52)
+                                                                if (cf.type == 'block' && cf.id == 54)
                                                                     return cf.values;
                                                                 else
                                                                     throw cf;
                                                             }
                                                         })();
-                                                    })(v112);
+                                                    })(v116);
                                                 })();
-                                                return v116(pv, (function(){
-                                                    var f = v110;
+                                                return v120(pv, (function(){
+                                                    var f = v114;
                                                     var args = [pv];
-                                                    var tail = (v117);
+                                                    var tail = (v121);
                                                     while (tail != l5.value){
                                                         args.push(tail.car);
                                                         tail = tail.cdr;
                                                     }
                                                     return (typeof f === 'function'? f : f.fvalue).apply(this, args);
                                                 })());
-                                            })(l76.fvalue(pv, (function(){
-                                                var symbol = l31;
+                                            })(l78.fvalue(pv, (function(){
+                                                var symbol = l32;
                                                 var func = symbol.fvalue;
                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                                                 return func;
-                                            })(), v112));
+                                            })(), v116));
                                         }return l5.value;
                                     })();
                                 })();
                             }
                             catch (cf){
-                                if (cf.type == 'block' && cf.id == 49)
+                                if (cf.type == 'block' && cf.id == 51)
                                     return cf.values;
                                 else
                                     throw cf;
                             }
                         })();
-                    })((function (values,v115){
+                    })((function (values,v119){
                         checkArgs(arguments, 2);
                         (function(){
-                            var x = v114;
+                            var x = v118;
                             if (typeof x != 'object')
                                 throw 'The value ' + x + ' is not a type object.';
-                            return (x.cdr = ({car: v115, cdr: l5.value}), x);
+                            return (x.cdr = ({car: v119, cdr: l5.value}), x);
                         })();
-                        (v114 = (function(){
-                            var tmp = v114;
+                        (v118 = (function(){
+                            var tmp = v118;
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })());
-                        return v115;
+                        return v119;
                     }));
                     return (function(){
-                        var tmp = v113;
+                        var tmp = v117;
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })();
                 })();
-            })(({car: v111, cdr: v109}));
+            })(({car: v115, cdr: v113}));
         })();
     }));
-    return l79;
+    return l81;
 })();
-var l80 = {name: "IDENTITY"};
+var l82 = {name: "IDENTITY"};
 (function(){
-    (l80).fvalue = (function(v122){
-        ((v122)["fname"] = "IDENTITY");
-        return v122;
-    })((function (values,v121){
+    (l82).fvalue = (function(v126){
+        ((v126)["fname"] = "IDENTITY");
+        return v126;
+    })((function (values,v125){
         checkArgs(arguments, 2);
         return (function(){
-            return v121;
+            return v125;
         })();
     }));
-    return l80;
+    return l82;
 })();
-var l81 = {name: "CONSTANTLY"};
+var l83 = {name: "CONSTANTLY"};
 (function(){
-    (l81).fvalue = (function(v125){
-        ((v125)["fname"] = "CONSTANTLY");
-        return v125;
-    })((function (values,v123){
+    (l83).fvalue = (function(v129){
+        ((v129)["fname"] = "CONSTANTLY");
+        return v129;
+    })((function (values,v127){
         checkArgs(arguments, 2);
         return (function(){
             return (function (values){
-                var v124= l5.value;
+                var v128= l5.value;
                 for (var i = arguments.length-1; i>=1; i--)
-                    v124 = {car: arguments[i], cdr: 
-                v124};
-                return v123;
+                    v128 = {car: arguments[i], cdr: 
+                v128};
+                return v127;
             });
         })();
     }));
-    return l81;
+    return l83;
 })();
-var l82 = {name: "COPY-LIST"};
+var l84 = {name: "COPY-LIST"};
 (function(){
-    (l82).fvalue = (function(v127){
-        ((v127)["fname"] = "COPY-LIST");
-        return v127;
-    })((function (values,v126){
+    (l84).fvalue = (function(v131){
+        ((v131)["fname"] = "COPY-LIST");
+        return v131;
+    })((function (values,v130){
         checkArgs(arguments, 2);
         return (function(){
-            return l79.fvalue(values, (function(){
-                var symbol = l80;
+            return l81.fvalue(values, (function(){
+                var symbol = l82;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
-            })(), v126);
+            })(), v130);
         })();
     }));
-    return l82;
+    return l84;
 })();
-var l83 = {name: "CODE-CHAR"};
+var l85 = {name: "LIST*"};
 (function(){
-    (l83).fvalue = (function(v129){
-        ((v129)["fname"] = "CODE-CHAR");
-        return v129;
-    })((function (values,v128){
+    (l85).fvalue = (function(v136){
+        ((v136)["fname"] = "LIST*");
+        return v136;
+    })((function (values,v133){
+        checkArgsAtLeast(arguments, 2);
+        var v132= l5.value;
+        for (var i = arguments.length-1; i>=2; i--)
+            v132 = {car: arguments[i], cdr: 
+        v132};
+        return (function(){
+            return (l13.fvalue(pv, v132) !== l5.value ? v133 : (l13.fvalue(pv, (function(){
+                var tmp = v132;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })()) !== l5.value ? ({car: v133, cdr: (function(){
+                var tmp = v132;
+                return tmp === l5.value? l5.value: tmp.car;
+            })()}) : (function(){
+                (function(){
+                    return (function(v134){
+                        return (function(){
+                            try {
+                                return (function(){
+                                    while(l4.value !== l5.value){
+                                        (l13.fvalue(pv, l37.fvalue(pv, v134)) !== l5.value ? (function(){
+                                            throw ({type: 'block', id: 60, values: (function(){
+                                                var x = v134;
+                                                if (typeof x != 'object')
+                                                    throw 'The value ' + x + ' is not a type object.';
+                                                return (x.cdr = l35.fvalue(pv, v134), x);
+                                            })(), message: 'Return from unknown block NIL.'})
+                                        })() : l5.value);
+                                        l5.value;
+                                        (function(v135){
+                                            return (v134 = v135);
+                                        })((function(){
+                                            var tmp = v134;
+                                            return tmp === l5.value? l5.value: tmp.cdr;
+                                        })());
+                                    }return l5.value;
+                                })();
+                            }
+                            catch (cf){
+                                if (cf.type == 'block' && cf.id == 60)
+                                    return cf.values;
+                                else
+                                    throw cf;
+                            }
+                        })();
+                    })(v132);
+                })();
+                return ({car: v133, cdr: v132});
+            })()));
+        })();
+    }));
+    return l85;
+})();
+var l86 = {name: "CODE-CHAR"};
+(function(){
+    (l86).fvalue = (function(v138){
+        ((v138)["fname"] = "CODE-CHAR");
+        return v138;
+    })((function (values,v137){
         checkArgs(arguments, 2);
         return (function(){
-            return v128;
+            return v137;
         })();
     }));
-    return l83;
+    return l86;
 })();
-var l84 = {name: "CHAR-CODE"};
+var l87 = {name: "CHAR-CODE"};
 (function(){
-    (l84).fvalue = (function(v131){
-        ((v131)["fname"] = "CHAR-CODE");
-        return v131;
-    })((function (values,v130){
+    (l87).fvalue = (function(v140){
+        ((v140)["fname"] = "CHAR-CODE");
+        return v140;
+    })((function (values,v139){
         checkArgs(arguments, 2);
         return (function(){
-            return v130;
+            return v139;
         })();
     }));
-    return l84;
+    return l87;
 })();
-var l85 = {name: "CHAR="};
+var l88 = {name: "CHAR="};
 (function(){
-    (l85).fvalue = (function(v134){
-        ((v134)["fname"] = "CHAR=");
-        return v134;
-    })((function (values,v132,v133){
+    (l88).fvalue = (function(v143){
+        ((v143)["fname"] = "CHAR=");
+        return v143;
+    })((function (values,v141,v142){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
-                var x1 = v132;
+                var x1 = v141;
                 if (typeof x1 !== 'number') throw 'Not a number!';
-                var x2 = v133;
+                var x2 = v142;
                 if (typeof x2 !== 'number') throw 'Not a number!';
                 return (x1==x2?l4.value: l5.value);
             })();
         })();
     }));
-    return l85;
+    return l88;
 })();
-var l86 = {name: "INTEGERP"};
+var l89 = {name: "INTEGERP"};
 (function(){
-    (l86).fvalue = (function(v136){
-        ((v136)["fname"] = "INTEGERP");
-        return v136;
-    })((function (values,v135){
+    (l89).fvalue = (function(v145){
+        ((v145)["fname"] = "INTEGERP");
+        return v145;
+    })((function (values,v144){
         checkArgs(arguments, 2);
         return (function(){
-            return (((typeof (v135) == "number")?l4.value: l5.value) !== l5.value ? (function(){
+            return (((typeof (v144) == "number")?l4.value: l5.value) !== l5.value ? (function(){
                 var x1 = (function(){
-                    var x = v135;
+                    var x = v144;
                     if (typeof x != 'number')
                         throw 'The value ' + x + ' is not a type number.';
                     return Math.floor(x);
                 })();
                 if (typeof x1 !== 'number') throw 'Not a number!';
-                var x2 = v135;
+                var x2 = v144;
                 if (typeof x2 !== 'number') throw 'Not a number!';
                 return (x1==x2?l4.value: l5.value);
             })() : l5.value);
         })();
     }));
-    return l86;
+    return l89;
 })();
-var l87 = {name: "PLUSP"};
+var l90 = {name: "PLUSP"};
 (function(){
-    (l87).fvalue = (function(v138){
-        ((v138)["fname"] = "PLUSP");
-        return v138;
-    })((function (values,v137){
+    (l90).fvalue = (function(v147){
+        ((v147)["fname"] = "PLUSP");
+        return v147;
+    })((function (values,v146){
         checkArgs(arguments, 2);
         return (function(){
             return (function(){
-                var x1 = v137;
+                var x1 = v146;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return (0<x1?l4.value: l5.value);
             })();
         })();
     }));
-    return l87;
+    return l90;
 })();
-var l88 = {name: "MINUSP"};
+var l91 = {name: "MINUSP"};
 (function(){
-    (l88).fvalue = (function(v140){
-        ((v140)["fname"] = "MINUSP");
-        return v140;
-    })((function (values,v139){
+    (l91).fvalue = (function(v149){
+        ((v149)["fname"] = "MINUSP");
+        return v149;
+    })((function (values,v148){
         checkArgs(arguments, 2);
         return (function(){
             return (function(){
-                var x1 = v139;
+                var x1 = v148;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return (x1<0?l4.value: l5.value);
             })();
         })();
     }));
-    return l88;
+    return l91;
 })();
 (function(){
-    (l60).fvalue = (function(v143){
-        ((v143)["fname"] = "LISTP");
-        return v143;
-    })((function (values,v141){
+    (l62).fvalue = (function(v152){
+        ((v152)["fname"] = "LISTP");
+        return v152;
+    })((function (values,v150){
         checkArgs(arguments, 2);
         return (function(){
-            return (function(v142){
-                return (v142 !== l5.value ? v142 : l13.fvalue(values, v141));
+            return (function(v151){
+                return (v151 !== l5.value ? v151 : l13.fvalue(values, v150));
             })(((function(){
-                var tmp = v141;
+                var tmp = v150;
                 return (typeof tmp == 'object' && 'car' in tmp);
             })()?l4.value: l5.value));
         })();
     }));
-    return l60;
+    return l62;
 })();
-var l89 = {name: "NTHCDR"};
+var l92 = {name: "NTHCDR"};
 (function(){
-    (l89).fvalue = (function(v146){
-        ((v146)["fname"] = "NTHCDR");
-        return v146;
-    })((function (values,v144,v145){
+    (l92).fvalue = (function(v155){
+        ((v155)["fname"] = "NTHCDR");
+        return v155;
+    })((function (values,v153,v154){
         checkArgs(arguments, 3);
         return (function(){
             (function(){
                 return (function(){
-                    while((l87.fvalue(pv, v144) !== l5.value ? v145 : l5.value) !== l5.value){
-                        (v144 = l24.fvalue(pv, v144));
-                        (v145 = (function(){
-                            var tmp = v145;
+                    while((l90.fvalue(pv, v153) !== l5.value ? v154 : l5.value) !== l5.value){
+                        (v153 = l25.fvalue(pv, v153));
+                        (v154 = (function(){
+                            var tmp = v154;
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })());
                     }return l5.value;
                 })();
             })();
-            return v145;
+            return v154;
         })();
     }));
-    return l89;
+    return l92;
 })();
-var l90 = {name: "NTH"};
+var l93 = {name: "NTH"};
 (function(){
-    (l90).fvalue = (function(v149){
-        ((v149)["fname"] = "NTH");
-        return v149;
-    })((function (values,v147,v148){
+    (l93).fvalue = (function(v158){
+        ((v158)["fname"] = "NTH");
+        return v158;
+    })((function (values,v156,v157){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
-                var tmp = l89.fvalue(pv, v147, v148);
+                var tmp = l92.fvalue(pv, v156, v157);
                 return tmp === l5.value? l5.value: tmp.car;
             })();
         })();
     }));
-    return l90;
+    return l93;
 })();
-var l91 = {name: "LAST"};
+var l94 = {name: "LAST"};
 (function(){
-    (l91).fvalue = (function(v151){
-        ((v151)["fname"] = "LAST");
-        return v151;
-    })((function (values,v150){
+    (l94).fvalue = (function(v160){
+        ((v160)["fname"] = "LAST");
+        return v160;
+    })((function (values,v159){
         checkArgs(arguments, 2);
         return (function(){
             (function(){
                 return (function(){
                     while(((function(){
                         var tmp = (function(){
-                            var tmp = v150;
+                            var tmp = v159;
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })();
                         return (typeof tmp == 'object' && 'car' in tmp);
                     })()?l4.value: l5.value) !== l5.value){
-                        (v150 = (function(){
-                            var tmp = v150;
+                        (v159 = (function(){
+                            var tmp = v159;
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })());
                     }return l5.value;
                 })();
             })();
-            return v150;
+            return v159;
         })();
     }));
-    return l91;
+    return l94;
 })();
-var l92 = {name: "BUTLAST"};
+var l95 = {name: "BUTLAST"};
 (function(){
-    (l92).fvalue = (function(v153){
-        ((v153)["fname"] = "BUTLAST");
-        return v153;
-    })((function (values,v152){
+    (l95).fvalue = (function(v162){
+        ((v162)["fname"] = "BUTLAST");
+        return v162;
+    })((function (values,v161){
         checkArgs(arguments, 2);
         return (function(){
             return (((function(){
                 var tmp = (function(){
-                    var tmp = v152;
+                    var tmp = v161;
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })();
                 return (typeof tmp == 'object' && 'car' in tmp);
             })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
-                var tmp = v152;
+                var tmp = v161;
                 return tmp === l5.value? l5.value: tmp.car;
-            })(), cdr: l92.fvalue(pv, (function(){
-                var tmp = v152;
+            })(), cdr: l95.fvalue(pv, (function(){
+                var tmp = v161;
                 return tmp === l5.value? l5.value: tmp.cdr;
             })())}) : l5.value);
         })();
     }));
-    return l92;
+    return l95;
 })();
-var l93 = {name: "MEMBER"};
+var l96 = {name: "MEMBER"};
 (function(){
-    (l93).fvalue = (function(v156){
-        ((v156)["fname"] = "MEMBER");
-        return v156;
-    })((function (values,v154,v155){
+    (l96).fvalue = (function(v165){
+        ((v165)["fname"] = "MEMBER");
+        return v165;
+    })((function (values,v163,v164){
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
                 try {
                     return (function(){
-                        while(v155 !== l5.value){
-                            (l27.fvalue(pv, v154, (function(){
-                                var tmp = v155;
+                        while(v164 !== l5.value){
+                            (l28.fvalue(pv, v163, (function(){
+                                var tmp = v164;
                                 return tmp === l5.value? l5.value: tmp.car;
                             })()) !== l5.value ? (function(){
                                 var values = mv;
-                                throw ({type: 'block', id: 70, values: v155, message: 'Return from unknown block NIL.'})
+                                throw ({type: 'block', id: 75, values: v164, message: 'Return from unknown block NIL.'})
                             })() : l5.value);
-                            (v155 = (function(){
-                                var tmp = v155;
+                            (v164 = (function(){
+                                var tmp = v164;
                                 return tmp === l5.value? l5.value: tmp.cdr;
                             })());
                         }return l5.value;
                     })();
                 }
                 catch (cf){
-                    if (cf.type == 'block' && cf.id == 70)
+                    if (cf.type == 'block' && cf.id == 75)
                         return values.apply(this, forcemv(cf.values));
                     else
                         throw cf;
@@ -1433,129 +1531,129 @@ var l93 = {name: "MEMBER"};
             })();
         })();
     }));
-    return l93;
+    return l96;
 })();
-var l94 = {name: "REMOVE"};
+var l97 = {name: "REMOVE"};
 (function(){
-    (l94).fvalue = (function(v159){
-        ((v159)["fname"] = "REMOVE");
-        return v159;
-    })((function (values,v157,v158){
+    (l97).fvalue = (function(v168){
+        ((v168)["fname"] = "REMOVE");
+        return v168;
+    })((function (values,v166,v167){
         checkArgs(arguments, 3);
         return (function(){
-            return (l13.fvalue(pv, v158) !== l5.value ? l5.value : (l27.fvalue(pv, v157, (function(){
-                var tmp = v158;
+            return (l13.fvalue(pv, v167) !== l5.value ? l5.value : (l28.fvalue(pv, v166, (function(){
+                var tmp = v167;
                 return tmp === l5.value? l5.value: tmp.car;
-            })()) !== l5.value ? l94.fvalue(values, v157, (function(){
-                var tmp = v158;
+            })()) !== l5.value ? l97.fvalue(values, v166, (function(){
+                var tmp = v167;
                 return tmp === l5.value? l5.value: tmp.cdr;
             })()) : ({car: (function(){
-                var tmp = v158;
+                var tmp = v167;
                 return tmp === l5.value? l5.value: tmp.car;
-            })(), cdr: l94.fvalue(pv, v157, (function(){
-                var tmp = v158;
+            })(), cdr: l97.fvalue(pv, v166, (function(){
+                var tmp = v167;
                 return tmp === l5.value? l5.value: tmp.cdr;
             })())})));
         })();
     }));
-    return l94;
+    return l97;
 })();
-var l95 = {name: "REMOVE-IF"};
+var l98 = {name: "REMOVE-IF"};
 (function(){
-    (l95).fvalue = (function(v162){
-        ((v162)["fname"] = "REMOVE-IF");
-        return v162;
-    })((function (values,v160,v161){
+    (l98).fvalue = (function(v171){
+        ((v171)["fname"] = "REMOVE-IF");
+        return v171;
+    })((function (values,v169,v170){
         checkArgs(arguments, 3);
         return (function(){
-            return (l13.fvalue(pv, v161) !== l5.value ? l5.value : ((function(){
-                var f = v160;
+            return (l13.fvalue(pv, v170) !== l5.value ? l5.value : ((function(){
+                var f = v169;
                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
-                    var tmp = v161;
+                    var tmp = v170;
                     return tmp === l5.value? l5.value: tmp.car;
                 })())
-            })() !== l5.value ? l95.fvalue(values, v160, (function(){
-                var tmp = v161;
+            })() !== l5.value ? l98.fvalue(values, v169, (function(){
+                var tmp = v170;
                 return tmp === l5.value? l5.value: tmp.cdr;
             })()) : ({car: (function(){
-                var tmp = v161;
+                var tmp = v170;
                 return tmp === l5.value? l5.value: tmp.car;
-            })(), cdr: l95.fvalue(pv, v160, (function(){
-                var tmp = v161;
+            })(), cdr: l98.fvalue(pv, v169, (function(){
+                var tmp = v170;
                 return tmp === l5.value? l5.value: tmp.cdr;
             })())})));
         })();
     }));
-    return l95;
+    return l98;
 })();
-var l96 = {name: "REMOVE-IF-NOT"};
+var l99 = {name: "REMOVE-IF-NOT"};
 (function(){
-    (l96).fvalue = (function(v165){
-        ((v165)["fname"] = "REMOVE-IF-NOT");
-        return v165;
-    })((function (values,v163,v164){
+    (l99).fvalue = (function(v174){
+        ((v174)["fname"] = "REMOVE-IF-NOT");
+        return v174;
+    })((function (values,v172,v173){
         checkArgs(arguments, 3);
         return (function(){
-            return (l13.fvalue(pv, v164) !== l5.value ? l5.value : ((function(){
-                var f = v163;
+            return (l13.fvalue(pv, v173) !== l5.value ? l5.value : ((function(){
+                var f = v172;
                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
-                    var tmp = v164;
+                    var tmp = v173;
                     return tmp === l5.value? l5.value: tmp.car;
                 })())
             })() !== l5.value ? ({car: (function(){
-                var tmp = v164;
+                var tmp = v173;
                 return tmp === l5.value? l5.value: tmp.car;
-            })(), cdr: l96.fvalue(pv, v163, (function(){
-                var tmp = v164;
+            })(), cdr: l99.fvalue(pv, v172, (function(){
+                var tmp = v173;
                 return tmp === l5.value? l5.value: tmp.cdr;
-            })())}) : l96.fvalue(values, v163, (function(){
-                var tmp = v164;
+            })())}) : l99.fvalue(values, v172, (function(){
+                var tmp = v173;
                 return tmp === l5.value? l5.value: tmp.cdr;
             })())));
         })();
     }));
-    return l96;
+    return l99;
 })();
-var l97 = {name: "DIGIT-CHAR-P"};
+var l100 = {name: "DIGIT-CHAR-P"};
 (function(){
-    (l97).fvalue = (function(v167){
-        ((v167)["fname"] = "DIGIT-CHAR-P");
-        return v167;
-    })((function (values,v166){
+    (l100).fvalue = (function(v176){
+        ((v176)["fname"] = "DIGIT-CHAR-P");
+        return v176;
+    })((function (values,v175){
         checkArgs(arguments, 2);
         return (function(){
             return (((function(){
-                var x1 = v166;
+                var x1 = v175;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return (48<=x1?l4.value: l5.value);
             })() !== l5.value ? (function(){
-                var x1 = v166;
+                var x1 = v175;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return (x1<=57?l4.value: l5.value);
             })() : l5.value) !== l5.value ? (function(){
-                var x1 = v166;
+                var x1 = v175;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return x1-48;
             })() : l5.value);
         })();
     }));
-    return l97;
+    return l100;
 })();
-var l98 = {name: "DIGIT-CHAR"};
+var l101 = {name: "DIGIT-CHAR"};
 (function(){
-    (l98).fvalue = (function(v169){
-        ((v169)["fname"] = "DIGIT-CHAR");
-        return v169;
-    })((function (values,v168){
+    (l101).fvalue = (function(v178){
+        ((v178)["fname"] = "DIGIT-CHAR");
+        return v178;
+    })((function (values,v177){
         checkArgs(arguments, 2);
         return (function(){
             return ((function(){
-                var x1 = v168;
+                var x1 = v177;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 return (0<=x1 && x1<=9?l4.value: l5.value);
             })() !== l5.value ? (function(){
                 var string = "0123456789";
-                var index = v168;
+                var index = v177;
                 if (typeof string != 'string')
                     throw 'The value ' + string + ' is not a type string.';
                 if (typeof index != 'number')
@@ -1564,32 +1662,32 @@ var l98 = {name: "DIGIT-CHAR"};
             })() : l5.value);
         })();
     }));
-    return l98;
+    return l101;
 })();
-var l99 = {name: "SUBSEQ"};
+var l102 = {name: "SUBSEQ"};
 (function(){
-    (l99).fvalue = (function(v173){
-        ((v173)["fname"] = "SUBSEQ");
-        return v173;
-    })((function (values,v170,v171,v172){
+    (l102).fvalue = (function(v182){
+        ((v182)["fname"] = "SUBSEQ");
+        return v182;
+    })((function (values,v179,v180,v181){
         checkArgsAtLeast(arguments, 3);
         checkArgsAtMost(arguments, 4);
-        var v172; 
+        var v181; 
         switch(arguments.length-1){
         case 2:
-            v172=l5.value;
+            v181=l5.value;
         default: break;
         }
         return (function(){
-            return (((typeof(v170) == "string")?l4.value: l5.value) !== l5.value ? (v172 !== l5.value ? (function(){
-                var str = v170;
-                var a = v171;
+            return (((typeof(v179) == "string")?l4.value: l5.value) !== l5.value ? (v181 !== l5.value ? (function(){
+                var str = v179;
+                var a = v180;
                 var b;
-                b = v172;
+                b = v181;
                 return str.slice(a,b);
             })() : (function(){
-                var str = v170;
-                var a = v171;
+                var str = v179;
+                var a = v180;
                 var b;
                 return str.slice(a,b);
             })()) : (function(){
@@ -1597,32 +1695,32 @@ var l99 = {name: "SUBSEQ"};
             })());
         })();
     }));
-    return l99;
+    return l102;
 })();
-var l100 = {name: "SOME"};
+var l103 = {name: "SOME"};
 (function(){
-    (l100).fvalue = (function(v180){
-        ((v180)["fname"] = "SOME");
-        return v180;
-    })((function (values,v174,v175){
+    (l103).fvalue = (function(v189){
+        ((v189)["fname"] = "SOME");
+        return v189;
+    })((function (values,v183,v184){
         checkArgs(arguments, 3);
         return (function(){
             try {
-                return (((typeof(v175) == "string")?l4.value: l5.value) !== l5.value ? (function(v176,v177){
+                return (((typeof(v184) == "string")?l4.value: l5.value) !== l5.value ? (function(v185,v186){
                     (function(){
                         return (function(){
                             while((function(){
-                                var x1 = v176;
+                                var x1 = v185;
                                 if (typeof x1 !== 'number') throw 'Not a number!';
-                                var x2 = v177;
+                                var x2 = v186;
                                 if (typeof x2 !== 'number') throw 'Not a number!';
                                 return (x1<x2?l4.value: l5.value);
                             })() !== l5.value){
                                 ((function(){
-                                    var f = v174;
+                                    var f = v183;
                                     return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
-                                        var string = v175;
-                                        var index = v176;
+                                        var string = v184;
+                                        var index = v185;
                                         if (typeof string != 'string')
                                             throw 'The value ' + string + ' is not a type string.';
                                         if (typeof index != 'number')
@@ -1631,10 +1729,10 @@ var l100 = {name: "SOME"};
                                     })())
                                 })() !== l5.value ? (function(){
                                     var values = mv;
-                                    throw ({type: 'block', id: 77, values: l4.value, message: 'Return from unknown block SOME.'})
+                                    throw ({type: 'block', id: 82, values: l4.value, message: 'Return from unknown block SOME.'})
                                 })() : l5.value);
-                                (v176 = (function(){
-                                    var x1 = v176;
+                                (v185 = (function(){
+                                    var x1 = v185;
                                     if (typeof x1 !== 'number') throw 'Not a number!';
                                     return x1+1;
                                 })());
@@ -1642,36 +1740,36 @@ var l100 = {name: "SOME"};
                         })();
                     })();
                     return l5.value;
-                })(0,l73.fvalue(pv, v175)) : (l60.fvalue(pv, v175) !== l5.value ? (function(){
+                })(0,l75.fvalue(pv, v184)) : (l62.fvalue(pv, v184) !== l5.value ? (function(){
                     try {
-                        return (function(v178,v179){
+                        return (function(v187,v188){
                             (function(){
-                                while(v178 !== l5.value){
-                                    (v179 = (function(){
-                                        var tmp = v178;
+                                while(v187 !== l5.value){
+                                    (v188 = (function(){
+                                        var tmp = v187;
                                         return tmp === l5.value? l5.value: tmp.car;
                                     })());
                                     (function(){
                                         ((function(){
-                                            var f = v174;
-                                            return (typeof f === 'function'? f: f.fvalue)(pv, v179)
+                                            var f = v183;
+                                            return (typeof f === 'function'? f: f.fvalue)(pv, v188)
                                         })() !== l5.value ? (function(){
                                             var values = mv;
-                                            throw ({type: 'block', id: 79, values: l4.value, message: 'Return from unknown block NIL.'})
+                                            throw ({type: 'block', id: 84, values: l4.value, message: 'Return from unknown block NIL.'})
                                         })() : l5.value);
                                         return l5.value;
                                     })();
-                                    (v178 = (function(){
-                                        var tmp = v178;
+                                    (v187 = (function(){
+                                        var tmp = v187;
                                         return tmp === l5.value? l5.value: tmp.cdr;
                                     })());
                                 }return l5.value;
                             })();
                             return l5.value;
-                        })(v175,l5.value);
+                        })(v184,l5.value);
                     }
                     catch (cf){
-                        if (cf.type == 'block' && cf.id == 79)
+                        if (cf.type == 'block' && cf.id == 84)
                             return values.apply(this, forcemv(cf.values));
                         else
                             throw cf;
@@ -1681,39 +1779,39 @@ var l100 = {name: "SOME"};
                 })()));
             }
             catch (cf){
-                if (cf.type == 'block' && cf.id == 77)
+                if (cf.type == 'block' && cf.id == 82)
                     return values.apply(this, forcemv(cf.values));
                 else
                     throw cf;
             }
         })();
     }));
-    return l100;
+    return l103;
 })();
-var l101 = {name: "EVERY"};
+var l104 = {name: "EVERY"};
 (function(){
-    (l101).fvalue = (function(v187){
-        ((v187)["fname"] = "EVERY");
-        return v187;
-    })((function (values,v181,v182){
+    (l104).fvalue = (function(v196){
+        ((v196)["fname"] = "EVERY");
+        return v196;
+    })((function (values,v190,v191){
         checkArgs(arguments, 3);
         return (function(){
             try {
-                return (((typeof(v182) == "string")?l4.value: l5.value) !== l5.value ? (function(v183,v184){
+                return (((typeof(v191) == "string")?l4.value: l5.value) !== l5.value ? (function(v192,v193){
                     (function(){
                         return (function(){
                             while((function(){
-                                var x1 = v183;
+                                var x1 = v192;
                                 if (typeof x1 !== 'number') throw 'Not a number!';
-                                var x2 = v184;
+                                var x2 = v193;
                                 if (typeof x2 !== 'number') throw 'Not a number!';
                                 return (x1<x2?l4.value: l5.value);
                             })() !== l5.value){
                                 ((function(){
-                                    var f = v181;
+                                    var f = v190;
                                     return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
-                                        var string = v182;
-                                        var index = v183;
+                                        var string = v191;
+                                        var index = v192;
                                         if (typeof string != 'string')
                                             throw 'The value ' + string + ' is not a type string.';
                                         if (typeof index != 'number')
@@ -1722,10 +1820,10 @@ var l101 = {name: "EVERY"};
                                     })())
                                 })() !== l5.value ? l5.value : (function(){
                                     var values = mv;
-                                    throw ({type: 'block', id: 80, values: l5.value, message: 'Return from unknown block EVERY.'})
+                                    throw ({type: 'block', id: 85, values: l5.value, message: 'Return from unknown block EVERY.'})
                                 })());
-                                (v183 = (function(){
-                                    var x1 = v183;
+                                (v192 = (function(){
+                                    var x1 = v192;
                                     if (typeof x1 !== 'number') throw 'Not a number!';
                                     return x1+1;
                                 })());
@@ -1733,36 +1831,36 @@ var l101 = {name: "EVERY"};
                         })();
                     })();
                     return l4.value;
-                })(0,l73.fvalue(pv, v182)) : (l60.fvalue(pv, v182) !== l5.value ? (function(){
+                })(0,l75.fvalue(pv, v191)) : (l62.fvalue(pv, v191) !== l5.value ? (function(){
                     try {
-                        return (function(v185,v186){
+                        return (function(v194,v195){
                             (function(){
-                                while(v185 !== l5.value){
-                                    (v186 = (function(){
-                                        var tmp = v185;
+                                while(v194 !== l5.value){
+                                    (v195 = (function(){
+                                        var tmp = v194;
                                         return tmp === l5.value? l5.value: tmp.car;
                                     })());
                                     (function(){
                                         ((function(){
-                                            var f = v181;
-                                            return (typeof f === 'function'? f: f.fvalue)(pv, v186)
+                                            var f = v190;
+                                            return (typeof f === 'function'? f: f.fvalue)(pv, v195)
                                         })() !== l5.value ? l5.value : (function(){
                                             var values = mv;
-                                            throw ({type: 'block', id: 82, values: l5.value, message: 'Return from unknown block NIL.'})
+                                            throw ({type: 'block', id: 87, values: l5.value, message: 'Return from unknown block NIL.'})
                                         })());
                                         return l5.value;
                                     })();
-                                    (v185 = (function(){
-                                        var tmp = v185;
+                                    (v194 = (function(){
+                                        var tmp = v194;
                                         return tmp === l5.value? l5.value: tmp.cdr;
                                     })());
                                 }return l5.value;
                             })();
                             return l4.value;
-                        })(v182,l5.value);
+                        })(v191,l5.value);
                     }
                     catch (cf){
-                        if (cf.type == 'block' && cf.id == 82)
+                        if (cf.type == 'block' && cf.id == 87)
                             return values.apply(this, forcemv(cf.values));
                         else
                             throw cf;
@@ -1772,98 +1870,98 @@ var l101 = {name: "EVERY"};
                 })()));
             }
             catch (cf){
-                if (cf.type == 'block' && cf.id == 80)
+                if (cf.type == 'block' && cf.id == 85)
                     return values.apply(this, forcemv(cf.values));
                 else
                     throw cf;
             }
         })();
     }));
-    return l101;
+    return l104;
 })();
-var l102 = {name: "ASSOC"};
+var l105 = {name: "ASSOC"};
 (function(){
-    (l102).fvalue = (function(v190){
-        ((v190)["fname"] = "ASSOC");
-        return v190;
-    })((function (values,v188,v189){
+    (l105).fvalue = (function(v199){
+        ((v199)["fname"] = "ASSOC");
+        return v199;
+    })((function (values,v197,v198){
         checkArgs(arguments, 3);
         return (function(){
             (function(){
                 try {
                     return (function(){
-                        while(v189 !== l5.value){
-                            (l27.fvalue(pv, v188, l33.fvalue(pv, v189)) !== l5.value ? (function(){
-                                throw ({type: 'block', id: 84, values: l5.value, message: 'Return from unknown block NIL.'})
-                            })() : (v189 = (function(){
-                                var tmp = v189;
+                        while(v198 !== l5.value){
+                            (l28.fvalue(pv, v197, l34.fvalue(pv, v198)) !== l5.value ? (function(){
+                                throw ({type: 'block', id: 89, values: l5.value, message: 'Return from unknown block NIL.'})
+                            })() : (v198 = (function(){
+                                var tmp = v198;
                                 return tmp === l5.value? l5.value: tmp.cdr;
                             })()));
                         }return l5.value;
                     })();
                 }
                 catch (cf){
-                    if (cf.type == 'block' && cf.id == 84)
+                    if (cf.type == 'block' && cf.id == 89)
                         return cf.values;
                     else
                         throw cf;
                 }
             })();
             return (function(){
-                var tmp = v189;
+                var tmp = v198;
                 return tmp === l5.value? l5.value: tmp.car;
             })();
         })();
     }));
-    return l102;
+    return l105;
 })();
-var l103 = {name: "STRING"};
+var l106 = {name: "STRING"};
 (function(){
-    (l103).fvalue = (function(v192){
-        ((v192)["fname"] = "STRING");
-        return v192;
-    })((function (values,v191){
+    (l106).fvalue = (function(v201){
+        ((v201)["fname"] = "STRING");
+        return v201;
+    })((function (values,v200){
         checkArgs(arguments, 2);
         return (function(){
-            return (((typeof(v191) == "string")?l4.value: l5.value) !== l5.value ? v191 : (((function(){
-                var tmp = v191;
+            return (((typeof(v200) == "string")?l4.value: l5.value) !== l5.value ? v200 : (((function(){
+                var tmp = v200;
                 return (typeof tmp == 'object' && 'name' in tmp);
-            })()?l4.value: l5.value) !== l5.value ? (v191).name : (function(){
-                var x = v191;
+            })()?l4.value: l5.value) !== l5.value ? (v200).name : (function(){
+                var x = v200;
                 if (typeof x != 'number')
                     throw 'The value ' + x + ' is not a type number.';
                 return String.fromCharCode(x);
             })()));
         })();
     }));
-    return l103;
+    return l106;
 })();
-var l104 = {name: "STRING="};
+var l107 = {name: "STRING="};
 (function(){
-    (l104).fvalue = (function(v195){
-        ((v195)["fname"] = "STRING=");
-        return v195;
-    })((function (values,v193,v194){
+    (l107).fvalue = (function(v204){
+        ((v204)["fname"] = "STRING=");
+        return v204;
+    })((function (values,v202,v203){
         checkArgs(arguments, 3);
         return (function(){
-            return ((v193 == v194)?l4.value: l5.value);
+            return ((v202 == v203)?l4.value: l5.value);
         })();
     }));
-    return l104;
+    return l107;
 })();
-var l105 = {name: "FDEFINITION"};
+var l108 = {name: "FDEFINITION"};
 (function(){
-    (l105).fvalue = (function(v197){
-        ((v197)["fname"] = "FDEFINITION");
-        return v197;
-    })((function (values,v196){
+    (l108).fvalue = (function(v206){
+        ((v206)["fname"] = "FDEFINITION");
+        return v206;
+    })((function (values,v205){
         checkArgs(arguments, 2);
         return (function(){
-            return (((typeof v196 == 'function')?l4.value: l5.value) !== l5.value ? v196 : (((function(){
-                var tmp = v196;
+            return (((typeof v205 == 'function')?l4.value: l5.value) !== l5.value ? v205 : (((function(){
+                var tmp = v205;
                 return (typeof tmp == 'object' && 'name' in tmp);
             })()?l4.value: l5.value) !== l5.value ? (function(){
-                var symbol = v196;
+                var symbol = v205;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
@@ -1872,81 +1970,338 @@ var l105 = {name: "FDEFINITION"};
             })()));
         })();
     }));
-    return l105;
+    return l108;
 })();
-var l106 = {name: "DISASSEMBLE"};
-var l107 = {name: "WRITE-LINE"};
+var l109 = {name: "DISASSEMBLE"};
+var l110 = {name: "WRITE-LINE"};
 (function(){
-    (l106).fvalue = (function(v199){
-        ((v199)["fname"] = "DISASSEMBLE");
-        return v199;
-    })((function (values,v198){
+    (l109).fvalue = (function(v208){
+        ((v208)["fname"] = "DISASSEMBLE");
+        return v208;
+    })((function (values,v207){
         checkArgs(arguments, 2);
         return (function(){
-            l107.fvalue(pv, (l105.fvalue(pv, v198)).toString());
+            l110.fvalue(pv, (l108.fvalue(pv, v207)).toString());
             return l5.value;
         })();
     }));
-    return l106;
+    return l109;
 })();
-var l108 = {name: "DOCUMENTATION"};
-var l109 = {name: "FUNCTION"};
-var l110 = {name: "VARIABLE"};
+var l111 = {name: "DOCUMENTATION"};
+var l112 = {name: "FUNCTION"};
+var l113 = {name: "VARIABLE"};
 (function(){
-    (l108).fvalue = (function(v204){
-        ((v204)["fname"] = "DOCUMENTATION");
-        return v204;
+    (l111).fvalue = (function(v213){
+        ((v213)["fname"] = "DOCUMENTATION");
+        return v213;
     })((function(){
-        var func = (function (values,v200,v201){
+        var func = (function (values,v209,v210){
             checkArgs(arguments, 3);
             return (function(){
-                return (function(v202){
-                    return (l27.fvalue(pv, v202, l109) !== l5.value ? (function(v203){
+                return (function(v211){
+                    return (l28.fvalue(pv, v211, l112) !== l5.value ? (function(v212){
                         return (function(){
-                            var tmp = (v203)["docstring"];
+                            var tmp = (v212)["docstring"];
                             return tmp == undefined? l5.value: tmp ;
                         })();
-                    })(l105.fvalue(pv, v200)) : (l27.fvalue(pv, v202, l110) !== l5.value ? (function(){
+                    })(l108.fvalue(pv, v209)) : (l28.fvalue(pv, v211, l113) !== l5.value ? (function(){
                         (((function(){
-                            var tmp = v200;
+                            var tmp = v209;
                             return (typeof tmp == 'object' && 'name' in tmp);
                         })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
                             throw "Wrong argument type! it should be a symbol";
                         })());
                         return (function(){
-                            var tmp = (v200)["vardoc"];
+                            var tmp = (v209)["vardoc"];
                             return tmp == undefined? l5.value: tmp ;
                         })();
                     })() : (function(){
                         throw "ECASE expression failed.";
                     })()));
-                })(v201);
+                })(v210);
             })();
         });
         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
         return func;
     })());
-    return l108;
+    return l111;
 })();
-var l111 = {name: "MULTIPLE-VALUE-BIND"};
-l111;
-var l112 = {name: "MULTIPLE-VALUE-LIST"};
-l112;
-var l113 = {name: "*SETF-EXPANDERS*"};
+var l114 = {name: "MULTIPLE-VALUE-BIND"};
+l114;
+var l115 = {name: "MULTIPLE-VALUE-LIST"};
+l115;
+var l116 = {name: "*SETF-EXPANDERS*"};
 (function(){
-    (((l113.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l113).value = l5.value));
-    return l113;
+    (((l116.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l116).value = l5.value));
+    return l116;
 })();
-var l114 = {name: "GET-SETF-EXPANSION"};
-var l115 = {name: "SETQ"};
-var l116 = {name: "LS-MACROEXPAND-1"};
+var l117 = {name: "GET-SETF-EXPANSION"};
+var l118 = {name: "SETQ"};
+var l119 = {name: "LS-MACROEXPAND-1"};
 (function(){
-    (l114).fvalue = (function(v210){
-        ((v210)["fname"] = "GET-SETF-EXPANSION");
-        return v210;
-    })((function (values,v205){
+    (l117).fvalue = (function(v219){
+        ((v219)["fname"] = "GET-SETF-EXPANSION");
+        return v219;
+    })((function (values,v214){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (((function(){
+                var tmp = v214;
+                return (typeof tmp == 'object' && 'name' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (function(v215){
+                return values(l5.value, l5.value, l47.fvalue(pv, v215), l47.fvalue(pv, l118, v214, v215), v214);
+            })(l18.fvalue(pv)) : (function(v216){
+                return (function(){
+                    var v217 = (function(){
+                        var tmp = v216;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })();
+                    var v218 = (function(){
+                        var tmp = l105.fvalue(pv, v217, (function(){
+                            var symbol = l116;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })());
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })();
+                    (l13.fvalue(pv, v218) !== l5.value ? (function(){
+                        throw "Unknown generalized reference.";
+                    })() : l5.value);
+                    return (function(){
+                        var f = v218;
+                        var args = [values];
+                        var tail = ((function(){
+                            var tmp = v216;
+                            return tmp === l5.value? l5.value: tmp.cdr;
+                        })());
+                        while (tail != l5.value){
+                            args.push(tail.car);
+                            tail = tail.cdr;
+                        }
+                        return (typeof f === 'function'? f : f.fvalue).apply(this, args);
+                    })();
+                })();
+            })(l119.fvalue(pv, v214)));
+        })();
+    }));
+    return l117;
+})();
+var l120 = {name: "DEFINE-SETF-EXPANDER"};
+l120;
+var l121 = {name: "SETF"};
+l121;
+var l122 = {name: "PROGN"};
+var l123 = {name: "RPLACA"};
+(function(){
+    ((l116).value = ({car: ({car: l32, cdr: (function (values,v220){
+        checkArgs(arguments, 2);
+        return (function(v221,v222){
+            return values(l47.fvalue(pv, v221), l47.fvalue(pv, v220), l47.fvalue(pv, v222), l47.fvalue(pv, l122, l47.fvalue(pv, l123, v221, v222), v222), l47.fvalue(pv, l32, v221));
+        })(l18.fvalue(pv),l18.fvalue(pv));
+    })}), cdr: (function(){
+        var symbol = l116;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()}));
+    return l32;
+})();
+var l124 = {name: "RPLACD"};
+(function(){
+    ((l116).value = ({car: ({car: l33, cdr: (function (values,v223){
         checkArgs(arguments, 2);
+        return (function(v224,v225){
+            return values(l47.fvalue(pv, v224), l47.fvalue(pv, v223), l47.fvalue(pv, v225), l47.fvalue(pv, l122, l47.fvalue(pv, l124, v224, v225), v225), l47.fvalue(pv, l32, v224));
+        })(l18.fvalue(pv),l18.fvalue(pv));
+    })}), cdr: (function(){
+        var symbol = l116;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()}));
+    return l33;
+})();
+var l125 = {name: "TYPECASE"};
+l125;
+var l126 = {name: "NCONC"};
+(function(){
+    (l126).fvalue = (function(v241){
+        ((v241)["fname"] = "NCONC");
+        return v241;
+    })((function (values){
+        var v226= l5.value;
+        for (var i = arguments.length-1; i>=1; i--)
+            v226 = {car: arguments[i], cdr: 
+        v226};
+        return (function(){
+            return (function(v228){
+                return (function(){
+                    return (function(v229){
+                        return (function(){
+                            try {
+                                return (function(){
+                                    while(l4.value !== l5.value){
+                                        (l13.fvalue(pv, v229) !== l5.value ? (function(){
+                                            var values = mv;
+                                            throw ({type: 'block', id: 98, values: l5.value, message: 'Return from unknown block NIL.'})
+                                        })() : l5.value);
+                                        (function(){
+                                            (function(v230){
+                                                return (function(v231){
+                                                    return (((function(){
+                                                        var tmp = v231;
+                                                        return (typeof tmp == 'object' && 'car' in tmp);
+                                                    })()?l4.value: l5.value) !== l5.value ? (function(){
+                                                        var v232 = v230;
+                                                        var v233 = v232;
+                                                        (function(){
+                                                            return (function(v234){
+                                                                return (function(){
+                                                                    try {
+                                                                        return (function(){
+                                                                            while(l4.value !== l5.value){
+                                                                                (l14.fvalue(pv, v234) !== l5.value ? (function(){
+                                                                                    throw ({type: 'block', id: 100, values: l5.value, message: 'Return from unknown block NIL.'})
+                                                                                })() : l5.value);
+                                                                                (function(){
+                                                                                    (function(v235){
+                                                                                        return (function(v236){
+                                                                                            return (((function(){
+                                                                                                var tmp = v236;
+                                                                                                return (typeof tmp == 'object' && 'car' in tmp);
+                                                                                            })()?l4.value: l5.value) !== l5.value ? (function(){
+                                                                                                (function(){
+                                                                                                    var x = l94.fvalue(pv, v233);
+                                                                                                    if (typeof x != 'object')
+                                                                                                        throw 'The value ' + x + ' is not a type object.';
+                                                                                                    return (x.cdr = v235, x);
+                                                                                                })();
+                                                                                                return (function(){
+                                                                                                    return (function(){
+                                                                                                        var func = (function (values,v238){
+                                                                                                            var v238; 
+                                                                                                            switch(arguments.length-1){
+                                                                                                            case 0:
+                                                                                                                v238=l5.value;
+                                                                                                            default: break;
+                                                                                                            }
+                                                                                                            var v237= l5.value;
+                                                                                                            for (var i = arguments.length-1; i>=2; i--)
+                                                                                                                v237 = {car: arguments[i], cdr: 
+                                                                                                            v237};
+                                                                                                            return (v233 = v238);
+                                                                                                        });
+                                                                                                        var args = [pv];
+                                                                                                        return (function(){
+                                                                                                            var values = mv;
+                                                                                                            var vs;
+                                                                                                            vs = v235;
+                                                                                                            if (typeof vs === 'object' && 'multiple-value' in vs)
+                                                                                                                args = args.concat(vs);
+                                                                                                            else
+                                                                                                                args.push(vs);
+                                                                                                            return func.apply(window, args);
+                                                                                                        })();
+                                                                                                    })();
+                                                                                                })();
+                                                                                            })() : (l13.fvalue(pv, v236) !== l5.value ? (function(){
+                                                                                                var x = l94.fvalue(pv, v233);
+                                                                                                if (typeof x != 'object')
+                                                                                                    throw 'The value ' + x + ' is not a type object.';
+                                                                                                return (x.cdr = l5.value, x);
+                                                                                            })() : (l48.fvalue(pv, v236) !== l5.value ? ((function(){
+                                                                                                var tmp = v234;
+                                                                                                return tmp === l5.value? l5.value: tmp.cdr;
+                                                                                            })() !== l5.value ? v228(pv, v235) : (function(){
+                                                                                                var x = l94.fvalue(pv, v233);
+                                                                                                if (typeof x != 'object')
+                                                                                                    throw 'The value ' + x + ' is not a type object.';
+                                                                                                return (x.cdr = v235, x);
+                                                                                            })()) : l5.value)));
+                                                                                        })(v235);
+                                                                                    })((function(){
+                                                                                        var tmp = v234;
+                                                                                        return tmp === l5.value? l5.value: tmp.car;
+                                                                                    })());
+                                                                                    return l5.value;
+                                                                                })();
+                                                                                (function(v239){
+                                                                                    return (v234 = v239);
+                                                                                })((function(){
+                                                                                    var tmp = v234;
+                                                                                    return tmp === l5.value? l5.value: tmp.cdr;
+                                                                                })());
+                                                                            }return l5.value;
+                                                                        })();
+                                                                    }
+                                                                    catch (cf){
+                                                                        if (cf.type == 'block' && cf.id == 100)
+                                                                            return cf.values;
+                                                                        else
+                                                                            throw cf;
+                                                                    }
+                                                                })();
+                                                            })((function(){
+                                                                var tmp = v229;
+                                                                return tmp === l5.value? l5.value: tmp.cdr;
+                                                            })());
+                                                        })();
+                                                        return (function(){
+                                                            var values = mv;
+                                                            throw ({type: 'block', id: 98, values: v232, message: 'Return from unknown block NIL.'})
+                                                        })();
+                                                    })() : (l13.fvalue(pv, v231) !== l5.value ? l5.value : (l48.fvalue(pv, v231) !== l5.value ? ((function(){
+                                                        var tmp = v229;
+                                                        return tmp === l5.value? l5.value: tmp.cdr;
+                                                    })() !== l5.value ? v228(pv, v230) : (function(){
+                                                        var values = mv;
+                                                        throw ({type: 'block', id: 98, values: v230, message: 'Return from unknown block NIL.'})
+                                                    })()) : l5.value)));
+                                                })(v230);
+                                            })((function(){
+                                                var tmp = v229;
+                                                return tmp === l5.value? l5.value: tmp.car;
+                                            })());
+                                            return l5.value;
+                                        })();
+                                        (function(v240){
+                                            return (v229 = v240);
+                                        })((function(){
+                                            var tmp = v229;
+                                            return tmp === l5.value? l5.value: tmp.cdr;
+                                        })());
+                                    }return l5.value;
+                                })();
+                            }
+                            catch (cf){
+                                if (cf.type == 'block' && cf.id == 98)
+                                    return values.apply(this, forcemv(cf.values));
+                                else
+                                    throw cf;
+                            }
+                        })();
+                    })(v226);
+                })();
+            })((function (values,v227){
+                checkArgs(arguments, 2);
+                return (function(){
+                    throw "type-error in nconc";
+                })();
+            }));
+        })();
+    }));
+    return l126;
+})();
+var l127 = {name: "NRECONC"};
+(function(){
+    (l127).fvalue = (function(v250){
+        ((v250)["fname"] = "NRECONC");
+        return v250;
+    })((function (values,v242,v243){
+        checkArgs(arguments, 3);
         return (function(){
+<<<<<<< HEAD
             return (((function(){
                 var tmp = v205;
                 return (typeof tmp == 'object' && 'name' in tmp);
@@ -1970,23 +2325,51 @@ var l116 = {name: "LS-MACROEXPAND-1"};
                     (l13.fvalue(pv, v209) !== l5.value ? (function(){
                         throw "Unknown generalized reference.";
                     })() : l5.value);
+=======
+            return (function(){
+                return (function(v244,v245,v246){
+>>>>>>> backquote
                     return (function(){
-                        var f = v209;
-                        var args = [values];
-                        var tail = ((function(){
-                            var tmp = v207;
-                            return tmp === l5.value? l5.value: tmp.cdr;
-                        })());
-                        while (tail != l5.value){
-                            args.push(tail.car);
-                            tail = tail.cdr;
+                        try {
+                            return (function(){
+                                while(l4.value !== l5.value){
+                                    (l48.fvalue(pv, v245) !== l5.value ? (function(){
+                                        var values = mv;
+                                        throw ({type: 'block', id: 103, values: v246, message: 'Return from unknown block NIL.'})
+                                    })() : l5.value);
+                                    (function(){
+                                        (function(){
+                                            var x = v245;
+                                            if (typeof x != 'object')
+                                                throw 'The value ' + x + ' is not a type object.';
+                                            return (x.cdr = v246, x);
+                                        })();
+                                        return l5.value;
+                                    })();
+                                    (function(v247,v248,v249){
+                                        return (v244 = v247, v245 = v248, v246 = v249);
+                                    })((l14.fvalue(pv, v244) !== l5.value ? v244 : (function(){
+                                        var tmp = v244;
+                                        return tmp === l5.value? l5.value: tmp.cdr;
+                                    })()),v244,v245);
+                                }return l5.value;
+                            })();
+                        }
+                        catch (cf){
+                            if (cf.type == 'block' && cf.id == 103)
+                                return values.apply(this, forcemv(cf.values));
+                            else
+                                throw cf;
                         }
-                        return (typeof f === 'function'? f : f.fvalue).apply(this, args);
                     })();
-                })();
-            })(l116.fvalue(pv, v205)));
+                })((function(){
+                    var tmp = v242;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })(),v242,v243);
+            })();
         })();
     }));
+<<<<<<< HEAD
     return l114;
 })();
 var l117 = {name: "DEFINE-SETF-EXPANDER"};
@@ -2008,9 +2391,13 @@ var l120 = {name: "RPLACA"};
         return value;
     })()}));
     return l31;
+=======
+    return l127;
+>>>>>>> backquote
 })();
-var l121 = {name: "RPLACD"};
+var l128 = {name: "NOTANY"};
 (function(){
+<<<<<<< HEAD
     ((l113).value = ({car: ({car: l32, cdr: (function (values,v214){
         checkArgs(arguments, 2);
         return (function(v215,v216){
@@ -2026,53 +2413,75 @@ var l121 = {name: "RPLACD"};
 })();
 l49;
 var l122 = {name: "*PACKAGE-LIST*"};
+=======
+    (l128).fvalue = (function(v253){
+        ((v253)["fname"] = "NOTANY");
+        return v253;
+    })((function (values,v251,v252){
+        checkArgs(arguments, 3);
+        return (function(){
+            return l29.fvalue(values, l103.fvalue(pv, v251, v252));
+        })();
+    }));
+    return l128;
+})();
+var l129 = {name: "*PACKAGE-LIST*"};
+>>>>>>> backquote
 (function(){
-    (((l122.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l122).value = l5.value));
-    return l122;
+    (((l129.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l129).value = l5.value));
+    return l129;
 })();
-var l123 = {name: "LIST-ALL-PACKAGES"};
+var l130 = {name: "LIST-ALL-PACKAGES"};
 (function(){
-    (l123).fvalue = (function(v217){
-        ((v217)["fname"] = "LIST-ALL-PACKAGES");
-        return v217;
+    (l130).fvalue = (function(v254){
+        ((v254)["fname"] = "LIST-ALL-PACKAGES");
+        return v254;
     })((function (values){
         checkArgsAtMost(arguments, 1);
         return (function(){
             return (function(){
-                var symbol = l122;
+                var symbol = l129;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })();
         })();
     }));
-    return l123;
+    return l130;
 })();
-var l124 = {name: "MAKE-PACKAGE"};
-var l125 = {name: "USE", 'package': 'KEYWORD'};
-var l126 = {name: "FIND-PACKAGE-OR-FAIL"};
+var l131 = {name: "MAKE-PACKAGE"};
+var l132 = {name: "USE", 'package': 'KEYWORD'};
+var l133 = {name: "FIND-PACKAGE-OR-FAIL"};
 (function(){
+<<<<<<< HEAD
     (l124).fvalue = (function(v224){
         ((v224)["fname"] = "MAKE-PACKAGE");
         return v224;
     })((function (values,v218){
+=======
+    (l131).fvalue = (function(v259){
+        ((v259)["fname"] = "MAKE-PACKAGE");
+        return v259;
+    })((function (values,v255){
+>>>>>>> backquote
         checkArgsAtLeast(arguments, 2);
-        var v219; 
+        var v256; 
         var i;
         for (i=2; i<arguments.length; i+=2){
-            if (arguments[i] === l125.value){
-                v219 = arguments[i+1];
+            if (arguments[i] === l132.value){
+                v256 = arguments[i+1];
                 break;
             }
         }
         if (i == arguments.length){
-            v219 = l5.value;
+            v256 = l5.value;
         }
         for (i=2; i<arguments.length; i+=2){
-            if (arguments[i] !== l125.value)
+            if (arguments[i] !== l132.value)
                 throw 'Unknown keyword argument ' + arguments[i].name;
         }
         return (function(){
+<<<<<<< HEAD
             return (function(v220,v221){
                 ((v220)["packageName"] = v218);
                 ((v220)["symbols"] = {});
@@ -2091,16 +2500,33 @@ var l126 = {name: "FIND-PACKAGE-OR-FAIL"};
                 return v220;
             })({},l79.fvalue(pv, (function(){
                 var symbol = l126;
+=======
+            return (function(v257,v258){
+                ((v257)["packageName"] = v255);
+                ((v257)["symbols"] = {});
+                ((v257)["exports"] = {});
+                ((v257)["use"] = v258);
+                ((l129).value = ({car: v257, cdr: (function(){
+                    var symbol = l129;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })()}));
+                return v257;
+            })({},l81.fvalue(pv, (function(){
+                var symbol = l133;
+>>>>>>> backquote
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
-            })(), v219));
+            })(), v256));
         })();
     }));
-    return l124;
+    return l131;
 })();
-var l127 = {name: "PACKAGEP"};
+var l134 = {name: "PACKAGEP"};
 (function(){
+<<<<<<< HEAD
     (l127).fvalue = (function(v226){
         ((v226)["fname"] = "PACKAGEP");
         return v226;
@@ -2108,13 +2534,23 @@ var l127 = {name: "PACKAGEP"};
         checkArgs(arguments, 2);
         return (function(){
             return (((typeof (v225) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v225))?l4.value: l5.value) : l5.value);
+=======
+    (l134).fvalue = (function(v261){
+        ((v261)["fname"] = "PACKAGEP");
+        return v261;
+    })((function (values,v260){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (((typeof (v260) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v260))?l4.value: l5.value) : l5.value);
+>>>>>>> backquote
         })();
     }));
-    return l127;
+    return l134;
 })();
-var l128 = {name: "FIND-PACKAGE"};
-var l129 = {name: "PACKAGE-NAME"};
+var l135 = {name: "FIND-PACKAGE"};
+var l136 = {name: "PACKAGE-NAME"};
 (function(){
+<<<<<<< HEAD
     (l128).fvalue = (function(v231){
         ((v231)["fname"] = "FIND-PACKAGE");
         return v231;
@@ -2145,38 +2581,75 @@ var l129 = {name: "PACKAGE-NAME"};
                                         })();
                                         (v229 = (function(){
                                             var tmp = v229;
+=======
+    (l135).fvalue = (function(v266){
+        ((v266)["fname"] = "FIND-PACKAGE");
+        return v266;
+    })((function (values,v262){
+        checkArgs(arguments, 2);
+        return (function(){
+            try {
+                (l134.fvalue(pv, v262) !== l5.value ? (function(){
+                    var values = mv;
+                    throw ({type: 'block', id: 108, values: v262, message: 'Return from unknown block FIND-PACKAGE.'})
+                })() : l5.value);
+                return (function(v263){
+                    return (function(){
+                        try {
+                            return (function(v264,v265){
+                                (function(){
+                                    while(v264 !== l5.value){
+                                        (v265 = (function(){
+                                            var tmp = v264;
+                                            return tmp === l5.value? l5.value: tmp.car;
+                                        })());
+                                        (function(){
+                                            (l107.fvalue(pv, l136.fvalue(pv, v265), v263) !== l5.value ? (function(){
+                                                var values = mv;
+                                                throw ({type: 'block', id: 109, values: v265, message: 'Return from unknown block NIL.'})
+                                            })() : l5.value);
+                                            return l5.value;
+                                        })();
+                                        (v264 = (function(){
+                                            var tmp = v264;
+>>>>>>> backquote
                                             return tmp === l5.value? l5.value: tmp.cdr;
                                         })());
                                     }return l5.value;
                                 })();
                                 return l5.value;
                             })((function(){
-                                var symbol = l122;
+                                var symbol = l129;
                                 var value = symbol.value;
                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                                 return value;
                             })(),l5.value);
                         }
                         catch (cf){
-                            if (cf.type == 'block' && cf.id == 95)
+                            if (cf.type == 'block' && cf.id == 109)
                                 return values.apply(this, forcemv(cf.values));
                             else
                                 throw cf;
                         }
                     })();
+<<<<<<< HEAD
                 })(l103.fvalue(pv, v227));
+=======
+                })(l106.fvalue(pv, v262));
+>>>>>>> backquote
             }
             catch (cf){
-                if (cf.type == 'block' && cf.id == 94)
+                if (cf.type == 'block' && cf.id == 108)
                     return values.apply(this, forcemv(cf.values));
                 else
                     throw cf;
             }
         })();
     }));
-    return l128;
+    return l135;
 })();
 (function(){
+<<<<<<< HEAD
     (l126).fvalue = (function(v234){
         ((v234)["fname"] = "FIND-PACKAGE-OR-FAIL");
         return v234;
@@ -2188,11 +2661,25 @@ var l129 = {name: "PACKAGE-NAME"};
                     throw "Package unknown.";
                 })());
             })(l128.fvalue(pv, v232));
+=======
+    (l133).fvalue = (function(v269){
+        ((v269)["fname"] = "FIND-PACKAGE-OR-FAIL");
+        return v269;
+    })((function (values,v267){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v268){
+                return (v268 !== l5.value ? v268 : (function(){
+                    throw "Package unknown.";
+                })());
+            })(l135.fvalue(pv, v267));
+>>>>>>> backquote
         })();
     }));
-    return l126;
+    return l133;
 })();
 (function(){
+<<<<<<< HEAD
     (l129).fvalue = (function(v237){
         ((v237)["fname"] = "PACKAGE-NAME");
         return v237;
@@ -2205,12 +2692,27 @@ var l129 = {name: "PACKAGE-NAME"};
                     return tmp == undefined? l5.value: tmp ;
                 })();
             })(l126.fvalue(pv, v235));
+=======
+    (l136).fvalue = (function(v272){
+        ((v272)["fname"] = "PACKAGE-NAME");
+        return v272;
+    })((function (values,v270){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v271){
+                return (function(){
+                    var tmp = (v271)["packageName"];
+                    return tmp == undefined? l5.value: tmp ;
+                })();
+            })(l133.fvalue(pv, v270));
+>>>>>>> backquote
         })();
     }));
-    return l129;
+    return l136;
 })();
-var l130 = {name: "%PACKAGE-SYMBOLS"};
+var l137 = {name: "%PACKAGE-SYMBOLS"};
 (function(){
+<<<<<<< HEAD
     (l130).fvalue = (function(v240){
         ((v240)["fname"] = "%PACKAGE-SYMBOLS");
         return v240;
@@ -2223,12 +2725,27 @@ var l130 = {name: "%PACKAGE-SYMBOLS"};
                     return tmp == undefined? l5.value: tmp ;
                 })();
             })(l126.fvalue(pv, v238));
+=======
+    (l137).fvalue = (function(v275){
+        ((v275)["fname"] = "%PACKAGE-SYMBOLS");
+        return v275;
+    })((function (values,v273){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v274){
+                return (function(){
+                    var tmp = (v274)["symbols"];
+                    return tmp == undefined? l5.value: tmp ;
+                })();
+            })(l133.fvalue(pv, v273));
+>>>>>>> backquote
         })();
     }));
-    return l130;
+    return l137;
 })();
-var l131 = {name: "PACKAGE-USE-LIST"};
+var l138 = {name: "PACKAGE-USE-LIST"};
 (function(){
+<<<<<<< HEAD
     (l131).fvalue = (function(v243){
         ((v243)["fname"] = "PACKAGE-USE-LIST");
         return v243;
@@ -2241,12 +2758,27 @@ var l131 = {name: "PACKAGE-USE-LIST"};
                     return tmp == undefined? l5.value: tmp ;
                 })();
             })(l126.fvalue(pv, v241));
+=======
+    (l138).fvalue = (function(v278){
+        ((v278)["fname"] = "PACKAGE-USE-LIST");
+        return v278;
+    })((function (values,v276){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v277){
+                return (function(){
+                    var tmp = (v277)["use"];
+                    return tmp == undefined? l5.value: tmp ;
+                })();
+            })(l133.fvalue(pv, v276));
+>>>>>>> backquote
         })();
     }));
-    return l131;
+    return l138;
 })();
-var l132 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
+var l139 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
 (function(){
+<<<<<<< HEAD
     (l132).fvalue = (function(v246){
         ((v246)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
         return v246;
@@ -2259,33 +2791,48 @@ var l132 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
                     return tmp == undefined? l5.value: tmp ;
                 })();
             })(l126.fvalue(pv, v244));
+=======
+    (l139).fvalue = (function(v281){
+        ((v281)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
+        return v281;
+    })((function (values,v279){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v280){
+                return (function(){
+                    var tmp = (v280)["exports"];
+                    return tmp == undefined? l5.value: tmp ;
+                })();
+            })(l133.fvalue(pv, v279));
+>>>>>>> backquote
         })();
     }));
-    return l132;
+    return l139;
 })();
-var l133 = {name: "*COMMON-LISP-PACKAGE*"};
+var l140 = {name: "*COMMON-LISP-PACKAGE*"};
 (function(){
-    (((l133.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l133).value = l124.fvalue(pv, "CL")));
-    return l133;
+    (((l140.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l140).value = l131.fvalue(pv, "CL")));
+    return l140;
 })();
-var l134 = {name: "*USER-PACKAGE*"};
+var l141 = {name: "*USER-PACKAGE*"};
 (function(){
-    (((l134.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l134).value = l124.fvalue(pv, "CL-USER", l125.value, l45.fvalue(pv, (function(){
-        var symbol = l133;
+    (((l141.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l141).value = l131.fvalue(pv, "CL-USER", l132.value, l47.fvalue(pv, (function(){
+        var symbol = l140;
         var value = symbol.value;
         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
         return value;
     })()))));
-    return l134;
+    return l141;
 })();
-var l135 = {name: "*KEYWORD-PACKAGE*"};
+var l142 = {name: "*KEYWORD-PACKAGE*"};
 (function(){
-    (((l135.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l135).value = l124.fvalue(pv, "KEYWORD")));
-    return l135;
+    (((l142.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l142).value = l131.fvalue(pv, "KEYWORD")));
+    return l142;
 })();
-var l136 = {name: "KEYWORDP"};
-var l137 = {name: "SYMBOL-PACKAGE"};
+var l143 = {name: "KEYWORDP"};
+var l144 = {name: "SYMBOL-PACKAGE"};
 (function(){
+<<<<<<< HEAD
     (l136).fvalue = (function(v248){
         ((v248)["fname"] = "KEYWORDP");
         return v248;
@@ -2297,28 +2844,42 @@ var l137 = {name: "SYMBOL-PACKAGE"};
                 return (typeof tmp == 'object' && 'name' in tmp);
             })()?l4.value: l5.value) !== l5.value ? ((l137.fvalue(pv, v247) === (function(){
                 var symbol = l135;
-                var value = symbol.value;
+=======
+    (l143).fvalue = (function(v283){
+        ((v283)["fname"] = "KEYWORDP");
+        return v283;
+    })((function (values,v282){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (((function(){
+                var tmp = v282;
+                return (typeof tmp == 'object' && 'name' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? ((l144.fvalue(pv, v282) === (function(){
+                var symbol = l142;
+>>>>>>> backquote
+                var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })())?l4.value: l5.value) : l5.value);
         })();
     }));
-    return l136;
+    return l143;
 })();
-var l138 = {name: "*PACKAGE*"};
+var l145 = {name: "*PACKAGE*"};
 (function(){
-    (((l138.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l138).value = (function(){
-        var symbol = l133;
+    (((l145.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l145).value = (function(){
+        var symbol = l140;
         var value = symbol.value;
         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
         return value;
     })()));
-    return l138;
+    return l145;
 })();
-var l139 = {name: "IN-PACKAGE"};
-l139;
-var l140 = {name: "%INTERN-SYMBOL"};
+var l146 = {name: "IN-PACKAGE"};
+l146;
+var l147 = {name: "%INTERN-SYMBOL"};
 (function(){
+<<<<<<< HEAD
     (l140).fvalue = (function(v252){
         ((v252)["fname"] = "%INTERN-SYMBOL");
         return v252;
@@ -2328,13 +2889,25 @@ var l140 = {name: "%INTERN-SYMBOL"};
             return (function(){
                 var v250 = (((("package") in (v249))?l4.value: l5.value) !== l5.value ? l126.fvalue(pv, (function(){
                     var tmp = (v249)["package"];
+=======
+    (l147).fvalue = (function(v287){
+        ((v287)["fname"] = "%INTERN-SYMBOL");
+        return v287;
+    })((function (values,v284){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(){
+                var v285 = (((("package") in (v284))?l4.value: l5.value) !== l5.value ? l133.fvalue(pv, (function(){
+                    var tmp = (v284)["package"];
+>>>>>>> backquote
                     return tmp == undefined? l5.value: tmp ;
                 })()) : (function(){
-                    var symbol = l133;
+                    var symbol = l140;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })());
+<<<<<<< HEAD
                 var v251 = l130.fvalue(pv, v250);
                 ((v249)["package"] = v250);
                 (((v250 === (function(){
@@ -2344,16 +2917,28 @@ var l140 = {name: "%INTERN-SYMBOL"};
                     return value;
                 })())?l4.value: l5.value) !== l5.value ? ((v249)["value"] = v249) : l5.value);
                 return ((v251)[(v249).name] = v249);
+=======
+                var v286 = l137.fvalue(pv, v285);
+                ((v284)["package"] = v285);
+                (((v285 === (function(){
+                    var symbol = l142;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })())?l4.value: l5.value) !== l5.value ? ((v284)["value"] = v284) : l5.value);
+                return ((v286)[(v284).name] = v284);
+>>>>>>> backquote
             })();
         })();
     }));
-    return l140;
+    return l147;
 })();
-var l141 = {name: "FIND-SYMBOL"};
-var l142 = {name: "EXTERNAL", 'package': 'KEYWORD'};
-var l143 = {name: "INTERNAL", 'package': 'KEYWORD'};
-var l144 = {name: "INHERIT", 'package': 'KEYWORD'};
+var l148 = {name: "FIND-SYMBOL"};
+var l149 = {name: "EXTERNAL", 'package': 'KEYWORD'};
+var l150 = {name: "INTERNAL", 'package': 'KEYWORD'};
+var l151 = {name: "INHERIT", 'package': 'KEYWORD'};
 (function(){
+<<<<<<< HEAD
     (l141).fvalue = (function(v261){
         ((v261)["fname"] = "FIND-SYMBOL");
         return v261;
@@ -2365,6 +2950,19 @@ var l144 = {name: "INHERIT", 'package': 'KEYWORD'};
         case 1:
             v254=(function(){
                 var symbol = l138;
+=======
+    (l148).fvalue = (function(v296){
+        ((v296)["fname"] = "FIND-SYMBOL");
+        return v296;
+    })((function (values,v288,v289){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v289; 
+        switch(arguments.length-1){
+        case 1:
+            v289=(function(){
+                var symbol = l145;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
@@ -2373,6 +2971,7 @@ var l144 = {name: "INHERIT", 'package': 'KEYWORD'};
         }
         return (function(){
             return (function(){
+<<<<<<< HEAD
                 var v255 = l126.fvalue(pv, v254);
                 var v256 = l132.fvalue(pv, v255);
                 var v257 = l130.fvalue(pv, v255);
@@ -2381,9 +2980,20 @@ var l144 = {name: "INHERIT", 'package': 'KEYWORD'};
                     return tmp == undefined? l5.value: tmp ;
                 })(), l142.value) : ((((v253) in (v257))?l4.value: l5.value) !== l5.value ? values((function(){
                     var tmp = (v257)[v253];
+=======
+                var v290 = l133.fvalue(pv, v289);
+                var v291 = l139.fvalue(pv, v290);
+                var v292 = l137.fvalue(pv, v290);
+                return ((((v288) in (v291))?l4.value: l5.value) !== l5.value ? values((function(){
+                    var tmp = (v291)[v288];
+                    return tmp == undefined? l5.value: tmp ;
+                })(), l149.value) : ((((v288) in (v292))?l4.value: l5.value) !== l5.value ? values((function(){
+                    var tmp = (v292)[v288];
+>>>>>>> backquote
                     return tmp == undefined? l5.value: tmp ;
-                })(), l143.value) : (function(){
+                })(), l150.value) : (function(){
                     try {
+<<<<<<< HEAD
                         return (function(v258,v259){
                             (function(){
                                 while(v258 !== l5.value){
@@ -2397,23 +3007,50 @@ var l144 = {name: "INHERIT", 'package': 'KEYWORD'};
                                                 var values = mv;
                                                 throw ({type: 'block', id: 104, values: values((function(){
                                                     var tmp = (v260)[v253];
+=======
+                        return (function(v293,v294){
+                            (function(){
+                                while(v293 !== l5.value){
+                                    (v294 = (function(){
+                                        var tmp = v293;
+                                        return tmp === l5.value? l5.value: tmp.car;
+                                    })());
+                                    (function(){
+                                        (function(v295){
+                                            return ((((v288) in (v295))?l4.value: l5.value) !== l5.value ? (function(){
+                                                var values = mv;
+                                                throw ({type: 'block', id: 118, values: values((function(){
+                                                    var tmp = (v295)[v288];
+>>>>>>> backquote
                                                     return tmp == undefined? l5.value: tmp ;
-                                                })(), l144.value), message: 'Return from unknown block NIL.'})
+                                                })(), l151.value), message: 'Return from unknown block NIL.'})
                                             })() : l5.value);
+<<<<<<< HEAD
                                         })(l132.fvalue(pv, v259));
                                         return l5.value;
                                     })();
                                     (v258 = (function(){
                                         var tmp = v258;
+=======
+                                        })(l139.fvalue(pv, v294));
+                                        return l5.value;
+                                    })();
+                                    (v293 = (function(){
+                                        var tmp = v293;
+>>>>>>> backquote
                                         return tmp === l5.value? l5.value: tmp.cdr;
                                     })());
                                 }return l5.value;
                             })();
                             return values(l5.value, l5.value);
+<<<<<<< HEAD
                         })(l131.fvalue(pv, v255),l5.value);
+=======
+                        })(l138.fvalue(pv, v290),l5.value);
+>>>>>>> backquote
                     }
                     catch (cf){
-                        if (cf.type == 'block' && cf.id == 104)
+                        if (cf.type == 'block' && cf.id == 118)
                             return values.apply(this, forcemv(cf.values));
                         else
                             throw cf;
@@ -2422,11 +3059,12 @@ var l144 = {name: "INHERIT", 'package': 'KEYWORD'};
             })();
         })();
     }));
-    return l141;
+    return l148;
 })();
-var l145 = {name: "INTERN"};
-var l146 = {name: "EXPORT"};
+var l152 = {name: "INTERN"};
+var l153 = {name: "EXPORT"};
 (function(){
+<<<<<<< HEAD
     (l145).fvalue = (function(v270){
         ((v270)["fname"] = "INTERN");
         return v270;
@@ -2438,6 +3076,19 @@ var l146 = {name: "EXPORT"};
         case 1:
             v263=(function(){
                 var symbol = l138;
+=======
+    (l152).fvalue = (function(v305){
+        ((v305)["fname"] = "INTERN");
+        return v305;
+    })((function (values,v297,v298){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v298; 
+        switch(arguments.length-1){
+        case 1:
+            v298=(function(){
+                var symbol = l145;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
@@ -2445,6 +3096,7 @@ var l146 = {name: "EXPORT"};
         default: break;
         }
         return (function(){
+<<<<<<< HEAD
             return (function(v264){
                 return (function(){
                     var func = (function (values,v266,v267){
@@ -2470,10 +3122,38 @@ var l146 = {name: "EXPORT"};
                                 ((v269)["package"] = v264);
                                 (((v264 === (function(){
                                     var symbol = l135;
+=======
+            return (function(v299){
+                return (function(){
+                    var func = (function (values,v301,v302){
+                        var v301; 
+                        var v302; 
+                        switch(arguments.length-1){
+                        case 0:
+                            v301=l5.value;
+                        case 1:
+                            v302=l5.value;
+                        default: break;
+                        }
+                        var v300= l5.value;
+                        for (var i = arguments.length-1; i>=3; i--)
+                            v300 = {car: arguments[i], cdr: 
+                        v300};
+                        return (v302 !== l5.value ? values(v301, v302) : (function(v303){
+                            (function(){
+                                var tmp = (v303)[v297];
+                                return tmp == undefined? l5.value: tmp ;
+                            })();
+                            return (function(v304){
+                                ((v304)["package"] = v299);
+                                (((v299 === (function(){
+                                    var symbol = l142;
+>>>>>>> backquote
                                     var value = symbol.value;
                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                                     return value;
                                 })())?l4.value: l5.value) !== l5.value ? (function(){
+<<<<<<< HEAD
                                     ((v269)["value"] = v269);
                                     return l146.fvalue(pv, l45.fvalue(pv, v269), v264);
                                 })() : l5.value);
@@ -2481,17 +3161,34 @@ var l146 = {name: "EXPORT"};
                                 return values(v269, l5.value);
                             })((function(){
                                 var name = v262;
+=======
+                                    ((v304)["value"] = v304);
+                                    return l153.fvalue(pv, l47.fvalue(pv, v304), v299);
+                                })() : l5.value);
+                                ((v303)[v297] = v304);
+                                return values(v304, l5.value);
+                            })((function(){
+                                var name = v297;
+>>>>>>> backquote
                                 if (typeof name != 'string')
                                     throw 'The value ' + name + ' is not a type string.';
                                 return ({name: name});
                             })());
+<<<<<<< HEAD
                         })(l130.fvalue(pv, v264)));
+=======
+                        })(l137.fvalue(pv, v299)));
+>>>>>>> backquote
                     });
                     var args = [values];
                     return (function(){
                         var values = mv;
                         var vs;
+<<<<<<< HEAD
                         vs = l141.fvalue(values, v262, v264);
+=======
+                        vs = l148.fvalue(values, v297, v299);
+>>>>>>> backquote
                         if (typeof vs === 'object' && 'multiple-value' in vs)
                             args = args.concat(vs);
                         else
@@ -2499,12 +3196,17 @@ var l146 = {name: "EXPORT"};
                         return func.apply(window, args);
                     })();
                 })();
+<<<<<<< HEAD
             })(l126.fvalue(pv, v263));
+=======
+            })(l133.fvalue(pv, v298));
+>>>>>>> backquote
         })();
     }));
-    return l145;
+    return l152;
 })();
 (function(){
+<<<<<<< HEAD
     (l137).fvalue = (function(v272){
         ((v272)["fname"] = "SYMBOL-PACKAGE");
         return v272;
@@ -2513,19 +3215,34 @@ var l146 = {name: "EXPORT"};
         return (function(){
             (((function(){
                 var tmp = v271;
+=======
+    (l144).fvalue = (function(v307){
+        ((v307)["fname"] = "SYMBOL-PACKAGE");
+        return v307;
+    })((function (values,v306){
+        checkArgs(arguments, 2);
+        return (function(){
+            (((function(){
+                var tmp = v306;
+>>>>>>> backquote
                 return (typeof tmp == 'object' && 'name' in tmp);
             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
                 throw "it is not a symbol";
             })());
             return (function(){
+<<<<<<< HEAD
                 var tmp = (v271)["package"];
+=======
+                var tmp = (v306)["package"];
+>>>>>>> backquote
                 return tmp == undefined? l5.value: tmp ;
             })();
         })();
     }));
-    return l137;
+    return l144;
 })();
 (function(){
+<<<<<<< HEAD
     (l146).fvalue = (function(v278){
         ((v278)["fname"] = "EXPORT");
         return v278;
@@ -2537,6 +3254,19 @@ var l146 = {name: "EXPORT"};
         case 1:
             v274=(function(){
                 var symbol = l138;
+=======
+    (l153).fvalue = (function(v313){
+        ((v313)["fname"] = "EXPORT");
+        return v313;
+    })((function (values,v308,v309){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v309; 
+        switch(arguments.length-1){
+        case 1:
+            v309=(function(){
+                var symbol = l145;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
@@ -2544,6 +3274,7 @@ var l146 = {name: "EXPORT"};
         default: break;
         }
         return (function(){
+<<<<<<< HEAD
             return (function(v275){
                 return (function(){
                     return (function(v276,v277){
@@ -2559,23 +3290,52 @@ var l146 = {name: "EXPORT"};
                                 })();
                                 (v276 = (function(){
                                     var tmp = v276;
+=======
+            return (function(v310){
+                return (function(){
+                    return (function(v311,v312){
+                        (function(){
+                            while(v311 !== l5.value){
+                                (v312 = (function(){
+                                    var tmp = v311;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })());
+                                (function(){
+                                    ((v310)[(v312).name] = v312);
+                                    return l5.value;
+                                })();
+                                (v311 = (function(){
+                                    var tmp = v311;
+>>>>>>> backquote
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
                         return l4.value;
+<<<<<<< HEAD
                     })(v273,l5.value);
                 })();
             })(l132.fvalue(pv, v274));
+=======
+                    })(v308,l5.value);
+                })();
+            })(l139.fvalue(pv, v309));
+>>>>>>> backquote
         })();
     }));
-    return l146;
+    return l153;
 })();
-var l147 = {name: "GET-UNIVERSAL-TIME"};
+var l154 = {name: "GET-UNIVERSAL-TIME"};
 (function(){
+<<<<<<< HEAD
     (l147).fvalue = (function(v279){
         ((v279)["fname"] = "GET-UNIVERSAL-TIME");
         return v279;
+=======
+    (l154).fvalue = (function(v314){
+        ((v314)["fname"] = "GET-UNIVERSAL-TIME");
+        return v314;
+>>>>>>> backquote
     })((function (values){
         checkArgsAtMost(arguments, 1);
         return (function(){
@@ -2586,15 +3346,16 @@ var l147 = {name: "GET-UNIVERSAL-TIME"};
             })();
         })();
     }));
-    return l147;
+    return l154;
 })();
-var l148 = {name: "*NEWLINE*"};
+var l155 = {name: "*NEWLINE*"};
 (function(){
-    (((l148.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l148).value = l103.fvalue(pv, l83.fvalue(pv, 10))));
-    return l148;
+    (((l155.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l155).value = l106.fvalue(pv, l86.fvalue(pv, 10))));
+    return l155;
 })();
-var l149 = {name: "CONCAT"};
+var l156 = {name: "CONCAT"};
 (function(){
+<<<<<<< HEAD
     (l149).fvalue = (function(v281){
         ((v281)["fname"] = "CONCAT");
         return v281;
@@ -2603,21 +3364,36 @@ var l149 = {name: "CONCAT"};
         for (var i = arguments.length-1; i>=1; i--)
             v280 = {car: arguments[i], cdr: 
         v280};
+=======
+    (l156).fvalue = (function(v316){
+        ((v316)["fname"] = "CONCAT");
+        return v316;
+    })((function (values){
+        var v315= l5.value;
+        for (var i = arguments.length-1; i>=1; i--)
+            v315 = {car: arguments[i], cdr: 
+        v315};
+>>>>>>> backquote
         return (function(){
-            return l61.fvalue(values, (function(){
-                var symbol = l74;
+            return l63.fvalue(values, (function(){
+                var symbol = l76;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
+<<<<<<< HEAD
             })(), v280, l62.value, "");
+=======
+            })(), v315, l64.value, "");
+>>>>>>> backquote
         })();
     }));
-    return l149;
+    return l156;
 })();
-var l150 = {name: "CONCATF"};
-l150;
-var l151 = {name: "JOIN"};
+var l157 = {name: "CONCATF"};
+l157;
+var l158 = {name: "JOIN"};
 (function(){
+<<<<<<< HEAD
     (l151).fvalue = (function(v284){
         ((v284)["fname"] = "JOIN");
         return v284;
@@ -2644,12 +3420,41 @@ var l151 = {name: "JOIN"};
                 var tmp = v282;
                 return tmp === l5.value? l5.value: tmp.cdr;
             })(), v283))));
+=======
+    (l158).fvalue = (function(v319){
+        ((v319)["fname"] = "JOIN");
+        return v319;
+    })((function (values,v317,v318){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v318; 
+        switch(arguments.length-1){
+        case 1:
+            v318="";
+        default: break;
+        }
+        return (function(){
+            return (l13.fvalue(pv, v317) !== l5.value ? "" : (l13.fvalue(pv, (function(){
+                var tmp = v317;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })()) !== l5.value ? (function(){
+                var tmp = v317;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() : l156.fvalue(values, (function(){
+                var tmp = v317;
+                return tmp === l5.value? l5.value: tmp.car;
+            })(), v318, l158.fvalue(pv, (function(){
+                var tmp = v317;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })(), v318))));
+>>>>>>> backquote
         })();
     }));
-    return l151;
+    return l158;
 })();
-var l152 = {name: "JOIN-TRAILING"};
+var l159 = {name: "JOIN-TRAILING"};
 (function(){
+<<<<<<< HEAD
     (l152).fvalue = (function(v287){
         ((v287)["fname"] = "JOIN-TRAILING");
         return v287;
@@ -2670,12 +3475,35 @@ var l152 = {name: "JOIN-TRAILING"};
                 var tmp = v285;
                 return tmp === l5.value? l5.value: tmp.cdr;
             })(), v286)));
+=======
+    (l159).fvalue = (function(v322){
+        ((v322)["fname"] = "JOIN-TRAILING");
+        return v322;
+    })((function (values,v320,v321){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v321; 
+        switch(arguments.length-1){
+        case 1:
+            v321="";
+        default: break;
+        }
+        return (function(){
+            return (l13.fvalue(pv, v320) !== l5.value ? "" : l156.fvalue(values, (function(){
+                var tmp = v320;
+                return tmp === l5.value? l5.value: tmp.car;
+            })(), v321, l159.fvalue(pv, (function(){
+                var tmp = v320;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })(), v321)));
+>>>>>>> backquote
         })();
     }));
-    return l152;
+    return l159;
 })();
-var l153 = {name: "MAPCONCAT"};
+var l160 = {name: "MAPCONCAT"};
 (function(){
+<<<<<<< HEAD
     (l153).fvalue = (function(v290){
         ((v290)["fname"] = "MAPCONCAT");
         return v290;
@@ -2683,12 +3511,22 @@ var l153 = {name: "MAPCONCAT"};
         checkArgs(arguments, 3);
         return (function(){
             return l151.fvalue(values, l79.fvalue(pv, v288, v289));
+=======
+    (l160).fvalue = (function(v325){
+        ((v325)["fname"] = "MAPCONCAT");
+        return v325;
+    })((function (values,v323,v324){
+        checkArgs(arguments, 3);
+        return (function(){
+            return l158.fvalue(values, l81.fvalue(pv, v323, v324));
+>>>>>>> backquote
         })();
     }));
-    return l153;
+    return l160;
 })();
-var l154 = {name: "VECTOR-TO-LIST"};
+var l161 = {name: "VECTOR-TO-LIST"};
 (function(){
+<<<<<<< HEAD
     (l154).fvalue = (function(v298){
         ((v298)["fname"] = "VECTOR-TO-LIST");
         return v298;
@@ -2703,10 +3541,27 @@ var l154 = {name: "VECTOR-TO-LIST"};
                                 var x1 = v294;
                                 if (typeof x1 !== 'number') throw 'Not a number!';
                                 var x2 = v295;
+=======
+    (l161).fvalue = (function(v331){
+        ((v331)["fname"] = "VECTOR-TO-LIST");
+        return v331;
+    })((function (values,v326){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v327,v328){
+                return (function(){
+                    return (function(v329,v330){
+                        (function(){
+                            while((function(){
+                                var x1 = v329;
+                                if (typeof x1 !== 'number') throw 'Not a number!';
+                                var x2 = v330;
+>>>>>>> backquote
                                 if (typeof x2 !== 'number') throw 'Not a number!';
                                 return (x1<x2?l4.value: l5.value);
                             })() !== l5.value){
                                 (function(){
+<<<<<<< HEAD
                                     (function(){
                                         var v296 = (function(){
                                             var x = (v291)[v294];
@@ -2720,21 +3575,40 @@ var l154 = {name: "VECTOR-TO-LIST"};
                                 })();
                                 (v294 = (function(){
                                     var x1 = v294;
+=======
+                                    (v327 = ({car: (function(){
+                                        var x = (v326)[v329];
+                                        if (x === undefined) throw 'Out of range';
+                                        return x;
+                                    })(), cdr: v327}));
+                                    return l5.value;
+                                })();
+                                (v329 = (function(){
+                                    var x1 = v329;
+>>>>>>> backquote
                                     if (typeof x1 !== 'number') throw 'Not a number!';
                                     return x1+1;
                                 })());
                             }return l5.value;
                         })();
+<<<<<<< HEAD
                         return l68.fvalue(values, v292);
                     })(0,v293);
                 })();
             })(l5.value,l73.fvalue(pv, v291));
+=======
+                        return l70.fvalue(values, v327);
+                    })(0,v328);
+                })();
+            })(l5.value,l75.fvalue(pv, v326));
+>>>>>>> backquote
         })();
     }));
-    return l154;
+    return l161;
 })();
-var l155 = {name: "LIST-TO-VECTOR"};
+var l162 = {name: "LIST-TO-VECTOR"};
 (function(){
+<<<<<<< HEAD
     (l155).fvalue = (function(v304){
         ((v304)["fname"] = "LIST-TO-VECTOR");
         return v304;
@@ -2748,10 +3622,26 @@ var l155 = {name: "LIST-TO-VECTOR"};
                             while(v302 !== l5.value){
                                 (v303 = (function(){
                                     var tmp = v302;
+=======
+    (l162).fvalue = (function(v337){
+        ((v337)["fname"] = "LIST-TO-VECTOR");
+        return v337;
+    })((function (values,v332){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v333,v334){
+                return (function(){
+                    return (function(v335,v336){
+                        (function(){
+                            while(v335 !== l5.value){
+                                (v336 = (function(){
+                                    var tmp = v335;
+>>>>>>> backquote
                                     return tmp === l5.value? l5.value: tmp.car;
                                 })());
                                 (function(){
                                     (function(){
+<<<<<<< HEAD
                                         var x = v300;
                                         var i = v301;
                                         if (i < 0 || i >= x.length) throw 'Out of range';
@@ -2759,32 +3649,56 @@ var l155 = {name: "LIST-TO-VECTOR"};
                                     })();
                                     (v301 = (function(){
                                         var x1 = v301;
+=======
+                                        var x = v333;
+                                        var i = v334;
+                                        if (i < 0 || i >= x.length) throw 'Out of range';
+                                        return x[i] = v336;
+                                    })();
+                                    (v334 = (function(){
+                                        var x1 = v334;
+>>>>>>> backquote
                                         if (typeof x1 !== 'number') throw 'Not a number!';
                                         return x1+1;
                                     })());
                                     return l5.value;
                                 })();
+<<<<<<< HEAD
                                 (v302 = (function(){
                                     var tmp = v302;
+=======
+                                (v335 = (function(){
+                                    var tmp = v335;
+>>>>>>> backquote
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
+<<<<<<< HEAD
                         return v300;
                     })(v299,l5.value);
                 })();
             })((function(){
                 var r = [];
                 for (var i = 0; i < l73.fvalue(pv, v299); i++)
+=======
+                        return v333;
+                    })(v332,l5.value);
+                })();
+            })((function(){
+                var r = [];
+                for (var i = 0; i < l75.fvalue(pv, v332); i++)
+>>>>>>> backquote
                     r.push(l5.value);
                 return r;
             })(),0);
         })();
     }));
-    return l155;
+    return l162;
 })();
-var l156 = {name: "VALUES-LIST"};
+var l163 = {name: "VALUES-LIST"};
 (function(){
+<<<<<<< HEAD
     (l156).fvalue = (function(v306){
         ((v306)["fname"] = "VALUES-LIST");
         return v306;
@@ -2792,12 +3706,22 @@ var l156 = {name: "VALUES-LIST"};
         checkArgs(arguments, 2);
         return (function(){
             return values.apply(this, l155.fvalue(pv, v305));
+=======
+    (l163).fvalue = (function(v339){
+        ((v339)["fname"] = "VALUES-LIST");
+        return v339;
+    })((function (values,v338){
+        checkArgs(arguments, 2);
+        return (function(){
+            return values.apply(this, l162.fvalue(pv, v338));
+>>>>>>> backquote
         })();
     }));
-    return l156;
+    return l163;
 })();
-var l157 = {name: "VALUES"};
+var l164 = {name: "VALUES"};
 (function(){
+<<<<<<< HEAD
     (l157).fvalue = (function(v308){
         ((v308)["fname"] = "VALUES");
         return v308;
@@ -2808,11 +3732,24 @@ var l157 = {name: "VALUES"};
         v307};
         return (function(){
             return l156.fvalue(values, v307);
+=======
+    (l164).fvalue = (function(v341){
+        ((v341)["fname"] = "VALUES");
+        return v341;
+    })((function (values){
+        var v340= l5.value;
+        for (var i = arguments.length-1; i>=1; i--)
+            v340 = {car: arguments[i], cdr: 
+        v340};
+        return (function(){
+            return l163.fvalue(values, v340);
+>>>>>>> backquote
         })();
     }));
-    return l157;
+    return l164;
 })();
 (function(){
+<<<<<<< HEAD
     (l18).fvalue = (function(v314){
         ((v314)["fname"] = "INTEGER-TO-STRING");
         return v314;
@@ -2848,14 +3785,48 @@ var l157 = {name: "VALUES"};
                     checkArgs(arguments, 2);
                     return l103.fvalue(values, l98.fvalue(pv, v313));
                 }), v310);
+=======
+    (l19).fvalue = (function(v345){
+        ((v345)["fname"] = "INTEGER-TO-STRING");
+        return v345;
+    })((function (values,v342){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (l26.fvalue(pv, v342) !== l5.value ? "0" : (l91.fvalue(pv, v342) !== l5.value ? l156.fvalue(values, "-", l19.fvalue(pv, (function(){
+                var x1 = v342;
+                if (typeof x1 !== 'number') throw 'Not a number!';
+                return 0-x1;
+            })())) : (function(v343){
+                (function(){
+                    return (function(){
+                        while(l29.fvalue(pv, l26.fvalue(pv, v342)) !== l5.value){
+                            (v343 = ({car: (function(){
+                                var x = v342;
+                                var y = 10;
+                                if (typeof x != 'number')
+                                    throw 'The value ' + x + ' is not a type number.';
+                                if (typeof y != 'number')
+                                    throw 'The value ' + y + ' is not a type number.';
+                                return x%y;
+                            })(), cdr: v343}));
+                            (v342 = l27.fvalue(pv, v342, 10));
+                        }return l5.value;
+                    })();
+                })();
+                return l160.fvalue(values, (function (values,v344){
+                    checkArgs(arguments, 2);
+                    return l106.fvalue(values, l101.fvalue(pv, v344));
+                }), v343);
+>>>>>>> backquote
             })(l5.value)));
         })();
     }));
-    return l18;
+    return l19;
 })();
-var l158 = {name: "PRIN1-TO-STRING"};
-var l159 = {name: "ESCAPE-STRING"};
+var l165 = {name: "PRIN1-TO-STRING"};
+var l166 = {name: "ESCAPE-STRING"};
 (function(){
+<<<<<<< HEAD
     (l158).fvalue = (function(v323){
         ((v323)["fname"] = "PRIN1-TO-STRING");
         return v323;
@@ -2883,13 +3854,47 @@ var l159 = {name: "ESCAPE-STRING"};
                     return ((v318 !== l5.value ? ((v317 === v315)?l4.value: l5.value) : l5.value) !== l5.value ? (v315).name : (function(v319,v320){
                         return l149.fvalue(values, (l13.fvalue(pv, v319) !== l5.value ? "#" : (((v319 === l128.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l129.fvalue(pv, v319))), ":", v320);
                     })(l137.fvalue(pv, v315),(v315).name));
+=======
+    (l165).fvalue = (function(v354){
+        ((v354)["fname"] = "PRIN1-TO-STRING");
+        return v354;
+    })((function (values,v346){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (((function(){
+                var tmp = v346;
+                return (typeof tmp == 'object' && 'name' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (function(){
+                var func = (function (values,v348,v349){
+                    var v348; 
+                    var v349; 
+                    switch(arguments.length-1){
+                    case 0:
+                        v348=l5.value;
+                    case 1:
+                        v349=l5.value;
+                    default: break;
+                    }
+                    var v347= l5.value;
+                    for (var i = arguments.length-1; i>=3; i--)
+                        v347 = {car: arguments[i], cdr: 
+                    v347};
+                    return ((v349 !== l5.value ? ((v348 === v346)?l4.value: l5.value) : l5.value) !== l5.value ? (v346).name : (function(v350,v351){
+                        return l156.fvalue(values, (l13.fvalue(pv, v350) !== l5.value ? "#" : (((v350 === l135.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l136.fvalue(pv, v350))), ":", v351);
+                    })(l144.fvalue(pv, v346),(v346).name));
+>>>>>>> backquote
                 });
                 var args = [values];
                 return (function(){
                     var values = mv;
                     var vs;
+<<<<<<< HEAD
                     vs = l141.fvalue(values, (v315).name, (function(){
                         var symbol = l138;
+=======
+                    vs = l148.fvalue(values, (v346).name, (function(){
+                        var symbol = l145;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
@@ -2900,6 +3905,7 @@ var l159 = {name: "ESCAPE-STRING"};
                         args.push(vs);
                     return func.apply(window, args);
                 })();
+<<<<<<< HEAD
             })() : (l86.fvalue(pv, v315) !== l5.value ? l18.fvalue(values, v315) : (((typeof(v315) == "string")?l4.value: l5.value) !== l5.value ? l149.fvalue(values, "\"", l159.fvalue(pv, v315), "\"") : (((typeof v315 == 'function')?l4.value: l5.value) !== l5.value ? (function(v321){
                 return (v321 !== l5.value ? l149.fvalue(values, "#<FUNCTION ", v321, ">") : l149.fvalue(values, "#<FUNCTION>"));
             })((function(){
@@ -2928,11 +3934,42 @@ var l159 = {name: "ESCAPE-STRING"};
                 var x = v315;
                 return typeof x === 'object' && 'length' in x;
             })()?l4.value: l5.value) !== l5.value ? l149.fvalue(values, "#", l158.fvalue(pv, l154.fvalue(pv, v315))) : (l127.fvalue(pv, v315) !== l5.value ? l149.fvalue(values, "#<PACKAGE ", l129.fvalue(pv, v315), ">") : l5.value)))))));
+=======
+            })() : (l89.fvalue(pv, v346) !== l5.value ? l19.fvalue(values, v346) : (((typeof(v346) == "string")?l4.value: l5.value) !== l5.value ? l156.fvalue(values, "\"", l166.fvalue(pv, v346), "\"") : (((typeof v346 == 'function')?l4.value: l5.value) !== l5.value ? (function(v352){
+                return (v352 !== l5.value ? l156.fvalue(values, "#<FUNCTION ", v352, ">") : l156.fvalue(values, "#<FUNCTION>"));
+            })((function(){
+                var tmp = (v346)["fname"];
+                return tmp == undefined? l5.value: tmp ;
+            })()) : (l62.fvalue(pv, v346) !== l5.value ? l156.fvalue(values, "(", l159.fvalue(pv, l81.fvalue(pv, (function(){
+                var symbol = l165;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), l95.fvalue(pv, v346)), " "), (function(v353){
+                return (l13.fvalue(pv, (function(){
+                    var tmp = v353;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })()) !== l5.value ? l165.fvalue(pv, (function(){
+                    var tmp = v353;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })()) : l156.fvalue(pv, l165.fvalue(pv, (function(){
+                    var tmp = v353;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })()), " . ", l165.fvalue(pv, (function(){
+                    var tmp = v353;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })())));
+            })(l94.fvalue(pv, v346)), ")") : (((function(){
+                var x = v346;
+                return typeof x === 'object' && 'length' in x;
+            })()?l4.value: l5.value) !== l5.value ? l156.fvalue(values, "#", l165.fvalue(pv, l161.fvalue(pv, v346))) : (l134.fvalue(pv, v346) !== l5.value ? l156.fvalue(values, "#<PACKAGE ", l136.fvalue(pv, v346), ">") : l5.value)))))));
+>>>>>>> backquote
         })();
     }));
-    return l158;
+    return l165;
 })();
 (function(){
+<<<<<<< HEAD
     (l107).fvalue = (function(v325){
         ((v325)["fname"] = "WRITE-LINE");
         return v325;
@@ -2941,13 +3978,23 @@ var l159 = {name: "ESCAPE-STRING"};
         return (function(){
             (function(){
                 var x = v324;
+=======
+    (l110).fvalue = (function(v356){
+        ((v356)["fname"] = "WRITE-LINE");
+        return v356;
+    })((function (values,v355){
+        checkArgs(arguments, 2);
+        return (function(){
+            (function(){
+                var x = v355;
+>>>>>>> backquote
                 if (typeof x != 'string')
                     throw 'The value ' + x + ' is not a type string.';
                 return lisp.write(x);
             })();
             (function(){
                 var x = (function(){
-                    var symbol = l148;
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
@@ -2956,17 +4003,28 @@ var l159 = {name: "ESCAPE-STRING"};
                     throw 'The value ' + x + ' is not a type string.';
                 return lisp.write(x);
             })();
+<<<<<<< HEAD
             return v324;
+=======
+            return v355;
+>>>>>>> backquote
         })();
     }));
-    return l107;
+    return l110;
 })();
-var l160 = {name: "WARN"};
+var l167 = {name: "WARN"};
 (function(){
+<<<<<<< HEAD
     (l160).fvalue = (function(v327){
         ((v327)["fname"] = "WARN");
         return v327;
     })((function (values,v326){
+=======
+    (l167).fvalue = (function(v358){
+        ((v358)["fname"] = "WARN");
+        return v358;
+    })((function (values,v357){
+>>>>>>> backquote
         checkArgs(arguments, 2);
         return (function(){
             (function(){
@@ -2975,13 +4033,18 @@ var l160 = {name: "WARN"};
                     throw 'The value ' + x + ' is not a type string.';
                 return lisp.write(x);
             })();
+<<<<<<< HEAD
             return l107.fvalue(values, v326);
+=======
+            return l110.fvalue(values, v357);
+>>>>>>> backquote
         })();
     }));
-    return l160;
+    return l167;
 })();
-var l161 = {name: "PRINT"};
+var l168 = {name: "PRINT"};
 (function(){
+<<<<<<< HEAD
     (l161).fvalue = (function(v329){
         ((v329)["fname"] = "PRINT");
         return v329;
@@ -2990,12 +4053,23 @@ var l161 = {name: "PRINT"};
         return (function(){
             l107.fvalue(pv, l158.fvalue(pv, v328));
             return v328;
+=======
+    (l168).fvalue = (function(v360){
+        ((v360)["fname"] = "PRINT");
+        return v360;
+    })((function (values,v359){
+        checkArgs(arguments, 2);
+        return (function(){
+            l110.fvalue(pv, l165.fvalue(pv, v359));
+            return v359;
+>>>>>>> backquote
         })();
     }));
-    return l161;
+    return l168;
 })();
-var l162 = {name: "MAKE-STRING-STREAM"};
+var l169 = {name: "MAKE-STRING-STREAM"};
 (function(){
+<<<<<<< HEAD
     (l162).fvalue = (function(v331){
         ((v331)["fname"] = "MAKE-STRING-STREAM");
         return v331;
@@ -3003,37 +4077,70 @@ var l162 = {name: "MAKE-STRING-STREAM"};
         checkArgs(arguments, 2);
         return (function(){
             return ({car: v330, cdr: 0});
+=======
+    (l169).fvalue = (function(v362){
+        ((v362)["fname"] = "MAKE-STRING-STREAM");
+        return v362;
+    })((function (values,v361){
+        checkArgs(arguments, 2);
+        return (function(){
+            return ({car: v361, cdr: 0});
+>>>>>>> backquote
         })();
     }));
-    return l162;
+    return l169;
 })();
-var l163 = {name: "%PEEK-CHAR"};
+var l170 = {name: "%PEEK-CHAR"};
 (function(){
+<<<<<<< HEAD
     (l163).fvalue = (function(v333){
         ((v333)["fname"] = "%PEEK-CHAR");
         return v333;
     })((function (values,v332){
+=======
+    (l170).fvalue = (function(v364){
+        ((v364)["fname"] = "%PEEK-CHAR");
+        return v364;
+    })((function (values,v363){
+>>>>>>> backquote
         checkArgs(arguments, 2);
         return (function(){
             return ((function(){
                 var x1 = (function(){
+<<<<<<< HEAD
                     var tmp = v332;
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })();
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 var x2 = l73.fvalue(pv, (function(){
                     var tmp = v332;
+=======
+                    var tmp = v363;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })();
+                if (typeof x1 !== 'number') throw 'Not a number!';
+                var x2 = l75.fvalue(pv, (function(){
+                    var tmp = v363;
+>>>>>>> backquote
                     return tmp === l5.value? l5.value: tmp.car;
                 })());
                 if (typeof x2 !== 'number') throw 'Not a number!';
                 return (x1<x2?l4.value: l5.value);
             })() !== l5.value ? (function(){
                 var string = (function(){
+<<<<<<< HEAD
                     var tmp = v332;
                     return tmp === l5.value? l5.value: tmp.car;
                 })();
                 var index = (function(){
                     var tmp = v332;
+=======
+                    var tmp = v363;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })();
+                var index = (function(){
+                    var tmp = v363;
+>>>>>>> backquote
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })();
                 if (typeof string != 'string')
@@ -3044,28 +4151,45 @@ var l163 = {name: "%PEEK-CHAR"};
             })() : l5.value);
         })();
     }));
-    return l163;
+    return l170;
 })();
-var l164 = {name: "%READ-CHAR"};
+var l171 = {name: "%READ-CHAR"};
 (function(){
+<<<<<<< HEAD
     (l164).fvalue = (function(v336){
         ((v336)["fname"] = "%READ-CHAR");
         return v336;
     })((function (values,v334){
+=======
+    (l171).fvalue = (function(v367){
+        ((v367)["fname"] = "%READ-CHAR");
+        return v367;
+    })((function (values,v365){
+>>>>>>> backquote
         checkArgs(arguments, 2);
         return (function(){
             return ((function(){
                 var x1 = (function(){
+<<<<<<< HEAD
                     var tmp = v334;
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })();
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 var x2 = l73.fvalue(pv, (function(){
                     var tmp = v334;
+=======
+                    var tmp = v365;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })();
+                if (typeof x1 !== 'number') throw 'Not a number!';
+                var x2 = l75.fvalue(pv, (function(){
+                    var tmp = v365;
+>>>>>>> backquote
                     return tmp === l5.value? l5.value: tmp.car;
                 })());
                 if (typeof x2 !== 'number') throw 'Not a number!';
                 return (x1<x2?l4.value: l5.value);
+<<<<<<< HEAD
             })() !== l5.value ? (function(v335){
                 (function(){
                     var x = v334;
@@ -3084,6 +4208,26 @@ var l164 = {name: "%READ-CHAR"};
                 })();
                 var index = (function(){
                     var tmp = v334;
+=======
+            })() !== l5.value ? (function(v366){
+                (function(){
+                    var x = v365;
+                    if (typeof x != 'object')
+                        throw 'The value ' + x + ' is not a type object.';
+                    return (x.cdr = l24.fvalue(pv, (function(){
+                        var tmp = v365;
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })()), x);
+                })();
+                return v366;
+            })((function(){
+                var string = (function(){
+                    var tmp = v365;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })();
+                var index = (function(){
+                    var tmp = v365;
+>>>>>>> backquote
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })();
                 if (typeof string != 'string')
@@ -3094,10 +4238,11 @@ var l164 = {name: "%READ-CHAR"};
             })()) : l5.value);
         })();
     }));
-    return l164;
+    return l171;
 })();
-var l165 = {name: "WHITESPACEP"};
+var l172 = {name: "WHITESPACEP"};
 (function(){
+<<<<<<< HEAD
     (l165).fvalue = (function(v340){
         ((v340)["fname"] = "WHITESPACEP");
         return v340;
@@ -3109,12 +4254,26 @@ var l165 = {name: "WHITESPACEP"};
                     return (v339 !== l5.value ? v339 : l85.fvalue(values, v337, 9));
                 })(l85.fvalue(pv, v337, 10)));
             })(l85.fvalue(pv, v337, 32));
+=======
+    (l172).fvalue = (function(v371){
+        ((v371)["fname"] = "WHITESPACEP");
+        return v371;
+    })((function (values,v368){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v369){
+                return (v369 !== l5.value ? v369 : (function(v370){
+                    return (v370 !== l5.value ? v370 : l88.fvalue(values, v368, 9));
+                })(l88.fvalue(pv, v368, 10)));
+            })(l88.fvalue(pv, v368, 32));
+>>>>>>> backquote
         })();
     }));
-    return l165;
+    return l172;
 })();
-var l166 = {name: "SKIP-WHITESPACES"};
+var l173 = {name: "SKIP-WHITESPACES"};
 (function(){
+<<<<<<< HEAD
     (l166).fvalue = (function(v343){
         ((v343)["fname"] = "SKIP-WHITESPACES");
         return v343;
@@ -3128,16 +4287,32 @@ var l166 = {name: "SKIP-WHITESPACES"};
                         while((v342 !== l5.value ? l165.fvalue(pv, v342) : l5.value) !== l5.value){
                             l164.fvalue(pv, v341);
                             (v342 = l163.fvalue(pv, v341));
+=======
+    (l173).fvalue = (function(v374){
+        ((v374)["fname"] = "SKIP-WHITESPACES");
+        return v374;
+    })((function (values,v372){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v373){
+                (v373 = l170.fvalue(pv, v372));
+                return (function(){
+                    return (function(){
+                        while((v373 !== l5.value ? l172.fvalue(pv, v373) : l5.value) !== l5.value){
+                            l171.fvalue(pv, v372);
+                            (v373 = l170.fvalue(pv, v372));
+>>>>>>> backquote
                         }return l5.value;
                     })();
                 })();
             })(l5.value);
         })();
     }));
-    return l166;
+    return l173;
 })();
-var l167 = {name: "TERMINALP"};
+var l174 = {name: "TERMINALP"};
 (function(){
+<<<<<<< HEAD
     (l167).fvalue = (function(v348){
         ((v348)["fname"] = "TERMINALP");
         return v348;
@@ -3151,12 +4326,28 @@ var l167 = {name: "TERMINALP"};
                     })(l85.fvalue(pv, 41, v344)));
                 })(l165.fvalue(pv, v344)));
             })(l13.fvalue(pv, v344));
+=======
+    (l174).fvalue = (function(v379){
+        ((v379)["fname"] = "TERMINALP");
+        return v379;
+    })((function (values,v375){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v376){
+                return (v376 !== l5.value ? v376 : (function(v377){
+                    return (v377 !== l5.value ? v377 : (function(v378){
+                        return (v378 !== l5.value ? v378 : l88.fvalue(values, 40, v375));
+                    })(l88.fvalue(pv, 41, v375)));
+                })(l172.fvalue(pv, v375)));
+            })(l13.fvalue(pv, v375));
+>>>>>>> backquote
         })();
     }));
-    return l167;
+    return l174;
 })();
-var l168 = {name: "READ-UNTIL"};
+var l175 = {name: "READ-UNTIL"};
 (function(){
+<<<<<<< HEAD
     (l168).fvalue = (function(v353){
         ((v353)["fname"] = "READ-UNTIL");
         return v353;
@@ -3178,13 +4369,37 @@ var l168 = {name: "READ-UNTIL"};
                     })();
                 })();
                 return v351;
+=======
+    (l175).fvalue = (function(v384){
+        ((v384)["fname"] = "READ-UNTIL");
+        return v384;
+    })((function (values,v380,v381){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (function(v382,v383){
+                (v383 = l170.fvalue(pv, v380));
+                (function(){
+                    return (function(){
+                        while((v383 !== l5.value ? l29.fvalue(pv, (function(){
+                            var f = v381;
+                            return (typeof f === 'function'? f: f.fvalue)(pv, v383)
+                        })()) : l5.value) !== l5.value){
+                            (v382 = l156.fvalue(pv, v382, l106.fvalue(pv, v383)));
+                            l171.fvalue(pv, v380);
+                            (v383 = l170.fvalue(pv, v380));
+                        }return l5.value;
+                    })();
+                })();
+                return v382;
+>>>>>>> backquote
             })("",l5.value);
         })();
     }));
-    return l168;
+    return l175;
 })();
-var l169 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
+var l176 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
 (function(){
+<<<<<<< HEAD
     (l169).fvalue = (function(v357){
         ((v357)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
         return v357;
@@ -3203,17 +4418,38 @@ var l169 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
                             }));
                             l166.fvalue(pv, v354);
                             (v355 = l163.fvalue(pv, v354));
+=======
+    (l176).fvalue = (function(v388){
+        ((v388)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
+        return v388;
+    })((function (values,v385){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v386){
+                l173.fvalue(pv, v385);
+                (v386 = l170.fvalue(pv, v385));
+                return (function(){
+                    return (function(){
+                        while((v386 !== l5.value ? l88.fvalue(pv, v386, 59) : l5.value) !== l5.value){
+                            l175.fvalue(pv, v385, (function (values,v387){
+                                checkArgs(arguments, 2);
+                                return l88.fvalue(values, v387, 10);
+                            }));
+                            l173.fvalue(pv, v385);
+                            (v386 = l170.fvalue(pv, v385));
+>>>>>>> backquote
                         }return l5.value;
                     })();
                 })();
             })(l5.value);
         })();
     }));
-    return l169;
+    return l176;
 })();
-var l170 = {name: "%READ-LIST"};
-var l171 = {name: "LS-READ"};
+var l177 = {name: "%READ-LIST"};
+var l178 = {name: "LS-READ"};
 (function(){
+<<<<<<< HEAD
     (l170).fvalue = (function(v361){
         ((v361)["fname"] = "%READ-LIST");
         return v361;
@@ -3238,12 +4474,39 @@ var l171 = {name: "LS-READ"};
                     })(l171.fvalue(pv, v358));
                 })() : ({car: l171.fvalue(pv, v358), cdr: l170.fvalue(pv, v358)}))));
             })(l163.fvalue(pv, v358));
+=======
+    (l177).fvalue = (function(v392){
+        ((v392)["fname"] = "%READ-LIST");
+        return v392;
+    })((function (values,v389){
+        checkArgs(arguments, 2);
+        return (function(){
+            l176.fvalue(pv, v389);
+            return (function(v390){
+                return (l13.fvalue(pv, v390) !== l5.value ? (function(){
+                    throw "Unspected EOF";
+                })() : (l88.fvalue(pv, v390, 41) !== l5.value ? (function(){
+                    l171.fvalue(pv, v389);
+                    return l5.value;
+                })() : (l88.fvalue(pv, v390, 46) !== l5.value ? (function(){
+                    l171.fvalue(pv, v389);
+                    return (function(v391){
+                        l176.fvalue(pv, v389);
+                        (l88.fvalue(pv, l171.fvalue(pv, v389), 41) !== l5.value ? l5.value : (function(){
+                            throw "')' was expected.";
+                        })());
+                        return v391;
+                    })(l178.fvalue(pv, v389));
+                })() : ({car: l178.fvalue(pv, v389), cdr: l177.fvalue(pv, v389)}))));
+            })(l170.fvalue(pv, v389));
+>>>>>>> backquote
         })();
     }));
-    return l170;
+    return l177;
 })();
-var l172 = {name: "READ-STRING"};
+var l179 = {name: "READ-STRING"};
 (function(){
+<<<<<<< HEAD
     (l172).fvalue = (function(v365){
         ((v365)["fname"] = "READ-STRING");
         return v365;
@@ -3265,13 +4528,37 @@ var l172 = {name: "READ-STRING"};
                     })();
                 })();
                 return v363;
-            })("",l5.value);
-        })();
+=======
+    (l179).fvalue = (function(v396){
+        ((v396)["fname"] = "READ-STRING");
+        return v396;
+    })((function (values,v393){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v394,v395){
+                (v395 = l171.fvalue(pv, v393));
+                (function(){
+                    return (function(){
+                        while(l29.fvalue(pv, l28.fvalue(pv, v395, 34)) !== l5.value){
+                            (l13.fvalue(pv, v395) !== l5.value ? (function(){
+                                throw "Unexpected EOF";
+                            })() : l5.value);
+                            (l28.fvalue(pv, v395, 92) !== l5.value ? (v395 = l171.fvalue(pv, v393)) : l5.value);
+                            (v394 = l156.fvalue(pv, v394, l106.fvalue(pv, v395)));
+                            (v395 = l171.fvalue(pv, v393));
+                        }return l5.value;
+                    })();
+                })();
+                return v394;
+>>>>>>> backquote
+            })("",l5.value);
+        })();
     }));
-    return l172;
+    return l179;
 })();
-var l173 = {name: "READ-SHARP"};
+var l180 = {name: "READ-SHARP"};
 (function(){
+<<<<<<< HEAD
     (l173).fvalue = (function(v370){
         ((v370)["fname"] = "READ-SHARP");
         return v370;
@@ -3284,6 +4571,20 @@ var l173 = {name: "READ-SHARP"};
                     var name = (function(){
                         var x = l168.fvalue(pv, v366, (function(){
                             var symbol = l167;
+=======
+    (l180).fvalue = (function(v401){
+        ((v401)["fname"] = "READ-SHARP");
+        return v401;
+    })((function (values,v397){
+        checkArgs(arguments, 2);
+        return (function(){
+            l171.fvalue(pv, v397);
+            return (function(v398){
+                return (l28.fvalue(pv, v398, 39) !== l5.value ? l47.fvalue(values, l112, l178.fvalue(pv, v397)) : (l28.fvalue(pv, v398, 40) !== l5.value ? l162.fvalue(values, l177.fvalue(pv, v397)) : (l28.fvalue(pv, v398, 58) !== l5.value ? (function(){
+                    var name = (function(){
+                        var x = l175.fvalue(pv, v397, (function(){
+                            var symbol = l174;
+>>>>>>> backquote
                             var func = symbol.fvalue;
                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                             return func;
@@ -3295,9 +4596,15 @@ var l173 = {name: "READ-SHARP"};
                     if (typeof name != 'string')
                         throw 'The value ' + name + ' is not a type string.';
                     return ({name: name});
+<<<<<<< HEAD
                 })() : (l27.fvalue(pv, v367, 92) !== l5.value ? (function(v368){
                     return (l104.fvalue(pv, v368, "space") !== l5.value ? l84.fvalue(values, 32) : (l104.fvalue(pv, v368, "tab") !== l5.value ? l84.fvalue(values, 9) : (l104.fvalue(pv, v368, "newline") !== l5.value ? l84.fvalue(values, 10) : l84.fvalue(values, (function(){
                         var string = v368;
+=======
+                })() : (l28.fvalue(pv, v398, 92) !== l5.value ? (function(v399){
+                    return (l107.fvalue(pv, v399, "space") !== l5.value ? l87.fvalue(values, 32) : (l107.fvalue(pv, v399, "tab") !== l5.value ? l87.fvalue(values, 9) : (l107.fvalue(pv, v399, "newline") !== l5.value ? l87.fvalue(values, 10) : l87.fvalue(values, (function(){
+                        var string = v399;
+>>>>>>> backquote
                         var index = 0;
                         if (typeof string != 'string')
                             throw 'The value ' + string + ' is not a type string.';
@@ -3305,6 +4612,7 @@ var l173 = {name: "READ-SHARP"};
                             throw 'The value ' + index + ' is not a type number.';
                         return string.charCodeAt(index);
                     })()))));
+<<<<<<< HEAD
                 })(l149.fvalue(pv, l103.fvalue(pv, l164.fvalue(pv, v366)), l168.fvalue(pv, v366, (function(){
                     var symbol = l167;
                     var func = symbol.fvalue;
@@ -3319,19 +4627,40 @@ var l173 = {name: "READ-SHARP"};
                     })()));
                 })(l168.fvalue(pv, v366, (function(){
                     var symbol = l167;
+=======
+                })(l156.fvalue(pv, l106.fvalue(pv, l171.fvalue(pv, v397)), l175.fvalue(pv, v397, (function(){
+                    var symbol = l174;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })()))) : (l28.fvalue(pv, v398, 43) !== l5.value ? (function(v400){
+                    return (l107.fvalue(pv, v400, "common-lisp") !== l5.value ? (function(){
+                        l178.fvalue(pv, v397);
+                        return l178.fvalue(values, v397);
+                    })() : (l107.fvalue(pv, v400, "ecmalisp") !== l5.value ? l178.fvalue(values, v397) : (function(){
+                        throw "Unknown reader form.";
+                    })()));
+                })(l175.fvalue(pv, v397, (function(){
+                    var symbol = l174;
+>>>>>>> backquote
                     var func = symbol.fvalue;
                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                     return func;
                 })())) : (function(){
                     throw "ECASE expression failed.";
                 })())))));
+<<<<<<< HEAD
             })(l164.fvalue(pv, v366));
+=======
+            })(l171.fvalue(pv, v397));
+>>>>>>> backquote
         })();
     }));
-    return l173;
+    return l180;
 })();
-var l174 = {name: "READ-SYMBOL"};
+var l181 = {name: "READ-SYMBOL"};
 (function(){
+<<<<<<< HEAD
     (l174).fvalue = (function(v378){
         ((v378)["fname"] = "READ-SYMBOL");
         return v378;
@@ -3351,14 +4680,40 @@ var l174 = {name: "READ-SYMBOL"};
                         })() !== l5.value ? l28.fvalue(pv, l85.fvalue(pv, (function(){
                             var string = v371;
                             var index = v376;
+=======
+    (l181).fvalue = (function(v409){
+        ((v409)["fname"] = "READ-SYMBOL");
+        return v409;
+    })((function (values,v402){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v403,v404,v405,v406,v407){
+                (v407 = 0);
+                (function(){
+                    return (function(){
+                        while(((function(){
+                            var x1 = v407;
+                            if (typeof x1 !== 'number') throw 'Not a number!';
+                            var x2 = v403;
+                            if (typeof x2 !== 'number') throw 'Not a number!';
+                            return (x1<x2?l4.value: l5.value);
+                        })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
+                            var string = v402;
+                            var index = v407;
+>>>>>>> backquote
                             if (typeof string != 'string')
                                 throw 'The value ' + string + ' is not a type string.';
                             if (typeof index != 'number')
                                 throw 'The value ' + index + ' is not a type number.';
                             return string.charCodeAt(index);
                         })(), 58)) : l5.value) !== l5.value){
+<<<<<<< HEAD
                             (v376 = (function(){
                                 var x1 = v376;
+=======
+                            (v407 = (function(){
+                                var x1 = v407;
+>>>>>>> backquote
                                 if (typeof x1 !== 'number') throw 'Not a number!';
                                 return x1+1;
                             })());
@@ -3366,6 +4721,7 @@ var l174 = {name: "READ-SYMBOL"};
                     })();
                 })();
                 ((function(){
+<<<<<<< HEAD
                     var x1 = v376;
                     if (typeof x1 !== 'number') throw 'Not a number!';
                     var x2 = v372;
@@ -3375,18 +4731,37 @@ var l174 = {name: "READ-SYMBOL"};
                     (v374 = v371);
                     (v373 = (function(){
                         var symbol = l138;
+=======
+                    var x1 = v407;
+                    if (typeof x1 !== 'number') throw 'Not a number!';
+                    var x2 = v403;
+                    if (typeof x2 !== 'number') throw 'Not a number!';
+                    return (x1==x2?l4.value: l5.value);
+                })() !== l5.value ? (function(){
+                    (v405 = v402);
+                    (v404 = (function(){
+                        var symbol = l145;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })());
+<<<<<<< HEAD
                     return (v375 = l4.value);
                 })() : (function(){
                     (l25.fvalue(pv, v376) !== l5.value ? (v373 = "KEYWORD") : (v373 = (function(){
                         var x = l99.fvalue(pv, v371, 0, v376);
+=======
+                    return (v406 = l4.value);
+                })() : (function(){
+                    (l26.fvalue(pv, v407) !== l5.value ? (v404 = "KEYWORD") : (v404 = (function(){
+                        var x = l102.fvalue(pv, v402, 0, v407);
+>>>>>>> backquote
                         if (typeof x != 'string')
                             throw 'The value ' + x + ' is not a type string.';
                         return x.toUpperCase();
                     })()));
+<<<<<<< HEAD
                     (v376 = (function(){
                         var x1 = v376;
                         if (typeof x1 !== 'number') throw 'Not a number!';
@@ -3395,51 +4770,95 @@ var l174 = {name: "READ-SYMBOL"};
                     (l85.fvalue(pv, (function(){
                         var string = v371;
                         var index = v376;
+=======
+                    (v407 = (function(){
+                        var x1 = v407;
+                        if (typeof x1 !== 'number') throw 'Not a number!';
+                        return x1+1;
+                    })());
+                    (l88.fvalue(pv, (function(){
+                        var string = v402;
+                        var index = v407;
+>>>>>>> backquote
                         if (typeof string != 'string')
                             throw 'The value ' + string + ' is not a type string.';
                         if (typeof index != 'number')
                             throw 'The value ' + index + ' is not a type number.';
                         return string.charCodeAt(index);
                     })(), 58) !== l5.value ? (function(){
+<<<<<<< HEAD
                         (v375 = l4.value);
                         return (v376 = (function(){
                             var x1 = v376;
+=======
+                        (v406 = l4.value);
+                        return (v407 = (function(){
+                            var x1 = v407;
+>>>>>>> backquote
                             if (typeof x1 !== 'number') throw 'Not a number!';
                             return x1+1;
                         })());
                     })() : l5.value);
+<<<<<<< HEAD
                     return (v374 = l99.fvalue(pv, v371, v376));
                 })());
                 (v374 = (function(){
                     var x = v374;
+=======
+                    return (v405 = l102.fvalue(pv, v402, v407));
+                })());
+                (v405 = (function(){
+                    var x = v405;
+>>>>>>> backquote
                     if (typeof x != 'string')
                         throw 'The value ' + x + ' is not a type string.';
                     return x.toUpperCase();
                 })());
+<<<<<<< HEAD
                 (v373 = l128.fvalue(pv, v373));
                 return ((function(v377){
                     return (v377 !== l5.value ? v377 : ((v373 === l128.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
                 })(v375) !== l5.value ? l145.fvalue(values, v374, v373) : l141.fvalue(values, v374, v373));
             })(l73.fvalue(pv, v371),l5.value,l5.value,l5.value,l5.value);
+=======
+                (v404 = l135.fvalue(pv, v404));
+                return ((function(v408){
+                    return (v408 !== l5.value ? v408 : ((v404 === l135.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
+                })(v406) !== l5.value ? l152.fvalue(values, v405, v404) : l148.fvalue(values, v405, v404));
+            })(l75.fvalue(pv, v402),l5.value,l5.value,l5.value,l5.value);
+>>>>>>> backquote
         })();
     }));
-    return l174;
+    return l181;
 })();
-var l175 = {name: "!PARSE-INTEGER"};
+var l182 = {name: "!PARSE-INTEGER"};
 (function(){
+<<<<<<< HEAD
     (l175).fvalue = (function(v389){
         ((v389)["fname"] = "!PARSE-INTEGER");
         return v389;
     })((function (values,v379,v380){
+=======
+    (l182).fvalue = (function(v420){
+        ((v420)["fname"] = "!PARSE-INTEGER");
+        return v420;
+    })((function (values,v410,v411){
+>>>>>>> backquote
         checkArgs(arguments, 3);
         return (function(){
             return (function(){
                 try {
+<<<<<<< HEAD
                     return (function(v381,v382,v383,v384){
                         (l25.fvalue(pv, v383) !== l5.value ? (function(){
+=======
+                    return (function(v412,v413,v414,v415){
+                        (l26.fvalue(pv, v414) !== l5.value ? (function(){
+>>>>>>> backquote
                             var values = mv;
-                            throw ({type: 'block', id: 144, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
+                            throw ({type: 'block', id: 158, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
                         })() : l5.value);
+<<<<<<< HEAD
                         (function(v385){
                             return (l27.fvalue(pv, v385, 43) !== l5.value ? (v382 = (function(){
                                 var x1 = v382;
@@ -3449,12 +4868,27 @@ var l175 = {name: "!PARSE-INTEGER"};
                                 (v384 = -1);
                                 return (v382 = (function(){
                                     var x1 = v382;
+=======
+                        (function(v416){
+                            return (l28.fvalue(pv, v416, 43) !== l5.value ? (v413 = (function(){
+                                var x1 = v413;
+                                if (typeof x1 !== 'number') throw 'Not a number!';
+                                return x1+1;
+                            })()) : (l28.fvalue(pv, v416, 45) !== l5.value ? (function(){
+                                (v415 = -1);
+                                return (v413 = (function(){
+                                    var x1 = v413;
+>>>>>>> backquote
                                     if (typeof x1 !== 'number') throw 'Not a number!';
                                     return x1+1;
                                 })());
                             })() : l5.value));
                         })((function(){
+<<<<<<< HEAD
                             var string = v379;
+=======
+                            var string = v410;
+>>>>>>> backquote
                             var index = 0;
                             if (typeof string != 'string')
                                 throw 'The value ' + string + ' is not a type string.';
@@ -3463,6 +4897,7 @@ var l175 = {name: "!PARSE-INTEGER"};
                             return string.charCodeAt(index);
                         })());
                         (((function(){
+<<<<<<< HEAD
                             var x1 = v382;
                             if (typeof x1 !== 'number') throw 'Not a number!';
                             var x2 = v383;
@@ -3471,6 +4906,16 @@ var l175 = {name: "!PARSE-INTEGER"};
                         })() !== l5.value ? (v381 = l97.fvalue(pv, (function(){
                             var string = v379;
                             var index = v382;
+=======
+                            var x1 = v413;
+                            if (typeof x1 !== 'number') throw 'Not a number!';
+                            var x2 = v414;
+                            if (typeof x2 !== 'number') throw 'Not a number!';
+                            return (x1<x2?l4.value: l5.value);
+                        })() !== l5.value ? (v412 = l100.fvalue(pv, (function(){
+                            var string = v410;
+                            var index = v413;
+>>>>>>> backquote
                             if (typeof string != 'string')
                                 throw 'The value ' + string + ' is not a type string.';
                             if (typeof index != 'number')
@@ -3478,10 +4923,17 @@ var l175 = {name: "!PARSE-INTEGER"};
                             return string.charCodeAt(index);
                         })())) : l5.value) !== l5.value ? l5.value : (function(){
                             var values = mv;
+<<<<<<< HEAD
                             throw ({type: 'block', id: 144, values: values(l5.value, v382), message: 'Return from unknown block NIL.'})
                         })());
                         (v382 = (function(){
                             var x1 = v382;
+=======
+                            throw ({type: 'block', id: 158, values: values(l5.value, v413), message: 'Return from unknown block NIL.'})
+                        })());
+                        (v413 = (function(){
+                            var x1 = v413;
+>>>>>>> backquote
                             if (typeof x1 !== 'number') throw 'Not a number!';
                             return x1+1;
                         })());
@@ -3489,6 +4941,7 @@ var l175 = {name: "!PARSE-INTEGER"};
                             try {
                                 return (function(){
                                     while((function(){
+<<<<<<< HEAD
                                         var x1 = v382;
                                         if (typeof x1 !== 'number') throw 'Not a number!';
                                         var x2 = v383;
@@ -3502,10 +4955,26 @@ var l175 = {name: "!PARSE-INTEGER"};
                                             (v381 = (function(){
                                                 var x1 = (function(){
                                                     var x1 = v381;
+=======
+                                        var x1 = v413;
+                                        if (typeof x1 !== 'number') throw 'Not a number!';
+                                        var x2 = v414;
+                                        if (typeof x2 !== 'number') throw 'Not a number!';
+                                        return (x1<x2?l4.value: l5.value);
+                                    })() !== l5.value){
+                                        (function(v417){
+                                            (v417 !== l5.value ? l5.value : (function(){
+                                                throw ({type: 'block', id: 159, values: l5.value, message: 'Return from unknown block NIL.'})
+                                            })());
+                                            (v412 = (function(){
+                                                var x1 = (function(){
+                                                    var x1 = v412;
+>>>>>>> backquote
                                                     if (typeof x1 !== 'number') throw 'Not a number!';
                                                     return x1*10;
                                                 })();
                                                 if (typeof x1 !== 'number') throw 'Not a number!';
+<<<<<<< HEAD
                                                 var x2 = v386;
                                                 if (typeof x2 !== 'number') throw 'Not a number!';
                                                 return x1+x2;
@@ -3518,6 +4987,20 @@ var l175 = {name: "!PARSE-INTEGER"};
                                         })(l97.fvalue(pv, (function(){
                                             var string = v379;
                                             var index = v382;
+=======
+                                                var x2 = v417;
+                                                if (typeof x2 !== 'number') throw 'Not a number!';
+                                                return x1+x2;
+                                            })());
+                                            return (v413 = (function(){
+                                                var x1 = v413;
+                                                if (typeof x1 !== 'number') throw 'Not a number!';
+                                                return x1+1;
+                                            })());
+                                        })(l100.fvalue(pv, (function(){
+                                            var string = v410;
+                                            var index = v413;
+>>>>>>> backquote
                                             if (typeof string != 'string')
                                                 throw 'The value ' + string + ' is not a type string.';
                                             if (typeof index != 'number')
@@ -3528,17 +5011,25 @@ var l175 = {name: "!PARSE-INTEGER"};
                                 })();
                             }
                             catch (cf){
-                                if (cf.type == 'block' && cf.id == 145)
+                                if (cf.type == 'block' && cf.id == 159)
                                     return cf.values;
                                 else
                                     throw cf;
                             }
                         })();
+<<<<<<< HEAD
                         return ((function(v387){
                             return (v387 !== l5.value ? v387 : (function(v388){
                                 return (v388 !== l5.value ? v388 : l85.fvalue(pv, (function(){
                                     var string = v379;
                                     var index = v382;
+=======
+                        return ((function(v418){
+                            return (v418 !== l5.value ? v418 : (function(v419){
+                                return (v419 !== l5.value ? v419 : l88.fvalue(pv, (function(){
+                                    var string = v410;
+                                    var index = v413;
+>>>>>>> backquote
                                     if (typeof string != 'string')
                                         throw 'The value ' + string + ' is not a type string.';
                                     if (typeof index != 'number')
@@ -3546,6 +5037,7 @@ var l175 = {name: "!PARSE-INTEGER"};
                                     return string.charCodeAt(index);
                                 })(), 32));
                             })((function(){
+<<<<<<< HEAD
                                 var x1 = v382;
                                 if (typeof x1 !== 'number') throw 'Not a number!';
                                 var x2 = v383;
@@ -3560,9 +5052,25 @@ var l175 = {name: "!PARSE-INTEGER"};
                             return x1*x2;
                         })(), v382) : values(l5.value, v382));
                     })(0,0,l73.fvalue(pv, v379),1);
+=======
+                                var x1 = v413;
+                                if (typeof x1 !== 'number') throw 'Not a number!';
+                                var x2 = v414;
+                                if (typeof x2 !== 'number') throw 'Not a number!';
+                                return (x1==x2?l4.value: l5.value);
+                            })()));
+                        })(v411) !== l5.value ? values((function(){
+                            var x1 = v415;
+                            if (typeof x1 !== 'number') throw 'Not a number!';
+                            var x2 = v412;
+                            if (typeof x2 !== 'number') throw 'Not a number!';
+                            return x1*x2;
+                        })(), v413) : values(l5.value, v413));
+                    })(0,0,l75.fvalue(pv, v410),1);
+>>>>>>> backquote
                 }
                 catch (cf){
-                    if (cf.type == 'block' && cf.id == 144)
+                    if (cf.type == 'block' && cf.id == 158)
                         return values.apply(this, forcemv(cf.values));
                     else
                         throw cf;
@@ -3570,10 +5078,11 @@ var l175 = {name: "!PARSE-INTEGER"};
             })();
         })();
     }));
-    return l175;
+    return l182;
 })();
-var l176 = {name: "PARSE-INTEGER"};
+var l183 = {name: "PARSE-INTEGER"};
 (function(){
+<<<<<<< HEAD
     (l176).fvalue = (function(v391){
         ((v391)["fname"] = "PARSE-INTEGER");
         return v391;
@@ -3581,20 +5090,30 @@ var l176 = {name: "PARSE-INTEGER"};
         checkArgs(arguments, 2);
         return (function(){
             return l175.fvalue(values, v390, l5.value);
+=======
+    (l183).fvalue = (function(v422){
+        ((v422)["fname"] = "PARSE-INTEGER");
+        return v422;
+    })((function (values,v421){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l182.fvalue(values, v421, l5.value);
+>>>>>>> backquote
         })();
     }));
-    return l176;
+    return l183;
 })();
-var l177 = {name: "*EOF*"};
+var l184 = {name: "*EOF*"};
 (function(){
-    (((l177.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l177).value = l17.fvalue(pv)));
-    return l177;
+    (((l184.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l184).value = l18.fvalue(pv)));
+    return l184;
 })();
-var l178 = {name: "QUOTE"};
-var l179 = {name: "BACKQUOTE"};
-var l180 = {name: "UNQUOTE-SPLICING"};
-var l181 = {name: "UNQUOTE"};
+var l185 = {name: "QUOTE"};
+var l186 = {name: "BACKQUOTE"};
+var l187 = {name: "UNQUOTE-SPLICING"};
+var l188 = {name: "UNQUOTE"};
 (function(){
+<<<<<<< HEAD
     (l171).fvalue = (function(v397){
         ((v397)["fname"] = "LS-READ");
         return v397;
@@ -3634,17 +5153,63 @@ var l181 = {name: "UNQUOTE"};
                     })(pv(l175.fvalue(pv, v395, l5.value)));
                 })(l168.fvalue(pv, v392, (function(){
                     var symbol = l167;
+=======
+    (l178).fvalue = (function(v428){
+        ((v428)["fname"] = "LS-READ");
+        return v428;
+    })((function (values,v423){
+        checkArgs(arguments, 2);
+        return (function(){
+            l176.fvalue(pv, v423);
+            return (function(v424){
+                return ((function(v425){
+                    return (v425 !== l5.value ? v425 : l88.fvalue(pv, v424, 41));
+                })(l13.fvalue(pv, v424)) !== l5.value ? (function(){
+                    var symbol = l184;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })() : (l88.fvalue(pv, v424, 40) !== l5.value ? (function(){
+                    l171.fvalue(pv, v423);
+                    return l177.fvalue(values, v423);
+                })() : (l88.fvalue(pv, v424, 39) !== l5.value ? (function(){
+                    l171.fvalue(pv, v423);
+                    return l47.fvalue(values, l185, l178.fvalue(pv, v423));
+                })() : (l88.fvalue(pv, v424, 96) !== l5.value ? (function(){
+                    l171.fvalue(pv, v423);
+                    return l47.fvalue(values, l186, l178.fvalue(pv, v423));
+                })() : (l88.fvalue(pv, v424, 34) !== l5.value ? (function(){
+                    l171.fvalue(pv, v423);
+                    return l179.fvalue(values, v423);
+                })() : (l88.fvalue(pv, v424, 44) !== l5.value ? (function(){
+                    l171.fvalue(pv, v423);
+                    return (l28.fvalue(pv, l170.fvalue(pv, v423), 64) !== l5.value ? (function(){
+                        l171.fvalue(pv, v423);
+                        return l47.fvalue(values, l187, l178.fvalue(pv, v423));
+                    })() : l47.fvalue(values, l188, l178.fvalue(pv, v423)));
+                })() : (l88.fvalue(pv, v424, 35) !== l5.value ? l180.fvalue(values, v423) : (function(v426){
+                    return (function(v427){
+                        return (v427 !== l5.value ? v427 : l181.fvalue(values, v426));
+                    })(pv(l182.fvalue(pv, v426, l5.value)));
+                })(l175.fvalue(pv, v423, (function(){
+                    var symbol = l174;
+>>>>>>> backquote
                     var func = symbol.fvalue;
                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                     return func;
                 })())))))))));
+<<<<<<< HEAD
             })(l163.fvalue(pv, v392));
+=======
+            })(l170.fvalue(pv, v423));
+>>>>>>> backquote
         })();
     }));
-    return l171;
+    return l178;
 })();
-var l182 = {name: "LS-READ-FROM-STRING"};
+var l189 = {name: "LS-READ-FROM-STRING"};
 (function(){
+<<<<<<< HEAD
     (l182).fvalue = (function(v399){
         ((v399)["fname"] = "LS-READ-FROM-STRING");
         return v399;
@@ -3652,12 +5217,22 @@ var l182 = {name: "LS-READ-FROM-STRING"};
         checkArgs(arguments, 2);
         return (function(){
             return l171.fvalue(values, l162.fvalue(pv, v398));
+=======
+    (l189).fvalue = (function(v430){
+        ((v430)["fname"] = "LS-READ-FROM-STRING");
+        return v430;
+    })((function (values,v429){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l178.fvalue(values, l169.fvalue(pv, v429));
+>>>>>>> backquote
         })();
     }));
-    return l182;
+    return l189;
 })();
-var l183 = {name: "CODE"};
+var l190 = {name: "CODE"};
 (function(){
+<<<<<<< HEAD
     (l183).fvalue = (function(v402){
         ((v402)["fname"] = "CODE");
         return v402;
@@ -3673,13 +5248,31 @@ var l183 = {name: "CODE"};
                     throw "Unknown argument.";
                 })())));
             }), v400);
+=======
+    (l190).fvalue = (function(v433){
+        ((v433)["fname"] = "CODE");
+        return v433;
+    })((function (values){
+        var v431= l5.value;
+        for (var i = arguments.length-1; i>=1; i--)
+            v431 = {car: arguments[i], cdr: 
+        v431};
+        return (function(){
+            return l160.fvalue(values, (function (values,v432){
+                checkArgs(arguments, 2);
+                return (l13.fvalue(pv, v432) !== l5.value ? "" : (l89.fvalue(pv, v432) !== l5.value ? l19.fvalue(values, v432) : (((typeof(v432) == "string")?l4.value: l5.value) !== l5.value ? v432 : (function(){
+                    throw "Unknown argument.";
+                })())));
+            }), v431);
+>>>>>>> backquote
         })();
     }));
-    return l183;
+    return l190;
 })();
-var l184 = {name: "JS!BOOL"};
-var l185 = {name: "LS-COMPILE"};
+var l191 = {name: "JS!BOOL"};
+var l192 = {name: "LS-COMPILE"};
 (function(){
+<<<<<<< HEAD
     (l184).fvalue = (function(v404){
         ((v404)["fname"] = "JS!BOOL");
         return v404;
@@ -3687,14 +5280,24 @@ var l185 = {name: "LS-COMPILE"};
         checkArgs(arguments, 2);
         return (function(){
             return l183.fvalue(values, "(", v403, "?", l185.fvalue(pv, l4.value), ": ", l185.fvalue(pv, l5.value), ")");
+=======
+    (l191).fvalue = (function(v435){
+        ((v435)["fname"] = "JS!BOOL");
+        return v435;
+    })((function (values,v434){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l190.fvalue(values, "(", v434, "?", l192.fvalue(pv, l4.value), ": ", l192.fvalue(pv, l5.value), ")");
+>>>>>>> backquote
         })();
     }));
-    return l184;
+    return l191;
 })();
-var l186 = {name: "JS!SELFCALL"};
-l186;
-var l187 = {name: "INDENT"};
+var l193 = {name: "JS!SELFCALL"};
+l193;
+var l194 = {name: "INDENT"};
 (function(){
+<<<<<<< HEAD
     (l187).fvalue = (function(v411){
         ((v411)["fname"] = "INDENT");
         return v411;
@@ -3721,12 +5324,41 @@ var l187 = {name: "INDENT"};
                                 })(((l85.fvalue(pv, (function(){
                                     var string = v406;
                                     var index = v408;
+=======
+    (l194).fvalue = (function(v442){
+        ((v442)["fname"] = "INDENT");
+        return v442;
+    })((function (values){
+        var v436= l5.value;
+        for (var i = arguments.length-1; i>=1; i--)
+            v436 = {car: arguments[i], cdr: 
+        v436};
+        return (function(){
+            return (function(v437){
+                return (function(v438,v439,v440){
+                    (l90.fvalue(pv, l75.fvalue(pv, v437)) !== l5.value ? (v438 = l156.fvalue(pv, v438, "    ")) : l5.value);
+                    (function(){
+                        return (function(){
+                            while((function(){
+                                var x1 = v439;
+                                if (typeof x1 !== 'number') throw 'Not a number!';
+                                var x2 = v440;
+                                if (typeof x2 !== 'number') throw 'Not a number!';
+                                return (x1<x2?l4.value: l5.value);
+                            })() !== l5.value){
+                                (function(v441){
+                                    return (v438 = l156.fvalue(pv, v438, v441));
+                                })(((l88.fvalue(pv, (function(){
+                                    var string = v437;
+                                    var index = v439;
+>>>>>>> backquote
                                     if (typeof string != 'string')
                                         throw 'The value ' + string + ' is not a type string.';
                                     if (typeof index != 'number')
                                         throw 'The value ' + index + ' is not a type number.';
                                     return string.charCodeAt(index);
                                 })(), 10) !== l5.value ? ((function(){
+<<<<<<< HEAD
                                     var x1 = v408;
                                     if (typeof x1 !== 'number') throw 'Not a number!';
                                     var x2 = l24.fvalue(pv, v409);
@@ -3735,39 +5367,69 @@ var l187 = {name: "INDENT"};
                                 })() !== l5.value ? l28.fvalue(pv, l85.fvalue(pv, (function(){
                                     var string = v406;
                                     var index = l23.fvalue(pv, v408);
+=======
+                                    var x1 = v439;
+                                    if (typeof x1 !== 'number') throw 'Not a number!';
+                                    var x2 = l25.fvalue(pv, v440);
+                                    if (typeof x2 !== 'number') throw 'Not a number!';
+                                    return (x1<x2?l4.value: l5.value);
+                                })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
+                                    var string = v437;
+                                    var index = l24.fvalue(pv, v439);
+>>>>>>> backquote
                                     if (typeof string != 'string')
                                         throw 'The value ' + string + ' is not a type string.';
                                     if (typeof index != 'number')
                                         throw 'The value ' + index + ' is not a type number.';
                                     return string.charCodeAt(index);
+<<<<<<< HEAD
                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l149.fvalue(pv, l103.fvalue(pv, 10), "    ") : l103.fvalue(pv, (function(){
                                     var string = v406;
                                     var index = v408;
+=======
+                                })(), 10)) : l5.value) : l5.value) !== l5.value ? l156.fvalue(pv, l106.fvalue(pv, 10), "    ") : l106.fvalue(pv, (function(){
+                                    var string = v437;
+                                    var index = v439;
+>>>>>>> backquote
                                     if (typeof string != 'string')
                                         throw 'The value ' + string + ' is not a type string.';
                                     if (typeof index != 'number')
                                         throw 'The value ' + index + ' is not a type number.';
                                     return string.charCodeAt(index);
                                 })())));
+<<<<<<< HEAD
                                 (v408 = (function(){
                                     var x1 = v408;
+=======
+                                (v439 = (function(){
+                                    var x1 = v439;
+>>>>>>> backquote
                                     if (typeof x1 !== 'number') throw 'Not a number!';
                                     return x1+1;
                                 })());
                             }return l5.value;
                         })();
                     })();
+<<<<<<< HEAD
                     return v407;
                 })("",0,l73.fvalue(pv, v406));
+=======
+                    return v438;
+                })("",0,l75.fvalue(pv, v437));
+>>>>>>> backquote
             })((function(){
                 var f = (function(){
-                    var symbol = l183;
+                    var symbol = l190;
                     var func = symbol.fvalue;
                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                     return func;
                 })();
                 var args = [pv];
+<<<<<<< HEAD
                 var tail = (v405);
+=======
+                var tail = (v436);
+>>>>>>> backquote
                 while (tail != l5.value){
                     args.push(tail.car);
                     tail = tail.cdr;
@@ -3776,15 +5438,16 @@ var l187 = {name: "INDENT"};
             })());
         })();
     }));
-    return l187;
+    return l194;
 })();
-var l188 = {name: "*MULTIPLE-VALUE-P*"};
+var l195 = {name: "*MULTIPLE-VALUE-P*"};
 (function(){
-    (((l188.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l188).value = l5.value));
-    return l188;
+    (((l195.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l195).value = l5.value));
+    return l195;
 })();
-var l189 = {name: "MAKE-BINDING"};
+var l196 = {name: "MAKE-BINDING"};
 (function(){
+<<<<<<< HEAD
     (l189).fvalue = (function(v416){
         ((v416)["fname"] = "MAKE-BINDING");
         return v416;
@@ -3799,12 +5462,29 @@ var l189 = {name: "MAKE-BINDING"};
         }
         return (function(){
             return l45.fvalue(values, v412, v413, v414, v415);
+=======
+    (l196).fvalue = (function(v447){
+        ((v447)["fname"] = "MAKE-BINDING");
+        return v447;
+    })((function (values,v443,v444,v445,v446){
+        checkArgsAtLeast(arguments, 4);
+        checkArgsAtMost(arguments, 5);
+        var v446; 
+        switch(arguments.length-1){
+        case 3:
+            v446=l5.value;
+        default: break;
+        }
+        return (function(){
+            return l47.fvalue(values, v443, v444, v445, v446);
+>>>>>>> backquote
         })();
     }));
-    return l189;
+    return l196;
 })();
-var l190 = {name: "BINDING-NAME"};
+var l197 = {name: "BINDING-NAME"};
 (function(){
+<<<<<<< HEAD
     (l190).fvalue = (function(v418){
         ((v418)["fname"] = "BINDING-NAME");
         return v418;
@@ -3812,12 +5492,22 @@ var l190 = {name: "BINDING-NAME"};
         checkArgs(arguments, 2);
         return (function(){
             return l40.fvalue(values, v417);
+=======
+    (l197).fvalue = (function(v449){
+        ((v449)["fname"] = "BINDING-NAME");
+        return v449;
+    })((function (values,v448){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l42.fvalue(values, v448);
+>>>>>>> backquote
         })();
     }));
-    return l190;
+    return l197;
 })();
-var l191 = {name: "BINDING-TYPE"};
+var l198 = {name: "BINDING-TYPE"};
 (function(){
+<<<<<<< HEAD
     (l191).fvalue = (function(v420){
         ((v420)["fname"] = "BINDING-TYPE");
         return v420;
@@ -3825,12 +5515,22 @@ var l191 = {name: "BINDING-TYPE"};
         checkArgs(arguments, 2);
         return (function(){
             return l41.fvalue(values, v419);
+=======
+    (l198).fvalue = (function(v451){
+        ((v451)["fname"] = "BINDING-TYPE");
+        return v451;
+    })((function (values,v450){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l43.fvalue(values, v450);
+>>>>>>> backquote
         })();
     }));
-    return l191;
+    return l198;
 })();
-var l192 = {name: "BINDING-VALUE"};
+var l199 = {name: "BINDING-VALUE"};
 (function(){
+<<<<<<< HEAD
     (l192).fvalue = (function(v422){
         ((v422)["fname"] = "BINDING-VALUE");
         return v422;
@@ -3838,12 +5538,22 @@ var l192 = {name: "BINDING-VALUE"};
         checkArgs(arguments, 2);
         return (function(){
             return l42.fvalue(values, v421);
+=======
+    (l199).fvalue = (function(v453){
+        ((v453)["fname"] = "BINDING-VALUE");
+        return v453;
+    })((function (values,v452){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l44.fvalue(values, v452);
+>>>>>>> backquote
         })();
     }));
-    return l192;
+    return l199;
 })();
-var l193 = {name: "BINDING-DECLARATIONS"};
+var l200 = {name: "BINDING-DECLARATIONS"};
 (function(){
+<<<<<<< HEAD
     (l193).fvalue = (function(v424){
         ((v424)["fname"] = "BINDING-DECLARATIONS");
         return v424;
@@ -3851,12 +5561,22 @@ var l193 = {name: "BINDING-DECLARATIONS"};
         checkArgs(arguments, 2);
         return (function(){
             return l43.fvalue(values, v423);
+=======
+    (l200).fvalue = (function(v455){
+        ((v455)["fname"] = "BINDING-DECLARATIONS");
+        return v455;
+    })((function (values,v454){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l45.fvalue(values, v454);
+>>>>>>> backquote
         })();
     }));
-    return l193;
+    return l200;
 })();
-var l194 = {name: "SET-BINDING-VALUE"};
+var l201 = {name: "SET-BINDING-VALUE"};
 (function(){
+<<<<<<< HEAD
     (l194).fvalue = (function(v427){
         ((v427)["fname"] = "SET-BINDING-VALUE");
         return v427;
@@ -3868,13 +5588,27 @@ var l194 = {name: "SET-BINDING-VALUE"};
                 if (typeof x != 'object')
                     throw 'The value ' + x + ' is not a type object.';
                 return (x.car = v426, x);
+=======
+    (l201).fvalue = (function(v458){
+        ((v458)["fname"] = "SET-BINDING-VALUE");
+        return v458;
+    })((function (values,v456,v457){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (function(){
+                var x = l37.fvalue(pv, v456);
+                if (typeof x != 'object')
+                    throw 'The value ' + x + ' is not a type object.';
+                return (x.car = v457, x);
+>>>>>>> backquote
             })();
         })();
     }));
-    return l194;
+    return l201;
 })();
-var l195 = {name: "SET-BINDING-DECLARATIONS"};
+var l202 = {name: "SET-BINDING-DECLARATIONS"};
 (function(){
+<<<<<<< HEAD
     (l195).fvalue = (function(v430){
         ((v430)["fname"] = "SET-BINDING-DECLARATIONS");
         return v430;
@@ -3886,13 +5620,27 @@ var l195 = {name: "SET-BINDING-DECLARATIONS"};
                 if (typeof x != 'object')
                     throw 'The value ' + x + ' is not a type object.';
                 return (x.car = v429, x);
+=======
+    (l202).fvalue = (function(v461){
+        ((v461)["fname"] = "SET-BINDING-DECLARATIONS");
+        return v461;
+    })((function (values,v459,v460){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (function(){
+                var x = l40.fvalue(pv, v459);
+                if (typeof x != 'object')
+                    throw 'The value ' + x + ' is not a type object.';
+                return (x.car = v460, x);
+>>>>>>> backquote
             })();
         })();
     }));
-    return l195;
+    return l202;
 })();
-var l196 = {name: "PUSH-BINDING-DECLARATION"};
+var l203 = {name: "PUSH-BINDING-DECLARATION"};
 (function(){
+<<<<<<< HEAD
     (l196).fvalue = (function(v433){
         ((v433)["fname"] = "PUSH-BINDING-DECLARATION");
         return v433;
@@ -3900,25 +5648,41 @@ var l196 = {name: "PUSH-BINDING-DECLARATION"};
         checkArgs(arguments, 3);
         return (function(){
             return l195.fvalue(values, v432, ({car: v431, cdr: l193.fvalue(pv, v432)}));
+=======
+    (l203).fvalue = (function(v464){
+        ((v464)["fname"] = "PUSH-BINDING-DECLARATION");
+        return v464;
+    })((function (values,v462,v463){
+        checkArgs(arguments, 3);
+        return (function(){
+            return l202.fvalue(values, v463, ({car: v462, cdr: l200.fvalue(pv, v463)}));
+>>>>>>> backquote
         })();
     }));
-    return l196;
+    return l203;
 })();
-var l197 = {name: "MAKE-LEXENV"};
+var l204 = {name: "MAKE-LEXENV"};
 (function(){
+<<<<<<< HEAD
     (l197).fvalue = (function(v434){
         ((v434)["fname"] = "MAKE-LEXENV");
         return v434;
+=======
+    (l204).fvalue = (function(v465){
+        ((v465)["fname"] = "MAKE-LEXENV");
+        return v465;
+>>>>>>> backquote
     })((function (values){
         checkArgsAtMost(arguments, 1);
         return (function(){
-            return l45.fvalue(values, l5.value, l5.value, l5.value, l5.value);
+            return l47.fvalue(values, l5.value, l5.value, l5.value, l5.value);
         })();
     }));
-    return l197;
+    return l204;
 })();
-var l198 = {name: "COPY-LEXENV"};
+var l205 = {name: "COPY-LEXENV"};
 (function(){
+<<<<<<< HEAD
     (l198).fvalue = (function(v436){
         ((v436)["fname"] = "COPY-LEXENV");
         return v436;
@@ -3926,14 +5690,24 @@ var l198 = {name: "COPY-LEXENV"};
         checkArgs(arguments, 2);
         return (function(){
             return l82.fvalue(values, v435);
+=======
+    (l205).fvalue = (function(v467){
+        ((v467)["fname"] = "COPY-LEXENV");
+        return v467;
+    })((function (values,v466){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l84.fvalue(values, v466);
+>>>>>>> backquote
         })();
     }));
-    return l198;
+    return l205;
 })();
-var l199 = {name: "PUSH-TO-LEXENV"};
-var l200 = {name: "BLOCK"};
-var l201 = {name: "GOTAG"};
+var l206 = {name: "PUSH-TO-LEXENV"};
+var l207 = {name: "BLOCK"};
+var l208 = {name: "GOTAG"};
 (function(){
+<<<<<<< HEAD
     (l199).fvalue = (function(v441){
         ((v441)["fname"] = "PUSH-TO-LEXENV");
         return v441;
@@ -3952,10 +5726,31 @@ var l201 = {name: "GOTAG"};
                 })() : (l27.fvalue(pv, v440, l109) !== l5.value ? (function(){
                     var x = (function(){
                         var tmp = v438;
+=======
+    (l206).fvalue = (function(v472){
+        ((v472)["fname"] = "PUSH-TO-LEXENV");
+        return v472;
+    })((function (values,v468,v469,v470){
+        checkArgs(arguments, 4);
+        return (function(){
+            return (function(v471){
+                return (l28.fvalue(pv, v471, l113) !== l5.value ? (function(){
+                    var x = v469;
+                    if (typeof x != 'object')
+                        throw 'The value ' + x + ' is not a type object.';
+                    return (x.car = ({car: v468, cdr: (function(){
+                        var tmp = v469;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })()}), x);
+                })() : (l28.fvalue(pv, v471, l112) !== l5.value ? (function(){
+                    var x = (function(){
+                        var tmp = v469;
+>>>>>>> backquote
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })();
                     if (typeof x != 'object')
                         throw 'The value ' + x + ' is not a type object.';
+<<<<<<< HEAD
                     return (x.car = ({car: v437, cdr: l34.fvalue(pv, v438)}), x);
                 })() : (l27.fvalue(pv, v440, l200) !== l5.value ? (function(){
                     var x = l36.fvalue(pv, v438);
@@ -3971,12 +5766,30 @@ var l201 = {name: "GOTAG"};
                     throw "ECASE expression failed.";
                 })()))));
             })(v439);
+=======
+                    return (x.car = ({car: v468, cdr: l35.fvalue(pv, v469)}), x);
+                })() : (l28.fvalue(pv, v471, l207) !== l5.value ? (function(){
+                    var x = l37.fvalue(pv, v469);
+                    if (typeof x != 'object')
+                        throw 'The value ' + x + ' is not a type object.';
+                    return (x.car = ({car: v468, cdr: l39.fvalue(pv, v469)}), x);
+                })() : (l28.fvalue(pv, v471, l208) !== l5.value ? (function(){
+                    var x = l40.fvalue(pv, v469);
+                    if (typeof x != 'object')
+                        throw 'The value ' + x + ' is not a type object.';
+                    return (x.car = ({car: v468, cdr: l41.fvalue(pv, v469)}), x);
+                })() : (function(){
+                    throw "ECASE expression failed.";
+                })()))));
+            })(v470);
+>>>>>>> backquote
         })();
     }));
-    return l199;
+    return l206;
 })();
-var l202 = {name: "EXTEND-LEXENV"};
+var l209 = {name: "EXTEND-LEXENV"};
 (function(){
+<<<<<<< HEAD
     (l202).fvalue = (function(v448){
         ((v448)["fname"] = "EXTEND-LEXENV");
         return v448;
@@ -3998,20 +5811,51 @@ var l202 = {name: "EXTEND-LEXENV"};
                                 })();
                                 (v446 = (function(){
                                     var tmp = v446;
+=======
+    (l209).fvalue = (function(v479){
+        ((v479)["fname"] = "EXTEND-LEXENV");
+        return v479;
+    })((function (values,v473,v474,v475){
+        checkArgs(arguments, 4);
+        return (function(){
+            return (function(v476){
+                return (function(){
+                    return (function(v477,v478){
+                        (function(){
+                            while(v477 !== l5.value){
+                                (v478 = (function(){
+                                    var tmp = v477;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })());
+                                (function(){
+                                    l206.fvalue(pv, v478, v476, v475);
+                                    return l5.value;
+                                })();
+                                (v477 = (function(){
+                                    var tmp = v477;
+>>>>>>> backquote
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
+<<<<<<< HEAD
                         return v445;
                     })(l68.fvalue(pv, v442),l5.value);
                 })();
             })(l198.fvalue(pv, v443));
+=======
+                        return v476;
+                    })(l70.fvalue(pv, v473),l5.value);
+                })();
+            })(l205.fvalue(pv, v474));
+>>>>>>> backquote
         })();
     }));
-    return l202;
+    return l209;
 })();
-var l203 = {name: "LOOKUP-IN-LEXENV"};
+var l210 = {name: "LOOKUP-IN-LEXENV"};
 (function(){
+<<<<<<< HEAD
     (l203).fvalue = (function(v453){
         ((v453)["fname"] = "LOOKUP-IN-LEXENV");
         return v453;
@@ -4023,31 +5867,51 @@ var l203 = {name: "LOOKUP-IN-LEXENV"};
                     throw "ECASE expression failed.";
                 })()))));
             })(v451));
+=======
+    (l210).fvalue = (function(v484){
+        ((v484)["fname"] = "LOOKUP-IN-LEXENV");
+        return v484;
+    })((function (values,v480,v481,v482){
+        checkArgs(arguments, 4);
+        return (function(){
+            return l105.fvalue(values, v480, (function(v483){
+                return (l28.fvalue(pv, v483, l113) !== l5.value ? l42.fvalue(pv, v481) : (l28.fvalue(pv, v483, l112) !== l5.value ? l43.fvalue(pv, v481) : (l28.fvalue(pv, v483, l207) !== l5.value ? l44.fvalue(pv, v481) : (l28.fvalue(pv, v483, l208) !== l5.value ? l45.fvalue(pv, v481) : (function(){
+                    throw "ECASE expression failed.";
+                })()))));
+            })(v482));
+>>>>>>> backquote
         })();
     }));
-    return l203;
+    return l210;
 })();
-var l204 = {name: "*ENVIRONMENT*"};
+var l211 = {name: "*ENVIRONMENT*"};
 (function(){
-    (((l204.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l204).value = l197.fvalue(pv)));
-    return l204;
+    (((l211.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l211).value = l204.fvalue(pv)));
+    return l211;
 })();
-var l205 = {name: "*VARIABLE-COUNTER*"};
+var l212 = {name: "*VARIABLE-COUNTER*"};
 (function(){
-    (((l205.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l205).value = 0));
-    return l205;
+    (((l212.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l212).value = 0));
+    return l212;
 })();
-var l206 = {name: "GVARNAME"};
+var l213 = {name: "GVARNAME"};
 (function(){
+<<<<<<< HEAD
     (l206).fvalue = (function(v455){
         ((v455)["fname"] = "GVARNAME");
         return v455;
     })((function (values,v454){
+=======
+    (l213).fvalue = (function(v486){
+        ((v486)["fname"] = "GVARNAME");
+        return v486;
+    })((function (values,v485){
+>>>>>>> backquote
         checkArgs(arguments, 2);
         return (function(){
-            return l183.fvalue(values, "v", ((l205).value = (function(){
+            return l190.fvalue(values, "v", ((l212).value = (function(){
                 var x1 = (function(){
-                    var symbol = l205;
+                    var symbol = l212;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
@@ -4057,10 +5921,11 @@ var l206 = {name: "GVARNAME"};
             })()));
         })();
     }));
-    return l206;
+    return l213;
 })();
-var l207 = {name: "TRANSLATE-VARIABLE"};
+var l214 = {name: "TRANSLATE-VARIABLE"};
 (function(){
+<<<<<<< HEAD
     (l207).fvalue = (function(v457){
         ((v457)["fname"] = "TRANSLATE-VARIABLE");
         return v457;
@@ -4069,16 +5934,27 @@ var l207 = {name: "TRANSLATE-VARIABLE"};
         return (function(){
             return l192.fvalue(values, l203.fvalue(pv, v456, (function(){
                 var symbol = l204;
+=======
+    (l214).fvalue = (function(v488){
+        ((v488)["fname"] = "TRANSLATE-VARIABLE");
+        return v488;
+    })((function (values,v487){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l199.fvalue(values, l210.fvalue(pv, v487, (function(){
+                var symbol = l211;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l110));
+            })(), l113));
         })();
     }));
-    return l207;
+    return l214;
 })();
-var l208 = {name: "EXTEND-LOCAL-ENV"};
+var l215 = {name: "EXTEND-LOCAL-ENV"};
 (function(){
+<<<<<<< HEAD
     (l208).fvalue = (function(v463){
         ((v463)["fname"] = "EXTEND-LOCAL-ENV");
         return v463;
@@ -4102,30 +5978,61 @@ var l208 = {name: "EXTEND-LOCAL-ENV"};
                                 })();
                                 (v460 = (function(){
                                     var tmp = v460;
+=======
+    (l215).fvalue = (function(v494){
+        ((v494)["fname"] = "EXTEND-LOCAL-ENV");
+        return v494;
+    })((function (values,v489){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v490){
+                return (function(){
+                    return (function(v491,v492){
+                        (function(){
+                            while(v491 !== l5.value){
+                                (v492 = (function(){
+                                    var tmp = v491;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })());
+                                (function(){
+                                    (function(v493){
+                                        return l206.fvalue(pv, v493, v490, l113);
+                                    })(l196.fvalue(pv, v492, l113, l213.fvalue(pv, v492)));
+                                    return l5.value;
+                                })();
+                                (v491 = (function(){
+                                    var tmp = v491;
+>>>>>>> backquote
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
+<<<<<<< HEAD
                         return v459;
                     })(v458,l5.value);
+=======
+                        return v490;
+                    })(v489,l5.value);
+>>>>>>> backquote
                 })();
-            })(l198.fvalue(pv, (function(){
-                var symbol = l204;
+            })(l205.fvalue(pv, (function(){
+                var symbol = l211;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })()));
         })();
     }));
-    return l208;
+    return l215;
 })();
-var l209 = {name: "*TOPLEVEL-COMPILATIONS*"};
+var l216 = {name: "*TOPLEVEL-COMPILATIONS*"};
 (function(){
-    (((l209.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l209).value = l5.value));
-    return l209;
+    (((l216.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l216).value = l5.value));
+    return l216;
 })();
-var l210 = {name: "TOPLEVEL-COMPILATION"};
+var l217 = {name: "TOPLEVEL-COMPILATION"};
 (function(){
+<<<<<<< HEAD
     (l210).fvalue = (function(v467){
         ((v467)["fname"] = "TOPLEVEL-COMPILATION");
         return v467;
@@ -4142,12 +6049,27 @@ var l210 = {name: "TOPLEVEL-COMPILATION"};
                 })()});
                 return ((l209).value = v466);
             })();
+=======
+    (l217).fvalue = (function(v496){
+        ((v496)["fname"] = "TOPLEVEL-COMPILATION");
+        return v496;
+    })((function (values,v495){
+        checkArgs(arguments, 2);
+        return (function(){
+            return ((l216).value = ({car: v495, cdr: (function(){
+                var symbol = l216;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()}));
+>>>>>>> backquote
         })();
     }));
-    return l210;
+    return l217;
 })();
-var l211 = {name: "NULL-OR-EMPTY-P"};
+var l218 = {name: "NULL-OR-EMPTY-P"};
 (function(){
+<<<<<<< HEAD
     (l211).fvalue = (function(v469){
         ((v469)["fname"] = "NULL-OR-EMPTY-P");
         return v469;
@@ -4155,36 +6077,52 @@ var l211 = {name: "NULL-OR-EMPTY-P"};
         checkArgs(arguments, 2);
         return (function(){
             return l25.fvalue(values, l73.fvalue(pv, v468));
+=======
+    (l218).fvalue = (function(v498){
+        ((v498)["fname"] = "NULL-OR-EMPTY-P");
+        return v498;
+    })((function (values,v497){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l26.fvalue(values, l75.fvalue(pv, v497));
+>>>>>>> backquote
         })();
     }));
-    return l211;
+    return l218;
 })();
-var l212 = {name: "GET-TOPLEVEL-COMPILATIONS"};
+var l219 = {name: "GET-TOPLEVEL-COMPILATIONS"};
 (function(){
+<<<<<<< HEAD
     (l212).fvalue = (function(v470){
         ((v470)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
         return v470;
+=======
+    (l219).fvalue = (function(v499){
+        ((v499)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
+        return v499;
+>>>>>>> backquote
     })((function (values){
         checkArgsAtMost(arguments, 1);
         return (function(){
-            return l68.fvalue(values, l95.fvalue(pv, (function(){
-                var symbol = l211;
+            return l70.fvalue(values, l98.fvalue(pv, (function(){
+                var symbol = l218;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
             })(), (function(){
-                var symbol = l209;
+                var symbol = l216;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })()));
         })();
     }));
-    return l212;
+    return l219;
 })();
-var l213 = {name: "%COMPILE-DEFMACRO"};
-var l214 = {name: "MACRO"};
+var l220 = {name: "%COMPILE-DEFMACRO"};
+var l221 = {name: "MACRO"};
 (function(){
+<<<<<<< HEAD
     (l213).fvalue = (function(v473){
         ((v473)["fname"] = "%COMPILE-DEFMACRO");
         return v473;
@@ -4199,12 +6137,29 @@ var l214 = {name: "MACRO"};
                 return value;
             })(), l109);
             return v471;
+=======
+    (l220).fvalue = (function(v502){
+        ((v502)["fname"] = "%COMPILE-DEFMACRO");
+        return v502;
+    })((function (values,v500,v501){
+        checkArgs(arguments, 3);
+        return (function(){
+            l217.fvalue(pv, l192.fvalue(pv, l47.fvalue(pv, l185, v500)));
+            l206.fvalue(pv, l196.fvalue(pv, v500, l221, v501), (function(){
+                var symbol = l211;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l112);
+            return v500;
+>>>>>>> backquote
         })();
     }));
-    return l213;
+    return l220;
 })();
-var l215 = {name: "GLOBAL-BINDING"};
+var l222 = {name: "GLOBAL-BINDING"};
 (function(){
+<<<<<<< HEAD
     (l215).fvalue = (function(v479){
         ((v479)["fname"] = "GLOBAL-BINDING");
         return v479;
@@ -4227,13 +6182,38 @@ var l215 = {name: "GLOBAL-BINDING"};
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })(), v476));
-        })();
-    }));
-    return l215;
-})();
-var l216 = {name: "CLAIMP"};
-(function(){
-    (l216).fvalue = (function(v484){
+=======
+    (l222).fvalue = (function(v508){
+        ((v508)["fname"] = "GLOBAL-BINDING");
+        return v508;
+    })((function (values,v503,v504,v505){
+        checkArgs(arguments, 4);
+        return (function(){
+            return (function(v506){
+                return (v506 !== l5.value ? v506 : (function(v507){
+                    l206.fvalue(pv, v507, (function(){
+                        var symbol = l211;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), v505);
+                    return v507;
+                })(l196.fvalue(pv, v503, v504, l5.value)));
+            })(l210.fvalue(pv, v503, (function(){
+                var symbol = l211;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), v505));
+>>>>>>> backquote
+        })();
+    }));
+    return l222;
+})();
+var l223 = {name: "CLAIMP"};
+(function(){
+<<<<<<< HEAD
+    (l216).fvalue = (function(v484){
         ((v484)["fname"] = "CLAIMP");
         return v484;
     })((function (values,v480,v481,v482){
@@ -4247,15 +6227,32 @@ var l216 = {name: "CLAIMP"};
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })(), v481));
+=======
+    (l223).fvalue = (function(v513){
+        ((v513)["fname"] = "CLAIMP");
+        return v513;
+    })((function (values,v509,v510,v511){
+        checkArgs(arguments, 4);
+        return (function(){
+            return (function(v512){
+                return (v512 !== l5.value ? l96.fvalue(values, v511, l200.fvalue(pv, v512)) : l5.value);
+            })(l210.fvalue(pv, v509, (function(){
+                var symbol = l211;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), v510));
+>>>>>>> backquote
         })();
     }));
-    return l216;
+    return l223;
 })();
-var l217 = {name: "!PROCLAIM"};
-var l218 = {name: "SPECIAL"};
-var l219 = {name: "NOTINLINE"};
-var l220 = {name: "CONSTANT"};
+var l224 = {name: "!PROCLAIM"};
+var l225 = {name: "SPECIAL"};
+var l226 = {name: "NOTINLINE"};
+var l227 = {name: "CONSTANT"};
 (function(){
+<<<<<<< HEAD
     (l217).fvalue = (function(v496){
         ((v496)["fname"] = "!PROCLAIM");
         return v496;
@@ -4279,12 +6276,38 @@ var l220 = {name: "CONSTANT"};
                                 })();
                                 (v487 = (function(){
                                     var tmp = v487;
+=======
+    (l224).fvalue = (function(v525){
+        ((v525)["fname"] = "!PROCLAIM");
+        return v525;
+    })((function (values,v514){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v515){
+                return (l28.fvalue(pv, v515, l225) !== l5.value ? (function(){
+                    return (function(v516,v517){
+                        (function(){
+                            while(v516 !== l5.value){
+                                (v517 = (function(){
+                                    var tmp = v516;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })());
+                                (function(){
+                                    (function(v518){
+                                        return l203.fvalue(pv, l225, v518);
+                                    })(l222.fvalue(pv, v517, l113, l113));
+                                    return l5.value;
+                                })();
+                                (v516 = (function(){
+                                    var tmp = v516;
+>>>>>>> backquote
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
                         return l5.value;
                     })((function(){
+<<<<<<< HEAD
                         var tmp = v485;
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })(),l5.value);
@@ -4304,12 +6327,34 @@ var l220 = {name: "CONSTANT"};
                                 })();
                                 (v490 = (function(){
                                     var tmp = v490;
+=======
+                        var tmp = v514;
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })(),l5.value);
+                })() : (l28.fvalue(pv, v515, l226) !== l5.value ? (function(){
+                    return (function(v519,v520){
+                        (function(){
+                            while(v519 !== l5.value){
+                                (v520 = (function(){
+                                    var tmp = v519;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })());
+                                (function(){
+                                    (function(v521){
+                                        return l203.fvalue(pv, l226, v521);
+                                    })(l222.fvalue(pv, v520, l112, l112));
+                                    return l5.value;
+                                })();
+                                (v519 = (function(){
+                                    var tmp = v519;
+>>>>>>> backquote
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
                         return l5.value;
                     })((function(){
+<<<<<<< HEAD
                         var tmp = v485;
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })(),l5.value);
@@ -4329,36 +6374,66 @@ var l220 = {name: "CONSTANT"};
                                 })();
                                 (v493 = (function(){
                                     var tmp = v493;
+=======
+                        var tmp = v514;
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })(),l5.value);
+                })() : (l28.fvalue(pv, v515, l227) !== l5.value ? (function(){
+                    return (function(v522,v523){
+                        (function(){
+                            while(v522 !== l5.value){
+                                (v523 = (function(){
+                                    var tmp = v522;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })());
+                                (function(){
+                                    (function(v524){
+                                        return l203.fvalue(pv, l227, v524);
+                                    })(l222.fvalue(pv, v523, l113, l113));
+                                    return l5.value;
+                                })();
+                                (v522 = (function(){
+                                    var tmp = v522;
+>>>>>>> backquote
                                     return tmp === l5.value? l5.value: tmp.cdr;
                                 })());
                             }return l5.value;
                         })();
                         return l5.value;
                     })((function(){
+<<<<<<< HEAD
                         var tmp = v485;
+=======
+                        var tmp = v514;
+>>>>>>> backquote
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })(),l5.value);
                 })() : l5.value)));
             })((function(){
+<<<<<<< HEAD
                 var tmp = v485;
+=======
+                var tmp = v514;
+>>>>>>> backquote
                 return tmp === l5.value? l5.value: tmp.car;
             })());
         })();
     }));
-    return l217;
+    return l224;
 })();
-var l221 = {name: "PROCLAIM"};
-(l221).fvalue = (function(){
-    var symbol = l217;
+var l228 = {name: "PROCLAIM"};
+(l228).fvalue = (function(){
+    var symbol = l224;
     var func = symbol.fvalue;
     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
     return func;
 })();
-var l222 = {name: "*COMPILATIONS*"};
+var l229 = {name: "*COMPILATIONS*"};
 (function(){
-    (((l222.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l222).value = l5.value));
-    return l222;
+    (((l229.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l229).value = l5.value));
+    return l229;
 })();
+<<<<<<< HEAD
 var l223 = {name: "DEFINE-COMPILATION"};
 l223;
 var l224 = {name: "IF"};
@@ -4392,12 +6467,44 @@ var l226 = {name: "&OPTIONAL"};
 var l227 = {name: "&REST"};
 var l228 = {name: "&KEY"};
 var l229 = QIList(l226,l227,l228,l5);
-(function(){
-    (((l225.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l225).value = l229));
-    return l225;
+=======
+var l230 = {name: "DEFINE-COMPILATION"};
+l230;
+var l231 = {name: "IF"};
+((l229).value = ({car: l47.fvalue(pv, l231, (function (values,v526,v527,v528){
+    checkArgs(arguments, 4);
+    return (function(){
+        return l190.fvalue(values, "(", l192.fvalue(pv, v526), " !== ", l192.fvalue(pv, l5.value), " ? ", l192.fvalue(pv, v527, (function(){
+            var symbol = l195;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), " : ", l192.fvalue(pv, v528, (function(){
+            var symbol = l195;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), ")");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l232 = {name: "*LL-KEYWORDS*"};
+var l233 = {name: "&OPTIONAL"};
+var l234 = {name: "&REST"};
+var l235 = {name: "&KEY"};
+var l236 = QIList(l233,l234,l235,l5);
+>>>>>>> backquote
+(function(){
+    (((l232.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l232).value = l236));
+    return l232;
 })();
-var l230 = {name: "LIST-UNTIL-KEYWORD"};
+var l237 = {name: "LIST-UNTIL-KEYWORD"};
 (function(){
+<<<<<<< HEAD
     (l230).fvalue = (function(v504){
         ((v504)["fname"] = "LIST-UNTIL-KEYWORD");
         return v504;
@@ -4407,26 +6514,46 @@ var l230 = {name: "LIST-UNTIL-KEYWORD"};
             return ((function(v503){
                 return (v503 !== l5.value ? v503 : l93.fvalue(pv, (function(){
                     var tmp = v502;
+=======
+    (l237).fvalue = (function(v531){
+        ((v531)["fname"] = "LIST-UNTIL-KEYWORD");
+        return v531;
+    })((function (values,v529){
+        checkArgs(arguments, 2);
+        return (function(){
+            return ((function(v530){
+                return (v530 !== l5.value ? v530 : l96.fvalue(pv, (function(){
+                    var tmp = v529;
+>>>>>>> backquote
                     return tmp === l5.value? l5.value: tmp.car;
                 })(), (function(){
-                    var symbol = l225;
+                    var symbol = l232;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })()));
+<<<<<<< HEAD
             })(l13.fvalue(pv, v502)) !== l5.value ? l5.value : ({car: (function(){
                 var tmp = v502;
                 return tmp === l5.value? l5.value: tmp.car;
             })(), cdr: l230.fvalue(pv, (function(){
                 var tmp = v502;
+=======
+            })(l13.fvalue(pv, v529)) !== l5.value ? l5.value : ({car: (function(){
+                var tmp = v529;
+                return tmp === l5.value? l5.value: tmp.car;
+            })(), cdr: l237.fvalue(pv, (function(){
+                var tmp = v529;
+>>>>>>> backquote
                 return tmp === l5.value? l5.value: tmp.cdr;
             })())}));
         })();
     }));
-    return l230;
+    return l237;
 })();
-var l231 = {name: "LL-SECTION"};
+var l238 = {name: "LL-SECTION"};
 (function(){
+<<<<<<< HEAD
     (l231).fvalue = (function(v507){
         ((v507)["fname"] = "LL-SECTION");
         return v507;
@@ -4435,14 +6562,25 @@ var l231 = {name: "LL-SECTION"};
         return (function(){
             return l230.fvalue(values, (function(){
                 var tmp = l93.fvalue(pv, v505, v506);
+=======
+    (l238).fvalue = (function(v534){
+        ((v534)["fname"] = "LL-SECTION");
+        return v534;
+    })((function (values,v532,v533){
+        checkArgs(arguments, 3);
+        return (function(){
+            return l237.fvalue(values, (function(){
+                var tmp = l96.fvalue(pv, v532, v533);
+>>>>>>> backquote
                 return tmp === l5.value? l5.value: tmp.cdr;
             })());
         })();
     }));
-    return l231;
+    return l238;
 })();
-var l232 = {name: "LL-REQUIRED-ARGUMENTS"};
+var l239 = {name: "LL-REQUIRED-ARGUMENTS"};
 (function(){
+<<<<<<< HEAD
     (l232).fvalue = (function(v509){
         ((v509)["fname"] = "LL-REQUIRED-ARGUMENTS");
         return v509;
@@ -4450,48 +6588,80 @@ var l232 = {name: "LL-REQUIRED-ARGUMENTS"};
         checkArgs(arguments, 2);
         return (function(){
             return l230.fvalue(values, v508);
+=======
+    (l239).fvalue = (function(v536){
+        ((v536)["fname"] = "LL-REQUIRED-ARGUMENTS");
+        return v536;
+    })((function (values,v535){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l237.fvalue(values, v535);
+>>>>>>> backquote
         })();
     }));
-    return l232;
+    return l239;
 })();
-var l233 = {name: "LL-OPTIONAL-ARGUMENTS-CANONICAL"};
+var l240 = {name: "LL-OPTIONAL-ARGUMENTS-CANONICAL"};
 (function(){
+<<<<<<< HEAD
     (l233).fvalue = (function(v511){
         ((v511)["fname"] = "LL-OPTIONAL-ARGUMENTS-CANONICAL");
         return v511;
     })((function (values,v510){
+=======
+    (l240).fvalue = (function(v538){
+        ((v538)["fname"] = "LL-OPTIONAL-ARGUMENTS-CANONICAL");
+        return v538;
+    })((function (values,v537){
+>>>>>>> backquote
         checkArgs(arguments, 2);
         return (function(){
-            return l79.fvalue(values, (function(){
-                var symbol = l59;
+            return l81.fvalue(values, (function(){
+                var symbol = l61;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
+<<<<<<< HEAD
             })(), l231.fvalue(pv, l226, v510));
+=======
+            })(), l238.fvalue(pv, l233, v537));
+>>>>>>> backquote
         })();
     }));
-    return l233;
+    return l240;
 })();
-var l234 = {name: "LL-OPTIONAL-ARGUMENTS"};
+var l241 = {name: "LL-OPTIONAL-ARGUMENTS"};
 (function(){
+<<<<<<< HEAD
     (l234).fvalue = (function(v513){
         ((v513)["fname"] = "LL-OPTIONAL-ARGUMENTS");
         return v513;
     })((function (values,v512){
+=======
+    (l241).fvalue = (function(v540){
+        ((v540)["fname"] = "LL-OPTIONAL-ARGUMENTS");
+        return v540;
+    })((function (values,v539){
+>>>>>>> backquote
         checkArgs(arguments, 2);
         return (function(){
-            return l79.fvalue(values, (function(){
-                var symbol = l31;
+            return l81.fvalue(values, (function(){
+                var symbol = l32;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
+<<<<<<< HEAD
             })(), l233.fvalue(pv, v512));
+=======
+            })(), l240.fvalue(pv, v539));
+>>>>>>> backquote
         })();
     }));
-    return l234;
+    return l241;
 })();
-var l235 = {name: "LL-REST-ARGUMENT"};
+var l242 = {name: "LL-REST-ARGUMENT"};
 (function(){
+<<<<<<< HEAD
     (l235).fvalue = (function(v516){
         ((v516)["fname"] = "LL-REST-ARGUMENT");
         return v516;
@@ -4501,21 +6671,40 @@ var l235 = {name: "LL-REST-ARGUMENT"};
             return (function(v515){
                 ((function(){
                     var tmp = v515;
+=======
+    (l242).fvalue = (function(v543){
+        ((v543)["fname"] = "LL-REST-ARGUMENT");
+        return v543;
+    })((function (values,v541){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v542){
+                ((function(){
+                    var tmp = v542;
+>>>>>>> backquote
                     return tmp === l5.value? l5.value: tmp.cdr;
                 })() !== l5.value ? (function(){
                     throw "Bad lambda-list";
                 })() : l5.value);
                 return (function(){
+<<<<<<< HEAD
                     var tmp = v515;
                     return tmp === l5.value? l5.value: tmp.car;
                 })();
             })(l231.fvalue(pv, l227, v514));
+=======
+                    var tmp = v542;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })();
+            })(l238.fvalue(pv, l234, v541));
+>>>>>>> backquote
         })();
     }));
-    return l235;
+    return l242;
 })();
-var l236 = {name: "LL-KEYWORD-ARGUMENTS-CANONICAL"};
+var l243 = {name: "LL-KEYWORD-ARGUMENTS-CANONICAL"};
 (function(){
+<<<<<<< HEAD
     (l236).fvalue = (function(v521){
         ((v521)["fname"] = "LL-KEYWORD-ARGUMENTS-CANONICAL");
         return v521;
@@ -4544,13 +6733,44 @@ var l236 = {name: "LL-KEYWORD-ARGUMENTS-CANONICAL"};
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })()});
                 })(l59.fvalue(pv, v518));
+=======
+    (l243).fvalue = (function(v548){
+        ((v548)["fname"] = "LL-KEYWORD-ARGUMENTS-CANONICAL");
+        return v548;
+    })((function (values,v544){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v547){
+                return l81.fvalue(values, v547, l238.fvalue(pv, l235, v544));
+            })((function (values,v545){
+                checkArgs(arguments, 2);
+                return (function(v546){
+                    return ({car: (l62.fvalue(pv, (function(){
+                        var tmp = v546;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })()) !== l5.value ? (function(){
+                        var tmp = v546;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })() : l47.fvalue(pv, l152.fvalue(pv, ((function(){
+                        var tmp = v546;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })()).name, "KEYWORD"), (function(){
+                        var tmp = v546;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })())), cdr: (function(){
+                        var tmp = v546;
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })()});
+                })(l61.fvalue(pv, v545));
+>>>>>>> backquote
             }));
         })();
     }));
-    return l236;
+    return l243;
 })();
-var l237 = {name: "LL-KEYWORD-ARGUMENTS"};
+var l244 = {name: "LL-KEYWORD-ARGUMENTS"};
 (function(){
+<<<<<<< HEAD
     (l237).fvalue = (function(v524){
         ((v524)["fname"] = "LL-KEYWORD-ARGUMENTS");
         return v524;
@@ -4561,12 +6781,25 @@ var l237 = {name: "LL-KEYWORD-ARGUMENTS"};
                 checkArgs(arguments, 2);
                 return l41.fvalue(values, l40.fvalue(pv, v523));
             }), l236.fvalue(pv, v522));
+=======
+    (l244).fvalue = (function(v551){
+        ((v551)["fname"] = "LL-KEYWORD-ARGUMENTS");
+        return v551;
+    })((function (values,v549){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l81.fvalue(values, (function (values,v550){
+                checkArgs(arguments, 2);
+                return l43.fvalue(values, l42.fvalue(pv, v550));
+            }), l243.fvalue(pv, v549));
+>>>>>>> backquote
         })();
     }));
-    return l237;
+    return l244;
 })();
-var l238 = {name: "LL-SVARS"};
+var l245 = {name: "LL-SVARS"};
 (function(){
+<<<<<<< HEAD
     (l238).fvalue = (function(v527){
         ((v527)["fname"] = "LL-SVARS");
         return v527;
@@ -4581,12 +6814,29 @@ var l238 = {name: "LL-SVARS"};
                     return func;
                 })(), v526));
             })(l66.fvalue(pv, l236.fvalue(pv, v525), l233.fvalue(pv, v525)));
+=======
+    (l245).fvalue = (function(v554){
+        ((v554)["fname"] = "LL-SVARS");
+        return v554;
+    })((function (values,v552){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v553){
+                return l97.fvalue(values, l5.value, l81.fvalue(pv, (function(){
+                    var symbol = l44;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v553));
+            })(l68.fvalue(pv, l243.fvalue(pv, v552), l240.fvalue(pv, v552)));
+>>>>>>> backquote
         })();
     }));
-    return l238;
+    return l245;
 })();
-var l239 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
+var l246 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
 (function(){
+<<<<<<< HEAD
     (l239).fvalue = (function(v530){
         ((v530)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
         return v530;
@@ -4609,23 +6859,51 @@ var l239 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
                 return value;
             })(), "func.docstring = '", v529, "';", (function(){
                 var symbol = l148;
+=======
+    (l246).fvalue = (function(v557){
+        ((v557)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
+        return v557;
+    })((function (values,v556){
+        checkArgsAtLeast(arguments, 2);
+        var v555= l5.value;
+        for (var i = arguments.length-1; i>=2; i--)
+            v555 = {car: arguments[i], cdr: 
+        v555};
+        return (function(){
+            return (v556 !== l5.value ? l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var func = ", l158.fvalue(pv, v555), ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "func.docstring = '", v556, "';", (function(){
+                var symbol = l155;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })(), "return func;", (function(){
-                var symbol = l148;
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })()), "})()") : (function(){
                 var f = (function(){
-                    var symbol = l183;
+                    var symbol = l190;
                     var func = symbol.fvalue;
                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                     return func;
                 })();
                 var args = [values];
+<<<<<<< HEAD
                 var tail = (v528);
+=======
+                var tail = (v555);
+>>>>>>> backquote
                 while (tail != l5.value){
                     args.push(tail.car);
                     tail = tail.cdr;
@@ -4634,11 +6912,12 @@ var l239 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
             })());
         })();
     }));
-    return l239;
+    return l246;
 })();
-var l240 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
-var l241 = {name: "N/A"};
+var l247 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
+var l248 = {name: "N/A"};
 (function(){
+<<<<<<< HEAD
     (l240).fvalue = (function(v536){
         ((v536)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
         return v536;
@@ -4656,11 +6935,31 @@ var l241 = {name: "N/A"};
                             var values = mv;
                             throw ({type: 'block', id: 193, values: l183.fvalue(values, "checkArgs(arguments, ", v534, ");", (function(){
                                 var symbol = l148;
+=======
+    (l247).fvalue = (function(v563){
+        ((v563)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
+        return v563;
+    })((function (values,v558,v559,v560){
+        checkArgs(arguments, 4);
+        return (function(){
+            return (function(v561,v562){
+                return (function(){
+                    try {
+                        (((function(){
+                            var x1 = v561;
+                            if (typeof x1 !== 'number') throw 'Not a number!';
+                            return (1<x1?l4.value: l5.value);
+                        })() !== l5.value ? l28.fvalue(pv, v561, v562) : l5.value) !== l5.value ? (function(){
+                            var values = mv;
+                            throw ({type: 'block', id: 207, values: l190.fvalue(values, "checkArgs(arguments, ", v561, ");", (function(){
+                                var symbol = l155;
+>>>>>>> backquote
                                 var value = symbol.value;
                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                                 return value;
                             })()), message: 'Return from unknown block NIL.'})
                         })() : l5.value);
+<<<<<<< HEAD
                         return l183.fvalue(values, ((function(){
                             var x1 = v534;
                             if (typeof x1 !== 'number') throw 'Not a number!';
@@ -4672,31 +6971,52 @@ var l241 = {name: "N/A"};
                             return value;
                         })()) : l5.value), (((typeof (v535) == "number")?l4.value: l5.value) !== l5.value ? l183.fvalue(pv, "checkArgsAtMost(arguments, ", v535, ");", (function(){
                             var symbol = l148;
+=======
+                        return l190.fvalue(values, ((function(){
+                            var x1 = v561;
+                            if (typeof x1 !== 'number') throw 'Not a number!';
+                            return (1<x1?l4.value: l5.value);
+                        })() !== l5.value ? l190.fvalue(pv, "checkArgsAtLeast(arguments, ", v561, ");", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })()) : l5.value), (((typeof (v562) == "number")?l4.value: l5.value) !== l5.value ? l190.fvalue(pv, "checkArgsAtMost(arguments, ", v562, ");", (function(){
+                            var symbol = l155;
+>>>>>>> backquote
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })()) : l5.value));
                     }
                     catch (cf){
-                        if (cf.type == 'block' && cf.id == 193)
+                        if (cf.type == 'block' && cf.id == 207)
                             return values.apply(this, forcemv(cf.values));
                         else
                             throw cf;
                     }
                 })();
+<<<<<<< HEAD
             })(l23.fvalue(pv, v531),(v533 !== l5.value ? l241 : (function(){
                 var x1 = v531;
                 if (typeof x1 !== 'number') throw 'Not a number!';
                 var x2 = v532;
+=======
+            })(l24.fvalue(pv, v558),(v560 !== l5.value ? l248 : (function(){
+                var x1 = v558;
+                if (typeof x1 !== 'number') throw 'Not a number!';
+                var x2 = v559;
+>>>>>>> backquote
                 if (typeof x2 !== 'number') throw 'Not a number!';
                 return 1+x1+x2;
             })()));
         })();
     }));
-    return l240;
+    return l247;
 })();
-var l242 = {name: "COMPILE-LAMBDA-OPTIONAL"};
+var l249 = {name: "COMPILE-LAMBDA-OPTIONAL"};
 (function(){
+<<<<<<< HEAD
     (l242).fvalue = (function(v549){
         ((v549)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
         return v549;
@@ -4716,20 +7036,51 @@ var l242 = {name: "COMPILE-LAMBDA-OPTIONAL"};
                         return value;
                     })(), (l42.fvalue(pv, v541) !== l5.value ? l183.fvalue(pv, "var ", l207.fvalue(pv, l42.fvalue(pv, v541)), " = ", l185.fvalue(pv, l4.value), "; ", (function(){
                         var symbol = l148;
+=======
+    (l249).fvalue = (function(v572){
+        ((v572)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
+        return v572;
+    })((function (values,v564){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(){
+                var v565 = l240.fvalue(pv, v564);
+                var v566 = l75.fvalue(pv, l239.fvalue(pv, v564));
+                var v567 = l75.fvalue(pv, v565);
+                return (v565 !== l5.value ? l190.fvalue(values, l160.fvalue(pv, (function (values,v568){
+                    checkArgs(arguments, 2);
+                    return l190.fvalue(values, "var ", l214.fvalue(pv, l42.fvalue(pv, v568)), "; ", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), (l44.fvalue(pv, v568) !== l5.value ? l190.fvalue(pv, "var ", l214.fvalue(pv, l44.fvalue(pv, v568)), " = ", l192.fvalue(pv, l4.value), "; ", (function(){
+                        var symbol = l155;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })()) : l5.value));
+<<<<<<< HEAD
                 }), v538), "switch(arguments.length-1){", (function(){
                     var symbol = l148;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })(), (function(v542,v543){
+=======
+                }), v565), "switch(arguments.length-1){", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), (function(v569,v570){
+>>>>>>> backquote
                     return (function(){
                         (function(){
                             return (function(){
                                 while((function(){
+<<<<<<< HEAD
                                     var x1 = v543;
                                     if (typeof x1 !== 'number') throw 'Not a number!';
                                     var x2 = v540;
@@ -4786,9 +7137,59 @@ var l242 = {name: "COMPILE-LAMBDA-OPTIONAL"};
                             return (v542 = v548);
                         })();
                         return l151.fvalue(pv, l68.fvalue(pv, v542));
+=======
+                                    var x1 = v570;
+                                    if (typeof x1 !== 'number') throw 'Not a number!';
+                                    var x2 = v567;
+                                    if (typeof x2 !== 'number') throw 'Not a number!';
+                                    return (x1<x2?l4.value: l5.value);
+                                })() !== l5.value){
+                                    (function(v571){
+                                        (v569 = ({car: l190.fvalue(pv, "case ", (function(){
+                                            var x1 = v570;
+                                            if (typeof x1 !== 'number') throw 'Not a number!';
+                                            var x2 = v566;
+                                            if (typeof x2 !== 'number') throw 'Not a number!';
+                                            return x1+x2;
+                                        })(), ":", (function(){
+                                            var symbol = l155;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })(), l194.fvalue(pv, l214.fvalue(pv, (function(){
+                                            var tmp = v571;
+                                            return tmp === l5.value? l5.value: tmp.car;
+                                        })()), "=", l192.fvalue(pv, l35.fvalue(pv, v571)), ";", (function(){
+                                            var symbol = l155;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })()), (l44.fvalue(pv, v571) !== l5.value ? l194.fvalue(pv, l214.fvalue(pv, l44.fvalue(pv, v571)), "=", l192.fvalue(pv, l5.value), ";", (function(){
+                                            var symbol = l155;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })()) : l5.value)), cdr: v569}));
+                                        return (v570 = (function(){
+                                            var x1 = v570;
+                                            if (typeof x1 !== 'number') throw 'Not a number!';
+                                            return x1+1;
+                                        })());
+                                    })(l93.fvalue(pv, v570, v565));
+                                }return l5.value;
+                            })();
+                        })();
+                        (v569 = ({car: l190.fvalue(pv, "default: break;", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })()), cdr: v569}));
+                        return l158.fvalue(pv, l70.fvalue(pv, v569));
+>>>>>>> backquote
                     })();
                 })(l5.value,0), "}", (function(){
-                    var symbol = l148;
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
@@ -4796,10 +7197,11 @@ var l242 = {name: "COMPILE-LAMBDA-OPTIONAL"};
             })();
         })();
     }));
-    return l242;
+    return l249;
 })();
-var l243 = {name: "COMPILE-LAMBDA-REST"};
+var l250 = {name: "COMPILE-LAMBDA-REST"};
 (function(){
+<<<<<<< HEAD
     (l243).fvalue = (function(v555){
         ((v555)["fname"] = "COMPILE-LAMBDA-REST");
         return v555;
@@ -4810,34 +7212,63 @@ var l243 = {name: "COMPILE-LAMBDA-REST"};
                 return (v553 !== l5.value ? (function(v554){
                     return l183.fvalue(values, "var ", v554, "= ", l185.fvalue(pv, l5.value), ";", (function(){
                         var symbol = l148;
+=======
+    (l250).fvalue = (function(v578){
+        ((v578)["fname"] = "COMPILE-LAMBDA-REST");
+        return v578;
+    })((function (values,v573){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v574,v575,v576){
+                return (v576 !== l5.value ? (function(v577){
+                    return l190.fvalue(values, "var ", v577, "= ", l192.fvalue(pv, l5.value), ";", (function(){
+                        var symbol = l155;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })(), "for (var i = arguments.length-1; i>=", (function(){
+<<<<<<< HEAD
                         var x1 = v551;
                         if (typeof x1 !== 'number') throw 'Not a number!';
                         var x2 = v552;
+=======
+                        var x1 = v574;
+                        if (typeof x1 !== 'number') throw 'Not a number!';
+                        var x2 = v575;
+>>>>>>> backquote
                         if (typeof x2 !== 'number') throw 'Not a number!';
                         return 1+x1+x2;
                     })(), "; i--)", (function(){
-                        var symbol = l148;
+                        var symbol = l155;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
+<<<<<<< HEAD
                     })(), l187.fvalue(pv, v554, " = {car: arguments[i], cdr: "), v554, "};", (function(){
                         var symbol = l148;
+=======
+                    })(), l194.fvalue(pv, v577, " = {car: arguments[i], cdr: "), v577, "};", (function(){
+                        var symbol = l155;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })());
+<<<<<<< HEAD
                 })(l207.fvalue(pv, v553)) : l5.value);
             })(l73.fvalue(pv, l232.fvalue(pv, v550)),l73.fvalue(pv, l234.fvalue(pv, v550)),l235.fvalue(pv, v550));
+=======
+                })(l214.fvalue(pv, v576)) : l5.value);
+            })(l75.fvalue(pv, l239.fvalue(pv, v573)),l75.fvalue(pv, l241.fvalue(pv, v573)),l242.fvalue(pv, v573));
+>>>>>>> backquote
         })();
     }));
-    return l243;
+    return l250;
 })();
-var l244 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
+var l251 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
 (function(){
+<<<<<<< HEAD
     (l244).fvalue = (function(v566){
         ((v566)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
         return v566;
@@ -4855,10 +7286,30 @@ var l244 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
                             return value;
                         })(), (l42.fvalue(pv, v560) !== l5.value ? l183.fvalue(pv, "var ", l207.fvalue(pv, l42.fvalue(pv, v560)), " = ", l185.fvalue(pv, l5.value), ";", (function(){
                             var symbol = l148;
+=======
+    (l251).fvalue = (function(v589){
+        ((v589)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
+        return v589;
+    })((function (values,v579){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v580,v581,v582){
+                return l190.fvalue(values, l160.fvalue(pv, (function (values,v583){
+                    checkArgs(arguments, 2);
+                    return (function(v584){
+                        return l190.fvalue(values, "var ", l214.fvalue(pv, v584), "; ", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), (l44.fvalue(pv, v583) !== l5.value ? l190.fvalue(pv, "var ", l214.fvalue(pv, l44.fvalue(pv, v583)), " = ", l192.fvalue(pv, l5.value), ";", (function(){
+                            var symbol = l155;
+>>>>>>> backquote
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })()) : l5.value));
+<<<<<<< HEAD
                     })(l41.fvalue(pv, (function(){
                         var tmp = v560;
                         return tmp === l5.value? l5.value: tmp.car;
@@ -4876,13 +7327,33 @@ var l244 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
                         var x1 = v557;
                         if (typeof x1 !== 'number') throw 'Not a number!';
                         var x2 = v558;
+=======
+                    })(l43.fvalue(pv, (function(){
+                        var tmp = v583;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })()));
+                }), v582), (function(v587){
+                    return (v582 !== l5.value ? l190.fvalue(pv, "var i;", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), l160.fvalue(pv, v587, v582)) : l5.value);
+                })((function (values,v585){
+                    checkArgs(arguments, 2);
+                    return l190.fvalue(values, "for (i=", (function(){
+                        var x1 = v580;
+                        if (typeof x1 !== 'number') throw 'Not a number!';
+                        var x2 = v581;
+>>>>>>> backquote
                         if (typeof x2 !== 'number') throw 'Not a number!';
                         return 1+x1+x2;
                     })(), "; i<arguments.length; i+=2){", (function(){
-                        var symbol = l148;
+                        var symbol = l155;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
+<<<<<<< HEAD
                     })(), l187.fvalue(pv, "if (arguments[i] === ", l185.fvalue(pv, l33.fvalue(pv, v562)), "){", (function(){
                         var symbol = l148;
                         var value = symbol.value;
@@ -4890,91 +7361,139 @@ var l244 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
                         return value;
                     })(), l187.fvalue(pv, l207.fvalue(pv, l34.fvalue(pv, (function(){
                         var tmp = v562;
+=======
+                    })(), l194.fvalue(pv, "if (arguments[i] === ", l192.fvalue(pv, l34.fvalue(pv, v585)), "){", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), l194.fvalue(pv, l214.fvalue(pv, l35.fvalue(pv, (function(){
+                        var tmp = v585;
+>>>>>>> backquote
                         return tmp === l5.value? l5.value: tmp.car;
                     })())), " = arguments[i+1];", (function(){
-                        var symbol = l148;
+                        var symbol = l155;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
+<<<<<<< HEAD
                     })(), (function(v563){
                         return (v563 !== l5.value ? l183.fvalue(pv, l207.fvalue(pv, v563), " = ", l185.fvalue(pv, l4.value), ";", (function(){
                             var symbol = l148;
+=======
+                    })(), (function(v586){
+                        return (v586 !== l5.value ? l190.fvalue(pv, l214.fvalue(pv, v586), " = ", l192.fvalue(pv, l4.value), ";", (function(){
+                            var symbol = l155;
+>>>>>>> backquote
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })()) : l5.value);
+<<<<<<< HEAD
                     })(l42.fvalue(pv, v562)), "break;", (function(){
                         var symbol = l148;
+=======
+                    })(l44.fvalue(pv, v585)), "break;", (function(){
+                        var symbol = l155;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })()), "}", (function(){
-                        var symbol = l148;
+                        var symbol = l155;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })()), "}", (function(){
-                        var symbol = l148;
+                        var symbol = l155;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })(), "if (i == arguments.length){", (function(){
-                        var symbol = l148;
+                        var symbol = l155;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
+<<<<<<< HEAD
                     })(), l187.fvalue(pv, l207.fvalue(pv, l34.fvalue(pv, (function(){
                         var tmp = v562;
                         return tmp === l5.value? l5.value: tmp.car;
                     })())), " = ", l185.fvalue(pv, l34.fvalue(pv, v562)), ";", (function(){
                         var symbol = l148;
+=======
+                    })(), l194.fvalue(pv, l214.fvalue(pv, l35.fvalue(pv, (function(){
+                        var tmp = v585;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })())), " = ", l192.fvalue(pv, l35.fvalue(pv, v585)), ";", (function(){
+                        var symbol = l155;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })()), "}", (function(){
-                        var symbol = l148;
+                        var symbol = l155;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })());
+<<<<<<< HEAD
                 })), (v559 !== l5.value ? l183.fvalue(pv, "for (i=", (function(){
                     var x1 = v557;
                     if (typeof x1 !== 'number') throw 'Not a number!';
                     var x2 = v558;
+=======
+                })), (v582 !== l5.value ? l190.fvalue(pv, "for (i=", (function(){
+                    var x1 = v580;
+                    if (typeof x1 !== 'number') throw 'Not a number!';
+                    var x2 = v581;
+>>>>>>> backquote
                     if (typeof x2 !== 'number') throw 'Not a number!';
                     return 1+x1+x2;
                 })(), "; i<arguments.length; i+=2){", (function(){
-                    var symbol = l148;
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
+<<<<<<< HEAD
                 })(), l187.fvalue(pv, "if (", l151.fvalue(pv, l79.fvalue(pv, (function (values,v565){
                     checkArgs(arguments, 2);
                     return l149.fvalue(values, "arguments[i] !== ", l185.fvalue(pv, l33.fvalue(pv, v565)));
                 }), v559), " && "), ")", (function(){
                     var symbol = l148;
+=======
+                })(), l194.fvalue(pv, "if (", l158.fvalue(pv, l81.fvalue(pv, (function (values,v588){
+                    checkArgs(arguments, 2);
+                    return l156.fvalue(values, "arguments[i] !== ", l192.fvalue(pv, l34.fvalue(pv, v588)));
+                }), v582), " && "), ")", (function(){
+                    var symbol = l155;
+>>>>>>> backquote
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
-                })(), l187.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
-                    var symbol = l148;
+                })(), l194.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })())), "}", (function(){
-                    var symbol = l148;
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })()) : l5.value));
+<<<<<<< HEAD
             })(l73.fvalue(pv, l232.fvalue(pv, v556)),l73.fvalue(pv, l234.fvalue(pv, v556)),l236.fvalue(pv, v556));
+=======
+            })(l75.fvalue(pv, l239.fvalue(pv, v579)),l75.fvalue(pv, l241.fvalue(pv, v579)),l243.fvalue(pv, v579));
+>>>>>>> backquote
         })();
     }));
-    return l244;
+    return l251;
 })();
-var l245 = {name: "COMPILE-LAMBDA"};
-var l246 = {name: "LS-COMPILE-BLOCK"};
+var l252 = {name: "COMPILE-LAMBDA"};
+var l253 = {name: "LS-COMPILE-BLOCK"};
 (function(){
+<<<<<<< HEAD
     (l245).fvalue = (function(v579){
         ((v579)["fname"] = "COMPILE-LAMBDA");
         return v579;
@@ -5026,21 +7545,82 @@ var l246 = {name: "LS-COMPILE-BLOCK"};
                             }
                             finally {
                                 l188.value = v578;
+=======
+    (l252).fvalue = (function(v602){
+        ((v602)["fname"] = "COMPILE-LAMBDA");
+        return v602;
+    })((function (values,v590,v591){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (function(v592,v593,v594,v595,v596){
+                ((((typeof((function(){
+                    var tmp = v591;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })()) == "string")?l4.value: l5.value) !== l5.value ? l29.fvalue(pv, l13.fvalue(pv, (function(){
+                    var tmp = v591;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })())) : l5.value) !== l5.value ? (function(){
+                    (v596 = (function(){
+                        var tmp = v591;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })());
+                    return (v591 = (function(){
+                        var tmp = v591;
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })());
+                })() : l5.value);
+                return (function(v597,v598,v599){
+                    try {
+                        var tmp;
+                        tmp = l211.value;
+                        l211.value = v599;
+                        v599 = tmp;
+                        return l246.fvalue(values, v596, "(function (", l158.fvalue(pv, ({car: "values", cdr: l81.fvalue(pv, (function(){
+                            var symbol = l214;
+                            var func = symbol.fvalue;
+                            if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                            return func;
+                        })(), l68.fvalue(pv, v592, v593))}), ","), "){", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), l194.fvalue(pv, l247.fvalue(pv, v597, v598, (function(v600){
+                            return (v600 !== l5.value ? v600 : v594);
+                        })(v595)), l249.fvalue(pv, v590), l250.fvalue(pv, v590), l251.fvalue(pv, v590), (function(v601){
+                            try {
+                                var tmp;
+                                tmp = l195.value;
+                                l195.value = v601;
+                                v601 = tmp;
+                                return l253.fvalue(pv, v591, l4.value);
+                            }
+                            finally {
+                                l195.value = v601;
+>>>>>>> backquote
                             }
                         })(l4.value)), "})");
                     }
                     finally {
+<<<<<<< HEAD
                         l204.value = v576;
                     }
                 })(l73.fvalue(pv, v569),l73.fvalue(pv, v570),l208.fvalue(pv, l66.fvalue(pv, l59.fvalue(pv, v572), v569, v570, v571, l238.fvalue(pv, v567))));
             })(l232.fvalue(pv, v567),l234.fvalue(pv, v567),l237.fvalue(pv, v567),l235.fvalue(pv, v567),l5.value);
+=======
+                        l211.value = v599;
+                    }
+                })(l75.fvalue(pv, v592),l75.fvalue(pv, v593),l215.fvalue(pv, l68.fvalue(pv, l61.fvalue(pv, v595), v592, v593, v594, l245.fvalue(pv, v590))));
+            })(l239.fvalue(pv, v590),l241.fvalue(pv, v590),l244.fvalue(pv, v590),l242.fvalue(pv, v590),l5.value);
+>>>>>>> backquote
         })();
     }));
-    return l245;
+    return l252;
 })();
-var l247 = {name: "SETQ-PAIR"};
-var l248 = {name: "SET"};
+var l254 = {name: "SETQ-PAIR"};
+var l255 = {name: "SET"};
 (function(){
+<<<<<<< HEAD
     (l247).fvalue = (function(v583){
         ((v583)["fname"] = "SETQ-PAIR");
         return v583;
@@ -5051,14 +7631,27 @@ var l248 = {name: "SET"};
                 return ((((l191.fvalue(pv, v582) === l110)?l4.value: l5.value) !== l5.value ? (l28.fvalue(pv, l93.fvalue(pv, l218, l193.fvalue(pv, v582))) !== l5.value ? l28.fvalue(pv, l93.fvalue(pv, l220, l193.fvalue(pv, v582))) : l5.value) : l5.value) !== l5.value ? l183.fvalue(values, l192.fvalue(pv, v582), " = ", l185.fvalue(pv, v581)) : l185.fvalue(values, l45.fvalue(pv, l248, l45.fvalue(pv, l178, v580), v581)));
             })(l203.fvalue(pv, v580, (function(){
                 var symbol = l204;
+=======
+    (l254).fvalue = (function(v606){
+        ((v606)["fname"] = "SETQ-PAIR");
+        return v606;
+    })((function (values,v603,v604){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (function(v605){
+                return ((((l198.fvalue(pv, v605) === l113)?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l96.fvalue(pv, l225, l200.fvalue(pv, v605))) !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l227, l200.fvalue(pv, v605))) : l5.value) : l5.value) !== l5.value ? l190.fvalue(values, l199.fvalue(pv, v605), " = ", l192.fvalue(pv, v604)) : l192.fvalue(values, l47.fvalue(pv, l255, l47.fvalue(pv, l185, v603), v604)));
+            })(l210.fvalue(pv, v603, (function(){
+                var symbol = l211;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l110));
+            })(), l113));
         })();
     }));
-    return l247;
+    return l254;
 })();
+<<<<<<< HEAD
 (function(){
     var v584 = l45.fvalue(pv, l115, (function (values){
         var v585= l5.value;
@@ -5168,47 +7761,162 @@ var l250 = {name: "JS-VSET"};
                             })((function(){
                                 var string = v595;
                                 var index = v597;
-                                if (typeof string != 'string')
-                                    throw 'The value ' + string + ' is not a type string.';
-                                if (typeof index != 'number')
-                                    throw 'The value ' + index + ' is not a type number.';
-                                return string.charCodeAt(index);
-                            })());
-                            (v597 = (function(){
-                                var x1 = v597;
-                                if (typeof x1 !== 'number') throw 'Not a number!';
-                                return x1+1;
-                            })());
-                        }return l5.value;
-                    })();
-                })();
-                return v596;
-            })("",0,l73.fvalue(pv, v595));
-        })();
-    }));
-    return l159;
+=======
+((l229).value = ({car: l47.fvalue(pv, l118, (function (values){
+    var v607= l5.value;
+    for (var i = arguments.length-1; i>=1; i--)
+        v607 = {car: arguments[i], cdr: 
+    v607};
+    return (function(){
+        return (function(v608){
+            (function(){
+                try {
+                    return (function(){
+                        while(l4.value !== l5.value){
+                            (l13.fvalue(pv, v607) !== l5.value ? (function(){
+                                throw ({type: 'block', id: 215, values: l5.value, message: 'Return from unknown block NIL.'})
+                            })() : (l13.fvalue(pv, (function(){
+                                var tmp = v607;
+                                return tmp === l5.value? l5.value: tmp.cdr;
+                            })()) !== l5.value ? (function(){
+                                throw "Odd paris in SETQ";
+                            })() : (function(){
+                                (v608 = l156.fvalue(pv, v608, l156.fvalue(pv, l254.fvalue(pv, (function(){
+                                    var tmp = v607;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })(), l35.fvalue(pv, v607)), (l13.fvalue(pv, l37.fvalue(pv, v607)) !== l5.value ? "" : ", "))));
+                                return (v607 = l37.fvalue(pv, v607));
+                            })()));
+                        }return l5.value;
+                    })();
+                }
+                catch (cf){
+                    if (cf.type == 'block' && cf.id == 215)
+                        return cf.values;
+                    else
+                        throw cf;
+                }
+            })();
+            return l190.fvalue(values, "(", v608, ")");
+        })("");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l256 = {name: "JS-VREF"};
+((l229).value = ({car: l47.fvalue(pv, l256, (function (values,v609){
+    checkArgs(arguments, 2);
+    return (function(){
+        return v609;
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l257 = {name: "JS-VSET"};
+((l229).value = ({car: l47.fvalue(pv, l257, (function (values,v610,v611){
+    checkArgs(arguments, 3);
+    return (function(){
+        return l190.fvalue(values, "(", v610, " = ", l192.fvalue(pv, v611), ")");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+(function(){
+    (l166).fvalue = (function(v618){
+        ((v618)["fname"] = "ESCAPE-STRING");
+        return v618;
+    })((function (values,v612){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v613,v614,v615){
+                (function(){
+                    return (function(){
+                        while((function(){
+                            var x1 = v614;
+                            if (typeof x1 !== 'number') throw 'Not a number!';
+                            var x2 = v615;
+                            if (typeof x2 !== 'number') throw 'Not a number!';
+                            return (x1<x2?l4.value: l5.value);
+                        })() !== l5.value){
+                            (function(v616){
+                                ((function(v617){
+                                    return (v617 !== l5.value ? v617 : l88.fvalue(pv, v616, 92));
+                                })(l88.fvalue(pv, v616, 34)) !== l5.value ? (v613 = l156.fvalue(pv, v613, "\\")) : l5.value);
+                                (l88.fvalue(pv, v616, 10) !== l5.value ? (function(){
+                                    (v613 = l156.fvalue(pv, v613, "\\"));
+                                    return (v616 = 110);
+                                })() : l5.value);
+                                return (v613 = l156.fvalue(pv, v613, l106.fvalue(pv, v616)));
+                            })((function(){
+                                var string = v612;
+                                var index = v614;
+>>>>>>> backquote
+                                if (typeof string != 'string')
+                                    throw 'The value ' + string + ' is not a type string.';
+                                if (typeof index != 'number')
+                                    throw 'The value ' + index + ' is not a type number.';
+                                return string.charCodeAt(index);
+                            })());
+<<<<<<< HEAD
+                            (v597 = (function(){
+                                var x1 = v597;
+=======
+                            (v614 = (function(){
+                                var x1 = v614;
+>>>>>>> backquote
+                                if (typeof x1 !== 'number') throw 'Not a number!';
+                                return x1+1;
+                            })());
+                        }return l5.value;
+                    })();
+                })();
+<<<<<<< HEAD
+                return v596;
+            })("",0,l73.fvalue(pv, v595));
+=======
+                return v613;
+            })("",0,l75.fvalue(pv, v612));
+>>>>>>> backquote
+        })();
+    }));
+    return l166;
 })();
-var l251 = {name: "*LITERAL-SYMBOLS*"};
+var l258 = {name: "*LITERAL-SYMBOLS*"};
 (function(){
-    (((l251.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l251).value = l5.value));
-    return l251;
+    (((l258.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l258).value = l5.value));
+    return l258;
 })();
-var l252 = {name: "*LITERAL-COUNTER*"};
+var l259 = {name: "*LITERAL-COUNTER*"};
 (function(){
-    (((l252.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l252).value = 0));
-    return l252;
+    (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = 0));
+    return l259;
 })();
-var l253 = {name: "GENLIT"};
+var l260 = {name: "GENLIT"};
 (function(){
+<<<<<<< HEAD
     (l253).fvalue = (function(v602){
         ((v602)["fname"] = "GENLIT");
         return v602;
+=======
+    (l260).fvalue = (function(v619){
+        ((v619)["fname"] = "GENLIT");
+        return v619;
+>>>>>>> backquote
     })((function (values){
         checkArgsAtMost(arguments, 1);
         return (function(){
-            return l183.fvalue(values, "l", ((l252).value = (function(){
+            return l190.fvalue(values, "l", ((l259).value = (function(){
                 var x1 = (function(){
-                    var symbol = l252;
+                    var symbol = l259;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
@@ -5218,10 +7926,11 @@ var l253 = {name: "GENLIT"};
             })()));
         })();
     }));
-    return l253;
+    return l260;
 })();
-var l254 = {name: "LITERAL"};
+var l261 = {name: "LITERAL"};
 (function(){
+<<<<<<< HEAD
     (l254).fvalue = (function(v619){
         ((v619)["fname"] = "LITERAL");
         return v619;
@@ -5258,12 +7967,47 @@ var l254 = {name: "LITERAL"};
             })((function(){
                 var tmp = l102.fvalue(pv, v603, (function(){
                     var symbol = l251;
+=======
+    (l261).fvalue = (function(v634){
+        ((v634)["fname"] = "LITERAL");
+        return v634;
+    })((function (values,v620,v621){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v621; 
+        switch(arguments.length-1){
+        case 1:
+            v621=l5.value;
+        default: break;
+        }
+        return (function(){
+            return (l89.fvalue(pv, v620) !== l5.value ? l19.fvalue(values, v620) : (((typeof(v620) == "string")?l4.value: l5.value) !== l5.value ? l190.fvalue(values, "\"", l166.fvalue(pv, v620), "\"") : (((function(){
+                var tmp = v620;
+                return (typeof tmp == 'object' && 'name' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (function(v622){
+                return (v622 !== l5.value ? v622 : (function(v624,v625){
+                    ((l258).value = ({car: ({car: v620, cdr: v624}), cdr: (function(){
+                        var symbol = l258;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })()}));
+                    l217.fvalue(pv, l190.fvalue(pv, "var ", v624, " = ", v625));
+                    return v624;
+                })(l260.fvalue(pv),(function(v623){
+                    return (l13.fvalue(pv, v623) !== l5.value ? l190.fvalue(pv, "{name: \"", l166.fvalue(pv, (v620).name), "\"}") : l192.fvalue(pv, l47.fvalue(pv, l152, (v620).name, l136.fvalue(pv, v623))));
+                })(l144.fvalue(pv, v620))));
+            })((function(){
+                var tmp = l105.fvalue(pv, v620, (function(){
+                    var symbol = l258;
+>>>>>>> backquote
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })());
                 return tmp === l5.value? l5.value: tmp.cdr;
             })()) : (((function(){
+<<<<<<< HEAD
                 var tmp = v603;
                 return (typeof tmp == 'object' && 'car' in tmp);
             })()?l4.value: l5.value) !== l5.value ? (function(){
@@ -5299,10 +8043,48 @@ var l254 = {name: "LITERAL"};
                     return func;
                 })(), v616), ", "), "]"));
             })(l154.fvalue(pv, v603)) : l5.value)))));
+=======
+                var tmp = v620;
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (function(){
+                var v626 = l95.fvalue(pv, v620);
+                var v627 = l94.fvalue(pv, v620);
+                var v628 = l190.fvalue(pv, "QIList(", l159.fvalue(pv, l81.fvalue(pv, (function (values,v629){
+                    checkArgs(arguments, 2);
+                    return l261.fvalue(values, v629, l4.value);
+                }), v626), ","), l261.fvalue(pv, (function(){
+                    var tmp = v627;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })(), l4.value), ",", l261.fvalue(pv, (function(){
+                    var tmp = v627;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })(), l4.value), ")");
+                return (v621 !== l5.value ? v628 : (function(v630){
+                    l217.fvalue(pv, l190.fvalue(pv, "var ", v630, " = ", v628));
+                    return v630;
+                })(l260.fvalue(pv)));
+            })() : (((function(){
+                var x = v620;
+                return typeof x === 'object' && 'length' in x;
+            })()?l4.value: l5.value) !== l5.value ? (function(v631){
+                return (function(v632){
+                    return (v621 !== l5.value ? v632 : (function(v633){
+                        l217.fvalue(pv, l190.fvalue(pv, "var ", v633, " = ", v632));
+                        return v633;
+                    })(l260.fvalue(pv)));
+                })(l156.fvalue(pv, "[", l158.fvalue(pv, l81.fvalue(pv, (function(){
+                    var symbol = l261;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v631), ", "), "]"));
+            })(l161.fvalue(pv, v620)) : l5.value)))));
+>>>>>>> backquote
         })();
     }));
-    return l254;
+    return l261;
 })();
+<<<<<<< HEAD
 (function(){
     var v620 = l45.fvalue(pv, l178, (function (values,v621){
         checkArgs(arguments, 2);
@@ -5408,14 +8190,110 @@ var l258 = {name: "COMPILE-FUNCTION-DEFINITION"};
                 return tmp === l5.value? l5.value: tmp.car;
             })(), (function(){
                 var tmp = v633;
+=======
+((l229).value = ({car: l47.fvalue(pv, l185, (function (values,v635){
+    checkArgs(arguments, 2);
+    return (function(){
+        return l261.fvalue(values, v635);
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l262 = {name: "%WHILE"};
+((l229).value = ({car: l47.fvalue(pv, l262, (function (values,v637){
+    checkArgsAtLeast(arguments, 2);
+    var v636= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v636 = {car: arguments[i], cdr: 
+    v636};
+    return (function(){
+        return l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "while(", l192.fvalue(pv, v637), " !== ", l192.fvalue(pv, l5.value), "){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, l253.fvalue(pv, v636)), "}", "return ", l192.fvalue(pv, l5.value), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), "})()");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l263 = {name: "SYMBOL-FUNCTION"};
+((l229).value = ({car: l47.fvalue(pv, l112, (function (values,v638){
+    checkArgs(arguments, 2);
+    return (function(){
+        return ((l62.fvalue(pv, v638) !== l5.value ? (((function(){
+            var tmp = v638;
+            return tmp === l5.value? l5.value: tmp.car;
+        })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l252.fvalue(values, l35.fvalue(pv, v638), l37.fvalue(pv, v638)) : (((function(){
+            var tmp = v638;
+            return (typeof tmp == 'object' && 'name' in tmp);
+        })()?l4.value: l5.value) !== l5.value ? (function(v639){
+            return (v639 !== l5.value ? l199.fvalue(values, v639) : l192.fvalue(values, l47.fvalue(pv, l263, l47.fvalue(pv, l185, v638))));
+        })(l210.fvalue(pv, v638, (function(){
+            var symbol = l211;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l112)) : l5.value));
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l264 = {name: "MAKE-FUNCTION-BINDING"};
+(function(){
+    (l264).fvalue = (function(v641){
+        ((v641)["fname"] = "MAKE-FUNCTION-BINDING");
+        return v641;
+    })((function (values,v640){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l196.fvalue(values, v640, l112, l213.fvalue(pv, v640));
+        })();
+    }));
+    return l264;
+})();
+var l265 = {name: "COMPILE-FUNCTION-DEFINITION"};
+(function(){
+    (l265).fvalue = (function(v643){
+        ((v643)["fname"] = "COMPILE-FUNCTION-DEFINITION");
+        return v643;
+    })((function (values,v642){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l252.fvalue(values, (function(){
+                var tmp = v642;
+                return tmp === l5.value? l5.value: tmp.car;
+            })(), (function(){
+                var tmp = v642;
+>>>>>>> backquote
                 return tmp === l5.value? l5.value: tmp.cdr;
             })());
         })();
     }));
-    return l258;
+    return l265;
 })();
-var l259 = {name: "TRANSLATE-FUNCTION"};
+var l266 = {name: "TRANSLATE-FUNCTION"};
 (function(){
+<<<<<<< HEAD
     (l259).fvalue = (function(v637){
         ((v637)["fname"] = "TRANSLATE-FUNCTION");
         return v637;
@@ -5426,14 +8304,27 @@ var l259 = {name: "TRANSLATE-FUNCTION"};
                 return l192.fvalue(values, v636);
             })(l203.fvalue(pv, v635, (function(){
                 var symbol = l204;
+=======
+    (l266).fvalue = (function(v646){
+        ((v646)["fname"] = "TRANSLATE-FUNCTION");
+        return v646;
+    })((function (values,v644){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v645){
+                return l199.fvalue(values, v645);
+            })(l210.fvalue(pv, v644, (function(){
+                var symbol = l211;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l109));
+            })(), l112));
         })();
     }));
-    return l259;
+    return l266;
 })();
+<<<<<<< HEAD
 var l260 = {name: "FLET"};
 (function(){
     var v638 = l45.fvalue(pv, l260, (function (values,v640){
@@ -5565,10 +8456,136 @@ var l261 = {name: "LABELS"};
     return ((l222).value = v653);
 })();
 var l262 = {name: "*COMPILING-FILE*"};
+=======
+var l267 = {name: "FLET"};
+((l229).value = ({car: l47.fvalue(pv, l267, (function (values,v648){
+    checkArgsAtLeast(arguments, 2);
+    var v647= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v647 = {car: arguments[i], cdr: 
+    v647};
+    return (function(){
+        return (function(){
+            try {
+                var v653 = l211.value;
+                var v649 = l81.fvalue(pv, (function(){
+                    var symbol = l32;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v648);
+                var v650 = l81.fvalue(pv, (function(){
+                    var symbol = l33;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v648);
+                var v651 = l81.fvalue(pv, (function(){
+                    var symbol = l265;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v650);
+                ((l211).value = l209.fvalue(pv, l81.fvalue(pv, (function(){
+                    var symbol = l264;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v649), (function(){
+                    var symbol = l211;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l112));
+                return l190.fvalue(values, "(function(", l158.fvalue(pv, l81.fvalue(pv, (function(){
+                    var symbol = l266;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v649), ","), "){", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), (function(v652){
+                    return l194.fvalue(pv, v652);
+                })(l253.fvalue(pv, v647, l4.value)), "})(", l158.fvalue(pv, v651, ","), ")");
+            }
+            finally {
+                l211.value = v653;
+            }
+        })();
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l268 = {name: "LABELS"};
+((l229).value = ({car: l47.fvalue(pv, l268, (function (values,v655){
+    checkArgsAtLeast(arguments, 2);
+    var v654= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v654 = {car: arguments[i], cdr: 
+    v654};
+    return (function(){
+        return (function(){
+            try {
+                var v658 = l211.value;
+                var v656 = l81.fvalue(pv, (function(){
+                    var symbol = l32;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v655);
+                ((l211).value = l209.fvalue(pv, l81.fvalue(pv, (function(){
+                    var symbol = l264;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v656), (function(){
+                    var symbol = l211;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l112));
+                return l190.fvalue(values, "(function(){", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l194.fvalue(pv, l160.fvalue(pv, (function (values,v657){
+                    checkArgs(arguments, 2);
+                    return l190.fvalue(values, "var ", l266.fvalue(pv, (function(){
+                        var tmp = v657;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })()), " = ", l252.fvalue(pv, l35.fvalue(pv, v657), l37.fvalue(pv, v657)), ";", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })());
+                }), v655), l253.fvalue(pv, v654, l4.value)), "})()");
+            }
+            finally {
+                l211.value = v658;
+            }
+        })();
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l269 = {name: "*COMPILING-FILE*"};
+>>>>>>> backquote
 (function(){
-    (((l262.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l262).value = l5.value));
-    return l262;
+    (((l269.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l269).value = l5.value));
+    return l269;
 })();
+<<<<<<< HEAD
 var l263 = {name: "EVAL-WHEN-COMPILE"};
 var l264 = {name: "EVAL"};
 (function(){
@@ -5642,12 +8659,80 @@ var l266 = {name: "SPECIAL-VARIABLE-P"};
         checkArgs(arguments, 2);
         return (function(){
             return (l216.fvalue(pv, v660, l110, l218) !== l5.value ? l4.value : l5.value);
+=======
+var l270 = {name: "EVAL-WHEN-COMPILE"};
+var l271 = {name: "EVAL"};
+((l229).value = ({car: l47.fvalue(pv, l270, (function (values){
+    var v659= l5.value;
+    for (var i = arguments.length-1; i>=1; i--)
+        v659 = {car: arguments[i], cdr: 
+    v659};
+    return (function(){
+        return ((function(){
+            var symbol = l269;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })() !== l5.value ? (function(){
+            l271.fvalue(pv, ({car: l122, cdr: v659}));
+            return l5.value;
+        })() : l192.fvalue(values, ({car: l122, cdr: v659})));
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l272 = {name: "DEFINE-TRANSFORMATION"};
+l272;
+((l229).value = ({car: l47.fvalue(pv, l122, (function (values){
+    var v660= l5.value;
+    for (var i = arguments.length-1; i>=1; i--)
+        v660 = {car: arguments[i], cdr: 
+    v660};
+    return (function(){
+        return (l13.fvalue(pv, (function(){
+            var tmp = v660;
+            return tmp === l5.value? l5.value: tmp.cdr;
+        })()) !== l5.value ? l192.fvalue(values, (function(){
+            var tmp = v660;
+            return tmp === l5.value? l5.value: tmp.car;
+        })(), (function(){
+            var symbol = l195;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()) : l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, l253.fvalue(pv, v660, l4.value)), "})()"));
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l273 = {name: "SPECIAL-VARIABLE-P"};
+(function(){
+    (l273).fvalue = (function(v662){
+        ((v662)["fname"] = "SPECIAL-VARIABLE-P");
+        return v662;
+    })((function (values,v661){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (l223.fvalue(pv, v661, l113, l225) !== l5.value ? l4.value : l5.value);
+>>>>>>> backquote
         })();
     }));
-    return l266;
+    return l273;
 })();
-var l267 = {name: "LET-BINDING-WRAPPER"};
+var l274 = {name: "LET-BINDING-WRAPPER"};
 (function(){
+<<<<<<< HEAD
     (l267).fvalue = (function(v668){
         ((v668)["fname"] = "LET-BINDING-WRAPPER");
         return v668;
@@ -5658,17 +8743,30 @@ var l267 = {name: "LET-BINDING-WRAPPER"};
                 (l13.fvalue(pv, v662) !== l5.value ? (function(){
                     var values = mv;
                     throw ({type: 'block', id: 219, values: v663, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
+=======
+    (l274).fvalue = (function(v669){
+        ((v669)["fname"] = "LET-BINDING-WRAPPER");
+        return v669;
+    })((function (values,v663,v664){
+        checkArgs(arguments, 3);
+        return (function(){
+            try {
+                (l13.fvalue(pv, v663) !== l5.value ? (function(){
+                    var values = mv;
+                    throw ({type: 'block', id: 233, values: v664, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
+>>>>>>> backquote
                 })() : l5.value);
-                return l183.fvalue(values, "try {", (function(){
-                    var symbol = l148;
+                return l190.fvalue(values, "try {", (function(){
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
-                })(), l187.fvalue(pv, "var tmp;", (function(){
-                    var symbol = l148;
+                })(), l194.fvalue(pv, "var tmp;", (function(){
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
+<<<<<<< HEAD
                 })(), l153.fvalue(pv, (function (values,v664){
                     checkArgs(arguments, 2);
                     return (function(v665){
@@ -5679,73 +8777,116 @@ var l267 = {name: "LET-BINDING-WRAPPER"};
                             return value;
                         })(), v665, ".value = ", (function(){
                             var tmp = v664;
+=======
+                })(), l160.fvalue(pv, (function (values,v665){
+                    checkArgs(arguments, 2);
+                    return (function(v666){
+                        return l190.fvalue(values, "tmp = ", v666, ".value;", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), v666, ".value = ", (function(){
+                            var tmp = v665;
+>>>>>>> backquote
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })(), ";", (function(){
-                            var symbol = l148;
+                            var symbol = l155;
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })(), (function(){
+<<<<<<< HEAD
                             var tmp = v664;
+=======
+                            var tmp = v665;
+>>>>>>> backquote
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })(), " = tmp;", (function(){
-                            var symbol = l148;
+                            var symbol = l155;
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })());
+<<<<<<< HEAD
                     })(l185.fvalue(pv, l45.fvalue(pv, l178, (function(){
                         var tmp = v664;
                         return tmp === l5.value? l5.value: tmp.car;
                     })())));
                 }), v662), v663, (function(){
                     var symbol = l148;
+=======
+                    })(l192.fvalue(pv, l47.fvalue(pv, l185, (function(){
+                        var tmp = v665;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })())));
+                }), v663), v664, (function(){
+                    var symbol = l155;
+>>>>>>> backquote
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })()), "}", (function(){
-                    var symbol = l148;
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })(), "finally {", (function(){
-                    var symbol = l148;
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
+<<<<<<< HEAD
                 })(), l187.fvalue(pv, l153.fvalue(pv, (function (values,v666){
                     checkArgs(arguments, 2);
                     return (function(v667){
                         return l183.fvalue(values, v667, ".value", " = ", (function(){
                             var tmp = v666;
+=======
+                })(), l194.fvalue(pv, l160.fvalue(pv, (function (values,v667){
+                    checkArgs(arguments, 2);
+                    return (function(v668){
+                        return l190.fvalue(values, v668, ".value", " = ", (function(){
+                            var tmp = v667;
+>>>>>>> backquote
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })(), ";", (function(){
-                            var symbol = l148;
+                            var symbol = l155;
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })());
+<<<<<<< HEAD
                     })(l185.fvalue(pv, l45.fvalue(pv, l178, (function(){
                         var tmp = v666;
                         return tmp === l5.value? l5.value: tmp.car;
                     })())));
                 }), v662)), "}", (function(){
                     var symbol = l148;
+=======
+                    })(l192.fvalue(pv, l47.fvalue(pv, l185, (function(){
+                        var tmp = v667;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })())));
+                }), v663)), "}", (function(){
+                    var symbol = l155;
+>>>>>>> backquote
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })());
             }
             catch (cf){
-                if (cf.type == 'block' && cf.id == 219)
+                if (cf.type == 'block' && cf.id == 233)
                     return values.apply(this, forcemv(cf.values));
                 else
                     throw cf;
             }
         })();
     }));
-    return l267;
+    return l274;
 })();
+<<<<<<< HEAD
 var l268 = {name: "LET"};
 (function(){
     var v669 = l45.fvalue(pv, l268, (function (values,v671){
@@ -5832,34 +8973,134 @@ var l269 = {name: "LET*-INITIALIZE-VALUE"};
             return (function(v684,v685){
                 return (l266.fvalue(pv, v684) !== l5.value ? l183.fvalue(values, l185.fvalue(pv, l45.fvalue(pv, l115, v684, v685)), ";", (function(){
                     var symbol = l148;
+=======
+var l275 = {name: "LET"};
+((l229).value = ({car: l47.fvalue(pv, l275, (function (values,v671){
+    checkArgsAtLeast(arguments, 2);
+    var v670= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v670 = {car: arguments[i], cdr: 
+    v670};
+    return (function(){
+        return (function(){
+            try {
+                var v679 = l211.value;
+                var v672 = l81.fvalue(pv, (function(){
+                    var symbol = l61;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v671);
+                var v673 = l81.fvalue(pv, (function(){
+                    var symbol = l42;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v672);
+                var v674 = l81.fvalue(pv, (function(){
+                    var symbol = l192;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), l81.fvalue(pv, (function(){
+                    var symbol = l43;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v672));
+                ((l211).value = l215.fvalue(pv, l98.fvalue(pv, (function(){
+                    var symbol = l273;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v673)));
+                var v675 = l5.value;
+                return l190.fvalue(values, "(function(", l158.fvalue(pv, l81.fvalue(pv, (function (values,v676){
+                    checkArgs(arguments, 2);
+                    return (l273.fvalue(pv, v676) !== l5.value ? (function(v677){
+                        (v675 = ({car: ({car: v676, cdr: v677}), cdr: v675}));
+                        return v677;
+                    })(l213.fvalue(pv, v676)) : l214.fvalue(values, v676));
+                }), v673), ","), "){", (function(){
+                    var symbol = l155;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
-                })()) : (function(){
-                    var v686 = l206.fvalue(pv, v684);
-                    var v687 = l189.fvalue(pv, v684, l110, v686);
-                    return (function(v688){
-                        l199.fvalue(pv, v687, (function(){
-                            var symbol = l204;
-                            var value = symbol.value;
-                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                            return value;
+                })(), (function(v678){
+                    return l194.fvalue(pv, l274.fvalue(pv, v675, v678));
+                })(l253.fvalue(pv, v670, l4.value)), "})(", l158.fvalue(pv, v674, ","), ")");
+            }
+            finally {
+                l211.value = v679;
+            }
+        })();
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l276 = {name: "LET*-INITIALIZE-VALUE"};
+(function(){
+    (l276).fvalue = (function(v686){
+        ((v686)["fname"] = "LET*-INITIALIZE-VALUE");
+        return v686;
+    })((function (values,v680){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v681,v682){
+                return (l273.fvalue(pv, v681) !== l5.value ? l190.fvalue(values, l192.fvalue(pv, l47.fvalue(pv, l118, v681, v682)), ";", (function(){
+                    var symbol = l155;
+>>>>>>> backquote
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })()) : (function(){
+<<<<<<< HEAD
+                    var v686 = l206.fvalue(pv, v684);
+                    var v687 = l189.fvalue(pv, v684, l110, v686);
+                    return (function(v688){
+                        l199.fvalue(pv, v687, (function(){
+                            var symbol = l204;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
                         })(), l110);
                         return v688;
                     })(l183.fvalue(pv, "var ", v686, " = ", l185.fvalue(pv, v685), ";", (function(){
                         var symbol = l148;
+=======
+                    var v683 = l213.fvalue(pv, v681);
+                    var v684 = l196.fvalue(pv, v681, l113, v683);
+                    return (function(v685){
+                        l206.fvalue(pv, v684, (function(){
+                            var symbol = l211;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), l113);
+                        return v685;
+                    })(l190.fvalue(pv, "var ", v683, " = ", l192.fvalue(pv, v682), ";", (function(){
+                        var symbol = l155;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })()));
                 })());
+<<<<<<< HEAD
             })(l40.fvalue(pv, v683),l41.fvalue(pv, v683));
+=======
+            })(l42.fvalue(pv, v680),l43.fvalue(pv, v680));
+>>>>>>> backquote
         })();
     }));
-    return l269;
+    return l276;
 })();
-var l270 = {name: "LET*-BINDING-WRAPPER"};
+var l277 = {name: "LET*-BINDING-WRAPPER"};
 (function(){
+<<<<<<< HEAD
     (l270).fvalue = (function(v698){
         ((v698)["fname"] = "LET*-BINDING-WRAPPER");
         return v698;
@@ -5885,46 +9126,100 @@ var l270 = {name: "LET*-BINDING-WRAPPER"};
                                 return tmp === l5.value? l5.value: tmp.cdr;
                             })(), " = ", v695, ".value;", (function(){
                                 var symbol = l148;
+=======
+    (l277).fvalue = (function(v695){
+        ((v695)["fname"] = "LET*-BINDING-WRAPPER");
+        return v695;
+    })((function (values,v687,v688){
+        checkArgs(arguments, 3);
+        return (function(){
+            try {
+                (l13.fvalue(pv, v687) !== l5.value ? (function(){
+                    var values = mv;
+                    throw ({type: 'block', id: 236, values: v688, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
+                })() : l5.value);
+                return (function(v690){
+                    return l190.fvalue(values, "try {", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), l194.fvalue(pv, l160.fvalue(pv, (function (values,v691){
+                        checkArgs(arguments, 2);
+                        return (function(v692){
+                            return l190.fvalue(values, "var ", (function(){
+                                var tmp = v691;
+                                return tmp === l5.value? l5.value: tmp.cdr;
+                            })(), " = ", v692, ".value;", (function(){
+                                var symbol = l155;
+>>>>>>> backquote
                                 var value = symbol.value;
                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                                 return value;
                             })());
+<<<<<<< HEAD
                         })(l185.fvalue(pv, l45.fvalue(pv, l178, (function(){
                             var tmp = v694;
                             return tmp === l5.value? l5.value: tmp.car;
                         })())));
                     }), v693), v691), "}", (function(){
                         var symbol = l148;
+=======
+                        })(l192.fvalue(pv, l47.fvalue(pv, l185, (function(){
+                            var tmp = v691;
+                            return tmp === l5.value? l5.value: tmp.car;
+                        })())));
+                    }), v690), v688), "}", (function(){
+                        var symbol = l155;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })(), "finally {", (function(){
-                        var symbol = l148;
+                        var symbol = l155;
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
+<<<<<<< HEAD
                     })(), l187.fvalue(pv, l153.fvalue(pv, (function (values,v696){
                         checkArgs(arguments, 2);
                         return (function(v697){
                             return l183.fvalue(values, v697, ".value", " = ", (function(){
                                 var tmp = v696;
+=======
+                    })(), l194.fvalue(pv, l160.fvalue(pv, (function (values,v693){
+                        checkArgs(arguments, 2);
+                        return (function(v694){
+                            return l190.fvalue(values, v694, ".value", " = ", (function(){
+                                var tmp = v693;
+>>>>>>> backquote
                                 return tmp === l5.value? l5.value: tmp.cdr;
                             })(), ";", (function(){
-                                var symbol = l148;
+                                var symbol = l155;
                                 var value = symbol.value;
                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                                 return value;
                             })());
+<<<<<<< HEAD
                         })(l185.fvalue(pv, l45.fvalue(pv, l178, (function(){
                             var tmp = v696;
                             return tmp === l5.value? l5.value: tmp.car;
                         })())));
                     }), v693)), "}", (function(){
                         var symbol = l148;
+=======
+                        })(l192.fvalue(pv, l47.fvalue(pv, l185, (function(){
+                            var tmp = v693;
+                            return tmp === l5.value? l5.value: tmp.car;
+                        })())));
+                    }), v690)), "}", (function(){
+                        var symbol = l155;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })());
+<<<<<<< HEAD
                 })(l79.fvalue(pv, (function (values,v692){
                     checkArgs(arguments, 2);
                     return ({car: v692, cdr: l206.fvalue(pv, v692)});
@@ -5934,17 +9229,29 @@ var l270 = {name: "LET*-BINDING-WRAPPER"};
                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                     return func;
                 })(), v690)));
+=======
+                })(l81.fvalue(pv, (function (values,v689){
+                    checkArgs(arguments, 2);
+                    return ({car: v689, cdr: l213.fvalue(pv, v689)});
+                }), l99.fvalue(pv, (function(){
+                    var symbol = l273;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v687)));
+>>>>>>> backquote
             }
             catch (cf){
-                if (cf.type == 'block' && cf.id == 222)
+                if (cf.type == 'block' && cf.id == 236)
                     return values.apply(this, forcemv(cf.values));
                 else
                     throw cf;
             }
         })();
     }));
-    return l270;
+    return l277;
 })();
+<<<<<<< HEAD
 var l271 = {name: "LET*"};
 (function(){
     var v699 = l45.fvalue(pv, l271, (function (values,v701){
@@ -6027,12 +9334,375 @@ var l274 = {name: "USED"};
                 var v710 = ((l272).value = (function(){
                     var x1 = (function(){
                         var symbol = l272;
+=======
+var l278 = {name: "LET*"};
+((l229).value = ({car: l47.fvalue(pv, l278, (function (values,v697){
+    checkArgsAtLeast(arguments, 2);
+    var v696= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v696 = {car: arguments[i], cdr: 
+    v696};
+    return (function(){
+        return (function(v698,v699){
+            try {
+                var tmp;
+                tmp = l211.value;
+                l211.value = v699;
+                v699 = tmp;
+                return l190.fvalue(values, "(function(){", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l194.fvalue(pv, (function(v700,v701){
+                    return l277.fvalue(pv, v700, v701);
+                })(l99.fvalue(pv, (function(){
+                    var symbol = l273;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), l81.fvalue(pv, (function(){
+                    var symbol = l42;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v698)),l156.fvalue(pv, l160.fvalue(pv, (function(){
+                    var symbol = l276;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v698), l253.fvalue(pv, v696, l4.value)))), "})()");
+            }
+            finally {
+                l211.value = v699;
+            }
+        })(l81.fvalue(pv, (function(){
+            var symbol = l61;
+            var func = symbol.fvalue;
+            if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+            return func;
+        })(), v697),l205.fvalue(pv, (function(){
+            var symbol = l211;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()));
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l279 = {name: "*BLOCK-COUNTER*"};
+(function(){
+    (((l279.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l279).value = 0));
+    return l279;
+})();
+var l280 = {name: "MULTIPLE-VALUE"};
+var l281 = {name: "USED"};
+((l229).value = ({car: l47.fvalue(pv, l207, (function (values,v703){
+    checkArgsAtLeast(arguments, 2);
+    var v702= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v702 = {car: arguments[i], cdr: 
+    v702};
+    return (function(){
+        return (function(){
+            var v704 = ((l279).value = (function(){
+                var x1 = (function(){
+                    var symbol = l279;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })();
+                if (typeof x1 !== 'number') throw 'Not a number!';
+                return x1+1;
+            })());
+            var v705 = l196.fvalue(pv, v703, l207, v704);
+            ((function(){
+                var symbol = l195;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })() !== l5.value ? l203.fvalue(pv, l280, v705) : l5.value);
+            return (function(){
+                try {
+                    var v707 = l211.value;
+                    ((l211).value = l209.fvalue(pv, l47.fvalue(pv, v705), (function(){
+                        var symbol = l211;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), l207));
+                    var v706 = l253.fvalue(pv, v702, l4.value);
+                    return (l96.fvalue(pv, l281, l200.fvalue(pv, v705)) !== l5.value ? l190.fvalue(values, "(function(){", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), l194.fvalue(pv, "try {", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), l194.fvalue(pv, v706), "}", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), "catch (cf){", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), "    if (cf.type == 'block' && cf.id == ", v704, ")", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), ((function(){
+                        var symbol = l195;
+                        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 = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), "    else", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), "        throw cf;", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), "}", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })()), "})()") : l190.fvalue(values, "(function(){", (function(){
+                        var symbol = l155;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), l194.fvalue(pv, v706), "})()"));
+                }
+                finally {
+                    l211.value = v707;
+                }
+            })();
+        })();
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l282 = {name: "RETURN-FROM"};
+((l229).value = ({car: l47.fvalue(pv, l282, (function (values,v708,v709){
+    checkArgsAtLeast(arguments, 2);
+    checkArgsAtMost(arguments, 3);
+    var v709; 
+    switch(arguments.length-1){
+    case 1:
+        v709=l5.value;
+    default: break;
+    }
+    return (function(){
+        return (function(){
+            var v710 = l210.fvalue(pv, v708, (function(){
+                var symbol = l211;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l207);
+            var v711 = l96.fvalue(pv, l280, l200.fvalue(pv, v710));
+            (l13.fvalue(pv, v710) !== l5.value ? (function(){
+                throw l156.fvalue(pv, "Unknown block `", (v708).name, "'.");
+            })() : l5.value);
+            l203.fvalue(pv, l281, v710);
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, (v711 !== l5.value ? l190.fvalue(pv, "var values = mv;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l199.fvalue(pv, v710), ", ", "values: ", l192.fvalue(pv, v709, v711), ", ", "message: 'Return from unknown block ", (v708).name, ".'", "})"), "})()");
+        })();
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l283 = {name: "CATCH"};
+((l229).value = ({car: l47.fvalue(pv, l283, (function (values,v713){
+    checkArgsAtLeast(arguments, 2);
+    var v712= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v712 = {car: arguments[i], cdr: 
+    v712};
+    return (function(){
+        return l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "var id = ", l192.fvalue(pv, v713), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "try {", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, l253.fvalue(pv, v712, l4.value)), (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "}", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "catch (cf){", (function(){
+            var symbol = l155;
+            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 = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), ((function(){
+            var symbol = l195;
+            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 = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "    else", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "        throw cf;", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "}", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), "})()");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l284 = {name: "THROW"};
+((l229).value = ({car: l47.fvalue(pv, l284, (function (values,v714,v715){
+    checkArgs(arguments, 3);
+    return (function(){
+        return l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "var values = mv;", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "throw ({", "type: 'catch', ", "id: ", l192.fvalue(pv, v714), ", ", "values: ", l192.fvalue(pv, v715, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l285 = {name: "*TAGBODY-COUNTER*"};
+(function(){
+    (((l285.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l285).value = 0));
+    return l285;
+})();
+var l286 = {name: "*GO-TAG-COUNTER*"};
+(function(){
+    (((l286.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l286).value = 0));
+    return l286;
+})();
+var l287 = {name: "GO-TAG-P"};
+(function(){
+    (l287).fvalue = (function(v718){
+        ((v718)["fname"] = "GO-TAG-P");
+        return v718;
+    })((function (values,v716){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v717){
+                return (v717 !== l5.value ? v717 : ((function(){
+                    var tmp = v716;
+                    return (typeof tmp == 'object' && 'name' in tmp);
+                })()?l4.value: l5.value));
+            })(l89.fvalue(pv, v716));
+        })();
+    }));
+    return l287;
+})();
+var l288 = {name: "DECLARE-TAGBODY-TAGS"};
+(function(){
+    (l288).fvalue = (function(v724){
+        ((v724)["fname"] = "DECLARE-TAGBODY-TAGS");
+        return v724;
+    })((function (values,v719,v720){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (function(v723){
+                return l209.fvalue(values, v723, (function(){
+                    var symbol = l211;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l208);
+            })(l81.fvalue(pv, (function (values,v721){
+                checkArgs(arguments, 2);
+                return (function(v722){
+                    return l196.fvalue(values, v721, l208, l47.fvalue(pv, v719, v722));
+                })(l19.fvalue(pv, ((l286).value = (function(){
+                    var x1 = (function(){
+                        var symbol = l286;
+>>>>>>> backquote
                         var value = symbol.value;
                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                         return value;
                     })();
                     if (typeof x1 !== 'number') throw 'Not a number!';
                     return x1+1;
+<<<<<<< HEAD
                 })());
                 var v711 = l189.fvalue(pv, v709, l200, v710);
                 ((function(){
@@ -6083,32 +9753,207 @@ var l274 = {name: "USED"};
                             return value;
                         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
                             var symbol = l148;
+=======
+                })())));
+            }), l99.fvalue(pv, (function(){
+                var symbol = l287;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), v720)));
+        })();
+    }));
+    return l288;
+})();
+var l289 = {name: "TAGBODY"};
+var l290 = QIList(l5,l5);
+((l229).value = ({car: l47.fvalue(pv, l289, (function (values){
+    var v725= l5.value;
+    for (var i = arguments.length-1; i>=1; i--)
+        v725 = {car: arguments[i], cdr: 
+    v725};
+    return (function(){
+        try {
+            (l103.fvalue(pv, (function(){
+                var symbol = l287;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), v725) !== l5.value ? l5.value : (function(){
+                var values = mv;
+                throw ({type: 'block', id: 244, values: l192.fvalue(values, ({car: l122, cdr: l68.fvalue(pv, v725, l290)})), message: 'Return from unknown block TAGBODY.'})
+            })());
+            (l287.fvalue(pv, (function(){
+                var tmp = v725;
+                return tmp === l5.value? l5.value: tmp.car;
+            })()) !== l5.value ? l5.value : (v725 = ({car: l18.fvalue(pv, "START"), cdr: v725})));
+            return (function(v726){
+                return (function(v728,v727){
+                    try {
+                        var tmp;
+                        tmp = l211.value;
+                        l211.value = v728;
+                        v728 = tmp;
+                        (function(v729){
+                            return (v727 = l43.fvalue(pv, l199.fvalue(pv, v729)));
+                        })(l210.fvalue(pv, l42.fvalue(pv, v725), (function(){
+                            var symbol = l211;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), l208));
+                        return l190.fvalue(values, "(function(){", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), l194.fvalue(pv, "var tagbody_", v726, " = ", v727, ";", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), "tbloop:", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), "while (true) {", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), l194.fvalue(pv, "try {", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), l194.fvalue(pv, (function(v730){
+                            return l190.fvalue(pv, "switch(tagbody_", v726, "){", (function(){
+                                var symbol = l155;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "case ", v727, ":", (function(){
+                                var symbol = l155;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), (function(){
+                                return (function(v731,v732){
+                                    (function(){
+                                        while(v731 !== l5.value){
+                                            (v732 = (function(){
+                                                var tmp = v731;
+                                                return tmp === l5.value? l5.value: tmp.car;
+                                            })());
+                                            (function(){
+                                                (v730 = l156.fvalue(pv, v730, (l29.fvalue(pv, l287.fvalue(pv, v732)) !== l5.value ? l194.fvalue(pv, l192.fvalue(pv, v732), ";", (function(){
+                                                    var symbol = l155;
+                                                    var value = symbol.value;
+                                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                                    return value;
+                                                })()) : (function(v733){
+                                                    return l190.fvalue(pv, "case ", l43.fvalue(pv, l199.fvalue(pv, v733)), ":", (function(){
+                                                        var symbol = l155;
+                                                        var value = symbol.value;
+                                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                                        return value;
+                                                    })());
+                                                })(l210.fvalue(pv, v732, (function(){
+                                                    var symbol = l211;
+                                                    var value = symbol.value;
+                                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                                    return value;
+                                                })(), l208)))));
+                                                return l5.value;
+                                            })();
+                                            (v731 = (function(){
+                                                var tmp = v731;
+                                                return tmp === l5.value? l5.value: tmp.cdr;
+                                            })());
+                                        }return l5.value;
+                                    })();
+                                    return v730;
+                                })((function(){
+                                    var tmp = v725;
+                                    return tmp === l5.value? l5.value: tmp.cdr;
+                                })(),l5.value);
+                            })(), "default:", (function(){
+                                var symbol = l155;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "    break tbloop;", (function(){
+                                var symbol = l155;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "}", (function(){
+                                var symbol = l155;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })());
+                        })("")), "}", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), "catch (jump) {", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), "    if (jump.type == 'tagbody' && jump.id == ", v726, ")", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), "        tagbody_", v726, " = jump.label;", (function(){
+                            var symbol = l155;
+>>>>>>> backquote
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })(), "    else", (function(){
-                            var symbol = l148;
+                            var symbol = l155;
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
+<<<<<<< HEAD
                         })(), "        throw cf;", (function(){
                             var symbol = l148;
+=======
+                        })(), "        throw(jump);", (function(){
+                            var symbol = l155;
+>>>>>>> backquote
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })(), "}", (function(){
-                            var symbol = l148;
+                            var symbol = l155;
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
+<<<<<<< HEAD
                         })()), "})()") : l183.fvalue(values, "(function(){", (function(){
                             var symbol = l148;
+=======
+                        })()), "}", (function(){
+                            var symbol = l155;
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
-                        })(), l187.fvalue(pv, v712), "})()"));
+                        })(), "return ", l192.fvalue(pv, l5.value), ";", (function(){
+                            var symbol = l155;
+>>>>>>> backquote
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })(), l187.fvalue(pv, v712), "})()"));
                     }
                     finally {
+<<<<<<< HEAD
                         l204.value = v713;
                     }
                 })();
@@ -6177,551 +10022,1151 @@ var l276 = {name: "CATCH"};
         for (var i = arguments.length-1; i>=2; i--)
             v722 = {car: arguments[i], cdr: 
         v722};
-        return (function(){
-            return l183.fvalue(values, "(function(){", (function(){
-                var symbol = l148;
-                var value = symbol.value;
-                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                return value;
-            })(), l187.fvalue(pv, "var id = ", l185.fvalue(pv, v723), ";", (function(){
-                var symbol = l148;
+=======
+                        l211.value = v728;
+                    }
+                })(l288.fvalue(pv, v726, v725),l5.value);
+            })((function(){
+                var symbol = l285;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "try {", (function(){
-                var symbol = l148;
+            })());
+        }
+        catch (cf){
+            if (cf.type == 'block' && cf.id == 244)
+                return values.apply(this, forcemv(cf.values));
+            else
+                throw cf;
+        }
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l291 = {name: "GO"};
+((l229).value = ({car: l47.fvalue(pv, l291, (function (values,v734){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v735,v736){
+            (l13.fvalue(pv, v735) !== l5.value ? (function(){
+                throw l156.fvalue(pv, "Unknown tag `", v736, "'.");
+            })() : l5.value);
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, l246.fvalue(pv, v722, l4.value)), (function(){
-                var symbol = l148;
+            })(), l194.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l42.fvalue(pv, l199.fvalue(pv, v735)), ", ", "label: ", l43.fvalue(pv, l199.fvalue(pv, v735)), ", ", "message: 'Attempt to GO to non-existing tag ", v736, "'", "})", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "}", (function(){
-                var symbol = l148;
+            })()), "})()");
+        })(l210.fvalue(pv, v734, (function(){
+            var symbol = l211;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l208),(((function(){
+            var tmp = v734;
+            return (typeof tmp == 'object' && 'name' in tmp);
+        })()?l4.value: l5.value) !== l5.value ? (v734).name : (l89.fvalue(pv, v734) !== l5.value ? l19.fvalue(pv, v734) : l5.value)));
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l292 = {name: "UNWIND-PROTECT"};
+((l229).value = ({car: l47.fvalue(pv, l292, (function (values,v738){
+    checkArgsAtLeast(arguments, 2);
+    var v737= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v737 = {car: arguments[i], cdr: 
+    v737};
+    return (function(){
+        return l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "var ret = ", l192.fvalue(pv, l5.value), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "try {", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "ret = ", l192.fvalue(pv, v738), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), "} finally {", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, l253.fvalue(pv, v737)), "}", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "return ret;", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), "})()");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l293 = {name: "MULTIPLE-VALUE-CALL"};
+((l229).value = ({car: l47.fvalue(pv, l293, (function (values,v740){
+    checkArgsAtLeast(arguments, 2);
+    var v739= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v739 = {car: arguments[i], cdr: 
+    v739};
+    return (function(){
+        return l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "var func = ", l192.fvalue(pv, v740), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "var args = [", ((function(){
+            var symbol = l195;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })() !== l5.value ? "values" : "pv"), "];", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "return ", l190.fvalue(pv, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "var values = mv;", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "var vs;", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l160.fvalue(pv, (function (values,v741){
+            checkArgs(arguments, 2);
+            return l190.fvalue(values, "vs = ", l192.fvalue(pv, v741, l4.value), ";", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "catch (cf){", (function(){
-                var symbol = l148;
+            })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
+                var symbol = l155;
                 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 = l148;
+            })(), l194.fvalue(pv, "args = args.concat(vs);", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), ((function(){
-                var symbol = l188;
+            })()), "else", (function(){
+                var symbol = l155;
                 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 = l148;
+            })(), l194.fvalue(pv, "args.push(vs);", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "    else", (function(){
-                var symbol = l148;
+            })()));
+        }), v739), "return func.apply(window, args);", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), "})()"), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), "})()");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l294 = {name: "MULTIPLE-VALUE-PROG1"};
+((l229).value = ({car: l47.fvalue(pv, l294, (function (values,v743){
+    checkArgsAtLeast(arguments, 2);
+    var v742= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v742 = {car: arguments[i], cdr: 
+    v742};
+    return (function(){
+        return l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "var args = ", l192.fvalue(pv, v743, (function(){
+            var symbol = l195;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l253.fvalue(pv, v742), "return args;", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), "})()");
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l295 = {name: "*COMMA*"};
+(function(){
+    (((l295.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l295).value = l188));
+    return l295;
+})();
+var l296 = {name: "*COMMA-ATSIGN*"};
+(function(){
+    (((l296.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l296).value = l187));
+    return l296;
+})();
+var l297 = {name: "*BQ-LIST*"};
+(function(){
+    (((l297.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l297).value = (function(){
+        var name = "BQ-LIST";
+        if (typeof name != 'string')
+            throw 'The value ' + name + ' is not a type string.';
+        return ({name: name});
+    })()));
+    return l297;
+})();
+var l298 = {name: "*BQ-APPEND*"};
+(function(){
+    (((l298.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l298).value = (function(){
+        var name = "BQ-APPEND";
+        if (typeof name != 'string')
+            throw 'The value ' + name + ' is not a type string.';
+        return ({name: name});
+    })()));
+    return l298;
+})();
+var l299 = {name: "*BQ-LIST**"};
+(function(){
+    (((l299.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l299).value = (function(){
+        var name = "BQ-LIST*";
+        if (typeof name != 'string')
+            throw 'The value ' + name + ' is not a type string.';
+        return ({name: name});
+    })()));
+    return l299;
+})();
+var l300 = {name: "*BQ-NCONC*"};
+(function(){
+    (((l300.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l300).value = (function(){
+        var name = "BQ-NCONC";
+        if (typeof name != 'string')
+            throw 'The value ' + name + ' is not a type string.';
+        return ({name: name});
+    })()));
+    return l300;
+})();
+var l301 = {name: "*BQ-CLOBBERABLE*"};
+(function(){
+    (((l301.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l301).value = (function(){
+        var name = "BQ-CLOBBERABLE";
+        if (typeof name != 'string')
+            throw 'The value ' + name + ' is not a type string.';
+        return ({name: name});
+    })()));
+    return l301;
+})();
+var l302 = {name: "*BQ-QUOTE*"};
+(function(){
+    (((l302.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l302).value = (function(){
+        var name = "BQ-QUOTE";
+        if (typeof name != 'string')
+            throw 'The value ' + name + ' is not a type string.';
+        return ({name: name});
+    })()));
+    return l302;
+})();
+var l303 = {name: "*BQ-QUOTE-NIL*"};
+(function(){
+    (((l303.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l303).value = l47.fvalue(pv, (function(){
+        var symbol = l302;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })(), l5.value)));
+    return l303;
+})();
+var l304 = {name: "*BQ-SIMPLIFY*"};
+(function(){
+    ((l304).value = l4.value);
+    return l304;
+})();
+l186;
+var l305 = {name: "BQ-COMPLETELY-PROCESS"};
+var l306 = {name: "BQ-PROCESS"};
+var l307 = {name: "BQ-SIMPLIFY"};
+var l308 = {name: "BQ-REMOVE-TOKENS"};
+(function(){
+    (l305).fvalue = (function(v746){
+        ((v746)["fname"] = "BQ-COMPLETELY-PROCESS");
+        return v746;
+    })((function (values,v744){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v745){
+                return l308.fvalue(values, ((function(){
+                    var symbol = l304;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })() !== l5.value ? l307.fvalue(pv, v745) : v745));
+            })(l306.fvalue(pv, v744));
+        })();
+    }));
+    return l305;
+})();
+var l309 = {name: "BRACKET"};
+(function(){
+    (l306).fvalue = (function(v752){
+        ((v752)["fname"] = "BQ-PROCESS");
+        return v752;
+    })((function (values,v747){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (l48.fvalue(pv, v747) !== l5.value ? l47.fvalue(values, (function(){
+                var symbol = l302;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "        throw cf;", (function(){
-                var symbol = l148;
+            })(), v747) : ((((function(){
+                var tmp = v747;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === l186)?l4.value: l5.value) !== l5.value ? l306.fvalue(values, l305.fvalue(pv, l35.fvalue(pv, v747))) : ((((function(){
+                var tmp = v747;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l295;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "}", (function(){
-                var symbol = l148;
+            })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v747) : ((((function(){
+                var tmp = v747;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l296;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })()), "})()");
+            })())?l4.value: l5.value) !== l5.value ? (function(){
+                throw "ill-formed";
+            })() : (function(){
+                return (function(v748,v749){
+                    return (function(){
+                        try {
+                            return (function(){
+                                while(l4.value !== l5.value){
+                                    (l48.fvalue(pv, v748) !== l5.value ? (function(){
+                                        var values = mv;
+                                        throw ({type: 'block', id: 253, values: ({car: (function(){
+                                            var symbol = l298;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })(), cdr: l127.fvalue(pv, v749, l47.fvalue(pv, l47.fvalue(pv, (function(){
+                                            var symbol = l302;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })(), v748)))}), message: 'Return from unknown block NIL.'})
+                                    })() : l5.value);
+                                    (function(){
+                                        ((((function(){
+                                            var tmp = v748;
+                                            return tmp === l5.value? l5.value: tmp.car;
+                                        })() === (function(){
+                                            var symbol = l295;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })())?l4.value: l5.value) !== l5.value ? (function(){
+                                            (l13.fvalue(pv, l37.fvalue(pv, v748)) !== l5.value ? l5.value : (function(){
+                                                throw "Malformed";
+                                            })());
+                                            return (function(){
+                                                var values = mv;
+                                                throw ({type: 'block', id: 253, values: ({car: (function(){
+                                                    var symbol = l298;
+                                                    var value = symbol.value;
+                                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                                    return value;
+                                                })(), cdr: l127.fvalue(pv, v749, l47.fvalue(pv, l35.fvalue(pv, v748)))}), message: 'Return from unknown block NIL.'})
+                                            })();
+                                        })() : l5.value);
+                                        ((((function(){
+                                            var tmp = v748;
+                                            return tmp === l5.value? l5.value: tmp.car;
+                                        })() === (function(){
+                                            var symbol = l296;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })())?l4.value: l5.value) !== l5.value ? (function(){
+                                            throw "Dotted";
+                                        })() : l5.value);
+                                        return l5.value;
+                                    })();
+                                    (function(v750,v751){
+                                        return (v748 = v750, v749 = v751);
+                                    })((function(){
+                                        var tmp = v748;
+                                        return tmp === l5.value? l5.value: tmp.cdr;
+                                    })(),({car: l309.fvalue(pv, (function(){
+                                        var tmp = v748;
+                                        return tmp === l5.value? l5.value: tmp.car;
+                                    })()), cdr: v749}));
+                                }return l5.value;
+                            })();
+                        }
+                        catch (cf){
+                            if (cf.type == 'block' && cf.id == 253)
+                                return values.apply(this, forcemv(cf.values));
+                            else
+                                throw cf;
+                        }
+                    })();
+                })(v747,l5);
+            })()))));
         })();
     }));
-    var v724 = ({car: v721, cdr: (function(){
-        var symbol = l222;
-        var value = symbol.value;
-        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-        return value;
-    })()});
-    return ((l222).value = v724);
+    return l306;
 })();
-var l277 = {name: "THROW"};
 (function(){
-    var v725 = l45.fvalue(pv, l277, (function (values,v726,v727){
-        checkArgs(arguments, 3);
+    (l309).fvalue = (function(v754){
+        ((v754)["fname"] = "BRACKET");
+        return v754;
+    })((function (values,v753){
+        checkArgs(arguments, 2);
         return (function(){
-            return l183.fvalue(values, "(function(){", (function(){
-                var symbol = l148;
+            return (l48.fvalue(pv, v753) !== l5.value ? l47.fvalue(values, (function(){
+                var symbol = l297;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, "var values = mv;", (function(){
-                var symbol = l148;
+            })(), l306.fvalue(pv, v753)) : ((((function(){
+                var tmp = v753;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l295;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "throw ({", "type: 'catch', ", "id: ", l185.fvalue(pv, v726), ", ", "values: ", l185.fvalue(pv, v727, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
+            })())?l4.value: l5.value) !== l5.value ? l47.fvalue(values, (function(){
+                var symbol = l297;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l35.fvalue(pv, v753)) : ((((function(){
+                var tmp = v753;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l296;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v753) : l47.fvalue(values, (function(){
+                var symbol = l297;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l306.fvalue(pv, v753)))));
         })();
     }));
-    var v728 = ({car: v725, cdr: (function(){
-        var symbol = l222;
-        var value = symbol.value;
-        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-        return value;
-    })()});
-    return ((l222).value = v728);
+    return l309;
 })();
-var l278 = {name: "*TAGBODY-COUNTER*"};
+var l310 = {name: "MAPTREE"};
 (function(){
-    (((l278.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l278).value = 0));
-    return l278;
+    (l310).fvalue = (function(v759){
+        ((v759)["fname"] = "MAPTREE");
+        return v759;
+    })((function (values,v755,v756){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (l48.fvalue(pv, v756) !== l5.value ? (function(){
+                var f = v755;
+                return (typeof f === 'function'? f: f.fvalue)(values, v756)
+            })() : (function(v757,v758){
+                return ((l28.fvalue(pv, v757, (function(){
+                    var tmp = v756;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })()) !== l5.value ? l28.fvalue(pv, v758, (function(){
+                    var tmp = v756;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })()) : l5.value) !== l5.value ? v756 : ({car: v757, cdr: v758}));
+            })((function(){
+                var f = v755;
+                return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
+                    var tmp = v756;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })())
+            })(),l310.fvalue(pv, v755, (function(){
+                var tmp = v756;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })())));
+        })();
+    }));
+    return l310;
 })();
-var l279 = {name: "*GO-TAG-COUNTER*"};
+var l311 = {name: "BQ-SPLICING-FROB"};
 (function(){
-    (((l279.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l279).value = 0));
-    return l279;
+    (l311).fvalue = (function(v761){
+        ((v761)["fname"] = "BQ-SPLICING-FROB");
+        return v761;
+    })((function (values,v760){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (((function(){
+                var tmp = v760;
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (((function(){
+                var tmp = v760;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l296;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())?l4.value: l5.value) : l5.value);
+        })();
+    }));
+    return l311;
 })();
-var l280 = {name: "GO-TAG-P"};
+var l312 = {name: "BQ-FROB"};
 (function(){
-    (l280).fvalue = (function(v731){
-        ((v731)["fname"] = "GO-TAG-P");
-        return v731;
-    })((function (values,v729){
+    (l312).fvalue = (function(v764){
+        ((v764)["fname"] = "BQ-FROB");
+        return v764;
+    })((function (values,v762){
         checkArgs(arguments, 2);
         return (function(){
-            return (function(v730){
-                return (v730 !== l5.value ? v730 : ((function(){
-                    var tmp = v729;
-                    return (typeof tmp == 'object' && 'name' in tmp);
-                })()?l4.value: l5.value));
-            })(l86.fvalue(pv, v729));
+            return (((function(){
+                var tmp = v762;
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (function(v763){
+                return (v763 !== l5.value ? v763 : (((function(){
+                    var tmp = v762;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })() === (function(){
+                    var symbol = l296;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })())?l4.value: l5.value));
+            })((((function(){
+                var tmp = v762;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l295;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())?l4.value: l5.value)) : l5.value);
         })();
     }));
-    return l280;
+    return l312;
 })();
-var l281 = {name: "DECLARE-TAGBODY-TAGS"};
+var l313 = {name: "BQ-SIMPLIFY-ARGS"};
 (function(){
-    (l281).fvalue = (function(v737){
-        ((v737)["fname"] = "DECLARE-TAGBODY-TAGS");
-        return v737;
-    })((function (values,v732,v733){
-        checkArgs(arguments, 3);
+    (l307).fvalue = (function(v767){
+        ((v767)["fname"] = "BQ-SIMPLIFY");
+        return v767;
+    })((function (values,v765){
+        checkArgs(arguments, 2);
         return (function(){
-            return (function(v736){
-                return l202.fvalue(values, v736, (function(){
-                    var symbol = l204;
+            return (l48.fvalue(pv, v765) !== l5.value ? v765 : (function(v766){
+                return (l29.fvalue(pv, (((function(){
+                    var tmp = v766;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })() === (function(){
+                    var symbol = l298;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
-                })(), l201);
-            })(l79.fvalue(pv, (function (values,v734){
-                checkArgs(arguments, 2);
-                return (function(v735){
-                    return l189.fvalue(values, v734, l201, l45.fvalue(pv, v732, v735));
-                })(l18.fvalue(pv, ((l279).value = (function(){
-                    var x1 = (function(){
-                        var symbol = l279;
-                        var value = symbol.value;
-                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                        return value;
-                    })();
-                    if (typeof x1 !== 'number') throw 'Not a number!';
-                    return x1+1;
-                })())));
-            }), l96.fvalue(pv, (function(){
-                var symbol = l280;
+                })())?l4.value: l5.value)) !== l5.value ? v766 : l313.fvalue(values, v766));
+            })(((((function(){
+                var tmp = v765;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l302;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())?l4.value: l5.value) !== l5.value ? v765 : l310.fvalue(pv, (function(){
+                var symbol = l307;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
-            })(), v733)));
+            })(), v765))));
         })();
     }));
-    return l281;
+    return l307;
 })();
-var l282 = {name: "TAGBODY"};
-var l283 = QIList(l5,l5);
+var l314 = {name: "BQ-ATTACH-APPEND"};
+var l315 = {name: "BQ-ATTACH-CONSES"};
+var l316 = {name: "CDDAR"};
+var l317 = {name: "CAADAR"};
 (function(){
-    var v738 = l45.fvalue(pv, l282, (function (values){
-        var v739= l5.value;
-        for (var i = arguments.length-1; i>=1; i--)
-            v739 = {car: arguments[i], cdr: 
-        v739};
+    (l313).fvalue = (function(v773){
+        ((v773)["fname"] = "BQ-SIMPLIFY-ARGS");
+        return v773;
+    })((function (values,v768){
+        checkArgs(arguments, 2);
         return (function(){
-            try {
-                (l100.fvalue(pv, (function(){
-                    var symbol = l280;
-                    var func = symbol.fvalue;
-                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
-                    return func;
-                })(), v739) !== l5.value ? l5.value : (function(){
-                    var values = mv;
-                    throw ({type: 'block', id: 230, values: l185.fvalue(values, ({car: l119, cdr: l66.fvalue(pv, v739, l283)})), message: 'Return from unknown block TAGBODY.'})
-                })());
-                (l280.fvalue(pv, (function(){
-                    var tmp = v739;
-                    return tmp === l5.value? l5.value: tmp.car;
-                })()) !== l5.value ? l5.value : (function(){
-                    var v740 = l17.fvalue(pv, "START");
-                    var v741 = ({car: v740, cdr: v739});
-                    return (v739 = v741);
-                })());
-                return (function(v742){
-                    return (function(v744,v743){
+            return (function(){
+                return (function(v769,v770){
+                    return (function(){
                         try {
-                            var tmp;
-                            tmp = l204.value;
-                            l204.value = v744;
-                            v744 = tmp;
-                            (function(v745){
-                                return (v743 = l41.fvalue(pv, l192.fvalue(pv, v745)));
-                            })(l203.fvalue(pv, l40.fvalue(pv, v739), (function(){
-                                var symbol = l204;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), l201));
-                            return l183.fvalue(values, "(function(){", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), l187.fvalue(pv, "var tagbody_", v742, " = ", v743, ";", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "tbloop:", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "while (true) {", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), l187.fvalue(pv, "try {", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), l187.fvalue(pv, (function(v746){
-                                return l183.fvalue(pv, "switch(tagbody_", v742, "){", (function(){
-                                    var symbol = l148;
-                                    var value = symbol.value;
-                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                    return value;
-                                })(), "case ", v743, ":", (function(){
-                                    var symbol = l148;
-                                    var value = symbol.value;
-                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                    return value;
-                                })(), (function(){
-                                    return (function(v747,v748){
-                                        (function(){
-                                            while(v747 !== l5.value){
-                                                (v748 = (function(){
-                                                    var tmp = v747;
-                                                    return tmp === l5.value? l5.value: tmp.car;
-                                                })());
-                                                (function(){
-                                                    (v746 = l149.fvalue(pv, v746, (l28.fvalue(pv, l280.fvalue(pv, v748)) !== l5.value ? l187.fvalue(pv, l185.fvalue(pv, v748), ";", (function(){
-                                                        var symbol = l148;
-                                                        var value = symbol.value;
-                                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                                        return value;
-                                                    })()) : (function(v749){
-                                                        return l183.fvalue(pv, "case ", l41.fvalue(pv, l192.fvalue(pv, v749)), ":", (function(){
-                                                            var symbol = l148;
-                                                            var value = symbol.value;
-                                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                                            return value;
-                                                        })());
-                                                    })(l203.fvalue(pv, v748, (function(){
-                                                        var symbol = l204;
-                                                        var value = symbol.value;
-                                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                                        return value;
-                                                    })(), l201)))));
-                                                    return l5.value;
-                                                })();
-                                                (v747 = (function(){
-                                                    var tmp = v747;
-                                                    return tmp === l5.value? l5.value: tmp.cdr;
-                                                })());
-                                            }return l5.value;
-                                        })();
-                                        return v746;
+                            return (function(){
+                                while(l4.value !== l5.value){
+                                    (l13.fvalue(pv, v769) !== l5.value ? (function(){
+                                        var values = mv;
+                                        throw ({type: 'block', id: 261, values: v770, message: 'Return from unknown block NIL.'})
+                                    })() : l5.value);
+                                    l5.value;
+                                    (function(v771,v772){
+                                        return (v769 = v771, v770 = v772);
                                     })((function(){
-                                        var tmp = v739;
+                                        var tmp = v769;
                                         return tmp === l5.value? l5.value: tmp.cdr;
-                                    })(),l5.value);
-                                })(), "default:", (function(){
-                                    var symbol = l148;
-                                    var value = symbol.value;
-                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                    return value;
-                                })(), "    break tbloop;", (function(){
-                                    var symbol = l148;
-                                    var value = symbol.value;
-                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                    return value;
-                                })(), "}", (function(){
-                                    var symbol = l148;
-                                    var value = symbol.value;
-                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                    return value;
-                                })());
-                            })("")), "}", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "catch (jump) {", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "    if (jump.type == 'tagbody' && jump.id == ", v742, ")", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "        tagbody_", v742, " = jump.label;", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "    else", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "        throw(jump);", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "}", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })()), "}", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })(), "return ", l185.fvalue(pv, l5.value), ";", (function(){
-                                var symbol = l148;
-                                var value = symbol.value;
-                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                return value;
-                            })()), "})()");
+                                    })(),(l48.fvalue(pv, (function(){
+                                        var tmp = v769;
+                                        return tmp === l5.value? l5.value: tmp.car;
+                                    })()) !== l5.value ? l314.fvalue(pv, (function(){
+                                        var symbol = l298;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })(), (function(){
+                                        var tmp = v769;
+                                        return tmp === l5.value? l5.value: tmp.car;
+                                    })(), v770) : ((((l34.fvalue(pv, v769) === (function(){
+                                        var symbol = l297;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })())?l4.value: l5.value) !== l5.value ? l128.fvalue(pv, (function(){
+                                        var symbol = l311;
+                                        var func = symbol.fvalue;
+                                        if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                                        return func;
+                                    })(), l36.fvalue(pv, v769)) : l5.value) !== l5.value ? l315.fvalue(pv, l36.fvalue(pv, v769), v770) : ((((l34.fvalue(pv, v769) === (function(){
+                                        var symbol = l299;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })())?l4.value: l5.value) !== l5.value ? l128.fvalue(pv, (function(){
+                                        var symbol = l311;
+                                        var func = symbol.fvalue;
+                                        if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                                        return func;
+                                    })(), l36.fvalue(pv, v769)) : l5.value) !== l5.value ? l315.fvalue(pv, l70.fvalue(pv, (function(){
+                                        var tmp = l70.fvalue(pv, l36.fvalue(pv, v769));
+                                        return tmp === l5.value? l5.value: tmp.cdr;
+                                    })()), l314.fvalue(pv, (function(){
+                                        var symbol = l298;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })(), (function(){
+                                        var tmp = l94.fvalue(pv, (function(){
+                                            var tmp = v769;
+                                            return tmp === l5.value? l5.value: tmp.car;
+                                        })());
+                                        return tmp === l5.value? l5.value: tmp.car;
+                                    })(), v770)) : ((((l34.fvalue(pv, v769) === (function(){
+                                        var symbol = l302;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })())?l4.value: l5.value) !== l5.value ? (((function(){
+                                        var tmp = l38.fvalue(pv, v769);
+                                        return (typeof tmp == 'object' && 'car' in tmp);
+                                    })()?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l312.fvalue(pv, l38.fvalue(pv, v769))) !== l5.value ? l13.fvalue(pv, l316.fvalue(pv, v769)) : l5.value) : l5.value) : l5.value) !== l5.value ? l315.fvalue(pv, l47.fvalue(pv, l47.fvalue(pv, (function(){
+                                        var symbol = l302;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })(), l317.fvalue(pv, v769))), v770) : (((l34.fvalue(pv, v769) === (function(){
+                                        var symbol = l301;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })())?l4.value: l5.value) !== l5.value ? l314.fvalue(pv, (function(){
+                                        var symbol = l300;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })(), l38.fvalue(pv, v769), v770) : l314.fvalue(pv, (function(){
+                                        var symbol = l298;
+                                        var value = symbol.value;
+                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                        return value;
+                                    })(), (function(){
+                                        var tmp = v769;
+                                        return tmp === l5.value? l5.value: tmp.car;
+                                    })(), v770)))))));
+                                }return l5.value;
+                            })();
                         }
-                        finally {
-                            l204.value = v744;
+                        catch (cf){
+                            if (cf.type == 'block' && cf.id == 261)
+                                return values.apply(this, forcemv(cf.values));
+                            else
+                                throw cf;
                         }
-                    })(l281.fvalue(pv, v742, v739),l5.value);
-                })((function(){
-                    var symbol = l278;
-                    var value = symbol.value;
-                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                    return value;
-                })());
-            }
-            catch (cf){
-                if (cf.type == 'block' && cf.id == 230)
-                    return values.apply(this, forcemv(cf.values));
-                else
-                    throw cf;
-            }
+                    })();
+                })(l70.fvalue(pv, (function(){
+                    var tmp = v768;
+                    return tmp === l5.value? l5.value: tmp.cdr;
+                })()),l5.value);
+            })();
         })();
     }));
-    var v750 = ({car: v738, cdr: (function(){
-        var symbol = l222;
-        var value = symbol.value;
-        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-        return value;
-    })()});
-    return ((l222).value = v750);
+    return l313;
 })();
-var l284 = {name: "GO"};
+var l318 = {name: "NULL-OR-QUOTED"};
 (function(){
-    var v751 = l45.fvalue(pv, l284, (function (values,v752){
+    (l318).fvalue = (function(v776){
+        ((v776)["fname"] = "NULL-OR-QUOTED");
+        return v776;
+    })((function (values,v774){
         checkArgs(arguments, 2);
         return (function(){
-            return (function(v753,v754){
-                (l13.fvalue(pv, v753) !== l5.value ? (function(){
-                    throw l149.fvalue(pv, "Unknown tag `", v754, "'.");
-                })() : l5.value);
-                return l183.fvalue(values, "(function(){", (function(){
-                    var symbol = l148;
-                    var value = symbol.value;
-                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                    return value;
-                })(), l187.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l192.fvalue(pv, v753)), ", ", "label: ", l41.fvalue(pv, l192.fvalue(pv, v753)), ", ", "message: 'Attempt to GO to non-existing tag ", v754, "'", "})", (function(){
-                    var symbol = l148;
+            return (function(v775){
+                return (v775 !== l5.value ? v775 : (((function(){
+                    var tmp = v774;
+                    return (typeof tmp == 'object' && 'car' in tmp);
+                })()?l4.value: l5.value) !== l5.value ? (((function(){
+                    var tmp = v774;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })() === (function(){
+                    var symbol = l302;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
-                })()), "})()");
-            })(l203.fvalue(pv, v752, (function(){
-                var symbol = l204;
+                })())?l4.value: l5.value) : l5.value));
+            })(l13.fvalue(pv, v774));
+        })();
+    }));
+    return l318;
+})();
+(function(){
+    (l314).fvalue = (function(v781){
+        ((v781)["fname"] = "BQ-ATTACH-APPEND");
+        return v781;
+    })((function (values,v777,v778,v779){
+        checkArgs(arguments, 4);
+        return (function(){
+            return ((l318.fvalue(pv, v778) !== l5.value ? l318.fvalue(pv, v779) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
+                var symbol = l302;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l201),(((function(){
-                var tmp = v752;
-                return (typeof tmp == 'object' && 'name' in tmp);
-            })()?l4.value: l5.value) !== l5.value ? (v752).name : (l86.fvalue(pv, v752) !== l5.value ? l18.fvalue(pv, v752) : l5.value)));
+            })(), l68.fvalue(pv, l35.fvalue(pv, v778), l35.fvalue(pv, v779))) : ((function(v780){
+                return (v780 !== l5.value ? v780 : ((v779 == (function(){
+                    var symbol = l303;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })())?l4.value: l5.value));
+            })(l13.fvalue(pv, v779)) !== l5.value ? (l311.fvalue(pv, v778) !== l5.value ? l47.fvalue(values, v777, v778) : v778) : ((((function(){
+                var tmp = v779;
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (((function(){
+                var tmp = v779;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === v777)?l4.value: l5.value) : l5.value) !== l5.value ? l85.fvalue(values, (function(){
+                var tmp = v779;
+                return tmp === l5.value? l5.value: tmp.car;
+            })(), v778, (function(){
+                var tmp = v779;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })()) : l47.fvalue(values, v777, v778, v779))));
         })();
     }));
-    var v755 = ({car: v751, cdr: (function(){
-        var symbol = l222;
-        var value = symbol.value;
-        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-        return value;
-    })()});
-    return ((l222).value = v755);
+    return l314;
 })();
-var l285 = {name: "UNWIND-PROTECT"};
 (function(){
-    var v756 = l45.fvalue(pv, l285, (function (values,v758){
-        checkArgsAtLeast(arguments, 2);
-        var v757= l5.value;
-        for (var i = arguments.length-1; i>=2; i--)
-            v757 = {car: arguments[i], cdr: 
-        v757};
+    (l315).fvalue = (function(v786){
+        ((v786)["fname"] = "BQ-ATTACH-CONSES");
+        return v786;
+    })((function (values,v782,v783){
+        checkArgs(arguments, 3);
         return (function(){
-            return l183.fvalue(values, "(function(){", (function(){
-                var symbol = l148;
+            return ((l104.fvalue(pv, (function(){
+                var symbol = l318;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), v782) !== l5.value ? l318.fvalue(pv, v783) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
+                var symbol = l302;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, "var ret = ", l185.fvalue(pv, l5.value), ";", (function(){
-                var symbol = l148;
+            })(), l68.fvalue(pv, l81.fvalue(pv, (function(){
+                var symbol = l35;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), v782), l35.fvalue(pv, v783))) : ((function(v784){
+                return (v784 !== l5.value ? v784 : ((v783 == (function(){
+                    var symbol = l303;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })())?l4.value: l5.value));
+            })(l13.fvalue(pv, v783)) !== l5.value ? ({car: (function(){
+                var symbol = l297;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "try {", (function(){
-                var symbol = l148;
+            })(), cdr: v782}) : ((((function(){
+                var tmp = v783;
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (function(v785){
+                return (v785 !== l5.value ? v785 : (((function(){
+                    var tmp = v783;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })() === (function(){
+                    var symbol = l299;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })())?l4.value: l5.value));
+            })((((function(){
+                var tmp = v783;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l297;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, "ret = ", l185.fvalue(pv, v758), ";", (function(){
-                var symbol = l148;
+            })())?l4.value: l5.value)) : l5.value) !== l5.value ? ({car: (function(){
+                var tmp = v783;
+                return tmp === l5.value? l5.value: tmp.car;
+            })(), cdr: l68.fvalue(pv, v782, (function(){
+                var tmp = v783;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })())}) : ({car: (function(){
+                var symbol = l299;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })()), "} finally {", (function(){
-                var symbol = l148;
+            })(), cdr: l68.fvalue(pv, v782, l47.fvalue(pv, v783))}))));
+        })();
+    }));
+    return l315;
+})();
+(function(){
+    (l308).fvalue = (function(v788){
+        ((v788)["fname"] = "BQ-REMOVE-TOKENS");
+        return v788;
+    })((function (values,v787){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (((v787 === (function(){
+                var symbol = l297;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, l246.fvalue(pv, v757)), "}", (function(){
-                var symbol = l148;
+            })())?l4.value: l5.value) !== l5.value ? l47 : (((v787 === (function(){
+                var symbol = l298;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "return ret;", (function(){
-                var symbol = l148;
+            })())?l4.value: l5.value) !== l5.value ? l68 : (((v787 === (function(){
+                var symbol = l300;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })()), "})()");
+            })())?l4.value: l5.value) !== l5.value ? l126 : (((v787 === (function(){
+                var symbol = l299;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())?l4.value: l5.value) !== l5.value ? l85 : (((v787 === (function(){
+                var symbol = l302;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())?l4.value: l5.value) !== l5.value ? l185 : (l48.fvalue(pv, v787) !== l5.value ? v787 : ((((function(){
+                var tmp = v787;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l301;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())?l4.value: l5.value) !== l5.value ? l308.fvalue(values, l35.fvalue(pv, v787)) : (((((function(){
+                var tmp = v787;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === (function(){
+                var symbol = l299;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())?l4.value: l5.value) !== l5.value ? (((function(){
+                var tmp = l37.fvalue(pv, v787);
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? l13.fvalue(pv, l40.fvalue(pv, v787)) : l5.value) : l5.value) !== l5.value ? ({car: l30, cdr: l310.fvalue(pv, (function(){
+                var symbol = l308;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), (function(){
+                var tmp = v787;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })())}) : l310.fvalue(values, (function(){
+                var symbol = l308;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), v787)))))))));
         })();
     }));
-    var v759 = ({car: v756, cdr: (function(){
-        var symbol = l222;
-        var value = symbol.value;
-        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-        return value;
-    })()});
-    return ((l222).value = v759);
+    return l308;
 })();
-var l286 = {name: "MULTIPLE-VALUE-CALL"};
+((l229).value = ({car: l47.fvalue(pv, l186, (function (values,v789){
+    checkArgs(arguments, 2);
+    return (function(){
+        return l192.fvalue(values, l305.fvalue(pv, v789));
+    })();
+})), cdr: (function(){
+    var symbol = l229;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l319 = {name: "*BUILTINS*"};
+(function(){
+    (((l319.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l319).value = l5.value));
+    return l319;
+})();
+var l320 = {name: "DEFINE-RAW-BUILTIN"};
+l320;
+var l321 = {name: "DEFINE-BUILTIN"};
+l321;
+var l322 = {name: "TYPE-CHECK"};
+l322;
+var l323 = {name: "VARIABLE-ARITY-CALL"};
+(function(){
+    (l323).fvalue = (function(v798){
+        ((v798)["fname"] = "VARIABLE-ARITY-CALL");
+        return v798;
+    })((function (values,v790,v791){
+        checkArgs(arguments, 3);
+        return (function(){
+            (((function(){
+                var tmp = v790;
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
+                throw "ARGS must be a non-empty list";
+            })());
+            return (function(v792,v793,v794){
+                (function(){
+                    return (function(v795,v796){
+                        (function(){
+                            while(v795 !== l5.value){
+                                (v796 = (function(){
+                                    var tmp = v795;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })());
+                                (function(){
+                                    (((typeof (v796) == "number")?l4.value: l5.value) !== l5.value ? (v793 = ({car: l19.fvalue(pv, v796), cdr: v793})) : (function(v797){
+                                        (v793 = ({car: v797, cdr: v793}));
+                                        return (v794 = l156.fvalue(pv, v794, l190.fvalue(pv, "var ", v797, " = ", l192.fvalue(pv, v796), ";", (function(){
+                                            var symbol = l155;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })(), "if (typeof ", v797, " !== 'number') throw 'Not a number!';", (function(){
+                                            var symbol = l155;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })())));
+                                    })(l190.fvalue(pv, "x", (v792 = (function(){
+                                        var x1 = v792;
+                                        if (typeof x1 !== 'number') throw 'Not a number!';
+                                        return x1+1;
+                                    })()))));
+                                    return l5.value;
+                                })();
+                                (v795 = (function(){
+                                    var tmp = v795;
+                                    return tmp === l5.value? l5.value: tmp.cdr;
+                                })());
+                            }return l5.value;
+                        })();
+                        return l5.value;
+                    })(v790,l5.value);
+                })();
+                return l190.fvalue(values, "(function(){", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l194.fvalue(pv, v794, (function(){
+                    var f = v791;
+                    return (typeof f === 'function'? f: f.fvalue)(pv, l70.fvalue(pv, v793))
+                })()), "})()");
+            })(0,l5,"");
+        })();
+    }));
+    return l323;
+})();
+var l324 = {name: "VARIABLE-ARITY"};
+l324;
+var l325 = {name: "NUM-OP-NUM"};
 (function(){
-    var v760 = l45.fvalue(pv, l286, (function (values,v762){
-        checkArgsAtLeast(arguments, 2);
-        var v761= l5.value;
-        for (var i = arguments.length-1; i>=2; i--)
-            v761 = {car: arguments[i], cdr: 
-        v761};
+    (l325).fvalue = (function(v802){
+        ((v802)["fname"] = "NUM-OP-NUM");
+        return v802;
+    })((function (values,v799,v800,v801){
+        checkArgs(arguments, 4);
+>>>>>>> backquote
         return (function(){
-            return l183.fvalue(values, "(function(){", (function(){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+<<<<<<< HEAD
+            })(), l187.fvalue(pv, "var id = ", l185.fvalue(pv, v723), ";", (function(){
                 var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, "var func = ", l185.fvalue(pv, v762), ";", (function(){
+            })(), "try {", (function(){
                 var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "var args = [", ((function(){
-                var symbol = l188;
+            })(), l187.fvalue(pv, l246.fvalue(pv, v722, l4.value)), (function(){
+                var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })() !== l5.value ? "values" : "pv"), "];", (function(){
+            })(), "}", (function(){
                 var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "return ", l183.fvalue(pv, "(function(){", (function(){
+            })(), "catch (cf){", (function(){
                 var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, "var values = mv;", (function(){
+            })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
                 var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), "var vs;", (function(){
+            })(), ((function(){
+                var symbol = l188;
+                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 = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l153.fvalue(pv, (function (values,v763){
-                checkArgs(arguments, 2);
-                return l183.fvalue(values, "vs = ", l185.fvalue(pv, v763, l4.value), ";", (function(){
-                    var symbol = l148;
-                    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 = l148;
-                    var value = symbol.value;
-                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                    return value;
-                })(), l187.fvalue(pv, "args = args.concat(vs);", (function(){
-                    var symbol = l148;
-                    var value = symbol.value;
-                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                    return value;
-                })()), "else", (function(){
-                    var symbol = l148;
-                    var value = symbol.value;
-                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                    return value;
-                })(), l187.fvalue(pv, "args.push(vs);", (function(){
-                    var symbol = l148;
-                    var value = symbol.value;
-                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                    return value;
-                })()));
-            }), v761), "return func.apply(window, args);", (function(){
+            })(), "    else", (function(){
                 var symbol = l148;
+=======
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v799, ";", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })()), "})()"), ";", (function(){
+            })()), l190.fvalue(pv, "var ", "y", " = ", v801, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", l190.fvalue(pv, "x", v800, "y"), ";", (function(){
+                var symbol = l155;
+>>>>>>> backquote
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "        throw cf;", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "}", (function(){
                 var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
@@ -6729,257 +11174,1776 @@ var l286 = {name: "MULTIPLE-VALUE-CALL"};
             })()), "})()");
         })();
     }));
-    var v764 = ({car: v760, cdr: (function(){
+<<<<<<< HEAD
+    var v724 = ({car: v721, cdr: (function(){
         var symbol = l222;
         var value = symbol.value;
         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
         return value;
     })()});
-    return ((l222).value = v764);
+    return ((l222).value = v724);
 })();
-var l287 = {name: "MULTIPLE-VALUE-PROG1"};
+var l277 = {name: "THROW"};
 (function(){
-    var v765 = l45.fvalue(pv, l287, (function (values,v767){
-        checkArgsAtLeast(arguments, 2);
-        var v766= l5.value;
-        for (var i = arguments.length-1; i>=2; i--)
-            v766 = {car: arguments[i], cdr: 
-        v766};
+    var v725 = l45.fvalue(pv, l277, (function (values,v726,v727){
+        checkArgs(arguments, 3);
         return (function(){
             return l183.fvalue(values, "(function(){", (function(){
                 var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, "var args = ", l185.fvalue(pv, v767, (function(){
-                var symbol = l188;
-                var value = symbol.value;
-                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                return value;
-            })()), ";", (function(){
-                var symbol = l148;
-                var value = symbol.value;
-                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                return value;
-            })(), l246.fvalue(pv, v766), "return args;", (function(){
+            })(), l187.fvalue(pv, "var values = mv;", (function(){
                 var symbol = l148;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })()), "})()");
+            })(), "throw ({", "type: 'catch', ", "id: ", l185.fvalue(pv, v726), ", ", "values: ", l185.fvalue(pv, v727, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
         })();
     }));
-    var v768 = ({car: v765, cdr: (function(){
+    var v728 = ({car: v725, cdr: (function(){
         var symbol = l222;
         var value = symbol.value;
         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
         return value;
     })()});
-    return ((l222).value = v768);
+    return ((l222).value = v728);
 })();
-var l288 = {name: "BACKQUOTE-EXPAND-1"};
+var l278 = {name: "*TAGBODY-COUNTER*"};
 (function(){
-    (l288).fvalue = (function(v771){
-        ((v771)["fname"] = "BACKQUOTE-EXPAND-1");
-        return v771;
-    })((function (values,v769){
-        checkArgs(arguments, 2);
-        return (function(){
-            return (((function(){
-                var tmp = v769;
-                return (typeof tmp == 'object' && 'name' in tmp);
-            })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l178, v769) : (l46.fvalue(pv, v769) !== l5.value ? v769 : ((((function(){
-                var tmp = v769;
-                return tmp === l5.value? l5.value: tmp.car;
-            })() === l181)?l4.value: l5.value) !== l5.value ? (function(){
-                var tmp = v769;
-                return tmp === l5.value? l5.value: tmp.car;
-            })() : ((((function(){
-                var tmp = v769;
-                return tmp === l5.value? l5.value: tmp.car;
-            })() === l179)?l4.value: l5.value) !== l5.value ? l288.fvalue(values, l288.fvalue(pv, l34.fvalue(pv, v769))) : ({car: l66, cdr: l79.fvalue(pv, (function (values,v770){
-                checkArgs(arguments, 2);
-                return ((l60.fvalue(pv, v770) !== l5.value ? (((function(){
-                    var tmp = v770;
-                    return tmp === l5.value? l5.value: tmp.car;
-                })() === l181)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v770)) : ((l60.fvalue(pv, v770) !== l5.value ? (((function(){
-                    var tmp = v770;
-                    return tmp === l5.value? l5.value: tmp.car;
-                })() === l180)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v770) : l45.fvalue(values, l45, l288.fvalue(pv, v770))));
-            }), v769)})))));
-        })();
-    }));
-    return l288;
+    (((l278.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l278).value = 0));
+    return l278;
 })();
-var l289 = {name: "BACKQUOTE-EXPAND"};
+var l279 = {name: "*GO-TAG-COUNTER*"};
 (function(){
-    (l289).fvalue = (function(v773){
-        ((v773)["fname"] = "BACKQUOTE-EXPAND");
-        return v773;
-    })((function (values,v772){
-        checkArgs(arguments, 2);
-        return (function(){
-            return ((l60.fvalue(pv, v772) !== l5.value ? (((function(){
-                var tmp = v772;
-                return tmp === l5.value? l5.value: tmp.car;
-            })() === l179)?l4.value: l5.value) : l5.value) !== l5.value ? l288.fvalue(values, l34.fvalue(pv, v772)) : v772);
-        })();
-    }));
-    return l289;
+    (((l279.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l279).value = 0));
+    return l279;
 })();
-l179;
+var l280 = {name: "GO-TAG-P"};
 (function(){
-    var v774 = l45.fvalue(pv, l179, (function (values,v775){
+    (l280).fvalue = (function(v731){
+        ((v731)["fname"] = "GO-TAG-P");
+        return v731;
+    })((function (values,v729){
         checkArgs(arguments, 2);
         return (function(){
-            return l185.fvalue(values, l288.fvalue(pv, v775));
+            return (function(v730){
+                return (v730 !== l5.value ? v730 : ((function(){
+                    var tmp = v729;
+                    return (typeof tmp == 'object' && 'name' in tmp);
+                })()?l4.value: l5.value));
+            })(l86.fvalue(pv, v729));
         })();
     }));
-    var v776 = ({car: v774, cdr: (function(){
-        var symbol = l222;
-        var value = symbol.value;
-        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-        return value;
-    })()});
-    return ((l222).value = v776);
-})();
-var l290 = {name: "*BUILTINS*"};
-(function(){
-    (((l290.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l290).value = l5.value));
-    return l290;
+    return l280;
 })();
-var l291 = {name: "DEFINE-RAW-BUILTIN"};
-l291;
-var l292 = {name: "DEFINE-BUILTIN"};
-l292;
-var l293 = {name: "TYPE-CHECK"};
-l293;
-var l294 = {name: "VARIABLE-ARITY-CALL"};
+var l281 = {name: "DECLARE-TAGBODY-TAGS"};
 (function(){
-    (l294).fvalue = (function(v789){
-        ((v789)["fname"] = "VARIABLE-ARITY-CALL");
-        return v789;
-    })((function (values,v777,v778){
+    (l281).fvalue = (function(v737){
+        ((v737)["fname"] = "DECLARE-TAGBODY-TAGS");
+        return v737;
+    })((function (values,v732,v733){
         checkArgs(arguments, 3);
         return (function(){
-            (((function(){
-                var tmp = v777;
-                return (typeof tmp == 'object' && 'car' in tmp);
-            })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
-                throw "ARGS must be a non-empty list";
-            })());
-            return (function(v779,v780,v781){
-                (function(){
-                    return (function(v782,v783){
-                        (function(){
-                            while(v782 !== l5.value){
-                                (v783 = (function(){
-                                    var tmp = v782;
-                                    return tmp === l5.value? l5.value: tmp.car;
-                                })());
-                                (function(){
-                                    (((typeof (v783) == "number")?l4.value: l5.value) !== l5.value ? (function(){
-                                        var v784 = l18.fvalue(pv, v783);
-                                        var v785 = ({car: v784, cdr: v780});
-                                        return (v780 = v785);
-                                    })() : (function(v786){
-                                        (function(){
-                                            var v787 = v786;
-                                            var v788 = ({car: v787, cdr: v780});
-                                            return (v780 = v788);
-                                        })();
-                                        return (v781 = l149.fvalue(pv, v781, l183.fvalue(pv, "var ", v786, " = ", l185.fvalue(pv, v783), ";", (function(){
-                                            var symbol = l148;
-                                            var value = symbol.value;
-                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                            return value;
-                                        })(), "if (typeof ", v786, " !== 'number') throw 'Not a number!';", (function(){
-                                            var symbol = l148;
-                                            var value = symbol.value;
-                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                                            return value;
-                                        })())));
-                                    })(l183.fvalue(pv, "x", (v779 = (function(){
-                                        var x1 = v779;
-                                        if (typeof x1 !== 'number') throw 'Not a number!';
-                                        return x1+1;
-                                    })()))));
-                                    return l5.value;
-                                })();
-                                (v782 = (function(){
-                                    var tmp = v782;
-                                    return tmp === l5.value? l5.value: tmp.cdr;
-                                })());
-                            }return l5.value;
-                        })();
-                        return l5.value;
-                    })(v777,l5.value);
-                })();
-                return l183.fvalue(values, "(function(){", (function(){
-                    var symbol = l148;
+            return (function(v736){
+                return l202.fvalue(values, v736, (function(){
+                    var symbol = l204;
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
-                })(), l187.fvalue(pv, v781, (function(){
-                    var f = v778;
-                    return (typeof f === 'function'? f: f.fvalue)(pv, l68.fvalue(pv, v780))
-                })()), "})()");
-            })(0,l5,"");
+                })(), l201);
+            })(l79.fvalue(pv, (function (values,v734){
+                checkArgs(arguments, 2);
+                return (function(v735){
+                    return l189.fvalue(values, v734, l201, l45.fvalue(pv, v732, v735));
+                })(l18.fvalue(pv, ((l279).value = (function(){
+                    var x1 = (function(){
+                        var symbol = l279;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })();
+                    if (typeof x1 !== 'number') throw 'Not a number!';
+                    return x1+1;
+                })())));
+            }), l96.fvalue(pv, (function(){
+                var symbol = l280;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), v733)));
         })();
     }));
-    return l294;
+    return l281;
 })();
-var l295 = {name: "VARIABLE-ARITY"};
-l295;
-var l296 = {name: "NUM-OP-NUM"};
+var l282 = {name: "TAGBODY"};
+var l283 = QIList(l5,l5);
 (function(){
-    (l296).fvalue = (function(v793){
-        ((v793)["fname"] = "NUM-OP-NUM");
-        return v793;
-    })((function (values,v790,v791,v792){
-        checkArgs(arguments, 4);
+    var v738 = l45.fvalue(pv, l282, (function (values){
+        var v739= l5.value;
+        for (var i = arguments.length-1; i>=1; i--)
+            v739 = {car: arguments[i], cdr: 
+        v739};
         return (function(){
-            return l183.fvalue(values, "(function(){", (function(){
-                var symbol = l148;
+            try {
+                (l100.fvalue(pv, (function(){
+                    var symbol = l280;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v739) !== l5.value ? l5.value : (function(){
+                    var values = mv;
+                    throw ({type: 'block', id: 230, values: l185.fvalue(values, ({car: l119, cdr: l66.fvalue(pv, v739, l283)})), message: 'Return from unknown block TAGBODY.'})
+                })());
+                (l280.fvalue(pv, (function(){
+                    var tmp = v739;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })()) !== l5.value ? l5.value : (function(){
+                    var v740 = l17.fvalue(pv, "START");
+                    var v741 = ({car: v740, cdr: v739});
+                    return (v739 = v741);
+                })());
+                return (function(v742){
+                    return (function(v744,v743){
+                        try {
+                            var tmp;
+                            tmp = l204.value;
+                            l204.value = v744;
+                            v744 = tmp;
+                            (function(v745){
+                                return (v743 = l41.fvalue(pv, l192.fvalue(pv, v745)));
+                            })(l203.fvalue(pv, l40.fvalue(pv, v739), (function(){
+                                var symbol = l204;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), l201));
+                            return l183.fvalue(values, "(function(){", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), l187.fvalue(pv, "var tagbody_", v742, " = ", v743, ";", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "tbloop:", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "while (true) {", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), l187.fvalue(pv, "try {", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), l187.fvalue(pv, (function(v746){
+                                return l183.fvalue(pv, "switch(tagbody_", v742, "){", (function(){
+                                    var symbol = l148;
+                                    var value = symbol.value;
+                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                    return value;
+                                })(), "case ", v743, ":", (function(){
+                                    var symbol = l148;
+                                    var value = symbol.value;
+                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                    return value;
+                                })(), (function(){
+                                    return (function(v747,v748){
+                                        (function(){
+                                            while(v747 !== l5.value){
+                                                (v748 = (function(){
+                                                    var tmp = v747;
+                                                    return tmp === l5.value? l5.value: tmp.car;
+                                                })());
+                                                (function(){
+                                                    (v746 = l149.fvalue(pv, v746, (l28.fvalue(pv, l280.fvalue(pv, v748)) !== l5.value ? l187.fvalue(pv, l185.fvalue(pv, v748), ";", (function(){
+                                                        var symbol = l148;
+                                                        var value = symbol.value;
+                                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                                        return value;
+                                                    })()) : (function(v749){
+                                                        return l183.fvalue(pv, "case ", l41.fvalue(pv, l192.fvalue(pv, v749)), ":", (function(){
+                                                            var symbol = l148;
+                                                            var value = symbol.value;
+                                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                                            return value;
+                                                        })());
+                                                    })(l203.fvalue(pv, v748, (function(){
+                                                        var symbol = l204;
+                                                        var value = symbol.value;
+                                                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                                        return value;
+                                                    })(), l201)))));
+                                                    return l5.value;
+                                                })();
+                                                (v747 = (function(){
+                                                    var tmp = v747;
+                                                    return tmp === l5.value? l5.value: tmp.cdr;
+                                                })());
+                                            }return l5.value;
+                                        })();
+                                        return v746;
+                                    })((function(){
+                                        var tmp = v739;
+                                        return tmp === l5.value? l5.value: tmp.cdr;
+                                    })(),l5.value);
+                                })(), "default:", (function(){
+                                    var symbol = l148;
+                                    var value = symbol.value;
+                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                    return value;
+                                })(), "    break tbloop;", (function(){
+                                    var symbol = l148;
+                                    var value = symbol.value;
+                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                    return value;
+                                })(), "}", (function(){
+                                    var symbol = l148;
+                                    var value = symbol.value;
+                                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                    return value;
+                                })());
+                            })("")), "}", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "catch (jump) {", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "    if (jump.type == 'tagbody' && jump.id == ", v742, ")", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "        tagbody_", v742, " = jump.label;", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "    else", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "        throw(jump);", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "}", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })()), "}", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })(), "return ", l185.fvalue(pv, l5.value), ";", (function(){
+                                var symbol = l148;
+                                var value = symbol.value;
+                                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                return value;
+                            })()), "})()");
+                        }
+                        finally {
+                            l204.value = v744;
+                        }
+                    })(l281.fvalue(pv, v742, v739),l5.value);
+                })((function(){
+                    var symbol = l278;
+=======
+    return l325;
+})();
+((l319).value = ({car: l47.fvalue(pv, l65, (function (values){
+    var v803= l5.value;
+    for (var i = arguments.length-1; i>=1; i--)
+        v803 = {car: arguments[i], cdr: 
+    v803};
+    return (function(){
+        return (l13.fvalue(pv, v803) !== l5.value ? "0" : l323.fvalue(values, v803, (function (values,v804){
+            checkArgs(arguments, 2);
+            return l190.fvalue(values, "return ", l158.fvalue(pv, v804, "+"), ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })());
+        })));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l66, (function (values,v806){
+    checkArgsAtLeast(arguments, 2);
+    var v805= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v805 = {car: arguments[i], cdr: 
+    v805};
+    return (function(){
+        return (function(v807){
+            return l323.fvalue(values, v807, (function (values,v808){
+                checkArgs(arguments, 2);
+                return l190.fvalue(values, "return ", (l13.fvalue(pv, v805) !== l5.value ? l156.fvalue(pv, "-", (function(){
+                    var tmp = v808;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })()) : l158.fvalue(pv, v808, "-")), ";", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })());
+            }));
+        })(({car: v806, cdr: v805}));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l22, (function (values){
+    var v809= l5.value;
+    for (var i = arguments.length-1; i>=1; i--)
+        v809 = {car: arguments[i], cdr: 
+    v809};
+    return (function(){
+        return (l13.fvalue(pv, v809) !== l5.value ? "1" : l323.fvalue(values, v809, (function (values,v810){
+            checkArgs(arguments, 2);
+            return l190.fvalue(values, "return ", l158.fvalue(pv, v810, "*"), ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })());
+        })));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l23, (function (values,v812){
+    checkArgsAtLeast(arguments, 2);
+    var v811= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v811 = {car: arguments[i], cdr: 
+    v811};
+    return (function(){
+        return (function(v813){
+            return l323.fvalue(values, v813, (function (values,v814){
+                checkArgs(arguments, 2);
+                return l190.fvalue(values, "return ", (l13.fvalue(pv, v811) !== l5.value ? l156.fvalue(pv, "1 /", (function(){
+                    var tmp = v814;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })()) : l158.fvalue(pv, v814, "/")), ";", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })());
+            }));
+        })(({car: v812, cdr: v811}));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l326 = {name: "MOD"};
+((l319).value = ({car: l47.fvalue(pv, l326, (function (values,v815,v816){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v817,v818){
+            return l325.fvalue(values, v817, "%", v818);
+        })(l192.fvalue(pv, v815),l192.fvalue(pv, v816));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l327 = {name: "COMPARISON-CONJUNTION"};
+(function(){
+    (l327).fvalue = (function(v821){
+        ((v821)["fname"] = "COMPARISON-CONJUNTION");
+        return v821;
+    })((function (values,v819,v820){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (l13.fvalue(pv, (function(){
+                var tmp = v819;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })()) !== l5.value ? "true" : (l13.fvalue(pv, l37.fvalue(pv, v819)) !== l5.value ? l156.fvalue(values, (function(){
+                var tmp = v819;
+                return tmp === l5.value? l5.value: tmp.car;
+            })(), v820, l35.fvalue(pv, v819)) : l156.fvalue(values, (function(){
+                var tmp = v819;
+                return tmp === l5.value? l5.value: tmp.car;
+            })(), v820, l35.fvalue(pv, v819), " && ", l327.fvalue(pv, (function(){
+                var tmp = v819;
+                return tmp === l5.value? l5.value: tmp.cdr;
+            })(), v820))));
+        })();
+    }));
+    return l327;
+})();
+var l328 = {name: "DEFINE-BUILTIN-COMPARISON"};
+l328;
+var l329 = {name: ">"};
+((l319).value = ({car: l47.fvalue(pv, l329, (function (values,v823){
+    checkArgsAtLeast(arguments, 2);
+    var v822= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v822 = {car: arguments[i], cdr: 
+    v822};
+    return (function(){
+        return (function(v824){
+            return l323.fvalue(values, v824, (function (values,v825){
+                checkArgs(arguments, 2);
+                return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v825, ">")), ";", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })());
+            }));
+        })(({car: v823, cdr: v822}));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l330 = {name: "<"};
+((l319).value = ({car: l47.fvalue(pv, l330, (function (values,v827){
+    checkArgsAtLeast(arguments, 2);
+    var v826= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v826 = {car: arguments[i], cdr: 
+    v826};
+    return (function(){
+        return (function(v828){
+            return l323.fvalue(values, v828, (function (values,v829){
+                checkArgs(arguments, 2);
+                return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v829, "<")), ";", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })());
+            }));
+        })(({car: v827, cdr: v826}));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l331 = {name: ">="};
+((l319).value = ({car: l47.fvalue(pv, l331, (function (values,v831){
+    checkArgsAtLeast(arguments, 2);
+    var v830= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v830 = {car: arguments[i], cdr: 
+    v830};
+    return (function(){
+        return (function(v832){
+            return l323.fvalue(values, v832, (function (values,v833){
+                checkArgs(arguments, 2);
+                return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v833, ">=")), ";", (function(){
+                    var symbol = l155;
+>>>>>>> backquote
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })());
+<<<<<<< HEAD
+            }
+            catch (cf){
+                if (cf.type == 'block' && cf.id == 230)
+                    return values.apply(this, forcemv(cf.values));
+                else
+                    throw cf;
+            }
+        })();
+    }));
+    var v750 = ({car: v738, cdr: (function(){
+        var symbol = l222;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()});
+    return ((l222).value = v750);
+})();
+var l284 = {name: "GO"};
+(function(){
+    var v751 = l45.fvalue(pv, l284, (function (values,v752){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v753,v754){
+                (l13.fvalue(pv, v753) !== l5.value ? (function(){
+                    throw l149.fvalue(pv, "Unknown tag `", v754, "'.");
+                })() : l5.value);
+                return l183.fvalue(values, "(function(){", (function(){
+                    var symbol = l148;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l187.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l192.fvalue(pv, v753)), ", ", "label: ", l41.fvalue(pv, l192.fvalue(pv, v753)), ", ", "message: 'Attempt to GO to non-existing tag ", v754, "'", "})", (function(){
+                    var symbol = l148;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })()), "})()");
+            })(l203.fvalue(pv, v752, (function(){
+                var symbol = l204;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l201),(((function(){
+                var tmp = v752;
+                return (typeof tmp == 'object' && 'name' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (v752).name : (l86.fvalue(pv, v752) !== l5.value ? l18.fvalue(pv, v752) : l5.value)));
+        })();
+    }));
+    var v755 = ({car: v751, cdr: (function(){
+        var symbol = l222;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()});
+    return ((l222).value = v755);
+})();
+var l285 = {name: "UNWIND-PROTECT"};
+(function(){
+    var v756 = l45.fvalue(pv, l285, (function (values,v758){
+        checkArgsAtLeast(arguments, 2);
+        var v757= l5.value;
+        for (var i = arguments.length-1; i>=2; i--)
+            v757 = {car: arguments[i], cdr: 
+        v757};
+        return (function(){
+            return l183.fvalue(values, "(function(){", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, "var ret = ", l185.fvalue(pv, l5.value), ";", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "try {", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, "ret = ", l185.fvalue(pv, v758), ";", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "} finally {", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, l246.fvalue(pv, v757)), "}", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return ret;", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })();
+    }));
+    var v759 = ({car: v756, cdr: (function(){
+        var symbol = l222;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()});
+    return ((l222).value = v759);
+})();
+var l286 = {name: "MULTIPLE-VALUE-CALL"};
+(function(){
+    var v760 = l45.fvalue(pv, l286, (function (values,v762){
+        checkArgsAtLeast(arguments, 2);
+        var v761= l5.value;
+        for (var i = arguments.length-1; i>=2; i--)
+            v761 = {car: arguments[i], cdr: 
+        v761};
+        return (function(){
+            return l183.fvalue(values, "(function(){", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, "var func = ", l185.fvalue(pv, v762), ";", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "var args = [", ((function(){
+                var symbol = l188;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })() !== l5.value ? "values" : "pv"), "];", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return ", l183.fvalue(pv, "(function(){", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, "var values = mv;", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "var vs;", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l153.fvalue(pv, (function (values,v763){
+                checkArgs(arguments, 2);
+                return l183.fvalue(values, "vs = ", l185.fvalue(pv, v763, l4.value), ";", (function(){
+                    var symbol = l148;
+                    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 = l148;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l187.fvalue(pv, "args = args.concat(vs);", (function(){
+                    var symbol = l148;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })()), "else", (function(){
+                    var symbol = l148;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l187.fvalue(pv, "args.push(vs);", (function(){
+                    var symbol = l148;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })()));
+            }), v761), "return func.apply(window, args);", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()"), ";", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })();
+    }));
+    var v764 = ({car: v760, cdr: (function(){
+        var symbol = l222;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()});
+    return ((l222).value = v764);
+})();
+var l287 = {name: "MULTIPLE-VALUE-PROG1"};
+(function(){
+    var v765 = l45.fvalue(pv, l287, (function (values,v767){
+        checkArgsAtLeast(arguments, 2);
+        var v766= l5.value;
+        for (var i = arguments.length-1; i>=2; i--)
+            v766 = {car: arguments[i], cdr: 
+        v766};
+        return (function(){
+            return l183.fvalue(values, "(function(){", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, "var args = ", l185.fvalue(pv, v767, (function(){
+                var symbol = l188;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), ";", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l246.fvalue(pv, v766), "return args;", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })();
+    }));
+    var v768 = ({car: v765, cdr: (function(){
+        var symbol = l222;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()});
+    return ((l222).value = v768);
+})();
+var l288 = {name: "BACKQUOTE-EXPAND-1"};
+(function(){
+    (l288).fvalue = (function(v771){
+        ((v771)["fname"] = "BACKQUOTE-EXPAND-1");
+        return v771;
+    })((function (values,v769){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (((function(){
+                var tmp = v769;
+                return (typeof tmp == 'object' && 'name' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l178, v769) : (l46.fvalue(pv, v769) !== l5.value ? v769 : ((((function(){
+                var tmp = v769;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === l181)?l4.value: l5.value) !== l5.value ? (function(){
+                var tmp = v769;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() : ((((function(){
+                var tmp = v769;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === l179)?l4.value: l5.value) !== l5.value ? l288.fvalue(values, l288.fvalue(pv, l34.fvalue(pv, v769))) : ({car: l66, cdr: l79.fvalue(pv, (function (values,v770){
+                checkArgs(arguments, 2);
+                return ((l60.fvalue(pv, v770) !== l5.value ? (((function(){
+                    var tmp = v770;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })() === l181)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v770)) : ((l60.fvalue(pv, v770) !== l5.value ? (((function(){
+                    var tmp = v770;
+                    return tmp === l5.value? l5.value: tmp.car;
+                })() === l180)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v770) : l45.fvalue(values, l45, l288.fvalue(pv, v770))));
+            }), v769)})))));
+        })();
+    }));
+    return l288;
+})();
+var l289 = {name: "BACKQUOTE-EXPAND"};
+(function(){
+    (l289).fvalue = (function(v773){
+        ((v773)["fname"] = "BACKQUOTE-EXPAND");
+        return v773;
+    })((function (values,v772){
+        checkArgs(arguments, 2);
+        return (function(){
+            return ((l60.fvalue(pv, v772) !== l5.value ? (((function(){
+                var tmp = v772;
+                return tmp === l5.value? l5.value: tmp.car;
+            })() === l179)?l4.value: l5.value) : l5.value) !== l5.value ? l288.fvalue(values, l34.fvalue(pv, v772)) : v772);
+        })();
+    }));
+    return l289;
+})();
+l179;
+(function(){
+    var v774 = l45.fvalue(pv, l179, (function (values,v775){
+        checkArgs(arguments, 2);
+        return (function(){
+            return l185.fvalue(values, l288.fvalue(pv, v775));
+        })();
+    }));
+    var v776 = ({car: v774, cdr: (function(){
+        var symbol = l222;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()});
+    return ((l222).value = v776);
+})();
+var l290 = {name: "*BUILTINS*"};
+(function(){
+    (((l290.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l290).value = l5.value));
+    return l290;
+})();
+var l291 = {name: "DEFINE-RAW-BUILTIN"};
+l291;
+var l292 = {name: "DEFINE-BUILTIN"};
+l292;
+var l293 = {name: "TYPE-CHECK"};
+l293;
+var l294 = {name: "VARIABLE-ARITY-CALL"};
+(function(){
+    (l294).fvalue = (function(v789){
+        ((v789)["fname"] = "VARIABLE-ARITY-CALL");
+        return v789;
+    })((function (values,v777,v778){
+        checkArgs(arguments, 3);
+        return (function(){
+            (((function(){
+                var tmp = v777;
+                return (typeof tmp == 'object' && 'car' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
+                throw "ARGS must be a non-empty list";
+            })());
+            return (function(v779,v780,v781){
+                (function(){
+                    return (function(v782,v783){
+                        (function(){
+                            while(v782 !== l5.value){
+                                (v783 = (function(){
+                                    var tmp = v782;
+                                    return tmp === l5.value? l5.value: tmp.car;
+                                })());
+                                (function(){
+                                    (((typeof (v783) == "number")?l4.value: l5.value) !== l5.value ? (function(){
+                                        var v784 = l18.fvalue(pv, v783);
+                                        var v785 = ({car: v784, cdr: v780});
+                                        return (v780 = v785);
+                                    })() : (function(v786){
+                                        (function(){
+                                            var v787 = v786;
+                                            var v788 = ({car: v787, cdr: v780});
+                                            return (v780 = v788);
+                                        })();
+                                        return (v781 = l149.fvalue(pv, v781, l183.fvalue(pv, "var ", v786, " = ", l185.fvalue(pv, v783), ";", (function(){
+                                            var symbol = l148;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })(), "if (typeof ", v786, " !== 'number') throw 'Not a number!';", (function(){
+                                            var symbol = l148;
+                                            var value = symbol.value;
+                                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                                            return value;
+                                        })())));
+                                    })(l183.fvalue(pv, "x", (v779 = (function(){
+                                        var x1 = v779;
+                                        if (typeof x1 !== 'number') throw 'Not a number!';
+                                        return x1+1;
+                                    })()))));
+                                    return l5.value;
+                                })();
+                                (v782 = (function(){
+                                    var tmp = v782;
+                                    return tmp === l5.value? l5.value: tmp.cdr;
+                                })());
+                            }return l5.value;
+                        })();
+                        return l5.value;
+                    })(v777,l5.value);
+                })();
+                return l183.fvalue(values, "(function(){", (function(){
+                    var symbol = l148;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })(), l187.fvalue(pv, v781, (function(){
+                    var f = v778;
+                    return (typeof f === 'function'? f: f.fvalue)(pv, l68.fvalue(pv, v780))
+                })()), "})()");
+            })(0,l5,"");
+        })();
+    }));
+    return l294;
+})();
+var l295 = {name: "VARIABLE-ARITY"};
+l295;
+var l296 = {name: "NUM-OP-NUM"};
+(function(){
+    (l296).fvalue = (function(v793){
+        ((v793)["fname"] = "NUM-OP-NUM");
+        return v793;
+    })((function (values,v790,v791,v792){
+        checkArgs(arguments, 4);
+        return (function(){
+            return l183.fvalue(values, "(function(){", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, l183.fvalue(pv, "var ", "x", " = ", v790, ";", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l183.fvalue(pv, "var ", "y", " = ", v792, ";", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l183.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l183.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l187.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
+                var symbol = l148;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l183.fvalue(pv, "return ", l183.fvalue(pv, "x", v791, "y"), ";", (function(){
+                var symbol = l148;
+=======
+            }));
+        })(({car: v831, cdr: v830}));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l332 = {name: "<="};
+((l319).value = ({car: l47.fvalue(pv, l332, (function (values,v835){
+    checkArgsAtLeast(arguments, 2);
+    var v834= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v834 = {car: arguments[i], cdr: 
+    v834};
+    return (function(){
+        return (function(v836){
+            return l323.fvalue(values, v836, (function (values,v837){
+                checkArgs(arguments, 2);
+                return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v837, "<=")), ";", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })());
+            }));
+        })(({car: v835, cdr: v834}));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l21, (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 (function(v840){
+            return l323.fvalue(values, v840, (function (values,v841){
+                checkArgs(arguments, 2);
+                return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v841, "==")), ";", (function(){
+                    var symbol = l155;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })());
+            }));
+        })(({car: v839, cdr: v838}));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l333 = {name: "NUMBERP"};
+((l319).value = ({car: l47.fvalue(pv, l333, (function (values,v842){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v843){
+            return l191.fvalue(values, l190.fvalue(pv, "(typeof (", v843, ") == \"number\")"));
+        })(l192.fvalue(pv, v842));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l334 = {name: "FLOOR"};
+((l319).value = ({car: l47.fvalue(pv, l334, (function (values,v844){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v845){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v845, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v844));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l30, (function (values,v846,v847){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v848,v849){
+            return l190.fvalue(values, "({car: ", v848, ", cdr: ", v849, "})");
+        })(l192.fvalue(pv, v846),l192.fvalue(pv, v847));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l31, (function (values,v850){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v851){
+            return l191.fvalue(values, l190.fvalue(pv, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var tmp = ", v851, ";", (function(){
+                var symbol = l155;
+                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 = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()"));
+        })(l192.fvalue(pv, v850));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l32, (function (values,v852){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v853){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var tmp = ", v853, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return tmp === ", l192.fvalue(pv, l5.value), "? ", l192.fvalue(pv, l5.value), ": tmp.car;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v852));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l33, (function (values,v854){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v855){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var tmp = ", v855, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return tmp === ", l192.fvalue(pv, l5.value), "? ", l192.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v854));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l123, (function (values,v856,v857){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v858,v859){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v858, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", l190.fvalue(pv, "(x.car = ", v859, ", x)"), ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v856),l192.fvalue(pv, v857));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l124, (function (values,v860,v861){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v862,v863){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v862, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", l190.fvalue(pv, "(x.cdr = ", v863, ", x)"), ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v860),l192.fvalue(pv, v861));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l335 = {name: "SYMBOLP"};
+((l319).value = ({car: l47.fvalue(pv, l335, (function (values,v864){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v865){
+            return l191.fvalue(values, l190.fvalue(pv, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var tmp = ", v865, ";", (function(){
+                var symbol = l155;
+                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 = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()"));
+        })(l192.fvalue(pv, v864));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l336 = {name: "MAKE-SYMBOL"};
+((l319).value = ({car: l47.fvalue(pv, l336, (function (values,v866){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v867){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "name", " = ", v867, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", "({name: name})", ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v866));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l337 = {name: "SYMBOL-NAME"};
+((l319).value = ({car: l47.fvalue(pv, l337, (function (values,v868){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v869){
+            return l190.fvalue(values, "(", v869, ").name");
+        })(l192.fvalue(pv, v868));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l255, (function (values,v870,v871){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v872,v873){
+            return l190.fvalue(values, "(", v872, ").value = ", v873);
+        })(l192.fvalue(pv, v870),l192.fvalue(pv, v871));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l338 = {name: "FSET"};
+((l319).value = ({car: l47.fvalue(pv, l338, (function (values,v874,v875){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v876,v877){
+            return l190.fvalue(values, "(", v876, ").fvalue = ", v877);
+        })(l192.fvalue(pv, v874),l192.fvalue(pv, v875));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l20, (function (values,v878){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v879){
+            return l191.fvalue(values, l190.fvalue(pv, "(", v879, ".value !== undefined)"));
+        })(l192.fvalue(pv, v878));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l339 = {name: "SYMBOL-VALUE"};
+((l319).value = ({car: l47.fvalue(pv, l339, (function (values,v880){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v881){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var symbol = ", v881, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "var value = symbol.value;", (function(){
+                var symbol = l155;
+                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 = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return value;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v880));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l263, (function (values,v882){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v883){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var symbol = ", v883, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "var func = symbol.fvalue;", (function(){
+                var symbol = l155;
+                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 = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return func;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v882));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l340 = {name: "SYMBOL-PLIST"};
+((l319).value = ({car: l47.fvalue(pv, l340, (function (values,v884){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v885){
+            return l190.fvalue(values, "((", v885, ").plist || ", l192.fvalue(pv, l5.value), ")");
+        })(l192.fvalue(pv, v884));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l341 = {name: "LAMBDA-CODE"};
+((l319).value = ({car: l47.fvalue(pv, l341, (function (values,v886){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v887){
+            return l190.fvalue(values, "(", v887, ").toString()");
+        })(l192.fvalue(pv, v886));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l342 = {name: "EQ"};
+((l319).value = ({car: l47.fvalue(pv, l342, (function (values,v888,v889){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v890,v891){
+            return l191.fvalue(values, l190.fvalue(pv, "(", v890, " === ", v891, ")"));
+        })(l192.fvalue(pv, v888),l192.fvalue(pv, v889));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l343 = {name: "EQUAL"};
+((l319).value = ({car: l47.fvalue(pv, l343, (function (values,v892,v893){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v894,v895){
+            return l191.fvalue(values, l190.fvalue(pv, "(", v894, " == ", v895, ")"));
+        })(l192.fvalue(pv, v892),l192.fvalue(pv, v893));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l344 = {name: "CHAR-TO-STRING"};
+((l319).value = ({car: l47.fvalue(pv, l344, (function (values,v896){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v897){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v897, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v896));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l345 = {name: "STRINGP"};
+((l319).value = ({car: l47.fvalue(pv, l345, (function (values,v898){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v899){
+            return l191.fvalue(values, l190.fvalue(pv, "(typeof(", v899, ") == \"string\")"));
+        })(l192.fvalue(pv, v898));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l346 = {name: "STRING-UPCASE"};
+((l319).value = ({car: l47.fvalue(pv, l346, (function (values,v900){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v901){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v901, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, l183.fvalue(pv, "var ", "x", " = ", v790, ";", (function(){
-                var symbol = l148;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })()), l183.fvalue(pv, "var ", "y", " = ", v792, ";", (function(){
-                var symbol = l148;
+            })())), l190.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })()), l183.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
-                var symbol = l148;
+            })())), "})()");
+        })(l192.fvalue(pv, v900));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l347 = {name: "STRING-LENGTH"};
+((l319).value = ({car: l47.fvalue(pv, l347, (function (values,v902){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v903){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
-                var symbol = l148;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v903, ";", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })())), l183.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
-                var symbol = l148;
+            })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l187.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
-                var symbol = l148;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
+                var symbol = l155;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })())), l183.fvalue(pv, "return ", l183.fvalue(pv, "x", v791, "y"), ";", (function(){
-                var symbol = l148;
+            })())), l190.fvalue(pv, "return ", "x.length", ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v902));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l348 = {name: "SLICE"};
+((l319).value = ({car: l47.fvalue(pv, l348, (function (values,v904,v905,v906){
+    checkArgsAtLeast(arguments, 3);
+    checkArgsAtMost(arguments, 4);
+    var v906; 
+    switch(arguments.length-1){
+    case 2:
+        v906=l5.value;
+    default: break;
+    }
+    return (function(){
+        return l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "var str = ", l192.fvalue(pv, v904), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "var a = ", l192.fvalue(pv, v905), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "var b;", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), (v906 !== l5.value ? l190.fvalue(pv, "b = ", l192.fvalue(pv, v906), ";", (function(){
+            var symbol = l155;
+            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 = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })()), "})()");
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l349 = {name: "CHAR"};
+((l319).value = ({car: l47.fvalue(pv, l349, (function (values,v907,v908){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v909,v910){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "string", " = ", v909, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "var ", "index", " = ", v910, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v907),l192.fvalue(pv, v908));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l76, (function (values,v911,v912){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v913,v914){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "string1", " = ", v913, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "var ", "string2", " = ", v914, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
+                var symbol = l155;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })())), "})()");
+<<<<<<< HEAD
         })();
     }));
     return l296;
@@ -8680,6 +14644,235 @@ var l335 = {name: "ASET"};
 (function(){
     var v1046 = l45.fvalue(pv, l335, (function (values,v1047,v1048,v1049){
         checkArgs(arguments, 4);
+=======
+        })(l192.fvalue(pv, v911),l192.fvalue(pv, v912));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l350 = {name: "FUNCALL"};
+((l319).value = ({car: l47.fvalue(pv, l350, (function (values,v916){
+    checkArgsAtLeast(arguments, 2);
+    var v915= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v915 = {car: arguments[i], cdr: 
+    v915};
+    return (function(){
+        return l190.fvalue(values, "(function(){", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), l194.fvalue(pv, "var f = ", l192.fvalue(pv, v916), ";", (function(){
+            var symbol = l155;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })(), "return (typeof f === 'function'? f: f.fvalue)(", l158.fvalue(pv, ({car: ((function(){
+            var symbol = l195;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
+            var symbol = l192;
+            var func = symbol.fvalue;
+            if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+            return func;
+        })(), v915)}), ", "), ")"), "})()");
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l351 = {name: "APPLY"};
+((l319).value = ({car: l47.fvalue(pv, l351, (function (values,v918){
+    checkArgsAtLeast(arguments, 2);
+    var v917= l5.value;
+    for (var i = arguments.length-1; i>=2; i--)
+        v917 = {car: arguments[i], cdr: 
+    v917};
+    return (function(){
+        return (l13.fvalue(pv, v917) !== l5.value ? l190.fvalue(values, "(", l192.fvalue(pv, v918), ")()") : (function(v919,v920){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var f = ", l192.fvalue(pv, v918), ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "var args = [", l158.fvalue(pv, ({car: ((function(){
+                var symbol = l195;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
+                var symbol = l192;
+                var func = symbol.fvalue;
+                if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                return func;
+            })(), v919)}), ", "), "];", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "var tail = (", l192.fvalue(pv, v920), ");", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "while (tail != ", l192.fvalue(pv, l5.value), "){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "    args.push(tail.car);", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "    tail = tail.cdr;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "}", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return (typeof f === 'function'? f : f.fvalue).apply(this, args);", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l95.fvalue(pv, v917),(function(){
+            var tmp = l94.fvalue(pv, v917);
+            return tmp === l5.value? l5.value: tmp.car;
+        })()));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l352 = {name: "JS-EVAL"};
+((l319).value = ({car: l47.fvalue(pv, l352, (function (values,v921){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v922){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "string", " = ", v922, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", ((function(){
+                var symbol = l195;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })() !== l5.value ? l190.fvalue(pv, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
+                var symbol = l155;
+                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 = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "v = [v];", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "v['multiple-value'] = true;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "}", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return values.apply(this, v);", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v921));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l353 = {name: "ERROR"};
+((l319).value = ({car: l47.fvalue(pv, l353, (function (values,v923){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v924){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw ", v924, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v923));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l354 = {name: "NEW"};
+((l319).value = ({car: l47.fvalue(pv, l354, (function (values){
+    checkArgsAtMost(arguments, 1);
+    return (function(){
+>>>>>>> backquote
         return (function(){
             return (function(v1050,v1051,v1052){
                 return l183.fvalue(values, "(function(){", (function(){
@@ -8710,6 +14903,7 @@ var l335 = {name: "ASET"};
                 })()), "})()");
             })(l185.fvalue(pv, v1047),l185.fvalue(pv, v1048),l185.fvalue(pv, v1049));
         })();
+<<<<<<< HEAD
     }));
     var v1053 = ({car: v1046, cdr: (function(){
         var symbol = l290;
@@ -8742,36 +14936,325 @@ var l337 = {name: "VALUES-ARRAY"};
     var v1056 = l45.fvalue(pv, l337, (function (values,v1057){
         checkArgs(arguments, 2);
         return (function(){
-            return (function(v1058){
-                return ((function(){
-                    var symbol = l188;
-                    var value = symbol.value;
-                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-                    return value;
-                })() !== l5.value ? l183.fvalue(values, "values.apply(this, ", v1058, ")") : l183.fvalue(values, "pv.apply(this, ", v1058, ")"));
-            })(l185.fvalue(pv, v1057));
+            return (function(v1058){
+                return ((function(){
+                    var symbol = l188;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })() !== l5.value ? l183.fvalue(values, "values.apply(this, ", v1058, ")") : l183.fvalue(values, "pv.apply(this, ", v1058, ")"));
+            })(l185.fvalue(pv, v1057));
+        })();
+    }));
+    var v1059 = ({car: v1056, cdr: (function(){
+        var symbol = l290;
+        var value = symbol.value;
+        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+        return value;
+    })()});
+    return ((l290).value = v1059);
+})();
+(function(){
+    var v1060 = l45.fvalue(pv, l157, (function (values){
+        var v1061= l5.value;
+        for (var i = arguments.length-1; i>=1; i--)
+            v1061 = {car: arguments[i], cdr: 
+        v1061};
+        return (function(){
+=======
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l355 = {name: "OBJECTP"};
+((l319).value = ({car: l47.fvalue(pv, l355, (function (values,v925){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v926){
+            return l191.fvalue(values, l190.fvalue(pv, "(typeof (", v926, ") === 'object')"));
+        })(l192.fvalue(pv, v925));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l356 = {name: "OGET"};
+((l319).value = ({car: l47.fvalue(pv, l356, (function (values,v927,v928){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v929,v930){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var tmp = ", "(", v929, ")[", v930, "];", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return tmp == undefined? ", l192.fvalue(pv, l5.value), ": tmp ;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v927),l192.fvalue(pv, v928));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l357 = {name: "OSET"};
+((l319).value = ({car: l47.fvalue(pv, l357, (function (values,v931,v932,v933){
+    checkArgs(arguments, 4);
+    return (function(){
+        return (function(v934,v935,v936){
+            return l190.fvalue(values, "((", v934, ")[", v935, "] = ", v936, ")");
+        })(l192.fvalue(pv, v931),l192.fvalue(pv, v932),l192.fvalue(pv, v933));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l358 = {name: "IN"};
+((l319).value = ({car: l47.fvalue(pv, l358, (function (values,v937,v938){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v939,v940){
+            return l191.fvalue(values, l190.fvalue(pv, "((", v939, ") in (", v940, "))"));
+        })(l192.fvalue(pv, v937),l192.fvalue(pv, v938));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l359 = {name: "FUNCTIONP"};
+((l319).value = ({car: l47.fvalue(pv, l359, (function (values,v941){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v942){
+            return l191.fvalue(values, l190.fvalue(pv, "(typeof ", v942, " == 'function')"));
+        })(l192.fvalue(pv, v941));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l360 = {name: "WRITE-STRING"};
+((l319).value = ({car: l47.fvalue(pv, l360, (function (values,v943){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v944){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v944, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), l190.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })())), "})()");
+        })(l192.fvalue(pv, v943));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l361 = {name: "MAKE-ARRAY"};
+((l319).value = ({car: l47.fvalue(pv, l361, (function (values,v945){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v946){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var r = [];", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "for (var i = 0; i < ", v946, "; i++)", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "r.push(", l192.fvalue(pv, l5.value), ");", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "return r;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v945));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l362 = {name: "ARRAYP"};
+((l319).value = ({car: l47.fvalue(pv, l362, (function (values,v947){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v948){
+            return l191.fvalue(values, l190.fvalue(pv, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var x = ", v948, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
+        })(l192.fvalue(pv, v947));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l363 = {name: "AREF"};
+((l319).value = ({car: l47.fvalue(pv, l363, (function (values,v949,v950){
+    checkArgs(arguments, 3);
+    return (function(){
+        return (function(v951,v952){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var x = ", "(", v951, ")[", v952, "];", (function(){
+                var symbol = l155;
+                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 = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return x;", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v949),l192.fvalue(pv, v950));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l364 = {name: "ASET"};
+((l319).value = ({car: l47.fvalue(pv, l364, (function (values,v953,v954,v955){
+    checkArgs(arguments, 4);
+    return (function(){
+        return (function(v956,v957,v958){
+            return l190.fvalue(values, "(function(){", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), l194.fvalue(pv, "var x = ", v956, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "var i = ", v957, ";", (function(){
+                var symbol = l155;
+                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 = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })(), "return x[i] = ", v958, ";", (function(){
+                var symbol = l155;
+                var value = symbol.value;
+                if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                return value;
+            })()), "})()");
+        })(l192.fvalue(pv, v953),l192.fvalue(pv, v954),l192.fvalue(pv, v955));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l365 = {name: "GET-UNIX-TIME"};
+((l319).value = ({car: l47.fvalue(pv, l365, (function (values){
+    checkArgsAtMost(arguments, 1);
+    return (function(){
+        return (function(){
+            return l190.fvalue(values, "(Math.round(new Date() / 1000))");
         })();
-    }));
-    var v1059 = ({car: v1056, cdr: (function(){
-        var symbol = l290;
-        var value = symbol.value;
-        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
-        return value;
-    })()});
-    return ((l290).value = v1059);
-})();
-(function(){
-    var v1060 = l45.fvalue(pv, l157, (function (values){
-        var v1061= l5.value;
-        for (var i = arguments.length-1; i>=1; i--)
-            v1061 = {car: arguments[i], cdr: 
-        v1061};
-        return (function(){
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+var l366 = {name: "VALUES-ARRAY"};
+((l319).value = ({car: l47.fvalue(pv, l366, (function (values,v959){
+    checkArgs(arguments, 2);
+    return (function(){
+        return (function(v960){
+>>>>>>> backquote
             return ((function(){
-                var symbol = l188;
+                var symbol = l195;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
+<<<<<<< HEAD
             })() !== l5.value ? l183.fvalue(values, "values(", l151.fvalue(pv, l79.fvalue(pv, (function(){
                 var symbol = l185;
                 var func = symbol.fvalue;
@@ -8807,15 +15290,70 @@ var l337 = {name: "VALUES-ARRAY"};
                 return (((l191.fvalue(pv, v1064) === l214)?l4.value: l5.value) !== l5.value ? v1064 : l5.value);
             })(l203.fvalue(pv, v1063, (function(){
                 var symbol = l204;
+=======
+            })() !== l5.value ? l190.fvalue(values, "values.apply(this, ", v960, ")") : l190.fvalue(values, "pv.apply(this, ", v960, ")"));
+        })(l192.fvalue(pv, v959));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+((l319).value = ({car: l47.fvalue(pv, l164, (function (values){
+    var v961= l5.value;
+    for (var i = arguments.length-1; i>=1; i--)
+        v961 = {car: arguments[i], cdr: 
+    v961};
+    return (function(){
+        return ((function(){
+            var symbol = l195;
+            var value = symbol.value;
+            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+            return value;
+        })() !== l5.value ? l190.fvalue(values, "values(", l158.fvalue(pv, l81.fvalue(pv, (function(){
+            var symbol = l192;
+            var func = symbol.fvalue;
+            if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+            return func;
+        })(), v961), ", "), ")") : l190.fvalue(values, "pv(", l158.fvalue(pv, l81.fvalue(pv, (function(){
+            var symbol = l192;
+            var func = symbol.fvalue;
+            if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+            return func;
+        })(), v961), ", "), ")"));
+    })();
+})), cdr: (function(){
+    var symbol = l319;
+    var value = symbol.value;
+    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+    return value;
+})()}));
+(function(){
+    (l221).fvalue = (function(v964){
+        ((v964)["fname"] = "MACRO");
+        return v964;
+    })((function (values,v962){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (((function(){
+                var tmp = v962;
+                return (typeof tmp == 'object' && 'name' in tmp);
+            })()?l4.value: l5.value) !== l5.value ? (function(v963){
+                return (((l198.fvalue(pv, v963) === l221)?l4.value: l5.value) !== l5.value ? v963 : l5.value);
+            })(l210.fvalue(pv, v962, (function(){
+                var symbol = l211;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })(), l109)) : l5.value);
+            })(), l112)) : l5.value);
         })();
     }));
-    return l214;
+    return l221;
 })();
 (function(){
+<<<<<<< HEAD
     (l116).fvalue = (function(v1070){
         ((v1070)["fname"] = "LS-MACROEXPAND-1");
         return v1070;
@@ -8833,6 +15371,25 @@ var l337 = {name: "VALUES-ARRAY"};
                         var args = [values];
                         var tail = ((function(){
                             var tmp = v1066;
+=======
+    (l119).fvalue = (function(v969){
+        ((v969)["fname"] = "LS-MACROEXPAND-1");
+        return v969;
+    })((function (values,v965){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(v966){
+                return (v966 !== l5.value ? (function(v967){
+                    (l62.fvalue(pv, v967) !== l5.value ? (function(v968){
+                        l201.fvalue(pv, v966, v968);
+                        return (v967 = v968);
+                    })(l271.fvalue(pv, v967)) : l5.value);
+                    return (function(){
+                        var f = v967;
+                        var args = [values];
+                        var tail = ((function(){
+                            var tmp = v965;
+>>>>>>> backquote
                             return tmp === l5.value? l5.value: tmp.cdr;
                         })());
                         while (tail != l5.value){
@@ -8841,15 +15398,22 @@ var l337 = {name: "VALUES-ARRAY"};
                         }
                         return (typeof f === 'function'? f : f.fvalue).apply(this, args);
                     })();
+<<<<<<< HEAD
                 })(l192.fvalue(pv, v1067)) : v1066);
             })(l214.fvalue(pv, (function(){
                 var tmp = v1066;
+=======
+                })(l199.fvalue(pv, v966)) : v965);
+            })(l221.fvalue(pv, (function(){
+                var tmp = v965;
+>>>>>>> backquote
                 return tmp === l5.value? l5.value: tmp.car;
             })()));
         })();
     }));
-    return l116;
+    return l119;
 })();
+<<<<<<< HEAD
 var l338 = {name: "COMPILE-FUNCALL"};
 var l339 = {name: "G764"};
 (function(){
@@ -8862,10 +15426,25 @@ var l339 = {name: "G764"};
             return (function(){
                 var v1073 = ((function(){
                     var symbol = l188;
+=======
+var l367 = {name: "COMPILE-FUNCALL"};
+var l368 = {name: "G764"};
+(function(){
+    (l367).fvalue = (function(v974){
+        ((v974)["fname"] = "COMPILE-FUNCALL");
+        return v974;
+    })((function (values,v970,v971){
+        checkArgs(arguments, 3);
+        return (function(){
+            return (function(){
+                var v972 = ((function(){
+                    var symbol = l195;
+>>>>>>> backquote
                     var value = symbol.value;
                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                     return value;
                 })() !== l5.value ? "values" : "pv");
+<<<<<<< HEAD
                 var v1074 = l149.fvalue(pv, "(", l151.fvalue(pv, ({car: v1073, cdr: l79.fvalue(pv, (function(){
                     var symbol = l185;
                     var func = symbol.fvalue;
@@ -8902,33 +15481,77 @@ var l339 = {name: "G764"};
         return (function(){
             return (v1077 !== l5.value ? l183.fvalue(values, l246.fvalue(pv, l92.fvalue(pv, v1076)), "return ", l185.fvalue(pv, (function(){
                 var tmp = l91.fvalue(pv, v1076);
+=======
+                var v973 = l156.fvalue(pv, "(", l158.fvalue(pv, ({car: v972, cdr: l81.fvalue(pv, (function(){
+                    var symbol = l192;
+                    var func = symbol.fvalue;
+                    if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                    return func;
+                })(), v971)}), ", "), ")");
+                return (l266.fvalue(pv, v970) !== l5.value ? l156.fvalue(values, l266.fvalue(pv, v970), v973) : ((((function(){
+                    var tmp = v970;
+                    return (typeof tmp == 'object' && 'name' in tmp);
+                })()?l4.value: l5.value) !== l5.value ? (((l144.fvalue(pv, v970) === l135.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
+                    var symbol = l368;
+                    var value = symbol.value;
+                    if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                    return value;
+                })() : l5.value) : l5.value) !== l5.value ? l190.fvalue(values, l192.fvalue(pv, l47.fvalue(pv, l185, v970)), ".fvalue", v973) : l190.fvalue(values, l192.fvalue(pv, l47.fvalue(pv, l112, v970)), v973)));
+            })();
+        })();
+    }));
+    return l367;
+})();
+(function(){
+    (l253).fvalue = (function(v977){
+        ((v977)["fname"] = "LS-COMPILE-BLOCK");
+        return v977;
+    })((function (values,v975,v976){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v976; 
+        switch(arguments.length-1){
+        case 1:
+            v976=l5.value;
+        default: break;
+        }
+        return (function(){
+            return (v976 !== l5.value ? l190.fvalue(values, l253.fvalue(pv, l95.fvalue(pv, v975)), "return ", l192.fvalue(pv, (function(){
+                var tmp = l94.fvalue(pv, v975);
+>>>>>>> backquote
                 return tmp === l5.value? l5.value: tmp.car;
             })(), (function(){
-                var symbol = l188;
+                var symbol = l195;
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
-            })()), ";") : l152.fvalue(values, l95.fvalue(pv, (function(){
-                var symbol = l211;
+            })()), ";") : l159.fvalue(values, l98.fvalue(pv, (function(){
+                var symbol = l218;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
-            })(), l79.fvalue(pv, (function(){
-                var symbol = l185;
+            })(), l81.fvalue(pv, (function(){
+                var symbol = l192;
                 var func = symbol.fvalue;
                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
                 return func;
+<<<<<<< HEAD
             })(), v1076)), l149.fvalue(pv, ";", (function(){
                 var symbol = l148;
+=======
+            })(), v975)), l156.fvalue(pv, ";", (function(){
+                var symbol = l155;
+>>>>>>> backquote
                 var value = symbol.value;
                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                 return value;
             })())));
         })();
     }));
-    return l246;
+    return l253;
 })();
 (function(){
+<<<<<<< HEAD
     (l185).fvalue = (function(v1088){
         ((v1088)["fname"] = "LS-COMPILE");
         return v1088;
@@ -8974,12 +15597,60 @@ var l339 = {name: "G764"};
                                 var f = v1086;
                                 var args = [values];
                                 var tail = (v1085);
+=======
+    (l192).fvalue = (function(v987){
+        ((v987)["fname"] = "LS-COMPILE");
+        return v987;
+    })((function (values,v978,v979){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v979; 
+        switch(arguments.length-1){
+        case 1:
+            v979=l5.value;
+        default: break;
+        }
+        return (function(){
+            return (function(v980){
+                try {
+                    var tmp;
+                    tmp = l195.value;
+                    l195.value = v980;
+                    v980 = tmp;
+                    return (((function(){
+                        var tmp = v978;
+                        return (typeof tmp == 'object' && 'name' in tmp);
+                    })()?l4.value: l5.value) !== l5.value ? (function(v981){
+                        return ((v981 !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l225, l200.fvalue(pv, v981))) : l5.value) !== l5.value ? l199.fvalue(values, v981) : ((function(v982){
+                            return (v982 !== l5.value ? v982 : l96.fvalue(pv, l227, l200.fvalue(pv, v981)));
+                        })(l143.fvalue(pv, v978)) !== l5.value ? l190.fvalue(values, l192.fvalue(pv, l47.fvalue(pv, l185, v978)), ".value") : l192.fvalue(values, l47.fvalue(pv, l339, l47.fvalue(pv, l185, v978)))));
+                    })(l210.fvalue(pv, v978, (function(){
+                        var symbol = l211;
+                        var value = symbol.value;
+                        if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                        return value;
+                    })(), l113)) : (l89.fvalue(pv, v978) !== l5.value ? l19.fvalue(values, v978) : (((typeof(v978) == "string")?l4.value: l5.value) !== l5.value ? l190.fvalue(values, "\"", l166.fvalue(pv, v978), "\"") : (((function(){
+                        var x = v978;
+                        return typeof x === 'object' && 'length' in x;
+                    })()?l4.value: l5.value) !== l5.value ? l261.fvalue(values, v978) : (l62.fvalue(pv, v978) !== l5.value ? (function(v983,v984){
+                        return (l105.fvalue(pv, v983, (function(){
+                            var symbol = l229;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })()) !== l5.value ? (function(v985){
+                            return (function(){
+                                var f = v985;
+                                var args = [values];
+                                var tail = (v984);
+>>>>>>> backquote
                                 while (tail != l5.value){
                                     args.push(tail.car);
                                     tail = tail.cdr;
                                 }
                                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
                             })();
+<<<<<<< HEAD
                         })(l41.fvalue(pv, l102.fvalue(pv, v1084, (function(){
                             var symbol = l222;
                             var value = symbol.value;
@@ -8995,12 +15666,30 @@ var l339 = {name: "G764"};
                                 var f = v1087;
                                 var args = [values];
                                 var tail = (v1085);
+=======
+                        })(l43.fvalue(pv, l105.fvalue(pv, v983, (function(){
+                            var symbol = l229;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })()))) : ((l105.fvalue(pv, v983, (function(){
+                            var symbol = l319;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })()) !== l5.value ? l29.fvalue(pv, l223.fvalue(pv, v983, l112, l226)) : l5.value) !== l5.value ? (function(v986){
+                            return (function(){
+                                var f = v986;
+                                var args = [values];
+                                var tail = (v984);
+>>>>>>> backquote
                                 while (tail != l5.value){
                                     args.push(tail.car);
                                     tail = tail.cdr;
                                 }
                                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
                             })();
+<<<<<<< HEAD
                         })(l41.fvalue(pv, l102.fvalue(pv, v1084, (function(){
                             var symbol = l290;
                             var value = symbol.value;
@@ -9012,19 +15701,39 @@ var l339 = {name: "G764"};
                         return tmp === l5.value? l5.value: tmp.car;
                     })(),(function(){
                         var tmp = v1079;
+=======
+                        })(l43.fvalue(pv, l105.fvalue(pv, v983, (function(){
+                            var symbol = l319;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })()))) : (l221.fvalue(pv, v983) !== l5.value ? l192.fvalue(values, l119.fvalue(pv, v978), v979) : l367.fvalue(values, v983, v984))));
+                    })((function(){
+                        var tmp = v978;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })(),(function(){
+                        var tmp = v978;
+>>>>>>> backquote
                         return tmp === l5.value? l5.value: tmp.cdr;
                     })()) : (function(){
-                        throw "How should I compile this?";
+                        throw l156.fvalue(pv, "How should I compile ", l165.fvalue(pv, v978), "?");
                     })())))));
                 }
                 finally {
+<<<<<<< HEAD
                     l188.value = v1081;
                 }
             })(v1080);
+=======
+                    l195.value = v980;
+                }
+            })(v979);
+>>>>>>> backquote
         })();
     }));
-    return l185;
+    return l192;
 })();
+<<<<<<< HEAD
 var l340 = {name: "LS-COMPILE-TOPLEVEL"};
 (function(){
     (l340).fvalue = (function(v1095){
@@ -9073,18 +15782,76 @@ var l340 = {name: "LS-COMPILE-TOPLEVEL"};
                             return value;
                         })())), (v1094 !== l5.value ? l183.fvalue(pv, v1094, ";", (function(){
                             var symbol = l148;
+=======
+var l369 = {name: "LS-COMPILE-TOPLEVEL"};
+(function(){
+    (l369).fvalue = (function(v994){
+        ((v994)["fname"] = "LS-COMPILE-TOPLEVEL");
+        return v994;
+    })((function (values,v988,v989){
+        checkArgsAtLeast(arguments, 2);
+        checkArgsAtMost(arguments, 3);
+        var v989; 
+        switch(arguments.length-1){
+        case 1:
+            v989=l5.value;
+        default: break;
+        }
+        return (function(){
+            return (function(v990){
+                try {
+                    var tmp;
+                    tmp = l216.value;
+                    l216.value = v990;
+                    v990 = tmp;
+                    return ((((function(){
+                        var tmp = v988;
+                        return (typeof tmp == 'object' && 'car' in tmp);
+                    })()?l4.value: l5.value) !== l5.value ? (((function(){
+                        var tmp = v988;
+                        return tmp === l5.value? l5.value: tmp.car;
+                    })() === l122)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v992){
+                        return l158.fvalue(values, l98.fvalue(pv, (function(){
+                            var symbol = l218;
+                            var func = symbol.fvalue;
+                            if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+                            return func;
+                        })(), v992));
+                    })(l81.fvalue(pv, (function (values,v991){
+                        checkArgs(arguments, 2);
+                        return l369.fvalue(values, v991, l4.value);
+                    }), (function(){
+                        var tmp = v988;
+                        return tmp === l5.value? l5.value: tmp.cdr;
+                    })())) : (function(v993){
+                        return l190.fvalue(values, l159.fvalue(pv, l219.fvalue(pv), l190.fvalue(pv, ";", (function(){
+                            var symbol = l155;
+                            var value = symbol.value;
+                            if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+                            return value;
+                        })())), (v993 !== l5.value ? l190.fvalue(pv, v993, ";", (function(){
+                            var symbol = l155;
+>>>>>>> backquote
                             var value = symbol.value;
                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
                             return value;
                         })()) : l5.value));
+<<<<<<< HEAD
                     })(l185.fvalue(pv, v1089, v1090)));
                 }
                 finally {
                     l209.value = v1091;
+=======
+                    })(l192.fvalue(pv, v988, v989)));
+                }
+                finally {
+                    l216.value = v990;
+>>>>>>> backquote
                 }
             })(l5.value);
         })();
     }));
+<<<<<<< HEAD
     return l340;
 })();
 (function(){
@@ -9096,6 +15863,19 @@ var l340 = {name: "LS-COMPILE-TOPLEVEL"};
         return (function(){
             return (function(){
                 var string = l340.fvalue(pv, v1096, l4.value);
+=======
+    return l369;
+})();
+(function(){
+    (l271).fvalue = (function(v996){
+        ((v996)["fname"] = "EVAL");
+        return v996;
+    })((function (values,v995){
+        checkArgs(arguments, 2);
+        return (function(){
+            return (function(){
+                var string = l369.fvalue(pv, v995, l4.value);
+>>>>>>> backquote
                 if (typeof string != 'string')
                     throw 'The value ' + string + ' is not a type string.';
                 return (function(){
@@ -9109,13 +15889,21 @@ var l340 = {name: "LS-COMPILE-TOPLEVEL"};
             })();
         })();
     }));
-    return l264;
+    return l271;
 })();
+<<<<<<< HEAD
 var l341 = {name: "&BODY"};
 var l342 = QIList(l227,l228,l226,l341,l21,l16,l138,l63,l64,l22,l23,l24,l301,l303,l20,l20,l300,l302,l55,l66,l322,l334,l333,l102,l46,l200,l19,l19,l92,l33,l39,l37,l34,l31,l31,l53,l276,l35,l38,l36,l32,l32,l320,l84,l105,l128,l141,l40,l260,l43,l309,l321,l109,l330,l17,l114,l147,l284,l80,l224,l139,l47,l86,l86,l145,l136,l261,l6,l91,l73,l268,l271,l85,l83,l52,l29,l30,l81,l82,l48,l2,l117,l3,l10,l12,l1,l9,l98,l97,l106,l70,l71,l108,l50,l51,l54,l313,l27,l314,l324,l264,l101,l146,l123,l45,l60,l78,l332,l124,l307,l79,l93,l88,l297,l111,l286,l112,l287,l5,l28,l90,l89,l13,l304,l56,l129,l131,l127,l176,l87,l158,l161,l221,l57,l58,l119,l69,l49,l178,l94,l95,l96,l14,l275,l67,l68,l120,l121,l41,l248,l118,l115,l100,l317,l103,l104,l316,l99,l256,l308,l137,l311,l310,l306,l4,l282,l42,l277,l26,l8,l285,l157,l156,l110,l160,l7,l107,l331,l25,l5);
 l146.fvalue(values, l342);
 ((l138).value = (function(){
     var symbol = l134;
+=======
+var l370 = {name: "&BODY"};
+var l371 = QIList(l234,l235,l233,l370,l22,l17,l145,l65,l66,l23,l24,l25,l330,l332,l21,l21,l329,l331,l57,l68,l351,l363,l362,l105,l48,l207,l20,l20,l95,l34,l41,l39,l35,l32,l32,l55,l283,l36,l40,l37,l33,l33,l349,l87,l108,l135,l148,l42,l267,l45,l338,l350,l112,l359,l18,l117,l154,l291,l82,l231,l146,l49,l89,l89,l152,l143,l268,l6,l94,l75,l275,l278,l88,l86,l54,l30,l31,l83,l84,l50,l2,l120,l3,l10,l12,l1,l9,l101,l100,l109,l72,l73,l111,l52,l53,l56,l342,l28,l343,l353,l271,l104,l153,l130,l47,l85,l62,l80,l361,l131,l336,l81,l96,l91,l326,l114,l293,l115,l294,l126,l5,l29,l93,l92,l13,l333,l58,l136,l138,l134,l183,l90,l165,l168,l228,l59,l60,l122,l71,l51,l185,l127,l97,l98,l99,l15,l282,l69,l70,l123,l124,l43,l255,l121,l118,l103,l346,l106,l107,l345,l102,l263,l337,l144,l340,l339,l335,l4,l289,l44,l284,l27,l8,l292,l164,l163,l113,l167,l7,l110,l360,l26,l5);
+l153.fvalue(values, l371);
+((l145).value = (function(){
+    var symbol = l141;
+>>>>>>> backquote
     var value = symbol.value;
     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
     return value;
@@ -9135,23 +15923,24 @@ l146.fvalue(values, l342);
 })();
 (lisp = {});
 (lisp.read = (function(){
-    var symbol = l182;
+    var symbol = l189;
     var func = symbol.fvalue;
     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
     return func;
 })());
 (lisp.print = (function(){
-    var symbol = l158;
+    var symbol = l165;
     var func = symbol.fvalue;
     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
     return func;
 })());
 (lisp.eval = (function(){
-    var symbol = l264;
+    var symbol = l271;
     var func = symbol.fvalue;
     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
     return func;
 })());
+<<<<<<< HEAD
 (lisp.compile = (function (values,v1098){
     checkArgs(arguments, 2);
     return l340.fvalue(values, v1098, l4.value);
@@ -9611,3 +16400,489 @@ var l393 = QIList(QIList(l391,"l391"),QIList(l390,"l390"),QIList(l389,"l389"),QI
     return ((l272).value = 304);
 })();
 ((l252).value = 393);
+=======
+(lisp.compile = (function (values,v997){
+    checkArgs(arguments, 2);
+    return l369.fvalue(values, v997, l4.value);
+}));
+(lisp.evalString = (function (values,v998){
+    checkArgs(arguments, 2);
+    return l271.fvalue(values, l189.fvalue(pv, v998));
+}));
+(lisp.compileString = (function (values,v999){
+    checkArgs(arguments, 2);
+    return l369.fvalue(values, l189.fvalue(pv, v999), l4.value);
+}));
+var l372 = {name: "OP"};
+var l373 = {name: "SYM"};
+var l374 = {name: "X"};
+var l375 = {name: "ARGS"};
+var l376 = {name: "BODY"};
+var l377 = {name: "DECLS"};
+var l378 = {name: "DECL"};
+var l379 = {name: "NAME"};
+var l380 = {name: "ARG"};
+var l381 = {name: "FORM"};
+var l382 = {name: "PACKAGE-DESIGNATOR"};
+var l383 = {name: "CLAUSULES"};
+var l384 = {name: "VALUE"};
+var l385 = {name: "C"};
+var l386 = {name: "INTEGER"};
+var l387 = {name: "PAIRS"};
+var l388 = {name: "PLACE"};
+var l389 = {name: "VARS"};
+var l390 = {name: "VALS"};
+var l391 = {name: "STORE-VARS"};
+var l392 = {name: "WRITER-FORM"};
+var l393 = {name: "READER-FORM"};
+var l394 = {name: "RESULT"};
+var l395 = {name: "ACCESS-FN"};
+var l396 = {name: "LAMBDA-LIST"};
+var l397 = {name: "VALUE-FROM"};
+var l398 = {name: "VARIABLES"};
+var l399 = {name: "HEAD"};
+var l400 = {name: "TAIL"};
+var l401 = {name: "COLLECT"};
+var l402 = {name: "VARLIST"};
+var l403 = {name: "ENDLIST"};
+var l404 = {name: "V"};
+var l405 = {name: "ASSIGNMENTS"};
+var l406 = {name: "FORM1"};
+var l407 = {name: "FORMS"};
+var l408 = {name: "G"};
+var l409 = {name: "!FORM"};
+var l410 = {name: "CLAUSULE"};
+var l411 = {name: "ITER"};
+var l412 = {name: "G!TO"};
+var l413 = {name: "VAR"};
+var l414 = {name: "TO"};
+var l415 = {name: "G!LIST"};
+var l416 = {name: "DELTA"};
+var l417 = {name: "CONDITION"};
+var l418 = {name: "DOCSTRING"};
+var l419 = QIList(QIList(QIList(l319,l113,l5,QIList(l225,l5),l5),QIList(l303,l113,l5,QIList(l225,l5),l5),QIList(l302,l113,l5,QIList(l225,l5),l5),QIList(l301,l113,l5,QIList(l225,l5),l5),QIList(l300,l113,l5,QIList(l225,l5),l5),QIList(l299,l113,l5,QIList(l225,l5),l5),QIList(l298,l113,l5,QIList(l225,l5),l5),QIList(l297,l113,l5,QIList(l225,l5),l5),QIList(l296,l113,l5,QIList(l225,l5),l5),QIList(l295,l113,l5,QIList(l225,l5),l5),QIList(l286,l113,l5,QIList(l225,l5),l5),QIList(l285,l113,l5,QIList(l225,l5),l5),QIList(l279,l113,l5,QIList(l225,l5),l5),QIList(l269,l113,l5,QIList(l225,l5),l5),QIList(l259,l113,l5,QIList(l225,l5),l5),QIList(l258,l113,l5,QIList(l225,l5),l5),QIList(l232,l113,l5,QIList(l225,l5),l5),QIList(l229,l113,l5,QIList(l225,l5),l5),QIList(l216,l113,l5,QIList(l225,l5),l5),QIList(l212,l113,l5,QIList(l225,l5),l5),QIList(l211,l113,l5,QIList(l225,l5),l5),QIList(l195,l113,l5,QIList(l225,l5),l5),QIList(l184,l113,l5,QIList(l225,l5),l5),QIList(l155,l113,l5,QIList(l225,l5),l5),QIList(l145,l113,l5,QIList(l225,l5),l5),QIList(l142,l113,l5,QIList(l225,l5),l5),QIList(l141,l113,l5,QIList(l225,l5),l5),QIList(l140,l113,l5,QIList(l225,l5),l5),QIList(l129,l113,l5,QIList(l225,l5),l5),QIList(l116,l113,l5,QIList(l225,l5),l5),QIList(l17,l113,l5,QIList(l225,l5),l5),QIList(l5,l113,l5,QIList(l227,l225,l5),l5),QIList(l4,l113,l5,QIList(l227,l225,l5),l5),l5),QIList(QIList(l328,l221,QIList(l112,QIList(l6,QIList(l372,l373,l5),QIList(l186,QIList(l320,QIList(l188,l372,l5),QIList(l374,l234,l375,l5),QIList(l275,QIList(QIList(l375,QIList(l30,l374,l375,l5),l5),l5),QIList(l324,l375,QIList(l191,QIList(l327,l375,QIList(l188,l373,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l324,l221,QIList(l112,QIList(l6,QIList(l375,l234,l376,l5),QIList(l8,QIList(l335,l375,l5),QIList(l353,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l186,QIList(l323,QIList(l188,l375,l5),QIList(l6,QIList(QIList(l188,l375,l5),l5),QIList(l190,"return ",QIList(l187,l376,l5),";",l155,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l322,l221,QIList(l112,QIList(l6,QIList(l377,l234,l376,l5),QIList(l186,QIList(l193,QIList(l187,QIList(l81,QIList(l6,QIList(l378,l5),QIList(l186,QIList(l190,"var ",QIList(l188,QIList(l42,l378,l5),l5)," = ",QIList(l188,QIList(l44,l378,l5),l5),";",l155,l5),l5),l5),l377,l5),l5),QIList(l187,QIList(l81,QIList(l6,QIList(l378,l5),QIList(l186,QIList(l190,"if (typeof ",QIList(l188,QIList(l42,l378,l5),l5)," != '",QIList(l188,QIList(l43,l378,l5),l5),"')",l155,QIList(l194,"throw 'The value ' + ",QIList(l188,QIList(l42,l378,l5),l5)," + ' is not a type ",QIList(l188,QIList(l43,l378,l5),l5),".';",l155,l5),l5),l5),l5),l377,l5),l5),QIList(l190,"return ",QIList(l122,QIList(l187,l376,l5),l5),";",l155,l5),l5),l5),l5),l5),l5,l5),QIList(l321,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l320,QIList(l188,l379,l5),QIList(l188,l375,l5),QIList(l275,QIList(l188,QIList(l81,QIList(l6,QIList(l380,l5),QIList(l186,QIList(QIList(l188,l380,l5),QIList(l192,QIList(l188,l380,l5),l5),l5),l5),l5),l375,l5),l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l320,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l51,QIList(l47,QIList(l185,QIList(l188,l379,l5),l5),QIList(l6,QIList(l188,l375,l5),QIList(l207,QIList(l188,l379,l5),QIList(l187,l376,l5),l5),l5),l5),l319,l5),l5),l5),l5),l5,l5),QIList(l186,l221,QIList(l112,QIList(l6,QIList(l374,l5),QIList(l305,l374,l5),l5),l5),l5,l5),QIList(l272,l221,QIList(l112,QIList(l6,QIList(l379,l375,l381,l5),QIList(l186,QIList(l230,QIList(l188,l379,l5),QIList(l188,l375,l5),QIList(l192,QIList(l188,l381,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l230,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l51,QIList(l47,QIList(l185,QIList(l188,l379,l5),l5),QIList(l6,QIList(l188,l375,l5),QIList(l207,QIList(l188,l379,l5),QIList(l187,l376,l5),l5),l5),l5),l229,l5),l5),l5),l5),l5,l5),QIList(l193,l221,QIList(l112,QIList(l6,QIList(l234,l376,l5),QIList(l186,QIList(l190,"(function(){",l155,QIList(l194,QIList(l187,l376,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l157,l221,QIList(l112,QIList(l6,QIList(l113,l234,l381,l5),QIList(l186,QIList(l118,QIList(l188,l113,l5),QIList(l156,QIList(l188,l113,l5),QIList(l122,QIList(l187,l381,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l146,l221,QIList(l112,QIList(l6,QIList(l382,l5),QIList(l186,QIList(l270,QIList(l118,l145,QIList(l133,QIList(l188,l382,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l125,l221,QIList(l112,QIList(l6,QIList(l374,l234,l383,l5),QIList(l275,QIList(QIList(l384,QIList(l18,l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l384,l5),QIList(l188,l374,l5),l5),l5),QIList(l54,QIList(l187,QIList(l81,QIList(l6,QIList(l385,l5),QIList(l231,QIList(l342,QIList(l32,l385,l5),l4,l5),QIList(l186,QIList(QIList(l4,QIList(l187,QIList(l46,l385,l5),l5),l5),l5),l5),QIList(l186,QIList(QIList(QIList(l188,QIList(l56,QIList(l32,l385,l5),QIList(l386,QIList(l185,l89,l5),l5),QIList(l30,QIList(l185,l31,l5),l5),QIList(l106,QIList(l185,l345,l5),l5),QIList(l48,QIList(l185,l48,l5),l5),QIList(l13,QIList(l185,l13,l5),l5),l5),l5),QIList(l188,l384,l5),l5),QIList(l187,QIList(l58,QIList(l46,l385,l5),QIList(l47,l5,l5),l5),l5),l5),l5),l5),l5),l383,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l121,l221,QIList(l112,QIList(l6,QIList(l234,l387,l5),QIList(l54,QIList(QIList(l13,l387,l5),l5,l5),QIList(QIList(l13,QIList(l33,l387,l5),l5),QIList(l353,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l37,l387,l5),l5),QIList(l275,QIList(QIList(l388,QIList(l42,l387,l5),l5),QIList(l384,QIList(l43,l387,l5),l5),l5),QIList(l114,QIList(l389,l390,l391,l392,l393,l5),QIList(l117,l388,l5),QIList(l186,QIList(l278,QIList(l188,QIList(l81,QIList(l112,l47,l5),l389,l390,l5),l5),QIList(l114,QIList(l188,l391,l5),QIList(l188,l384,l5),QIList(l188,l392,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l186,QIList(l122,QIList(l187,QIList(l72,QIList(QIList(l387,l387,QIList(l37,l387,l5),l5),QIList(l394,QIList(l185,l5,l5),QIList(l30,QIList(l186,QIList(l121,QIList(l188,QIList(l32,l387,l5),l5),QIList(l188,QIList(l35,l387,l5),l5),l5),l5),l394,l5),l5),l5),QIList(QIList(l13,l387,l5),QIList(l70,l394,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l120,l221,QIList(l112,QIList(l6,QIList(l395,l396,l234,l376,l5),QIList(l8,QIList(l335,l395,l5),QIList(l353,"ACCESS-FN must be a symbol.",l5),l5),QIList(l186,QIList(l122,QIList(l51,QIList(l30,QIList(l185,QIList(l188,l395,l5),l5),QIList(l6,QIList(l188,l396,l5),QIList(l187,l376,l5),l5),l5),l116,l5),QIList(l185,QIList(l188,l395,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l115,l221,QIList(l112,QIList(l6,QIList(l397,l5),QIList(l186,QIList(l293,QIList(l112,l47,l5),QIList(l188,l397,l5),l5),l5),l5),l5),l5,l5),QIList(l114,l221,QIList(l112,QIList(l6,QIList(l398,l397,l234,l376,l5),QIList(l186,QIList(l293,QIList(l6,QIList(l233,QIList(l187,l398,l5),l234,QIList(l188,QIList(l18,l5),l5),l5),QIList(l187,l376,l5),l5),QIList(l188,l397,l5),l5),l5),l5),l5),l5,l5),QIList(l80,l221,QIList(l112,QIList(l6,QIList(l234,l376,l5),QIList(l186,QIList(l16,l4,QIList(l187,l376,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l221,QIList(l112,QIList(l6,QIList(l234,l376,l5),QIList(l275,QIList(QIList(l399,QIList(l18,l5),l5),QIList(l400,QIList(l18,l5),l5),l5),QIList(l186,QIList(l278,QIList(QIList(QIList(l188,l399,l5),QIList(l30,QIList(l185,l79,l5),l5,l5),l5),QIList(QIList(l188,l400,l5),QIList(l188,l399,l5),l5),l5),QIList(l267,QIList(QIList(l401,QIList(l374,l5),QIList(l124,QIList(l188,l400,l5),QIList(l30,l374,l5,l5),l5),QIList(l118,QIList(l188,l400,l5),QIList(l33,QIList(l188,l400,l5),l5),l5),l374,l5),l5),QIList(l187,l376,l5),l5),QIList(l33,QIList(l188,l399,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l73,l221,QIList(l112,QIList(l6,QIList(l402,l403,l234,l376,l5),QIList(l186,QIList(l207,l5,QIList(l278,QIList(l188,QIList(l81,QIList(l6,QIList(l374,l5),QIList(l47,QIList(l42,l374,l5),QIList(l43,l374,l5),l5),l5),l402,l5),l5),QIList(l16,l4,QIList(l7,QIList(l188,QIList(l32,l403,l5),l5),QIList(l15,QIList(l122,QIList(l187,QIList(l33,l403,l5),l5),l5),l5),l5),QIList(l289,QIList(l187,l376,l5),l5),QIList(l118,QIList(l187,QIList(l351,QIList(l112,l68,l5),QIList(l81,QIList(l6,QIList(l404,l5),QIList(l57,QIList(l31,QIList(l37,l404,l5),l5),QIList(l47,QIList(l42,l404,l5),QIList(l44,l404,l5),l5),l5),l5),l402,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l72,l221,QIList(l112,QIList(l6,QIList(l402,l403,l234,l376,l5),QIList(l186,QIList(l207,l5,QIList(l275,QIList(l188,QIList(l81,QIList(l6,QIList(l374,l5),QIList(l47,QIList(l42,l374,l5),QIList(l43,l374,l5),l5),l5),l402,l5),l5),QIList(l16,l4,QIList(l7,QIList(l188,QIList(l32,l403,l5),l5),QIList(l15,QIList(l122,QIList(l187,QIList(l33,l403,l5),l5),l5),l5),l5),QIList(l289,QIList(l187,l376,l5),l5),QIList(l71,QIList(l187,QIList(l351,QIList(l112,l68,l5),QIList(l81,QIList(l6,QIList(l404,l5),QIList(l57,QIList(l31,QIList(l37,l404,l5),l5),QIList(l47,QIList(l42,l404,l5),QIList(l44,l404,l5),l5),l5),l5),l402,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l221,QIList(l112,QIList(l6,QIList(l234,l387,l5),QIList(l275,QIList(QIList(l405,QIList(l185,l5,l5),l5),l5),QIList(l16,l4,QIList(l54,QIList(QIList(l13,l387,l5),QIList(l15,l5),l5),QIList(QIList(l13,QIList(l33,l387,l5),l5),QIList(l353,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l275,QIList(QIList(l113,QIList(l32,l387,l5),l5),QIList(l384,QIList(l35,l387,l5),l5),l5),QIList(l51,QIList(l186,QIList(QIList(l188,l113,l5),QIList(l188,QIList(l18,l5),l5),QIList(l188,l384,l5),l5),l5),l405,l5),QIList(l118,l387,QIList(l37,l387,l5),l5),l5),l5),l5),l5),QIList(l118,l405,QIList(l70,l405,l5),l5),QIList(l186,QIList(l275,QIList(l188,QIList(l81,QIList(l112,l33,l5),l405,l5),l5),QIList(l118,QIList(l187,QIList(l63,QIList(l112,l68,l5),QIList(l81,QIList(l112,l95,l5),l405,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l60,l221,QIList(l112,QIList(l6,QIList(l406,l394,l234,l376,l5),QIList(l186,QIList(l59,QIList(l122,QIList(l188,l406,l5),QIList(l188,l394,l5),l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5,l5),QIList(l59,l221,QIList(l112,QIList(l6,QIList(l381,l234,l376,l5),QIList(l275,QIList(QIList(l384,QIList(l18,l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l384,l5),QIList(l188,l381,l5),l5),l5),QIList(l187,l376,l5),QIList(l188,l384,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l221,QIList(l112,QIList(l6,QIList(l234,l407,l5),QIList(l54,QIList(QIList(l13,l407,l5),l5,l5),QIList(QIList(l13,QIList(l33,l407,l5),l5),QIList(l32,l407,l5),l5),QIList(l4,QIList(l275,QIList(QIList(l408,QIList(l18,l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l408,l5),QIList(l188,QIList(l32,l407,l5),l5),l5),l5),QIList(l231,QIList(l188,l408,l5),QIList(l188,l408,l5),QIList(l58,QIList(l187,QIList(l33,l407,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l57,l221,QIList(l112,QIList(l6,QIList(l234,l407,l5),QIList(l54,QIList(QIList(l13,l407,l5),l4,l5),QIList(QIList(l13,QIList(l33,l407,l5),l5),QIList(l32,l407,l5),l5),QIList(l4,QIList(l186,QIList(l231,QIList(l188,QIList(l32,l407,l5),l5),QIList(l57,QIList(l187,QIList(l33,l407,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l221,QIList(l112,QIList(l6,QIList(l381,l234,l383,l5),QIList(l186,QIList(l55,QIList(l188,l381,l5),QIList(l187,QIList(l68,l383,QIList(l186,QIList(QIList(l4,QIList(l353,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l221,QIList(l112,QIList(l6,QIList(l381,l234,l383,l5),QIList(l275,QIList(QIList(l409,QIList(l18,l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l409,l5),QIList(l188,l381,l5),l5),l5),QIList(l54,QIList(l187,QIList(l81,QIList(l6,QIList(l410,l5),QIList(l231,QIList(l342,QIList(l32,l410,l5),l4,l5),l410,QIList(l186,QIList(QIList(l28,QIList(l188,l409,l5),QIList(l185,QIList(l188,QIList(l32,l410,l5),l5),l5),l5),QIList(l187,QIList(l33,l410,l5),l5),l5),l5),l5),l5),l383,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l221,QIList(l112,QIList(l6,QIList(l234,l383,l5),QIList(l231,QIList(l13,l383,l5),l5,QIList(l231,QIList(l342,QIList(l34,l383,l5),l4,l5),QIList(l186,QIList(l122,QIList(l187,QIList(l36,l383,l5),l5),l5),l5),QIList(l186,QIList(l231,QIList(l188,QIList(l34,l383,l5),l5),QIList(l122,QIList(l187,QIList(l36,l383,l5),l5),l5),QIList(l54,QIList(l187,QIList(l33,l383,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l221,QIList(l112,QIList(l6,QIList(l411,l234,l376,l5),QIList(l275,QIList(QIList(l412,QIList(l18,l5),l5),QIList(l413,QIList(l42,l411,l5),l5),QIList(l414,QIList(l43,l411,l5),l5),QIList(l394,QIList(l44,l411,l5),l5),l5),QIList(l186,QIList(l207,l5,QIList(l275,QIList(QIList(QIList(l188,l413,l5),0,l5),QIList(QIList(l188,l412,l5),QIList(l188,l414,l5),l5),l5),QIList(l262,QIList(l330,QIList(l188,l413,l5),QIList(l188,l412,l5),l5),QIList(l289,QIList(l187,l376,l5),l5),QIList(l49,QIList(l188,l413,l5),l5),l5),QIList(l188,l394,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l221,QIList(l112,QIList(l6,QIList(l411,l234,l376,l5),QIList(l275,QIList(QIList(l413,QIList(l42,l411,l5),l5),QIList(l415,QIList(l18,l5),l5),l5),QIList(l186,QIList(l207,l5,QIList(l275,QIList(QIList(QIList(l188,l415,l5),QIList(l188,QIList(l43,l411,l5),l5),l5),QIList(QIList(l188,l413,l5),l5,l5),l5),QIList(l262,QIList(l188,l415,l5),QIList(l118,QIList(l188,l413,l5),QIList(l32,QIList(l188,l415,l5),l5),l5),QIList(l289,QIList(l187,l376,l5),l5),QIList(l118,QIList(l188,l415,l5),QIList(l33,QIList(l188,l415,l5),l5),l5),l5),QIList(l188,QIList(l44,l411,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l221,QIList(l112,QIList(l6,QIList(l374,l388,l5),QIList(l186,QIList(l118,QIList(l188,l388,l5),QIList(l30,QIList(l188,l374,l5),QIList(l188,l388,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l221,QIList(l112,QIList(l6,QIList(l374,l233,QIList(l416,1,l5),l5),QIList(l186,QIList(l118,QIList(l188,l374,l5),QIList(l66,QIList(l188,l374,l5),QIList(l188,l416,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l221,QIList(l112,QIList(l6,QIList(l374,l233,QIList(l416,1,l5),l5),QIList(l186,QIList(l118,QIList(l188,l374,l5),QIList(l65,QIList(l188,l374,l5),QIList(l188,l416,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l16,l221,QIList(l112,QIList(l6,QIList(l417,l234,l376,l5),QIList(l186,QIList(l207,l5,QIList(l262,QIList(l188,l417,l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l221,QIList(l112,QIList(l6,QIList(l233,l384,l5),QIList(l186,QIList(l282,l5,QIList(l188,l384,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l122,QIList(l338,QIList(l185,QIList(l188,l379,l5),l5),QIList(l11,QIList(l188,QIList(l337,l379,l5),l5),QIList(l188,l375,l5),QIList(l187,QIList(l231,QIList(l57,QIList(l345,QIList(l32,l376,l5),l5),QIList(l29,QIList(l13,QIList(l33,l376,l5),l5),l5),l5),QIList(l186,QIList(QIList(l188,QIList(l32,l376,l5),l5),QIList(l207,QIList(l188,l379,l5),QIList(l187,QIList(l33,l376,l5),l5),l5),l5),l5),QIList(l186,QIList(QIList(l207,QIList(l188,l379,l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l185,QIList(l188,l379,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l275,QIList(QIList(l374,QIList(l18,"FN",l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l374,l5),QIList(l6,QIList(l188,l375,l5),QIList(l187,l376,l5),l5),l5),l5),QIList(l357,QIList(l188,l374,l5),"fname",QIList(l188,l379,l5),l5),QIList(l188,l374,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l221,QIList(l112,QIList(l6,QIList(l379,l384,l233,l418,l5),QIList(l186,QIList(l122,QIList(l118,QIList(l188,l379,l5),QIList(l188,l384,l5),l5),QIList(l187,QIList(l7,QIList(l345,l418,l5),QIList(l186,QIList(QIList(l357,QIList(l185,QIList(l188,l379,l5),l5),"vardoc",QIList(l188,l418,l5),l5),l5),l5),l5),l5),QIList(l185,QIList(l188,l379,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l221,QIList(l112,QIList(l6,QIList(l379,l384,l233,l418,l5),QIList(l186,QIList(l122,QIList(l2,QIList(l225,QIList(l188,l379,l5),l5),l5),QIList(l8,QIList(l20,QIList(l185,QIList(l188,l379,l5),l5),l5),QIList(l118,QIList(l188,l379,l5),QIList(l188,l384,l5),l5),l5),QIList(l187,QIList(l7,QIList(l345,l418,l5),QIList(l186,QIList(QIList(l357,QIList(l185,QIList(l188,l379,l5),l5),"vardoc",QIList(l188,l418,l5),l5),l5),l5),l5),l5),QIList(l185,QIList(l188,l379,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l221,QIList(l112,QIList(l6,QIList(l417,l234,l376,l5),QIList(l186,QIList(l231,QIList(l188,l417,l5),l5,QIList(l122,QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l221,QIList(l112,QIList(l6,QIList(l417,l234,l376,l5),QIList(l186,QIList(l231,QIList(l188,l417,l5),QIList(l122,QIList(l187,l376,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l221,QIList(l112,QIList(l6,QIList(l375,l234,l376,l5),QIList(l186,QIList(l112,QIList(l6,QIList(l188,l375,l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l221,QIList(l112,QIList(l6,QIList(l379,l384,l233,l418,l5),QIList(l186,QIList(l122,QIList(l2,QIList(l225,QIList(l188,l379,l5),l5),l5),QIList(l2,QIList(l227,QIList(l188,l379,l5),l5),l5),QIList(l118,QIList(l188,l379,l5),QIList(l188,l384,l5),l5),QIList(l187,QIList(l7,QIList(l345,l418,l5),QIList(l186,QIList(QIList(l357,QIList(l185,QIList(l188,l379,l5),l5),"vardoc",QIList(l188,l418,l5),l5),l5),l5),l5),l5),QIList(l185,QIList(l188,l379,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l221,QIList(l112,QIList(l6,QIList(l234,l377,l5),QIList(l186,QIList(l270,QIList(l187,QIList(l81,QIList(l6,QIList(l378,l5),QIList(l186,QIList(l224,QIList(l185,QIList(l188,l378,l5),l5),l5),l5),l5),l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l270,QIList(l220,QIList(l185,QIList(l188,l379,l5),l5),QIList(l185,QIList(l112,QIList(l6,QIList(l188,QIList(l81,QIList(l112,QIList(l6,QIList(l374,l5),QIList(l231,QIList(l342,l374,QIList(l185,l370,l5),l5),QIList(l185,l234,l5),l374,l5),l5),l5),l375,l5),l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
+((l211).value = l419);
+var l420 = QIList(QIList(l418,"l418"),QIList(l417,"l417"),QIList(l416,"l416"),QIList(l415,"l415"),QIList(l414,"l414"),QIList(l413,"l413"),QIList(l412,"l412"),QIList(l411,"l411"),QIList(l410,"l410"),QIList(l409,"l409"),QIList(l408,"l408"),QIList(l407,"l407"),QIList(l406,"l406"),QIList(l405,"l405"),QIList(l404,"l404"),QIList(l403,"l403"),QIList(l402,"l402"),QIList(l401,"l401"),QIList(l400,"l400"),QIList(l399,"l399"),QIList(l398,"l398"),QIList(l397,"l397"),QIList(l396,"l396"),QIList(l395,"l395"),QIList(l394,"l394"),QIList(l393,"l393"),QIList(l392,"l392"),QIList(l391,"l391"),QIList(l390,"l390"),QIList(l389,"l389"),QIList(l388,"l388"),QIList(l387,"l387"),QIList(l386,"l386"),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(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(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(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(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),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(){
+    l147.fvalue(pv, l418);
+    l147.fvalue(pv, l417);
+    l147.fvalue(pv, l416);
+    l147.fvalue(pv, l415);
+    l147.fvalue(pv, l414);
+    l147.fvalue(pv, l413);
+    l147.fvalue(pv, l412);
+    l147.fvalue(pv, l411);
+    l147.fvalue(pv, l410);
+    l147.fvalue(pv, l409);
+    l147.fvalue(pv, l408);
+    l147.fvalue(pv, l407);
+    l147.fvalue(pv, l406);
+    l147.fvalue(pv, l405);
+    l147.fvalue(pv, l404);
+    l147.fvalue(pv, l403);
+    l147.fvalue(pv, l402);
+    l147.fvalue(pv, l401);
+    l147.fvalue(pv, l400);
+    l147.fvalue(pv, l399);
+    l147.fvalue(pv, l398);
+    l147.fvalue(pv, l397);
+    l147.fvalue(pv, l396);
+    l147.fvalue(pv, l395);
+    l147.fvalue(pv, l394);
+    l147.fvalue(pv, l393);
+    l147.fvalue(pv, l392);
+    l147.fvalue(pv, l391);
+    l147.fvalue(pv, l390);
+    l147.fvalue(pv, l389);
+    l147.fvalue(pv, l388);
+    l147.fvalue(pv, l387);
+    l147.fvalue(pv, l386);
+    l147.fvalue(pv, l385);
+    l147.fvalue(pv, l384);
+    l147.fvalue(pv, l383);
+    l147.fvalue(pv, l382);
+    l147.fvalue(pv, l381);
+    l147.fvalue(pv, l380);
+    l147.fvalue(pv, l379);
+    l147.fvalue(pv, l378);
+    l147.fvalue(pv, l377);
+    l147.fvalue(pv, l376);
+    l147.fvalue(pv, l375);
+    l147.fvalue(pv, l374);
+    l147.fvalue(pv, l373);
+    l147.fvalue(pv, l372);
+    l147.fvalue(pv, l370);
+    l147.fvalue(pv, l369);
+    l147.fvalue(pv, l368);
+    l147.fvalue(pv, l367);
+    l147.fvalue(pv, l366);
+    l147.fvalue(pv, l365);
+    l147.fvalue(pv, l364);
+    l147.fvalue(pv, l363);
+    l147.fvalue(pv, l362);
+    l147.fvalue(pv, l361);
+    l147.fvalue(pv, l360);
+    l147.fvalue(pv, l359);
+    l147.fvalue(pv, l358);
+    l147.fvalue(pv, l357);
+    l147.fvalue(pv, l356);
+    l147.fvalue(pv, l355);
+    l147.fvalue(pv, l354);
+    l147.fvalue(pv, l353);
+    l147.fvalue(pv, l352);
+    l147.fvalue(pv, l351);
+    l147.fvalue(pv, l350);
+    l147.fvalue(pv, l349);
+    l147.fvalue(pv, l348);
+    l147.fvalue(pv, l347);
+    l147.fvalue(pv, l346);
+    l147.fvalue(pv, l345);
+    l147.fvalue(pv, l344);
+    l147.fvalue(pv, l343);
+    l147.fvalue(pv, l342);
+    l147.fvalue(pv, l341);
+    l147.fvalue(pv, l340);
+    l147.fvalue(pv, l339);
+    l147.fvalue(pv, l338);
+    l147.fvalue(pv, l337);
+    l147.fvalue(pv, l336);
+    l147.fvalue(pv, l335);
+    l147.fvalue(pv, l334);
+    l147.fvalue(pv, l333);
+    l147.fvalue(pv, l332);
+    l147.fvalue(pv, l331);
+    l147.fvalue(pv, l330);
+    l147.fvalue(pv, l329);
+    l147.fvalue(pv, l328);
+    l147.fvalue(pv, l327);
+    l147.fvalue(pv, l326);
+    l147.fvalue(pv, l325);
+    l147.fvalue(pv, l324);
+    l147.fvalue(pv, l323);
+    l147.fvalue(pv, l322);
+    l147.fvalue(pv, l321);
+    l147.fvalue(pv, l320);
+    l147.fvalue(pv, l319);
+    l147.fvalue(pv, l318);
+    l147.fvalue(pv, l317);
+    l147.fvalue(pv, l316);
+    l147.fvalue(pv, l315);
+    l147.fvalue(pv, l314);
+    l147.fvalue(pv, l313);
+    l147.fvalue(pv, l312);
+    l147.fvalue(pv, l311);
+    l147.fvalue(pv, l310);
+    l147.fvalue(pv, l309);
+    l147.fvalue(pv, l308);
+    l147.fvalue(pv, l307);
+    l147.fvalue(pv, l306);
+    l147.fvalue(pv, l305);
+    l147.fvalue(pv, l304);
+    l147.fvalue(pv, l303);
+    l147.fvalue(pv, l302);
+    l147.fvalue(pv, l301);
+    l147.fvalue(pv, l300);
+    l147.fvalue(pv, l299);
+    l147.fvalue(pv, l298);
+    l147.fvalue(pv, l297);
+    l147.fvalue(pv, l296);
+    l147.fvalue(pv, l295);
+    l147.fvalue(pv, l294);
+    l147.fvalue(pv, l293);
+    l147.fvalue(pv, l292);
+    l147.fvalue(pv, l291);
+    l147.fvalue(pv, l289);
+    l147.fvalue(pv, l288);
+    l147.fvalue(pv, l287);
+    l147.fvalue(pv, l286);
+    l147.fvalue(pv, l285);
+    l147.fvalue(pv, l284);
+    l147.fvalue(pv, l283);
+    l147.fvalue(pv, l282);
+    l147.fvalue(pv, l281);
+    l147.fvalue(pv, l280);
+    l147.fvalue(pv, l279);
+    l147.fvalue(pv, l278);
+    l147.fvalue(pv, l277);
+    l147.fvalue(pv, l276);
+    l147.fvalue(pv, l275);
+    l147.fvalue(pv, l274);
+    l147.fvalue(pv, l273);
+    l147.fvalue(pv, l272);
+    l147.fvalue(pv, l271);
+    l147.fvalue(pv, l270);
+    l147.fvalue(pv, l269);
+    l147.fvalue(pv, l268);
+    l147.fvalue(pv, l267);
+    l147.fvalue(pv, l266);
+    l147.fvalue(pv, l265);
+    l147.fvalue(pv, l264);
+    l147.fvalue(pv, l263);
+    l147.fvalue(pv, l262);
+    l147.fvalue(pv, l261);
+    l147.fvalue(pv, l260);
+    l147.fvalue(pv, l259);
+    l147.fvalue(pv, l258);
+    l147.fvalue(pv, l257);
+    l147.fvalue(pv, l256);
+    l147.fvalue(pv, l255);
+    l147.fvalue(pv, l254);
+    l147.fvalue(pv, l253);
+    l147.fvalue(pv, l252);
+    l147.fvalue(pv, l251);
+    l147.fvalue(pv, l250);
+    l147.fvalue(pv, l249);
+    l147.fvalue(pv, l248);
+    l147.fvalue(pv, l247);
+    l147.fvalue(pv, l246);
+    l147.fvalue(pv, l245);
+    l147.fvalue(pv, l244);
+    l147.fvalue(pv, l243);
+    l147.fvalue(pv, l242);
+    l147.fvalue(pv, l241);
+    l147.fvalue(pv, l240);
+    l147.fvalue(pv, l239);
+    l147.fvalue(pv, l238);
+    l147.fvalue(pv, l237);
+    l147.fvalue(pv, l235);
+    l147.fvalue(pv, l234);
+    l147.fvalue(pv, l233);
+    l147.fvalue(pv, l232);
+    l147.fvalue(pv, l231);
+    l147.fvalue(pv, l230);
+    l147.fvalue(pv, l229);
+    l147.fvalue(pv, l228);
+    l147.fvalue(pv, l227);
+    l147.fvalue(pv, l226);
+    l147.fvalue(pv, l225);
+    l147.fvalue(pv, l224);
+    l147.fvalue(pv, l223);
+    l147.fvalue(pv, l222);
+    l147.fvalue(pv, l221);
+    l147.fvalue(pv, l220);
+    l147.fvalue(pv, l219);
+    l147.fvalue(pv, l218);
+    l147.fvalue(pv, l217);
+    l147.fvalue(pv, l216);
+    l147.fvalue(pv, l215);
+    l147.fvalue(pv, l214);
+    l147.fvalue(pv, l213);
+    l147.fvalue(pv, l212);
+    l147.fvalue(pv, l211);
+    l147.fvalue(pv, l210);
+    l147.fvalue(pv, l209);
+    l147.fvalue(pv, l208);
+    l147.fvalue(pv, l207);
+    l147.fvalue(pv, l206);
+    l147.fvalue(pv, l205);
+    l147.fvalue(pv, l204);
+    l147.fvalue(pv, l203);
+    l147.fvalue(pv, l202);
+    l147.fvalue(pv, l201);
+    l147.fvalue(pv, l200);
+    l147.fvalue(pv, l199);
+    l147.fvalue(pv, l198);
+    l147.fvalue(pv, l197);
+    l147.fvalue(pv, l196);
+    l147.fvalue(pv, l195);
+    l147.fvalue(pv, l194);
+    l147.fvalue(pv, l193);
+    l147.fvalue(pv, l192);
+    l147.fvalue(pv, l191);
+    l147.fvalue(pv, l190);
+    l147.fvalue(pv, l189);
+    l147.fvalue(pv, l188);
+    l147.fvalue(pv, l187);
+    l147.fvalue(pv, l186);
+    l147.fvalue(pv, l185);
+    l147.fvalue(pv, l184);
+    l147.fvalue(pv, l183);
+    l147.fvalue(pv, l182);
+    l147.fvalue(pv, l181);
+    l147.fvalue(pv, l180);
+    l147.fvalue(pv, l179);
+    l147.fvalue(pv, l178);
+    l147.fvalue(pv, l177);
+    l147.fvalue(pv, l176);
+    l147.fvalue(pv, l175);
+    l147.fvalue(pv, l174);
+    l147.fvalue(pv, l173);
+    l147.fvalue(pv, l172);
+    l147.fvalue(pv, l171);
+    l147.fvalue(pv, l170);
+    l147.fvalue(pv, l169);
+    l147.fvalue(pv, l168);
+    l147.fvalue(pv, l167);
+    l147.fvalue(pv, l166);
+    l147.fvalue(pv, l165);
+    l147.fvalue(pv, l164);
+    l147.fvalue(pv, l163);
+    l147.fvalue(pv, l162);
+    l147.fvalue(pv, l161);
+    l147.fvalue(pv, l160);
+    l147.fvalue(pv, l159);
+    l147.fvalue(pv, l158);
+    l147.fvalue(pv, l157);
+    l147.fvalue(pv, l156);
+    l147.fvalue(pv, l155);
+    l147.fvalue(pv, l154);
+    l147.fvalue(pv, l153);
+    l147.fvalue(pv, l152);
+    l147.fvalue(pv, l151);
+    l147.fvalue(pv, l150);
+    l147.fvalue(pv, l149);
+    l147.fvalue(pv, l148);
+    l147.fvalue(pv, l147);
+    l147.fvalue(pv, l146);
+    l147.fvalue(pv, l145);
+    l147.fvalue(pv, l144);
+    l147.fvalue(pv, l143);
+    l147.fvalue(pv, l142);
+    l147.fvalue(pv, l141);
+    l147.fvalue(pv, l140);
+    l147.fvalue(pv, l139);
+    l147.fvalue(pv, l138);
+    l147.fvalue(pv, l137);
+    l147.fvalue(pv, l136);
+    l147.fvalue(pv, l135);
+    l147.fvalue(pv, l134);
+    l147.fvalue(pv, l133);
+    l147.fvalue(pv, l132);
+    l147.fvalue(pv, l131);
+    l147.fvalue(pv, l130);
+    l147.fvalue(pv, l129);
+    l147.fvalue(pv, l128);
+    l147.fvalue(pv, l127);
+    l147.fvalue(pv, l126);
+    l147.fvalue(pv, l125);
+    l147.fvalue(pv, l124);
+    l147.fvalue(pv, l123);
+    l147.fvalue(pv, l122);
+    l147.fvalue(pv, l121);
+    l147.fvalue(pv, l120);
+    l147.fvalue(pv, l119);
+    l147.fvalue(pv, l118);
+    l147.fvalue(pv, l117);
+    l147.fvalue(pv, l116);
+    l147.fvalue(pv, l115);
+    l147.fvalue(pv, l114);
+    l147.fvalue(pv, l113);
+    l147.fvalue(pv, l112);
+    l147.fvalue(pv, l111);
+    l147.fvalue(pv, l110);
+    l147.fvalue(pv, l109);
+    l147.fvalue(pv, l108);
+    l147.fvalue(pv, l107);
+    l147.fvalue(pv, l106);
+    l147.fvalue(pv, l105);
+    l147.fvalue(pv, l104);
+    l147.fvalue(pv, l103);
+    l147.fvalue(pv, l102);
+    l147.fvalue(pv, l101);
+    l147.fvalue(pv, l100);
+    l147.fvalue(pv, l99);
+    l147.fvalue(pv, l98);
+    l147.fvalue(pv, l97);
+    l147.fvalue(pv, l96);
+    l147.fvalue(pv, l95);
+    l147.fvalue(pv, l94);
+    l147.fvalue(pv, l93);
+    l147.fvalue(pv, l92);
+    l147.fvalue(pv, l91);
+    l147.fvalue(pv, l90);
+    l147.fvalue(pv, l89);
+    l147.fvalue(pv, l88);
+    l147.fvalue(pv, l87);
+    l147.fvalue(pv, l86);
+    l147.fvalue(pv, l85);
+    l147.fvalue(pv, l84);
+    l147.fvalue(pv, l83);
+    l147.fvalue(pv, l82);
+    l147.fvalue(pv, l81);
+    l147.fvalue(pv, l80);
+    l147.fvalue(pv, l79);
+    l147.fvalue(pv, l78);
+    l147.fvalue(pv, l77);
+    l147.fvalue(pv, l76);
+    l147.fvalue(pv, l75);
+    l147.fvalue(pv, l74);
+    l147.fvalue(pv, l73);
+    l147.fvalue(pv, l72);
+    l147.fvalue(pv, l71);
+    l147.fvalue(pv, l70);
+    l147.fvalue(pv, l69);
+    l147.fvalue(pv, l68);
+    l147.fvalue(pv, l67);
+    l147.fvalue(pv, l66);
+    l147.fvalue(pv, l65);
+    l147.fvalue(pv, l64);
+    l147.fvalue(pv, l63);
+    l147.fvalue(pv, l62);
+    l147.fvalue(pv, l61);
+    l147.fvalue(pv, l60);
+    l147.fvalue(pv, l59);
+    l147.fvalue(pv, l58);
+    l147.fvalue(pv, l57);
+    l147.fvalue(pv, l56);
+    l147.fvalue(pv, l55);
+    l147.fvalue(pv, l54);
+    l147.fvalue(pv, l53);
+    l147.fvalue(pv, l52);
+    l147.fvalue(pv, l51);
+    l147.fvalue(pv, l50);
+    l147.fvalue(pv, l49);
+    l147.fvalue(pv, l48);
+    l147.fvalue(pv, l47);
+    l147.fvalue(pv, l46);
+    l147.fvalue(pv, l45);
+    l147.fvalue(pv, l44);
+    l147.fvalue(pv, l43);
+    l147.fvalue(pv, l42);
+    l147.fvalue(pv, l41);
+    l147.fvalue(pv, l40);
+    l147.fvalue(pv, l39);
+    l147.fvalue(pv, l38);
+    l147.fvalue(pv, l37);
+    l147.fvalue(pv, l36);
+    l147.fvalue(pv, l35);
+    l147.fvalue(pv, l34);
+    l147.fvalue(pv, l33);
+    l147.fvalue(pv, l32);
+    l147.fvalue(pv, l31);
+    l147.fvalue(pv, l30);
+    l147.fvalue(pv, l29);
+    l147.fvalue(pv, l28);
+    l147.fvalue(pv, l27);
+    l147.fvalue(pv, l26);
+    l147.fvalue(pv, l25);
+    l147.fvalue(pv, l24);
+    l147.fvalue(pv, l23);
+    l147.fvalue(pv, l22);
+    l147.fvalue(pv, l21);
+    l147.fvalue(pv, l20);
+    l147.fvalue(pv, l19);
+    l147.fvalue(pv, l18);
+    l147.fvalue(pv, l17);
+    l147.fvalue(pv, l16);
+    l147.fvalue(pv, l15);
+    l147.fvalue(pv, l14);
+    l147.fvalue(pv, l13);
+    l147.fvalue(pv, l12);
+    l147.fvalue(pv, l11);
+    l147.fvalue(pv, l10);
+    l147.fvalue(pv, l9);
+    l147.fvalue(pv, l8);
+    l147.fvalue(pv, l7);
+    l147.fvalue(pv, l6);
+    l147.fvalue(pv, l5);
+    l147.fvalue(pv, l4);
+    l147.fvalue(pv, l3);
+    l147.fvalue(pv, l2);
+    l147.fvalue(pv, l1);
+    ((l258).value = l420);
+    ((l212).value = 999);
+    ((l17).value = 270);
+    return ((l279).value = 332);
+})();
+((l259).value = 420);
+>>>>>>> backquote
index a711013..8b1dcd5 100644 (file)
   (defun null (x)
     (eq x nil))
 
+  (defun endp (x)
+    (if (null x)
+        t
+        (if (consp x)
+            nil
+            (error "type-error"))))
+
   (defmacro return (&optional value)
     `(return-from nil ,value))
 
   (defun cadr (x) (car (cdr x)))
   (defun cdar (x) (cdr (car x)))
   (defun cddr (x) (cdr (cdr x)))
+  (defun cadar (x) (car (cdr (car x))))
   (defun caddr (x) (car (cdr (cdr x))))
   (defun cdddr (x) (cdr (cdr (cdr x))))
   (defun cadddr (x) (car (cdr (cdr (cdr x)))))
        (let ,(mapcar (lambda (x) (list (first x) (second x))) varlist)
         (while t
           (when ,(car endlist)
-            (return (progn ,(cdr endlist))))
+            (return (progn ,@(cdr endlist))))
           (tagbody ,@body)
           (psetq
            ,@(apply #'append
        (let* ,(mapcar (lambda (x) (list (first x) (second x))) varlist)
         (while t
           (when ,(car endlist)
-            (return (progn ,(cdr endlist))))
+            (return (progn ,@(cdr endlist))))
           (tagbody ,@body)
           (setq
            ,@(apply #'append
   (defun copy-list (x)
     (mapcar #'identity x))
 
+  (defun list* (arg &rest others)
+    (cond ((null others) arg)
+          ((null (cdr others)) (cons arg (car others)))
+          (t (do ((x others (cdr x)))
+                 ((null (cddr x)) (rplacd x (cadr x))))
+             (cons arg others))))
+
   (defun code-char (x) x)
   (defun char-code (x) x)
   (defun char= (x y) (= x y))
               `(progn (rplacd ,cons ,new-value) ,new-value)
               `(car ,cons))))
 
+<<<<<<< HEAD
   (defmacro push (x place)
     (multiple-value-bind (dummies vals newval setter getter)
         (get-setf-expansion place)
                 (,(car newval) (cons ,g ,getter))
                 ,@(cdr newval))
            ,setter))))
+=======
+  ;; Incorrect typecase, but used in NCONC.
+  (defmacro typecase (x &rest clausules)
+    (let ((value (gensym)))
+      `(let ((,value ,x))
+         (cond
+           ,@(mapcar (lambda (c)
+                       (if (eq (car c) t)
+                           `((t ,@(rest c)))
+                           `((,(ecase (car c)
+                                      (integer 'integerp)
+                                      (cons 'consp)
+                                      (string 'stringp)
+                                      (atom 'atom)
+                                      (null 'null))
+                               ,value)
+                             ,@(or (rest c)
+                                   (list nil)))))
+                     clausules)))))
+
+  ;; The NCONC function is based on the SBCL's one.
+  (defun nconc (&rest lists)
+    (flet ((fail (object)
+             (error "type-error in nconc")))
+      (do ((top lists (cdr top)))
+          ((null top) nil)
+        (let ((top-of-top (car top)))
+          (typecase top-of-top
+            (cons
+             (let* ((result top-of-top)
+                    (splice result))
+               (do ((elements (cdr top) (cdr elements)))
+                   ((endp elements))
+                 (let ((ele (car elements)))
+                   (typecase ele
+                     (cons (rplacd (last splice) ele)
+                           (setf splice ele))
+                     (null (rplacd (last splice) nil))
+                     (atom (if (cdr elements)
+                               (fail ele)
+                               (rplacd (last splice) ele))))))
+               (return result)))
+            (null)
+            (atom
+             (if (cdr top)
+                 (fail top-of-top)
+                 (return top-of-top))))))))
+
+  (defun nreconc (x y)
+    (do ((1st (cdr x) (if (endp 1st) 1st (cdr 1st)))
+         (2nd x 1st) ; 2nd follows first down the list.
+         (3rd y 2nd)) ;3rd follows 2nd down the list.
+        ((atom 2nd) 3rd)
+      (rplacd 2nd 3rd)))
+
+  (defun notany (fn seq)
+    (not (some fn seq)))
+
+>>>>>>> backquote
 
   ;; Packages
 
     x))
 
 
+
 ;;;; Reader
 
 ;;; The Lisp reader, parse strings and return Lisp objects. The main
       (ls-compile-block body t))))
 
 
-
 (defvar *compiling-file* nil)
 (define-compilation eval-when-compile (&rest body)
   (if *compiling-file*
     "return args;" *newline*))
 
 
-
-;;; A little backquote implementation without optimizations of any
-;;; kind for ecmalisp.
-(defun backquote-expand-1 (form)
-  (cond
-    ((symbolp form)
-     (list 'quote form))
-    ((atom form)
-     form)
-    ((eq (car form) 'unquote)
-     (car form))
-    ((eq (car form) 'backquote)
-     (backquote-expand-1 (backquote-expand-1 (cadr form))))
-    (t
-     (cons 'append
-           (mapcar (lambda (s)
-                     (cond
-                       ((and (listp s) (eq (car s) 'unquote))
-                        (list 'list (cadr s)))
-                       ((and (listp s) (eq (car s) 'unquote-splicing))
-                        (cadr s))
-                       (t
-                        (list 'list (backquote-expand-1 s)))))
-                   form)))))
-
-(defun backquote-expand (form)
-  (if (and (listp form) (eq (car form) 'backquote))
-      (backquote-expand-1 (cadr form))
-      form))
-
-(defmacro backquote (form)
-  (backquote-expand-1 form))
+;;; Backquote implementation.
+;;;
+;;;    Author: Guy L. Steele Jr.     Date: 27 December 1985
+;;;    Tested under Symbolics Common Lisp and Lucid Common Lisp.
+;;;    This software is in the public domain.
+
+;;;    The following are unique tokens used during processing.
+;;;    They need not be symbols; they need not even be atoms.
+(defvar *comma* 'unquote)
+(defvar *comma-atsign* 'unquote-splicing)
+
+(defvar *bq-list* (make-symbol "BQ-LIST"))
+(defvar *bq-append* (make-symbol "BQ-APPEND"))
+(defvar *bq-list** (make-symbol "BQ-LIST*"))
+(defvar *bq-nconc* (make-symbol "BQ-NCONC"))
+(defvar *bq-clobberable* (make-symbol "BQ-CLOBBERABLE"))
+(defvar *bq-quote* (make-symbol "BQ-QUOTE"))
+(defvar *bq-quote-nil* (list *bq-quote* nil))
+
+;;; BACKQUOTE is an ordinary macro (not a read-macro) that processes
+;;; the expression foo, looking for occurrences of #:COMMA,
+;;; #:COMMA-ATSIGN, and #:COMMA-DOT.  It constructs code in strict
+;;; accordance with the rules on pages 349-350 of the first edition
+;;; (pages 528-529 of this second edition).  It then optionally
+;;; applies a code simplifier.
+
+;;; If the value of *BQ-SIMPLIFY* is non-NIL, then BACKQUOTE
+;;; processing applies the code simplifier.  If the value is NIL,
+;;; then the code resulting from BACKQUOTE is exactly that
+;;; specified by the official rules.
+(defparameter *bq-simplify* t)
+
+(defmacro backquote (x)
+  (bq-completely-process x))
+
+;;; Backquote processing proceeds in three stages:
+;;;
+;;; (1) BQ-PROCESS applies the rules to remove occurrences of
+;;; #:COMMA, #:COMMA-ATSIGN, and #:COMMA-DOT corresponding to
+;;; this level of BACKQUOTE.  (It also causes embedded calls to
+;;; BACKQUOTE to be expanded so that nesting is properly handled.)
+;;; Code is produced that is expressed in terms of functions
+;;; #:BQ-LIST, #:BQ-APPEND, and #:BQ-CLOBBERABLE.  This is done
+;;; so that the simplifier will simplify only list construction
+;;; functions actually generated by BACKQUOTE and will not involve
+;;; any user code in the simplification.  #:BQ-LIST means LIST,
+;;; #:BQ-APPEND means APPEND, and #:BQ-CLOBBERABLE means IDENTITY
+;;; but indicates places where "%." was used and where NCONC may
+;;; therefore be introduced by the simplifier for efficiency.
+;;;
+;;; (2) BQ-SIMPLIFY, if used, rewrites the code produced by
+;;; BQ-PROCESS to produce equivalent but faster code.  The
+;;; additional functions #:BQ-LIST* and #:BQ-NCONC may be
+;;; introduced into the code.
+;;;
+;;; (3) BQ-REMOVE-TOKENS goes through the code and replaces
+;;; #:BQ-LIST with LIST, #:BQ-APPEND with APPEND, and so on.
+;;; #:BQ-CLOBBERABLE is simply eliminated (a call to it being
+;;; replaced by its argument).  #:BQ-LIST* is replaced by either
+;;; LIST* or CONS (the latter is used in the two-argument case,
+;;; purely to make the resulting code a tad more readable).
+
+(defun bq-completely-process (x)
+  (let ((raw-result (bq-process x)))
+    (bq-remove-tokens (if *bq-simplify*
+                          (bq-simplify raw-result)
+                          raw-result))))
+
+(defun bq-process (x)
+  (cond ((atom x)
+         (list *bq-quote* x))
+        ((eq (car x) 'backquote)
+         (bq-process (bq-completely-process (cadr x))))
+        ((eq (car x) *comma*) (cadr x))
+        ((eq (car x) *comma-atsign*)
+         ;; (error ",@~S after `" (cadr x))
+         (error "ill-formed"))
+        ;; ((eq (car x) *comma-dot*)
+        ;;  ;; (error ",.~S after `" (cadr x))
+        ;;  (error "ill-formed"))
+        (t (do ((p x (cdr p))
+                (q '() (cons (bracket (car p)) q)))
+               ((atom p)
+                (cons *bq-append*
+                      (nreconc q (list (list *bq-quote* p)))))
+             (when (eq (car p) *comma*)
+               (unless (null (cddr p))
+                 ;; (error "Malformed ,~S" p)
+                 (error "Malformed"))
+               (return (cons *bq-append*
+                             (nreconc q (list (cadr p))))))
+             (when (eq (car p) *comma-atsign*)
+               ;; (error "Dotted ,@~S" p)
+               (error "Dotted"))
+             ;; (when (eq (car p) *comma-dot*)
+             ;;   ;; (error "Dotted ,.~S" p)
+             ;;   (error "Dotted"))
+             ))))
+
+;;; This implements the bracket operator of the formal rules.
+(defun bracket (x)
+  (cond ((atom x)
+         (list *bq-list* (bq-process x)))
+        ((eq (car x) *comma*)
+         (list *bq-list* (cadr x)))
+        ((eq (car x) *comma-atsign*)
+         (cadr x))
+        ;; ((eq (car x) *comma-dot*)
+        ;;  (list *bq-clobberable* (cadr x)))
+        (t (list *bq-list* (bq-process x)))))
+
+;;; This auxiliary function is like MAPCAR but has two extra
+;;; purposes: (1) it handles dotted lists; (2) it tries to make
+;;; the result share with the argument x as much as possible.
+(defun maptree (fn x)
+  (if (atom x)
+      (funcall fn x)
+      (let ((a (funcall fn (car x)))
+            (d (maptree fn (cdr x))))
+        (if (and (eql a (car x)) (eql d (cdr x)))
+            x
+            (cons a d)))))
+
+;;; This predicate is true of a form that when read looked
+;;; like %@foo or %.foo.
+(defun bq-splicing-frob (x)
+  (and (consp x)
+       (or (eq (car x) *comma-atsign*)
+           ;; (eq (car x) *comma-dot*)
+           )))
+
+;;; This predicate is true of a form that when read
+;;; looked like %@foo or %.foo or just plain %foo.
+(defun bq-frob (x)
+  (and (consp x)
+       (or (eq (car x) *comma*)
+           (eq (car x) *comma-atsign*)
+           ;; (eq (car x) *comma-dot*)
+           )))
+
+;;; The simplifier essentially looks for calls to #:BQ-APPEND and
+;;; tries to simplify them.  The arguments to #:BQ-APPEND are
+;;; processed from right to left, building up a replacement form.
+;;; At each step a number of special cases are handled that,
+;;; loosely speaking, look like this:
+;;;
+;;;  (APPEND (LIST a b c) foo) => (LIST* a b c foo)
+;;;       provided a, b, c are not splicing frobs
+;;;  (APPEND (LIST* a b c) foo) => (LIST* a b (APPEND c foo))
+;;;       provided a, b, c are not splicing frobs
+;;;  (APPEND (QUOTE (x)) foo) => (LIST* (QUOTE x) foo)
+;;;  (APPEND (CLOBBERABLE x) foo) => (NCONC x foo)
+(defun bq-simplify (x)
+  (if (atom x)
+      x
+      (let ((x (if (eq (car x) *bq-quote*)
+                   x
+                   (maptree #'bq-simplify x))))
+        (if (not (eq (car x) *bq-append*))
+            x
+            (bq-simplify-args x)))))
+
+(defun bq-simplify-args (x)
+  (do ((args (reverse (cdr x)) (cdr args))
+       (result
+         nil
+         (cond ((atom (car args))
+                (bq-attach-append *bq-append* (car args) result))
+               ((and (eq (caar args) *bq-list*)
+                     (notany #'bq-splicing-frob (cdar args)))
+                (bq-attach-conses (cdar args) result))
+               ((and (eq (caar args) *bq-list**)
+                     (notany #'bq-splicing-frob (cdar args)))
+                (bq-attach-conses
+                  (reverse (cdr (reverse (cdar args))))
+                  (bq-attach-append *bq-append*
+                                    (car (last (car args)))
+                                    result)))
+               ((and (eq (caar args) *bq-quote*)
+                     (consp (cadar args))
+                     (not (bq-frob (cadar args)))
+                     (null (cddar args)))
+                (bq-attach-conses (list (list *bq-quote*
+                                              (caadar args)))
+                                  result))
+               ((eq (caar args) *bq-clobberable*)
+                (bq-attach-append *bq-nconc* (cadar args) result))
+               (t (bq-attach-append *bq-append*
+                                    (car args)
+                                    result)))))
+      ((null args) result)))
+
+(defun null-or-quoted (x)
+  (or (null x) (and (consp x) (eq (car x) *bq-quote*))))
+
+;;; When BQ-ATTACH-APPEND is called, the OP should be #:BQ-APPEND
+;;; or #:BQ-NCONC.  This produces a form (op item result) but
+;;; some simplifications are done on the fly:
+;;;
+;;;  (op '(a b c) '(d e f g)) => '(a b c d e f g)
+;;;  (op item 'nil) => item, provided item is not a splicable frob
+;;;  (op item 'nil) => (op item), if item is a splicable frob
+;;;  (op item (op a b c)) => (op item a b c)
+(defun bq-attach-append (op item result)
+  (cond ((and (null-or-quoted item) (null-or-quoted result))
+         (list *bq-quote* (append (cadr item) (cadr result))))
+        ((or (null result) (equal result *bq-quote-nil*))
+         (if (bq-splicing-frob item) (list op item) item))
+        ((and (consp result) (eq (car result) op))
+         (list* (car result) item (cdr result)))
+        (t (list op item result))))
+
+;;; The effect of BQ-ATTACH-CONSES is to produce a form as if by
+;;; `(LIST* ,@items ,result) but some simplifications are done
+;;; on the fly.
+;;;
+;;;  (LIST* 'a 'b 'c 'd) => '(a b c . d)
+;;;  (LIST* a b c 'nil) => (LIST a b c)
+;;;  (LIST* a b c (LIST* d e f g)) => (LIST* a b c d e f g)
+;;;  (LIST* a b c (LIST d e f g)) => (LIST a b c d e f g)
+(defun bq-attach-conses (items result)
+  (cond ((and (every #'null-or-quoted items)
+              (null-or-quoted result))
+         (list *bq-quote*
+               (append (mapcar #'cadr items) (cadr result))))
+        ((or (null result) (equal result *bq-quote-nil*))
+         (cons *bq-list* items))
+        ((and (consp result)
+              (or (eq (car result) *bq-list*)
+                  (eq (car result) *bq-list**)))
+         (cons (car result) (append items (cdr result))))
+        (t (cons *bq-list** (append items (list result))))))
+
+;;; Removes funny tokens and changes (#:BQ-LIST* a b) into
+;;; (CONS a b) instead of (LIST* a b), purely for readability.
+(defun bq-remove-tokens (x)
+  (cond ((eq x *bq-list*) 'list)
+        ((eq x *bq-append*) 'append)
+        ((eq x *bq-nconc*) 'nconc)
+        ((eq x *bq-list**) 'list*)
+        ((eq x *bq-quote*) 'quote)
+        ((atom x) x)
+        ((eq (car x) *bq-clobberable*)
+         (bq-remove-tokens (cadr x)))
+        ((and (eq (car x) *bq-list**)
+              (consp (cddr x))
+              (null (cdddr x)))
+         (cons 'cons (maptree #'bq-remove-tokens (cdr x))))
+        (t (maptree #'bq-remove-tokens x))))
 
 (define-transformation backquote (form)
-  (backquote-expand-1 form))
+  (bq-completely-process form))
+
 
 ;;; Primitives
 
                 (ls-compile (ls-macroexpand-1 sexp) multiple-value-p)
                 (compile-funcall name args))))))
       (t
-       (error "How should I compile this?")))))
+       (error (concat "How should I compile " (prin1-to-string sexp) "?"))))))
 
 (defun ls-compile-toplevel (sexp &optional multiple-value-p)
   (let ((*toplevel-compilations* nil))
             cond cons consp constantly copy-list decf declaim define-setf-expander
             defconstant defparameter defun defmacro defvar digit-char digit-char-p
             disassemble do do* documentation dolist dotimes ecase eq eql equal
-            error eval every export list-all-packages list listp loop make-array
+            error eval every export list-all-packages list list* listp loop make-array
             make-package make-symbol mapcar member minusp mod multiple-value-bind
-            multiple-value-call multiple-value-list multiple-value-prog1 nil not
+            multiple-value-call multiple-value-list multiple-value-prog1 nconc nil not
             nth nthcdr null numberp or package-name package-use-list packagep
             parse-integer plusp prin1-to-string print proclaim prog1 prog2 progn
-            psetq push quote remove remove-if remove-if-not return return-from
+            psetq push quote nreconc remove remove-if remove-if-not return return-from
             revappend reverse rplaca rplacd second set setf setq some
             string-upcase string string= stringp subseq symbol-function
             symbol-name symbol-package symbol-plist symbol-value symbolp t tagbody