bit2 0.0.5 → 0.0.7

package/dist/bit2.js

@@ -1 +1 @@
-!function(e,n){"object"==typeof exports&&"object"==typeof module?module.exports=n():"function"==typeof define&&define.amd?define([],n):"object"==typeof exports?exports.MyLibrary=n():e.MyLibrary=n()}(this,(()=>(()=>{"use strict";var e={612:function(e,n,t){var r=this&&this.__createBinding||(Object.create?function(e,n,t,r){void 0===r&&(r=t);var o=Object.getOwnPropertyDescriptor(n,t);o&&!("get"in o?!n.__esModule:o.writable||o.configurable)||(o={enumerable:!0,get:function(){return n[t]}}),Object.defineProperty(e,r,o)}:function(e,n,t,r){void 0===r&&(r=t),e[r]=n[t]}),o=this&&this.__setModuleDefault||(Object.create?function(e,n){Object.defineProperty(e,"default",{enumerable:!0,value:n})}:function(e,n){e.default=n}),i=this&&this.__importStar||function(e){if(e&&e.__esModule)return e;var n={};if(null!=e)for(var t in e)"default"!==t&&Object.prototype.hasOwnProperty.call(e,t)&&r(n,e,t);return o(n,e),n};Object.defineProperty(n,"__esModule",{value:!0}),n.evaluateToLambdaAST=h,n.forward=function(e){let n=p.parse(e),t=u.translate(n);return l.evaluateTermNode(h(t))},n.backward=function(e,n){let t=p.parse(e),r=h(u.translate(t)),o=(0,f.fuse)({},n,r).map((({newTermNode:e,remainingOperation:n})=>{let t=(0,b.flatten)((0,y.unLambdalize)(e)),r=c.flatten(c.unPartialEval(t));return d.printToSurface(r)}));return Array.from(new Set(o))};const a=t(446),s=t(619),l=i(t(238)),c=i(t(887)),p=i(t(577)),u=i(t(775)),d=i(t(69)),f=t(963),y=t(784),b=t(446);function h(e){const n=new Map,[t,r]=(0,a.partialEval)(n,e);return(0,s.lambdalize)(r)}},75:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.findVariablesAndFields=function(e){let n=[],t=[];return function e(r){switch(r.type){case"variable":n.push(r);break;case"field":"variable"===r.object.type?t.push({variable:r.object,field:r.field}):e(r.object);break;case"binary":e(r.left),e(r.right);break;case"unary":e(r.operand);break;case"array":r.elements.forEach(e);break;case"object":Object.values(r.fields).forEach(e);break;case"freeze":e(r.expression)}}(e),{variables:n,fields:t}}},143:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.prettyPrint=function e(n){switch(n.type){case"constant":return"string"==typeof n.value?'"'+String(n.value)+'"':String(n.value);case"variable":return n.name;case"binary":return e(n.left)+n.operator+e(n.right);case"unary":return n.operator+e(n.operand);case"field":return e(n.object)+"."+n.field;case"array":return"["+n.elements.map((n=>e(n))).join(",")+"]";case"freeze":return"!"+e(n.expression);default:return""}},n.prettyPrintBinaryOperator=function(e){return e},n.prettyPrintUnaryOperator=function(e){return e}},235:(e,n)=>{function t(e,n){if(null===e)console.log(`${n}null`);else if("number"==typeof e||"boolean"==typeof e||"string"==typeof e)console.log(`${n}${e}`);else if("object"==typeof e){console.log(`${n}{`);const r=e;for(const e in r)if(r.hasOwnProperty(e)){const o=n+"  ";console.log(`${o}${e}:`),t(r[e],o+"  ")}console.log(`${n}}`)}else{if("constant"!=typeof e)throw new Error("Unhandled value type: "+typeof e);t(e.value,n+" ")}}Object.defineProperty(n,"__esModule",{value:!0}),n.printExpression=function e(n,r=""){switch(n.type){case"constant":t(n.value,r+" ");break;case"variable":console.log(`${r}Variable: ${n.name}`);break;case"binary":console.log(`${r}BinaryOperation: ${n.operator}`),e(n.left,r+"  "),e(n.right,r+"  ");break;case"unary":console.log(`${r}UnaryOperation: ${n.operator}`),e(n.operand,r+"  ");break;case"field":console.log(`${r}FieldAccess: ${n.field}`),e(n.object,r+"  ");break;case"array":console.log(`${r}ArrayLiteral:`),n.elements.forEach((n=>e(n,r+"  ")));break;case"object":console.log(`${r}ObjectLiteral:`),Object.keys(n.fields).forEach((e=>{console.log(`${r}${e} = ${n.fields[e].value}`)}));break;case"freeze":console.log(`${r}Freeze:`),e(n.expression,r+"  ")}},n.printConstantValue=t},454:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.seq=function(...e){return{type:"seq",nodes:e}},n.constNode=function(e){return{type:"const",value:e}},n.space=function(e){return{type:"space",width:e}},n.declare=function(e,n){return{type:"declare",name:e,value:n}},n.exp=function(e){return{type:"exp",expression:e}},n.loop=function(e,n,t,r,o){return{type:"loop",lst:e,separator:n,front:t,rear:r,body:o}},n.ite=function(e,n,t){return{type:"ite",condition:e,trueBranch:n,falseBranch:t}},n.assign=function(e,n){return{type:"assign",name:e,value:n}},n.nop=function(){return{type:"nop"}},n.bot=function(){return{type:"bot"}},n.end=function(){return{type:"end"}}},69:function(e,n,t){var r=this&&this.__createBinding||(Object.create?function(e,n,t,r){void 0===r&&(r=t);var o=Object.getOwnPropertyDescriptor(n,t);o&&!("get"in o?!n.__esModule:o.writable||o.configurable)||(o={enumerable:!0,get:function(){return n[t]}}),Object.defineProperty(e,r,o)}:function(e,n,t,r){void 0===r&&(r=t),e[r]=n[t]}),o=this&&this.__setModuleDefault||(Object.create?function(e,n){Object.defineProperty(e,"default",{enumerable:!0,value:n})}:function(e,n){e.default=n}),i=this&&this.__importStar||function(e){if(e&&e.__esModule)return e;var n={};if(null!=e)for(var t in e)"default"!==t&&Object.prototype.hasOwnProperty.call(e,t)&&r(n,e,t);return o(n,e),n};Object.defineProperty(n,"__esModule",{value:!0}),n.printToSurface=function e(n){let t="";switch(n.type){case"const":return n.value;case"space":return" ".repeat(n.width);case"declare":return t="«",t+="var ",t+=a.prettyPrint(n.name),t+="=",t+=a.prettyPrint(n.value),t+="»",t;case"assign":return t="«",t+=a.prettyPrint(n.name),t+="=",t+=a.prettyPrint(n.value),t+="»",t;case"exp":return t="«",t+=a.prettyPrint(n.expression),t+="»",t;case"seq":return n.nodes.map((n=>e(n))).join("");case"ite":t="«if "+a.prettyPrint(n.condition)+"»",t+=e(n.trueBranch);let r=n.falseBranch;return"ite"===r.type||"seq"===r.type&&1==r.nodes.length?t+="«elseif"+e(r).slice(3):"bot"!==r.type&&"seq"===r.type&&0!=r.nodes.length&&(t+="«else»",t+=e(r)),t.endsWith("«endif»")||(t+="«endif»"),t;case"loop":return t="«for "+a.prettyPrint(n.body.variable)+" :"+a.prettyPrint(n.lst)+"»",t+=e(n.body.body),t+="«endfor»",t;default:return""}return""};const a=i(t(143))},963:function(e,n,t){var r=this&&this.__rest||function(e,n){var t={};for(var r in e)Object.prototype.hasOwnProperty.call(e,r)&&n.indexOf(r)<0&&(t[r]=e[r]);if(null!=e&&"function"==typeof Object.getOwnPropertySymbols){var o=0;for(r=Object.getOwnPropertySymbols(e);o<r.length;o++)n.indexOf(r[o])<0&&Object.prototype.propertyIsEnumerable.call(e,r[o])&&(t[r[o]]=e[r[o]])}return t};Object.defineProperty(n,"__esModule",{value:!0}),n.fuse=c,n.fuseExp=p,n.valueToConstantExpr=b,n.printEnvironment=function(e){console.log("{\n");for(const n in e)if(e.hasOwnProperty(n)){const[t,r]=e[n];console.log(`${n}: {`),console.log(" val: "),(0,s.printValue)(t," "),console.log(",marks: ["),r.forEach(((e,n)=>{(0,s.printValue)(e," "),n<r.length-1&&console.log(", ")})),console.log("]\n },\n")}console.log("}")},n.fuseBulk=h;const o=t(63),i=t(75),a=t(446),s=t(893),l=t(238);function c(e,n,t){if("const"!==t.type&&"sep"!==t.type&&"loopfront"!==t.type&&"looprear"!==t.type||"string"!=typeof t.value)if("space"===t.type)switch(n.type){case"insert":const{str:r,position:i}=n;if(0==t.width)return[{newEnv:e,newTermNode:t,remainingOperation:n},{newEnv:Object.assign({},e),newTermNode:{type:"seq",nodes:[{type:"const",value:r},t]},remainingOperation:{type:"id"}}];if(0==i){let n=[{newEnv:e,newTermNode:{type:"seq",nodes:[{type:"const",value:r},t]},remainingOperation:{type:"id"}}];return(0,o.isWhitespace)(r)&&n.push({newEnv:Object.assign({},e),newTermNode:{type:"space",width:t.width+r.length},remainingOperation:{type:"id"}}),n}if(i<t.width){if((0,o.isWhitespace)(r))return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{width:r.length+t.width}),remainingOperation:{type:"id"}}];throw new Error(`Cannot insert non-space between space term: ${n}`)}if(i===t.width){let n=[{newEnv:e,newTermNode:t,remainingOperation:{type:"insert",str:r,position:i-t.width}}];return(0,o.isWhitespace)(r)&&(console.log("no: ",r),n.push({newEnv:Object.assign({},e),newTermNode:Object.assign(Object.assign({},t),{width:t.width+r.length}),remainingOperation:{type:"id"}})),n}{const n=i-t.width;return[{newEnv:e,newTermNode:t,remainingOperation:{type:"insert",str:r,position:n}}]}case"delete":const{str:a,position:s}=n;if(0!==s){if(s<t.width&&s+a.length<=t.width){const n=t.width-a.length;return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{width:n}),remainingOperation:{type:"id"}}]}if(s<t.width&&s+a.length>t.width){const n=s,r=a.substring(t.width-s);return[{newEnv:e,newTermNode:{type:"space",width:n},remainingOperation:{type:"delete",str:r,position:0}}]}{const n=s-t.width;return[{newEnv:e,newTermNode:t,remainingOperation:{type:"delete",str:a,position:n}}]}}if((0,o.isWhitespace)(a)&&a.length<=t.width){const n=t.width-a.length;return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{width:n}),remainingOperation:{type:"id"}}]}if(a.length>t.width){const n=a.slice(t.width);return[{newEnv:e,newTermNode:{type:"bot"},remainingOperation:{type:"delete",str:n,position:0}},{newEnv:Object.assign({},e),newTermNode:Object.assign(Object.assign({},t),{width:0}),remainingOperation:{type:"delete",str:n,position:0}}]}case"replace":const{str1:l,str2:c,position:p}=n;if(0!==p){if(p<t.width&&p+l.length<=t.width){if((0,o.isWhitespace)(c))return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{width:c.length+t.width-l.length}),remainingOperation:{type:"id"}}];{const n=" ".repeat(p)+c+" ".repeat(t.width-(p+l.length));return[{newEnv:e,newTermNode:{type:"const",value:n},remainingOperation:{type:"id"}}]}}if(p<t.width&&p+l.length>t.width){const n=" ".repeat(p),r=t.width-p,o=c.substring(0,r),i=l.substring(r),a=c.substring(r);return[{newEnv:e,newTermNode:{type:"const",value:n+o},remainingOperation:{type:"replace",str1:i,str2:a,position:0}}]}{const n=p-t.width;return[{newEnv:e,newTermNode:t,remainingOperation:{type:"replace",str1:l,str2:c,position:n}}]}}if(l.length<=t.width){if((0,o.isWhitespace)(c)){const n=t.width-l.length+c.length;return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{width:n}),remainingOperation:{type:"id"}}]}return[{newEnv:e,newTermNode:{type:"seq",nodes:[{type:"const",value:c},Object.assign(Object.assign({},t),{width:t.width-l.length})]},remainingOperation:{type:"id"}}]}if(l.length>t.width){const n=c.slice(0,t.width),r=l.slice(t.width),o=c.slice(t.width);return[{newEnv:e,newTermNode:{type:"const",value:n},remainingOperation:{type:"replace",str1:r,str2:o,position:0}}]}case"bulk":return h(e,n,t);case"id":return[{newEnv:e,newTermNode:t,remainingOperation:{type:"id"}}];default:throw new Error(`Unhandled operation type: ${n}`)}else if("exp"===t.type){const a=t.binding,l=a[0],y=a[1],b="number"==typeof(s=y)||"boolean"==typeof s||"string"==typeof s?String(s):"Unknown";switch(n.type){case"insert":const{str:a,position:s}=n;if(0===s){let n=[];if(n.push({newEnv:e,newTermNode:{type:"seq",nodes:[{type:"const",value:a},t]},remainingOperation:{type:"id"}}),!(0,o.containsNewlineOrSpace)(a)){let r=function(e,n){try{if(g(JSON.parse(n)))return n+e}catch(e){return}}(b,a);if(void 0!==r)try{let o=u(r,y),{newEnv:i,newExp:a}=p(Object.assign({},e),o,l);n.push({newEnv:i,newTermNode:Object.assign(Object.assign({},t),{binding:[a,o]}),remainingOperation:{type:"id"}})}catch(e){}}return n}if(s<b.length){const n=u(b.slice(0,s)+a+b.slice(s),y);let{newEnv:r,newExp:o}=p(e,n,l);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(s==b.length){let r=[];if(!(0,o.containsNewlineOrSpace)(a)){const n=function(e,n){try{if(g(JSON.parse(n)))return e+n}catch(e){return}}(b,a);if(void 0!==n)try{const o=u(n,y);let{newEnv:i,newExp:a}=p(Object.assign({},e),o,l);r.push({newEnv:i,newTermNode:Object.assign(Object.assign({},t),{binding:[a,o]}),remainingOperation:{type:"id"}})}catch(e){console.error(e)}}let i=Object.assign({},e);return l.name&&(i[l.name]=[y,[y]]),r.push({newEnv:i,newTermNode:t,remainingOperation:Object.assign(Object.assign({},n),{position:0})}),r}{const r=s-b.length;if(l.name){let n=l.name;e[n]=[y,[y]]}return[{newEnv:e,newTermNode:t,remainingOperation:Object.assign(Object.assign({},n),{position:r})}]}case"delete":const{str:w,position:m}=n;if(0===m){if(w.length<b.length){const n=u(b.slice(w.length),y);let{newEnv:r,newExp:o}=p(e,n,l);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(w.length==b.length){if(l.name){let n=l.name;if("string"==typeof y){let{newEnv:r,newExp:o}=p(Object.assign({},e),"",l);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,""]}),remainingOperation:{type:"id"}},{newEnv:d(e,n),newTermNode:{type:"bot"},remainingOperation:{type:"id"}}]}return[{newEnv:d(e,n),newTermNode:{type:"bot"},remainingOperation:{type:"id"}}]}if(l){let n=l.object.name,t=l.field,r=e[n][0],o=e[n][1][0];if(0==o.fields[t].length){let i=f(r,t),a=f(o,t),s=d(e,n);return s[n]=[i,[a]],[{newEnv:s,newTermNode:{type:"bot"},remainingOperation:{type:"id"}}]}throw new Error(`field has been updaeted, cannot be remvoed: ${t}$`)}}else if(w.length>b.length){let n=w.slice(0,b.length),r=w.slice(b.length),o=c(e,{type:"delete",str:n,position:0},t),i={type:"delete",str:r,position:0};return o.forEach((e=>{e.remainingOperation=i})),o}}else{if(m+w.length<=b.length){const n=u(b.slice(0,m)+b.slice(m+w.length),y);let{newEnv:r,newExp:o}=p(e,n,l);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(m<=b.length&&m+w.length>b.length){const n=b.slice(0,m),r=w.slice(b.length-m),o=u(n,y);let{newEnv:i,newExp:a}=p(e,o,l);return[{newEnv:i,newTermNode:Object.assign(Object.assign({},t),{binding:[a,o]}),remainingOperation:{type:"delete",str:r,position:0}}]}if(m>b.length){const n=m-b.length;let[{newEnv:r,newTermNode:o,remainingOperation:i}]=c(e,{type:"id"},t);return[{newEnv:r,newTermNode:o,remainingOperation:{type:"delete",str:w,position:n}}]}}case"replace":const{str1:v,str2:O,position:E}=n;if(0===E){if(b.startsWith(v)){const n=u(O+b.slice(v.length),y);let{newEnv:r,newExp:o}=p(e,n,l);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}throw new Error(`unsupported replacement: ${v}; ${b}`)}if(E<b.length){const n=u(b.slice(0,E)+O+b.slice(E+v.length),y);let{newEnv:r,newExp:o}=p(e,n,l);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(E>=b.length){const r=E-b.length;let[{newEnv:o,newTermNode:i,remainingOperation:a}]=c(e,{type:"id"},t);return[{newEnv:o,newTermNode:i,remainingOperation:Object.assign(Object.assign({},n),{position:r})}]}throw new Error("Unsupported replacement");case"bulk":return h(e,n,t);case"id":let{variables:j,fields:N}=(0,i.findVariablesAndFields)(l);return j.forEach((n=>{e=function(e,n){if(!(e.name in n))throw new Error(`Variable ${e.name} not found in environment.`);let t=n[e.name][0],r=d(n,e.name);return r[e.name]=[t,[t]],r}(n,e)})),N.forEach((({variable:n,field:t})=>{e=function(e,n,t){let o=n.name;if(!(o in t))throw new Error(`Variable ${o} not found in environment.`);let i=t[o][0],a=function(e,n,t){const o=e.fields,i=n,a=(o[i],r(o,["symbol"==typeof i?i:i+""]));return a[n]=t.fields[n],{type:"object",fields:a}}(t[o][1][0],e,i),s=d(t,o);return s[o]=[i,[a]],s}(t,n,e)})),[{newEnv:e,newTermNode:t,remainingOperation:{type:"id"}}];default:throw new Error(`Unhandled operation type: ${n}`)}}else{if("lambda"===t.type){let r=t.marker;if("loopitem"===r.type){let o=t.variable.name,i=t.binding[0],a=t.binding[1],s=Object.assign({},e);s[o]=[a,[]];let l="";if(!r.lst)throw new Error("exp is not a Variable with a name property in loopitem's marker");{let e=r.lst.name;l=e+"_new"}return c(s,n,t.body).map((({newEnv:n,newTermNode:r,remainingOperation:a})=>{let s=n[o][0],c=e[l][0];c.push(s),e[l]=[c,[c]];let{newEnv:u,newExp:d}=p(e,s,i);return{newEnv:u,newTermNode:{type:"lambda",variable:t.variable,body:r,binding:[d,s],marker:t.marker},remainingOperation:a}}))}{let r=t.variable.name,o=t.binding[0],i=t.binding[1],a=Object.assign({},e);return a[r]=[i,[]],c(a,n,t.body).map((({newEnv:n,newTermNode:i,remainingOperation:a})=>{let s=n[r][0];delete n[r];let l=function(e,n){let t=Object.assign({},e);for(const e in n)n.hasOwnProperty(e)&&(t[e]=n[e]);return t}(e,n),{newEnv:c,newExp:u}=p(l,s,o);return{newEnv:c,newTermNode:{type:"lambda",variable:t.variable,body:i,binding:[u,s],marker:t.marker},remainingOperation:a}}))}}if("branchstart"!==t.type&&"branchend"!==t.type&&"nop"!==t.type){if("seq"===t.type){if("bulk"===n.type)return h(e,n,t);const r=t.nodes;let o=[{newEnv:e,newTermNode:{type:"seq",nodes:[]},remainingOperation:n}];for(const e of r){const n=[];for(const t of o){const r=c(t.newEnv,t.remainingOperation,e);for(const e of r){const r=("seq"===t.newTermNode.type?t.newTermNode.nodes:[t.newTermNode]).concat("seq"===e.newTermNode.type?e.newTermNode.nodes:[e.newTermNode]);n.push({newEnv:e.newEnv,newTermNode:{type:"seq",nodes:r},remainingOperation:e.remainingOperation})}}o=n}return o.map((e=>({newEnv:e.newEnv,newTermNode:"seq"===e.newTermNode.type&&1===e.newTermNode.nodes.length?e.newTermNode.nodes[0]:e.newTermNode,remainingOperation:e.remainingOperation})))}if("end"===t.type)return[{newEnv:e,newTermNode:t,remainingOperation:n}];throw new Error("Operation can only be applied to ConstNode with string value")}{if("branchend"===t.type){let n=t.condition[0],r=t.condition[1],[o,i]=(0,a.evaluateExpr)(y(e),n);if(i!==r)throw new Error("Violate BX properties: updates change if-then-else branch.")}let r=[];switch(r.push({newEnv:e,newTermNode:t,remainingOperation:n}),n.type){case"insert":const{str:o,position:i}=n;0===i&&r.push({newEnv:e,newTermNode:{type:"seq",nodes:[{type:"const",value:o},t]},remainingOperation:{type:"id"}});case"delete":case"replace":case"id":return r;case"bulk":return h(e,n,t);default:throw new Error(`Unhandled operation type: ${n}`)}}}else{if("loopfront"===t.type){let n=t.lst;if(!n.name)throw new Error("exp is not a Variable with a name property in loopfront");{let t=n.name;e[t+"_new"]=[[],[]]}}else if("looprear"===t.type){let n=t.lst;if(!n.name)throw new Error("exp is not a Variable with a name property in loopfront");{let t=n.name;e[t]=e[t+"_new"]}}const r=t.value;switch(n.type){case"insert":const{str:o,position:i}=n;if(0===r.length)return[{newEnv:e,newTermNode:t,remainingOperation:n},{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{value:o}),remainingOperation:{type:"id"}}];if(0===i)return[{newEnv:Object.assign({},e),newTermNode:Object.assign(Object.assign({},t),{value:o+r}),remainingOperation:{type:"id"}},{newEnv:Object.assign({},e),newTermNode:{type:"seq",nodes:[{type:"const",value:o},t]},remainingOperation:{type:"id"}}];if(i<r.length){const n=r.slice(0,i)+o+r.slice(i);return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}]}if(i===r.length)return[{newEnv:Object.assign({},e),newTermNode:Object.assign(Object.assign({},t),{value:r+o}),remainingOperation:{type:"id"}},{newEnv:Object.assign({},e),newTermNode:t,remainingOperation:{type:"insert",str:o,position:i-r.length}}];{const n=i-r.length;return[{newEnv:e,newTermNode:t,remainingOperation:{type:"insert",str:o,position:n}}]}case"delete":const{str:a,position:s}=n;if(0!==s){if(s<r.length&&s+a.length<=r.length){const n=r.slice(0,s)+r.slice(s+a.length);return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}]}if(s<r.length&&s+a.length>r.length){const n=r.substring(0,s),t=a.substring(r.length-s);return[{newEnv:e,newTermNode:{type:"const",value:n},remainingOperation:{type:"delete",str:t,position:0}}]}{const n=s-r.length;return[{newEnv:e,newTermNode:t,remainingOperation:{type:"delete",str:a,position:n}}]}}if(r.startsWith(a)&&a.length<=r.length){const n=r.slice(a.length);let o=[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}];return a.length===r.length&&o.push({newEnv:Object.assign({},e),newTermNode:{type:"bot"},remainingOperation:{type:"id"}}),o}if(a.startsWith(r)&&a.length>r.length){const n=a.slice(r.length);return[{newEnv:e,newTermNode:{type:"bot"},remainingOperation:{type:"delete",str:n,position:0}},{newEnv:Object.assign({},e),newTermNode:Object.assign(Object.assign({},t),{value:""}),remainingOperation:{type:"delete",str:n,position:0}}]}case"replace":const{str1:l,str2:c,position:p}=n;if(0!==p){if(p<r.length&&p+l.length<=r.length){const n=r.slice(0,p)+c+r.slice(p+l.length);return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}]}if(p<r.length&&p+l.length>r.length){const n=r.substring(0,p),t=r.substring(p),o=c.substring(0,t.length),i=l.substring(t.length),a=c.substring(t.length);return[{newEnv:e,newTermNode:{type:"const",value:n+o},remainingOperation:{type:"replace",str1:i,str2:a,position:0}}]}{const n=p-r.length;return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{value:r}),remainingOperation:{type:"replace",str1:l,str2:c,position:n}}]}}if(r.startsWith(l)&&l.length<=r.length){const n=c+r.slice(l.length);return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}]}if(l.startsWith(r)&&l.length>r.length){const n=c.slice(0,r.length),o=l.slice(r.length),i=c.slice(r.length);return[{newEnv:e,newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"replace",str1:o,str2:i,position:0}}]}case"bulk":return h(e,n,t);case"id":return[{newEnv:e,newTermNode:t,remainingOperation:{type:"id"}}];default:throw new Error(`Unhandled operation type: ${n}`)}}var s}function p(e,n,t){switch(t.type){case"constant":return{newEnv:e,newExp:b(n)};case"variable":if(!(t.name in e))throw new Error(`Variable ${t.name} not found in environment.`);const[o,i]=e[t.name];if(0===i.length){const r=Object.assign({},e);return r[t.name]=[n,[n]],{newEnv:r,newExp:t}}if(1===i.length&&i[0]===n)return{newEnv:e,newExp:t};throw new Error(`Fail, variable cannot be updated to different value ${t.name}, previous: ${i[0]}, new: ${n}`);case"freeze":let[s,l]=(0,a.evaluateExpr)(y(e),t.expression);if(l!==n)throw new Error(`Fail, freezed expression cannot be changed, old: ${n}, new: ${l}`);return{newEnv:e,newExp:t};case"field":const c=t.object;if("variable"===c.type&&c.name in e){const[o,i]=e[c.name];if("object"===o.type){const a={type:"object",fields:Object.assign(Object.assign({},o.fields),{[t.field]:n})},s=function(e,n,t){const o=e.fields,i=n,a=(o[i],r(o,["symbol"==typeof i?i:i+""]));return a[n]=[t],{type:"object",fields:a}}(i[0],t.field,n),l=Object.assign({},e);return l[c.name]=[a,[s]],{newEnv:l,newExp:t}}throw new Error("Field access's value is not an object")}throw new Error("Field access not start with variable.");case"binary":let u=y(e),[d,f]=(0,a.evaluateExpr)(u,t.left);if("number"==typeof n){if("number"!=typeof n||null===n)throw new Error("Value must be a non-null number");switch(t.operator){case"+":let r=p(e,n-f,t.right);return{newEnv:r.newEnv,newExp:Object.assign(Object.assign({},t),{right:r.newExp})};case"-":let o=p(e,f-n,t.right);return{newEnv:o.newEnv,newExp:Object.assign(Object.assign({},t),{right:o.newExp})};case"*":let i=p(e,n/f,t.right);return{newEnv:i.newEnv,newExp:Object.assign(Object.assign({},t),{right:i.newExp})};case"/":let a=p(e,f/n,t.right);return{newEnv:a.newEnv,newExp:Object.assign(Object.assign({},t),{right:a.newExp})}}}case"unary":return{newEnv:e,newExp:t};default:throw new Error(`Unsupported expression type: ${t.type}`)}}function u(e,n){if("number"==typeof n){const n=parseFloat(e);if(isNaN(n))throw new Error("convert to number fail: ${s}");return n}if("boolean"==typeof n){if("true"===e)return!0;if("false"===e)return!1;throw new Error("convert to boolean fail: ${s}")}if("string"==typeof n)return e;throw new Error("Unsupported type: "+typeof n)}function d(e,n){const t=Object.assign({},e);return delete t[n],t}function f(e,n){const t=e.fields,o=n;return t[o],{type:"object",fields:r(t,["symbol"==typeof o?o:o+""])}}function y(e){const n=new Map;for(const t in e)e.hasOwnProperty(t)&&n.set(t,e[t][0]);return n}function b(e){if(null===e||"number"==typeof e||"boolean"==typeof e||"string"==typeof e)return{type:"constant",value:e};if(Array.isArray(e))return{type:"constant",value:e.map((e=>b(e)))};if("object"===e.type){const n=e,t={};for(const e in n.fields)n.fields.hasOwnProperty(e)&&(t[e]=b(n.fields[e]));return{type:"constant",value:{type:"object",fields:t}}}throw new Error("Unhandled value type: "+typeof e)}function h(e,n,t){if("id"===n.type)return c(e,n,t);if("bulk"!==n.type||!n.operations)throw new Error("Invalid bulk operation");if(0==n.operations.length)return[{newEnv:e,newTermNode:t,remainingOperation:{type:"id"}}];if("seq"===t.type&&0==t.nodes.length)return[{newEnv:e,newTermNode:t,remainingOperation:n}];const[r,...o]=n.operations;if("seq"===t.type){const r=t.nodes[0],o=t.nodes.slice(1),i=h(e,n,r),a=[];for(const e of i){const n=h(e.newEnv,e.remainingOperation,{type:"seq",nodes:o});for(const t of n){let n=[];"seq"!=t.newTermNode.type?n.push(t.newTermNode):n=t.newTermNode.nodes,a.push({newEnv:t.newEnv,newTermNode:{type:"seq",nodes:[e.newTermNode,...n]},remainingOperation:t.remainingOperation})}}return a}return"lambda"===t.type?c(e,n,t):"insert"===r.type||"delete"===r.type||"replace"===r.type?(r.position,c(e,r,t).map((e=>{let n=e.remainingOperation;if("id"===n.type||"insert"===n.type||"delete"===n.type||"replace"===n.type){let n=(0,l.evaluateTermNode)(e.newTermNode).length;const t=o.map((e=>{if("id"===e.type)return e;if("position"in e)return Object.assign(Object.assign({},e),{position:e.position-n});throw new Error("All operations must have positions")}));let r={type:"bulk",operations:[e.remainingOperation,...t]};return[{newEnv:e.newEnv,newTermNode:e.newTermNode,remainingOperation:r}]}throw new Error("nested bulk current not supported")})).reduce(((e,n)=>e.concat(n)),[])):"id"===r.type?h(e,{type:"bulk",operations:o},t):[]}function g(e){return!!("number"==typeof e||"boolean"==typeof e||"string"==typeof e||null===e||Array.isArray(e)&&e.every(g)||"object"==typeof e&&null!==e&&"object"===e.type&&"object"==typeof e.fields)}},238:(e,n)=>{function t(e){if(null===e)return"null";if("number"==typeof e||"boolean"==typeof e||"string"==typeof e)return e.toString();if("object"===e.type){const n=e;let r="{";for(const e in n.fields)n.fields.hasOwnProperty(e)&&(r+=`${e}: ${t(n.fields[e])}, `);return r.length>1&&(r=r.slice(0,-2)),r+="}",r}if(Array.isArray(e)){const n=e;let r="[";for(const e of n)r+=`${t(e)}, `;return r.length>1&&(r=r.slice(0,-2)),r+="]",r}throw new Error("Unhandled value type: "+typeof e)}Object.defineProperty(n,"__esModule",{value:!0}),n.evaluateTermNode=function e(n){switch(n.type){case"const":case"sep":case"loopfront":case"looprear":return n.value;case"space":return" ".repeat(n.width);case"exp":return String(t(n.binding[1]));case"seq":return n.nodes.map((n=>e(n))).join("");case"lambda":return e(n.body);case"branchstart":case"branchend":case"end":case"bot":case"nop":return"";default:throw new Error(`Unhandled term node type: ${n.type}`)}},n.printValue=t},619:(e,n)=>{function t(e){let n=e.type;if("seq"===n)return r(e);if("declare"===n||"assign"===n)throw new Error("declare|assign node shall not be visible here.");if("lambda"===n){let n=e,r=t(n.body);return{type:"lambda",variable:n.variable,body:r,binding:n.binding,marker:n.marker}}return e}function r(e){let n=e.nodes,i=[];for(let e=0;e<n.length;e++){let a=n[e];if("declare"===a.type||"assign"===a.type){let t=a,[s,l]=o(n,e+1),{nodes:c}=r({type:"seq",nodes:s}),p=c.pop();if(void 0===p)throw new Error("Expected the last element to be a BranchEndNode, but the array was empty.");"branchend"!==(null==p?void 0:p.type)&&c.push(p);let u={type:"lambda",variable:t.name,body:{type:"seq",nodes:c},binding:t.value,marker:{type:a.type}};i.push(u),"branchend"===(null==p?void 0:p.type)&&i.push({type:"branchend",condition:p.condition}),e=l}else i.push(t(a))}return{type:"seq",nodes:i}}function o(e,n){let t=[],r=0;for(let o=n;o<e.length;o++){if("branchstart"===e[o].type)r++;else if("branchend"===e[o].type){if(0===r)return t.push(e[o]),[t,o];r--}if("end"===e[o].type)return t.push(e[o]),[t,o];t.push(e[o])}return[t,e.length-1]}Object.defineProperty(n,"__esModule",{value:!0}),n.lambdalize=t},784:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.unLambdalize=function e(n){switch(n.type){case"lambda":{const{variable:t,body:r,binding:o,marker:i}=n;let a;switch(i.type){case"declare":return a=e(r),{type:"seq",nodes:[{type:"declare",name:t,value:o},a]};case"assign":return a=e(r),{type:"seq",nodes:[{type:"assign",name:t,value:o},a]};default:return{type:"lambda",variable:t,body:e(r),binding:o,marker:i}}}case"seq":return{type:"seq",nodes:n.nodes.map(e)};default:return n}}},893:(e,n,t)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.printNode=function e(n,t=""){switch(console.log(t+n.type),n.type){case"const":case"sep":console.log(t+"  Value: "+n.value);break;case"space":console.log(t+"  Width: "+n.width);break;case"declare":case"assign":console.log(t+"  Name: "+n.name.name),o(n.value,t+"  ");break;case"exp":o(n.binding,t+"  ");break;case"seq":n.nodes.forEach((n=>e(n,t+"  ")));break;case"branchstart":o(n.condition,t+"  ");break;case"loopfront":console.log(t+"  front: "+n.value);break;case"looprear":console.log(t+"  rear: "+n.value);break;case"lambda":console.log(t+"  Variable: "+n.variable.name),e(n.body,t+"  "),o(n.binding,t+"  "),a(n.marker,t+"  ");break;case"callstart":console.log(t+"  Name: "+n.name);break;case"end":console.log(`${t}  End`)}},n.printBinding=o,n.printValue=i,n.printMarker=a;const r=t(235);function o(e,n){(0,r.printExpression)(e[0],n),i(e[1],n)}function i(e,n){if(null===e)console.log(`${n}null`);else if("number"==typeof e||"boolean"==typeof e||"string"==typeof e)console.log(`${n}${e}`);else{if("object"!=typeof e)throw new Error("Unhandled value type: "+typeof e);{console.log(`${n}{`);const t=e;for(const e in t)if(t.hasOwnProperty(e)){const r=n+"  ";console.log(`${r}${e}:`),i(t[e],r+"  ")}console.log(`${n}}`)}}}function a(e,n=""){console.log(n+e.type)}},446:(e,n)=>{function t(e,n){switch(n.type){case"constant":return[e,n.value];case"variable":const r=e.get(n.name);if(void 0===r)throw new Error(`Variable '${n.name}' not found in environment`);return[e,r];case"binary":let[o,i]=t(e,n.left),[a,s]=t(o,n.right);switch(n.operator){case"+":return[a,i+s];case"-":return[a,i-s];case"*":return[a,i*s];case"/":return[a,i/s];case"&&":return[a,i&&s];case"||":return[a,i||s];case">":return[a,i>s];case"<":return[a,i<s];case">=":return[a,i>=s];case"<=":return[a,i<=s];case"==":return[a,i==s];default:throw new Error("Unsupported binary operator")}case"unary":let[l,c]=t(e,n.operand);if("not"===n.operator)return[l,!c];throw new Error("Unsupported unary operator");case"field":let[p,u]=t(e,n.object);if("string"!=typeof u&&("object"!=typeof u||null===u))throw new Error(`Cannot access field '${n.field}' from non-object`);const d=u[n.field];if(void 0===d)throw new Error(`Field '${n.field}' not found in object`);return[p,d];case"array":let f=[],y=e;for(const e of n.elements){let[n,r]=t(y,e);f.push(r),y=n}return[y,f];case"object":let b={},h=e;for(const e in n.fields)if(n.fields.hasOwnProperty(e)){let[r,o]=t(h,n.fields[e]);b[e]=o,h=r}return[h,b];case"freeze":return t(e,n.expression);default:throw new Error("Unhandled expression type")}}Object.defineProperty(n,"__esModule",{value:!0}),n.partialEval=function e(n,r){switch(r.type){case"const":return[n,{type:"const",value:r.value}];case"space":return[n,{type:"space",width:r.width}];case"declare":const[o,i]=t(n,r.value);return o.set(r.name.name,i),[o,{type:"declare",name:r.name,value:[r.value,i]}];case"assign":const[a,s]=t(n,r.value);return a.set(r.name.name,s),[a,{type:"assign",name:r.name,value:[r.value,s]}];case"exp":const[l,c]=t(n,r.expression);return[l,{type:"exp",binding:[r.expression,c]}];case"seq":let p=n;const u=[];for(const n of r.nodes){const[t,r]=e(p,n);u.push(r),p=t}return[p,{type:"seq",nodes:u}];case"ite":const[d,f]=t(n,r.condition);if(!0===f){const[n,t]=e(d,r.trueBranch);return[n,{type:"seq",nodes:[{type:"branchstart",condition:[r.condition,f],trueBranch:r.trueBranch,falseBranch:r.falseBranch},t,{type:"branchend",condition:[r.condition,f]}]}]}if(!1===f){const[n,t]=e(d,r.falseBranch);return[n,{type:"seq",nodes:[{type:"branchstart",condition:[r.condition,f],trueBranch:r.trueBranch,falseBranch:r.falseBranch},t,{type:"branchend",condition:[r.condition,f]}]}]}throw new Error(`Condition does not evaluate to boolean: ${f}`);case"loop":const{lst:y,separator:b,front:h,rear:g,body:w}=r,[m,v]=t(n,y);if(Array.isArray(v)&&0===v.length)return[m,{type:"seq",nodes:[{type:"loopfront",lst:y,value:h.value,body:w,separator:b},{type:"looprear",lst:y,value:g.value}]}];if(Array.isArray(v)&&1===v.length){const t=v[0],r=w.variable.name,o=new Map(n);o.set(r,t);const[i,a]=e(o,w.body);return[i,{type:"seq",nodes:[{type:"loopfront",lst:y,value:h.value,body:w,separator:b},a,{type:"looprear",lst:y,value:g.value}]}]}if(Array.isArray(v)&&v.length>1){let t=new Map(n),o=[];for(let n=0;n<v.length;n++){const i=v[n],a=w.variable.name;t.set(a,i);const[s,l]=e(t,w.body);t=s,o.push({type:"lambda",variable:w.variable,body:l,binding:[{type:"constant",value:i},i],marker:{type:"loopitem",lst:y}}),n<v.length-1&&o.push(r.separator)}return[t,{type:"seq",nodes:[{type:"loopfront",lst:y,value:h.value,body:w,separator:b},...o,{type:"looprear",lst:y,value:g.value}]}]}throw new Error("Unsupported type or value for e_arr: "+typeof v);case"nop":return[n,{type:"nop"}];case"bot":return[n,{type:"bot"}];case"end":return[n,{type:"end"}];default:throw new Error(`Unhandled term node type: ${r.type}`)}},n.evaluateExpr=t,n.flatten=function e(n){return"seq"===n.type?{type:"seq",nodes:n.nodes.map((n=>e(n))).flatMap((e=>"seq"===e.type?e.nodes:[e]))}:"lambda"===n.type?Object.assign(Object.assign({},n),{body:e(n.body)}):n}},887:function(e,n,t){var r=this&&this.__createBinding||(Object.create?function(e,n,t,r){void 0===r&&(r=t);var o=Object.getOwnPropertyDescriptor(n,t);o&&!("get"in o?!n.__esModule:o.writable||o.configurable)||(o={enumerable:!0,get:function(){return n[t]}}),Object.defineProperty(e,r,o)}:function(e,n,t,r){void 0===r&&(r=t),e[r]=n[t]}),o=this&&this.__setModuleDefault||(Object.create?function(e,n){Object.defineProperty(e,"default",{enumerable:!0,value:n})}:function(e,n){e.default=n}),i=this&&this.__importStar||function(e){if(e&&e.__esModule)return e;var n={};if(null!=e)for(var t in e)"default"!==t&&Object.prototype.hasOwnProperty.call(e,t)&&r(n,e,t);return o(n,e),n};Object.defineProperty(n,"__esModule",{value:!0}),n.unPartialEval=l,n.flatten=function e(n){return"seq"===n.type?{type:"seq",nodes:n.nodes.map((n=>e(n))).flatMap((e=>"seq"===e.type?e.nodes:[e]))}:"ite"===n.type?Object.assign(Object.assign({},n),{trueBranch:e(n.trueBranch),falseBranch:e(n.falseBranch)}):"loop"===n.type?Object.assign(Object.assign({},n),{body:Object.assign(Object.assign({},n.body),{body:e(n.body.body)})}):n};const a=i(t(454));function s(e){return e[0]}function l(e){switch(e.type){case"const":return a.constNode(e.value);case"space":return a.space(e.width);case"declare":return a.declare(e.name,s(e.value));case"assign":return a.assign(e.name,s(e.value));case"exp":return a.exp(s(e.binding));case"nop":return a.nop();case"end":return a.end();case"bot":return a.bot();case"seq":return c(e);case"lambda":return function(e){let{variable:n,body:t,binding:r,marker:o}=e;return{type:"lambdawithexpr",variable:n,body:l(t),exp:(i=r[1],Array.isArray(i)?{type:"array",elements:i.map(d)}:{type:"array",elements:[d(i)]})};var i}(e);default:throw new Error(`Unknown node type: ${e.type}`)}}function c(e){const n=e.nodes,t=[];for(let e=0;e<n.length;e++){const r=n[e];if("branchstart"===r.type){const o=r.condition[0],i=r.condition[1],s=r.trueBranch,l=r.falseBranch;let p=1;const u=[];for(let t=e+1;t<n.length;t++){const e=n[t];if("branchstart"===e.type&&p++,"branchend"===e.type){if(1==p)break;p--,u.push(n[t])}else u.push(n[t])}i?t.push(a.ite(o,c({type:"seq",nodes:u}),l)):t.push(a.ite(o,s,c({type:"seq",nodes:u}))),e+=u.length+1}else if("loopfront"===r.type){let o=r,i={type:"looprear",value:""};const s=[];for(let t=e+1;t<n.length;t++){const e=n[t];if("looprear"===e.type){i=e;break}s.push(l(n[t]))}if(""!==o.value||""!==i.value||0!=s.length&&!u(s))if(0==s.length||u(s))t.push(a.loop(o.lst,o.separator,{type:"front",value:r.value},{type:"rear",value:i.value},o.body));else if(1==s.length){let e=s[0];if("lambdawithexpr"!==e.type)throw new Error("Must be lambda in loopitem");t.push(a.loop(o.lst,o.separator,{type:"front",value:r.value},{type:"rear",value:i.value},f(e)))}else{let e=b(s);if(!m(e))throw new Error(" x.t in loop seq, ts are not equal");t.push(a.loop(o.lst,o.separator,{type:"front",value:r.value},{type:"rear",value:i.value},f(e[0])))}else t.push(a.bot());e+=s.length+1}else t.push(l(r))}return a.seq(...t)}function p(e){return"bot"===e.type}function u(e){return e.every(p)}function d(e){if("number"==typeof e||"boolean"==typeof e||"string"==typeof e||null===e)return{type:"constant",value:e};if(Array.isArray(e))return{type:"array",elements:e.map(d)};if("object"===e.type){const n={};for(const t in e.fields)if(e.fields.hasOwnProperty(t)){const r=e.fields[t];n[t]={type:"constant",value:r}}return{type:"object",fields:n}}throw new Error("Unsupported Value type")}function f(e){return{type:"lambda",variable:e.variable,body:e.body}}function y(e){return"lambdawithexpr"===e.type}function b(e){return e.filter(y).filter((e=>!p(e.body)))}function h(e,n){return e.name===n.name}function g(e,n){if(e.type!==n.type)return!1;switch(e.type){case"constant":const t=e,r=n;return"object"==typeof t.value&&"object"==typeof r.value?g(t.value,r.value):t.value===r.value;case"variable":return e.name===n.name;case"binary":const o=e,i=n;return o.operator===i.operator&&g(o.left,i.left)&&g(o.right,i.right);case"unary":const a=e,s=n;return a.operator===s.operator&&g(a.operand,s.operand);case"field":const l=e,c=n;return l.field===c.field&&g(l.object,c.object);case"array":const p=e,u=n;return p.elements.length===u.elements.length&&p.elements.every(((e,n)=>g(e,u.elements[n])));case"object":const d=e,f=n,y=Object.keys(d.fields),b=Object.keys(f.fields);return y.length===b.length&&y.every((e=>f.fields.hasOwnProperty(e)&&g(d.fields[e],f.fields[e])));case"freeze":return g(e.expression,n.expression);default:return!1}}function w(e,n){if(e.type!==n.type)return!1;switch(e.type){case"const":return e.value===n.value;case"space":return e.width===n.width;case"declare":const t=e,r=n;return h(t.name,r.name)&&g(t.value,r.value);case"assign":const o=e,i=n;return h(o.name,i.name)&&g(o.value,i.value);case"exp":return g(e.expression,n.expression);case"seq":const a=e.nodes,s=n.nodes;return a.length===s.length&&a.every(((e,n)=>w(e,s[n])));case"ite":const l=e,c=n;return g(l.condition,c.condition)&&w(l.trueBranch,c.trueBranch)&&w(l.falseBranch,c.falseBranch);case"loop":const p=e,u=n;return g(p.lst,u.lst)&&p.separator.value===u.separator.value&&p.front.value===u.front.value&&p.rear.value===u.rear.value&&function(e,n){return h(e.variable,n.variable)&&w(e.body,n.body)}(p.body,u.body);case"nop":case"bot":case"end":return!0;case"call":const d=e,f=n;return w(d.func,f.func)&&Object.keys(d.args).length===Object.keys(f.args).length&&Object.keys(d.args).every((e=>g(d.args[e],f.args[e])));case"lambdawithexpr":const y=e,b=n;return h(y.variable,b.variable)&&w(y.body,b.body);default:return!1}}function m(e){if(0===e.length)return!0;const n=e[0];return e.every((e=>{return r=n,h((t=e).variable,r.variable)&&w(t.body,r.body);var t,r}))}},577:(e,n)=>{function t(e){const n=/«[^»]*»/g;let t;const r=[];let o=0;for(;null!==(t=n.exec(e));)o<t.index&&r.push(e.slice(o,t.index)),r.push(t[0]),o=n.lastIndex;return o<e.length&&r.push(e.slice(o)),r}function r(e){var n,t,i;const a=[];let s=0;for(;s<e.length;){const l=e[s];if("string"==typeof l&&l.startsWith("«")&&l.endsWith("»")){const c=l.slice(1,-1).trim(),[p]=c.split(" ");switch(p.toUpperCase()){case"VAR":const l=c.split("=");a.push({type:"Directive",content:{type:"declare",name:l[0].split(" ")[1].trim(),expr:o(l[1].trim())}});break;case"IF":const p=c.match(/^(IF)\s+/i);if(p){const n=c.slice(p[0].length).trim(),t=[],i=[];let l=1,u=s+1;for(;u<e.length;){let n=e[u];if("string"==typeof n&&n.startsWith("«"))if(n.includes("ENDIF")||n.includes("endif")){if(l--,l<=0)break}else if((n.includes("else")||n.includes("ELSE"))&&1===l){if(l=0,!n.includes("if")&&!n.includes("IF")){u++;continue}n=n.replace(/else(?=if)/,"")}l>0?t.push(n):i.push(n),u++}const d=r(t),f=r(i);s=u,a.push({type:"Directive",content:{type:"if",expr:o(n),thenBranch:d,elseBranch:f}})}break;case"FOR":const u=/(\bfor\b|\bin\b|\bseparator\b|\bfront\b|\brear\b|[\[\],])|(\w+)|"([^"]*)"|\[([^\]]*)\]/gi,d=[];let f;for(;null!==(f=u.exec(c));)f[1]&&d.push(f[1]),f[2]&&d.push(f[2]),f[3]&&d.push(f[3]),f[4]&&d.push(f[4]);const y=c.match(/separator\s*"([^"]*)"/i);y&&y[1]&&d.push("separator",y[1]);const b=c.match(/front\s*(?:\[([^\]]*)\])?/i);b&&b[1]&&d.push("front",b[1]);const h=c.match(/rear\s*(?:\[([^\]]*)\])?/i);if(h&&h[1]&&d.push("rear",h[1]),d){const l=[];let c=1,p=s+1;for(;p<e.length&&c>0;){const n=e[p];if("string"==typeof n&&n.startsWith("«"))if(n.includes("ENDFOR")){if(c--,0===c)break}else n.includes("FOR")&&c++;c>0&&l.push(n),p++}const u=r(l);s=p,a.push({type:"Directive",content:{type:"for",name:d[1].trim(),expr:o(d[3].trim()),separator:{type:"separator",value:(null===(n=d[5])||void 0===n?void 0:n.trim())||""},front:{type:"front",value:(null===(t=d[7])||void 0===t?void 0:t.trim())||""},rear:{type:"rear",value:(null===(i=d[9])||void 0===i?void 0:i.trim())||""},fragment:u}})}break;default:if(c.includes("=")){const e=c.split("=");a.push({type:"Directive",content:{type:"assign",name:e[0].split(" ")[0].trim(),expr:o(e[1].trim())}})}else a.push({type:"Directive",content:{type:"exp",expr:o(c)}})}}else a.push(l);s++}return 1===a.length?a[0]:{type:"fragmentList",fragments:a}}function o(e){const n=function(e){const n=/"([^"\\]*(?:\\.[^"\\]*)*)"|'([^'\\]*(?:\\.[^'\\]*)*)'|(&&|\|\||[<>!=]=|[{}[\](),.:;!+\-*/<>])|(\s+)|([^\s{}[\](),.:;!+\-*/<>!=&|]+)/g,t=[];let r;for(;null!==(r=n.exec(e));)void 0!==r[1]?t.push(`"${r[1]}"`):void 0!==r[2]?t.push(`'${r[2]}'`):void 0!==r[3]?t.push(r[3]):void 0!==r[5]&&t.push(r[5]);return t}(e);let t=0;function r(){if("("===n[t]){t++;const e=o();if(")"===n[t])return t++,e;throw new Error("Mismatched parentheses")}if("["===n[t]){t++;const e=[];for(;"]"!==n[t];)","===n[t]?t++:e.push(o());return t++,{type:"array",elements:e}}if("{"===n[t]){t++;const e={};for(;"}"!==n[t];)if(","===n[t])t++;else{const r=n[t++];if(":"!==n[t])throw new Error("Expected colon in object literal");{t++;const n=o();e[r]=n}}return t++,{type:"object",fields:e}}if("-"===n[t]&&!isNaN(Number(n[t+1])))return t++,{type:"constant",value:-Number(n[t++])};if(!isNaN(Number(n[t])))return{type:"constant",value:Number(n[t++])};if(/^['"].*['"]$/.test(n[t]))return{type:"constant",value:n[t++].slice(1,-1)};if(/^[a-zA-Z_][a-zA-Z0-9_]*$/.test(n[t])){let e={type:"variable",name:n[t++]};for(;"."===n[t];){if(t++,/^[a-zA-Z_][a-zA-Z0-9_]*$/.test(n[t]))return{type:"field",object:e,field:n[t++]};throw new Error("Expected property name after '.'")}return e}if("!"===n[t])return t++,{type:"freeze",expression:r()};throw new Error(`Unexpected token: ${n[t]}`)}function o(){let e=r();for(;["+","-","*","/","&&","||",">","<",">=","<=","!=","==","=="].includes(n[t]);)e={type:"binary",operator:n[t++],left:e,right:r()};return e}return o()}Object.defineProperty(n,"__esModule",{value:!0}),n.parse=function(e){return r(t(e))},n.tokenize=t,n.parseTokens=r},775:function(e,n,t){var r=this&&this.__createBinding||(Object.create?function(e,n,t,r){void 0===r&&(r=t);var o=Object.getOwnPropertyDescriptor(n,t);o&&!("get"in o?!n.__esModule:o.writable||o.configurable)||(o={enumerable:!0,get:function(){return n[t]}}),Object.defineProperty(e,r,o)}:function(e,n,t,r){void 0===r&&(r=t),e[r]=n[t]}),o=this&&this.__setModuleDefault||(Object.create?function(e,n){Object.defineProperty(e,"default",{enumerable:!0,value:n})}:function(e,n){e.default=n}),i=this&&this.__importStar||function(e){if(e&&e.__esModule)return e;var n={};if(null!=e)for(var t in e)"default"!==t&&Object.prototype.hasOwnProperty.call(e,t)&&r(n,e,t);return o(n,e),n};Object.defineProperty(n,"__esModule",{value:!0}),n.translate=function(e){const n=s(e);return a.seq(...n)};const a=i(t(454));function s(e){if("string"==typeof e)return function(e){const n=[];let t="";for(let r of e)" "===r?(t.length>0&&(n.push(a.constNode(t)),t=""),n.push(a.space(1))):t+=r;return t.length>0&&n.push(a.constNode(t)),n}(e);switch(e.type){case"Directive":switch(e.content.type){case"declare":return[a.declare({type:"variable",name:e.content.name},e.content.expr)];case"assign":return[a.assign({type:"variable",name:e.content.name},e.content.expr)];case"exp":return[a.exp(e.content.expr)];case"if":return[a.ite(e.content.expr,{type:"seq",nodes:s(e.content.thenBranch)},l(e.content.elseBranch))];case"for":return[a.loop(e.content.expr,{type:"sep",value:e.content.separator.value},{type:"front",value:e.content.front.value},{type:"rear",value:e.content.rear.value},{type:"lambda",variable:{type:"variable",name:e.content.name},body:{type:"seq",nodes:s(e.content.fragment)}})];default:throw new Error(`Unknown directive: ${e}`)}case"fragmentList":return e.fragments.flatMap(s);default:throw new Error(`Unknown fragment: ${e}`)}}function l(e){if((n=e)&&"if"===n.type){const n=e;return a.ite(n.expr,{type:"seq",nodes:s(n.thenBranch)},l(n.elseBranch))}return function(e){return e&&"bot"===e.type}(e)?a.bot():{type:"seq",nodes:s(e)};var n}},63:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.isWhitespace=function(e){return/^( +)$/.test(e)},n.containsNewlineOrSpace=function(e){return/[\n\s]/.test(e)}}},n={};return function t(r){var o=n[r];if(void 0!==o)return o.exports;var i=n[r]={exports:{}};return e[r].call(i.exports,i,i.exports,t),i.exports}(612)})()));
+!function(e,n){"object"==typeof exports&&"object"==typeof module?module.exports=n():"function"==typeof define&&define.amd?define([],n):"object"==typeof exports?exports.BiEval=n():e.BiEval=n()}(this,(()=>(()=>{"use strict";var e={612:function(e,n,t){var r=this&&this.__createBinding||(Object.create?function(e,n,t,r){void 0===r&&(r=t);var o=Object.getOwnPropertyDescriptor(n,t);o&&!("get"in o?!n.__esModule:o.writable||o.configurable)||(o={enumerable:!0,get:function(){return n[t]}}),Object.defineProperty(e,r,o)}:function(e,n,t,r){void 0===r&&(r=t),e[r]=n[t]}),o=this&&this.__setModuleDefault||(Object.create?function(e,n){Object.defineProperty(e,"default",{enumerable:!0,value:n})}:function(e,n){e.default=n}),i=this&&this.__importStar||function(e){if(e&&e.__esModule)return e;var n={};if(null!=e)for(var t in e)"default"!==t&&Object.prototype.hasOwnProperty.call(e,t)&&r(n,e,t);return o(n,e),n};Object.defineProperty(n,"__esModule",{value:!0}),n.evaluateToLambdaAST=b,n.forward=function(e){let n=p.parse(e),t=u.translate(n);return l.evaluateTermNode(b(t))},n.backward=function(e,n){let t=p.parse(e),r=b(u.translate(t)),o=(0,f.fuse)({},n,r).map((({newTermNode:e,remainingOperation:n})=>{let t=(0,a.flatten)((0,y.unLambdalize)(e));try{let e=c.unPartialEval(t),n=c.flatten(e),r=d.printToSurface(n);return console.log("biEval backward, success:\n",r),r}catch(e){const n=e;return console.log("biEval backward, fail:"+n.message),""}}));return console.log("solution list:",o),o=o.filter((e=>""!=e)),Array.from(new Set(o))};const a=t(446),s=t(619),l=i(t(238)),c=i(t(887)),p=i(t(577)),u=i(t(775)),d=i(t(69)),f=t(963),y=t(784);function b(e){const n=new Map,[t,r]=(0,a.partialEval)(n,e);return(0,s.lambdalize)((0,a.flatten)(r))}},75:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.findVariablesAndFields=function(e){let n=[],t=[];return function e(r){switch(r.type){case"variable":n.push(r);break;case"field":"variable"===r.object.type?t.push({variable:r.object,field:r.field}):e(r.object);break;case"binary":e(r.left),e(r.right);break;case"unary":e(r.operand);break;case"array":r.elements.forEach(e);break;case"object":Object.values(r.fields).forEach(e);break;case"freeze":e(r.expression)}}(e),{variables:n,fields:t}}},143:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.prettyPrint=function e(n){switch(n.type){case"constant":return"string"==typeof n.value?'"'+String(n.value)+'"':String(n.value);case"variable":return n.name;case"binary":return e(n.left)+n.operator+e(n.right);case"unary":return n.operator+e(n.operand);case"field":return e(n.object)+"."+n.field;case"array":return"["+n.elements.map((n=>e(n))).join(",")+"]";case"freeze":return"!"+e(n.expression);case"object":let t=n.fields;return"{"+Object.keys(t).map((n=>n+":"+e(t[n]))).join(", ")+"}";default:return""}},n.prettyPrintBinaryOperator=function(e){return e},n.prettyPrintUnaryOperator=function(e){return e}},235:(e,n)=>{function t(e,n){if(null===e)console.log(`${n}null`);else if("number"==typeof e||"boolean"==typeof e||"string"==typeof e)console.log(`${n}${e}`);else if("object"==typeof e){console.log(`${n}{`);const r=e;for(const e in r)if(r.hasOwnProperty(e)){const o=n+"  ";console.log(`${o}${e}:`),t(r[e],o+"  ")}console.log(`${n}}`)}else{if("constant"!=typeof e)throw new Error("Unhandled value type: "+typeof e);t(e.value,n+" ")}}Object.defineProperty(n,"__esModule",{value:!0}),n.printExpression=function e(n,r=""){switch(n.type){case"constant":t(n.value,r+" ");break;case"variable":console.log(`${r}Variable: ${n.name}`);break;case"binary":console.log(`${r}BinaryOperation: ${n.operator}`),e(n.left,r+"  "),e(n.right,r+"  ");break;case"unary":console.log(`${r}UnaryOperation: ${n.operator}`),e(n.operand,r+"  ");break;case"field":console.log(`${r}FieldAccess: ${n.field}`),e(n.object,r+"  ");break;case"array":console.log(`${r}ArrayLiteral:`),n.elements.forEach((n=>e(n,r+"  ")));break;case"object":console.log(`${r}ObjectLiteral:`),Object.keys(n.fields).forEach((e=>{console.log(`${r}${e} = ${n.fields[e].value}`)}));break;case"freeze":console.log(`${r}Freeze:`),e(n.expression,r+"  ")}},n.printConstantValue=t},454:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.seq=function(...e){return{type:"seq",nodes:e}},n.constNode=function(e){return{type:"const",value:e}},n.space=function(e){return{type:"space",width:e}},n.declare=function(e,n){return{type:"declare",name:e,value:n}},n.exp=function(e){return{type:"exp",expression:e}},n.loop=function(e,n,t,r,o){return{type:"loop",lst:e,separator:n,front:t,rear:r,body:o}},n.ite=function(e,n,t){return{type:"ite",condition:e,trueBranch:n,falseBranch:t}},n.assign=function(e,n){return{type:"assign",name:e,value:n}},n.sep=function(e){return{type:"sep",value:e}},n.nop=function(){return{type:"nop"}},n.bot=function(){return{type:"bot"}},n.end=function(){return{type:"end"}}},69:function(e,n,t){var r=this&&this.__createBinding||(Object.create?function(e,n,t,r){void 0===r&&(r=t);var o=Object.getOwnPropertyDescriptor(n,t);o&&!("get"in o?!n.__esModule:o.writable||o.configurable)||(o={enumerable:!0,get:function(){return n[t]}}),Object.defineProperty(e,r,o)}:function(e,n,t,r){void 0===r&&(r=t),e[r]=n[t]}),o=this&&this.__setModuleDefault||(Object.create?function(e,n){Object.defineProperty(e,"default",{enumerable:!0,value:n})}:function(e,n){e.default=n}),i=this&&this.__importStar||function(e){if(e&&e.__esModule)return e;var n={};if(null!=e)for(var t in e)"default"!==t&&Object.prototype.hasOwnProperty.call(e,t)&&r(n,e,t);return o(n,e),n};Object.defineProperty(n,"__esModule",{value:!0}),n.printToSurface=function e(n){let t="";switch(n.type){case"const":return n.value;case"space":return" ".repeat(n.width);case"declare":return t="«",t+="var ",t+=a.prettyPrint(n.name),t+="=",t+=a.prettyPrint(n.value),t+="»",t;case"assign":return t="«",t+=a.prettyPrint(n.name),t+="=",t+=a.prettyPrint(n.value),t+="»",t;case"exp":return t="«",t+=a.prettyPrint(n.expression),t+="»",t;case"seq":return n.nodes.map((n=>e(n))).join("");case"ite":t="«if "+a.prettyPrint(n.condition)+"»",t+=e(n.trueBranch);let r=n.falseBranch;return"ite"===r.type||"seq"===r.type&&1==r.nodes.length?t+="«elseif"+e(r).slice(3):"bot"!==r.type&&"seq"===r.type&&0!=r.nodes.length&&(t+="«else»",t+=e(r)),t.endsWith("«endif»")||(t+="«endif»"),t;case"loop":return t="«for "+a.prettyPrint(n.body.variable)+" in "+a.prettyPrint(n.lst),n.separator.value&&(t+=' separator "'+n.separator.value+'"'),n.front.value&&(t+=' front "'+n.front.value+'"'),n.rear.value&&(t+=' rear "'+n.rear.value+'"'),t+="»",t+=e(n.body.body),t+="«endfor»",t;default:return""}return""};const a=i(t(143))},963:function(e,n,t){var r=this&&this.__rest||function(e,n){var t={};for(var r in e)Object.prototype.hasOwnProperty.call(e,r)&&n.indexOf(r)<0&&(t[r]=e[r]);if(null!=e&&"function"==typeof Object.getOwnPropertySymbols){var o=0;for(r=Object.getOwnPropertySymbols(e);o<r.length;o++)n.indexOf(r[o])<0&&Object.prototype.propertyIsEnumerable.call(e,r[o])&&(t[r[o]]=e[r[o]])}return t};Object.defineProperty(n,"__esModule",{value:!0}),n.fuse=c,n.fuseExp=p,n.valueToConstantExpr=w,n.printEnvironment=function(e){console.log("{\n");for(const n in e)if(e.hasOwnProperty(n)){const[t,r]=e[n];console.log(`${n}: {`),console.log(" val: "),(0,s.printValue)(t," "),console.log(",marks: ["),r.forEach(((e,n)=>{(0,s.printValue)(e," "),n<r.length-1&&console.log(", ")})),console.log("]\n },\n")}console.log("}")},n.fuseBulk=m;const o=t(63),i=t(75),a=t(446),s=t(893),l=t(238);function c(e,n,t){if("const"!==t.type&&"sep"!==t.type&&"loopfront"!==t.type&&"looprear"!==t.type||"string"!=typeof t.value)if("space"===t.type)switch(n.type){case"insert":const{str:r,position:i}=n;if(0==t.width)return[{newEnv:E(e),newTermNode:t,remainingOperation:n},{newEnv:E(e),newTermNode:{type:"seq",nodes:[{type:"const",value:r},t]},remainingOperation:{type:"id"}}];if(0==i){let n=[{newEnv:E(e),newTermNode:{type:"seq",nodes:[{type:"const",value:r},t]},remainingOperation:{type:"id"}}];return(0,o.isWhitespace)(r)&&n.push({newEnv:E(e),newTermNode:{type:"space",width:t.width+r.length},remainingOperation:{type:"id"}}),n}if(i<t.width){if((0,o.isWhitespace)(r))return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{width:r.length+t.width}),remainingOperation:{type:"id"}}];throw new Error(`Cannot insert non-space between space term: ${n}`)}if(i===t.width){let n=[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"insert",str:r,position:i-t.width}}];return(0,o.isWhitespace)(r)&&n.push({newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{width:t.width+r.length}),remainingOperation:{type:"id"}}),n}{const n=i-t.width;return[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"insert",str:r,position:n}}]}case"delete":const{str:a,position:s}=n;if(0!==s){if(s<t.width&&s+a.length<=t.width){const n=t.width-a.length;return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{width:n}),remainingOperation:{type:"id"}}]}if(s<t.width&&s+a.length>t.width){const n=s,r=a.substring(t.width-s);return[{newEnv:E(e),newTermNode:{type:"space",width:n},remainingOperation:{type:"delete",str:r,position:0}}]}{const n=s-t.width;return[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"delete",str:a,position:n}}]}}if((0,o.isWhitespace)(a)&&a.length<=t.width){const n=t.width-a.length;return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{width:n}),remainingOperation:{type:"id"}}]}if(a.length>t.width){const n=a.slice(t.width);return[{newEnv:E(e),newTermNode:{type:"bot"},remainingOperation:{type:"delete",str:n,position:0}},{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{width:0}),remainingOperation:{type:"delete",str:n,position:0}}]}case"replace":const{str1:l,str2:c,position:p}=n;if(0!==p){if(p<t.width&&p+l.length<=t.width){if((0,o.isWhitespace)(c))return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{width:c.length+t.width-l.length}),remainingOperation:{type:"id"}}];{const n=" ".repeat(p)+c+" ".repeat(t.width-(p+l.length));return[{newEnv:E(e),newTermNode:{type:"const",value:n},remainingOperation:{type:"id"}}]}}if(p<t.width&&p+l.length>t.width){const n=" ".repeat(p),r=t.width-p,o=c.substring(0,r),i={type:"replace",str1:l.substring(r),str2:c.substring(r),position:0},a={type:"const",value:n+o};return[{newEnv:E(e),newTermNode:a,remainingOperation:i}]}{const n=p-t.width;return[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"replace",str1:l,str2:c,position:n}}]}}if(l.length<=t.width){if((0,o.isWhitespace)(c)){const n=t.width-l.length+c.length;return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{width:n}),remainingOperation:{type:"id"}}]}return[{newEnv:E(e),newTermNode:{type:"seq",nodes:[{type:"const",value:c},Object.assign(Object.assign({},t),{width:t.width-l.length})]},remainingOperation:{type:"id"}}]}if(l.length>t.width){const n=c.slice(0,t.width),r=l.slice(t.width),o=c.slice(t.width);return[{newEnv:E(e),newTermNode:{type:"const",value:n},remainingOperation:{type:"replace",str1:r,str2:o,position:0}}]}case"bulk":return m(e,n,t);case"id":return[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"id"}}];default:throw new Error(`Unhandled operation type: ${n}`)}else if("exp"===t.type){const a=t.binding,l=a[0],u=a[1],d="number"==typeof(s=u)||"boolean"==typeof s||"string"==typeof s?String(s):"Unknown";switch(n.type){case"insert":const{str:a,position:s}=n;if(0===s){let n=[];if(n.push({newEnv:E(e),newTermNode:{type:"seq",nodes:[{type:"const",value:a},t]},remainingOperation:{type:"id"}}),!(0,o.containsNewlineOrSpace)(a)){let r=function(e,n){try{if(v(JSON.parse(n)))return n+e}catch(e){return}}(d,a);if(void 0!==r)try{let o=y(r,u),{newEnv:i,newExp:a}=p(e,o,l);n.push({newEnv:E(i),newTermNode:Object.assign(Object.assign({},t),{binding:[a,o]}),remainingOperation:{type:"id"}})}catch(e){}}return n}if(s<d.length){const n=y(d.slice(0,s)+a+d.slice(s),u);let{newEnv:r,newExp:o}=p(e,n,l);return[{newEnv:E(r),newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(s==d.length){let r=[];if(!(0,o.containsNewlineOrSpace)(a)){const n=function(e,n){try{if(v(JSON.parse(n)))return e+n}catch(e){return}}(d,a);if(void 0!==n)try{const o=y(n,u);let{newEnv:i,newExp:a}=p(e,o,l);r.push({newEnv:E(i),newTermNode:Object.assign(Object.assign({},t),{binding:[a,o]}),remainingOperation:{type:"id"}})}catch(e){console.error(e)}}let i=E(e);return l.name&&(i[l.name]=[u,[u]]),r.push({newEnv:i,newTermNode:t,remainingOperation:Object.assign(Object.assign({},n),{position:0})}),r}{const r=s-d.length;if(l.name){let n=l.name;e[n]=[u,[u]]}return[{newEnv:E(e),newTermNode:t,remainingOperation:Object.assign(Object.assign({},n),{position:r})}]}case"delete":const{str:f,position:g}=n;if(0===g){if(f.length<d.length){const n=y(d.slice(f.length),u);let{newEnv:r,newExp:o}=p(e,n,l);return[{newEnv:E(r),newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(f.length==d.length){if(l.name){let n=l.name;if("string"==typeof u){let{newEnv:r,newExp:o}=p(e,"",l);return[{newEnv:E(r),newTermNode:Object.assign(Object.assign({},t),{binding:[o,""]}),remainingOperation:{type:"id"}},{newEnv:b(E(e),n),newTermNode:{type:"bot"},remainingOperation:{type:"id"}}]}return[{newEnv:b(E(e),n),newTermNode:{type:"bot"},remainingOperation:{type:"id"}}]}if(l){let n=l.object.name,t=l.field,r=e[n][0],o=e[n][1][0];if(0==o.fields[t].length){let i=h(r,t),a=h(o,t),s=b(E(e),n);return s[n]=[i,[a]],[{newEnv:E(s),newTermNode:{type:"bot"},remainingOperation:{type:"id"}}]}throw new Error(`field has been updaeted, cannot be remvoed: ${t}$`)}}else if(f.length>d.length){let n=f.slice(0,d.length),r=f.slice(d.length),o={type:"delete",str:n,position:0},i=c(E(e),o,t),a={type:"delete",str:r,position:0};return i.forEach((e=>{e.remainingOperation=a})),i}}else{if(g+f.length<=d.length){const n=y(d.slice(0,g)+d.slice(g+f.length),u);let{newEnv:r,newExp:o}=p(e,n,l);return[{newEnv:E(r),newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(g<=d.length&&g+f.length>d.length){const n=d.slice(0,g),r=f.slice(d.length-g),o=y(n,u);let{newEnv:i,newExp:a}=p(e,o,l);return[{newEnv:E(i),newTermNode:Object.assign(Object.assign({},t),{binding:[a,o]}),remainingOperation:{type:"delete",str:r,position:0}}]}if(g>d.length){const n=g-d.length;let[{newEnv:r,newTermNode:o,remainingOperation:i}]=c(E(e),{type:"id"},t);return[{newEnv:E(r),newTermNode:o,remainingOperation:{type:"delete",str:f,position:n}}]}}case"replace":const{str1:w,str2:O,position:j}=n;if(0===j){if(d.startsWith(w)){const n=y(O+d.slice(w.length),u);let{newEnv:r,newExp:o}=p(E(e),n,l);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(w.startsWith(d)){const n=y(O.slice(0,d.length),u);let{newEnv:r,newExp:o}=p(E(e),n,l);const i=w.slice(d.length),a=O.slice(d.length);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"replace",str1:i,str2:a,position:0}}]}throw new Error(`unsupported replacement: ${w}; ${d}`)}if(j<d.length){const n=y(d.slice(0,j)+O+d.slice(j+w.length),u);let{newEnv:r,newExp:o}=p(E(e),n,l);return[{newEnv:r,newTermNode:Object.assign(Object.assign({},t),{binding:[o,n]}),remainingOperation:{type:"id"}}]}if(j>=d.length){const r=j-d.length;let[{newEnv:o,newTermNode:i,remainingOperation:a}]=c(E(e),{type:"id"},t);return[{newEnv:E(o),newTermNode:i,remainingOperation:Object.assign(Object.assign({},n),{position:r})}]}throw new Error("Unsupported replacement");case"bulk":return m(e,n,t);case"id":let{variables:N,fields:x}=(0,i.findVariablesAndFields)(l);return N.forEach((n=>{e=function(e,n){if(!(e.name in n))throw new Error(`Variable ${e.name} not found in environment.`);let t=n[e.name][0],r=b(n,e.name);return r[e.name]=[t,[t]],r}(n,e)})),x.forEach((({variable:n,field:t})=>{e=function(e,n,t){let o=n.name;if(!(o in t))throw new Error(`Variable ${o} not found in environment.`);let i=t[o][0],a=function(e,n,t){const o=e.fields,i=n,a=(o[i],r(o,["symbol"==typeof i?i:i+""]));return a[n]=t.fields[n],{type:"object",fields:a}}(t[o][1][0],e,i),s=b(t,o);return s[o]=[i,[a]],s}(t,n,e)})),[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"id"}}];default:throw new Error(`Unhandled operation type: ${n}`)}}else{if("lambda"===t.type){let r=t.marker;if("loopitem"===r.type){let o=[],i=t.variable.name,a=t.binding[0],s=t.binding[1],l=E(e);l=j(l,i,s);let u="";if(!r.lst)throw new Error("exp is not a Variable with a name property in loopitem's marker");{let e=r.lst.name;u=e+"_new"}let d=c(E(l),n,t.body).map((({newEnv:n,newTermNode:r,remainingOperation:o})=>{let s=E(n);if(i in s){let n=s[i][0],l=s[u][0];l.push(n),s[u]=[l,[l]],s=b(E(s),i);let{newEnv:c,newExp:d}=p(s,n,a);return e[i]&&(c[i]=e[i]),{newEnv:c,newTermNode:{type:"lambda",variable:t.variable,body:"seq"!=r.type?{type:"seq",nodes:[r]}:r,binding:[d,n],marker:t.marker},remainingOperation:o}}return e[i]&&(s[i]=e[i]),{newEnv:s,newTermNode:{type:"lambda",variable:t.variable,body:"seq"!=r.type?{type:"seq",nodes:[r]}:r,binding:[{type:"constant",value:null},null],marker:t.marker},remainingOperation:o}}));return o.concat(d)}{let r=t.variable.name,o=t.binding[0],i=t.binding[1],a=E(e);return a=j(a,r,i),c(E(a),n,t.body).map((({newEnv:n,newTermNode:i,remainingOperation:a})=>{let s=n[r][0];delete n[r];let l=function(e,n){let t=E(e);for(const e in n)n.hasOwnProperty(e)&&(t[e]=n[e]);return t}(e,n),{newEnv:c,newExp:u}=p(l,s,o);return{newEnv:c,newTermNode:{type:"lambda",variable:t.variable,body:i,binding:[u,s],marker:t.marker},remainingOperation:a}}))}}if("branchstart"!==t.type&&"branchend"!==t.type&&"nop"!==t.type){if("seq"===t.type){if("bulk"===n.type)return m(e,n,t);const r=t.nodes;let o=[{newEnv:e,newTermNode:{type:"seq",nodes:[]},remainingOperation:n}];for(const e of r){const n=[];for(const t of o){const r=c(E(t.newEnv),t.remainingOperation,e);for(const e of r){const r=("seq"===t.newTermNode.type?t.newTermNode.nodes:[t.newTermNode]).concat("seq"===e.newTermNode.type?e.newTermNode.nodes:[e.newTermNode]);n.push({newEnv:e.newEnv,newTermNode:{type:"seq",nodes:r},remainingOperation:e.remainingOperation})}}o=n}return o.map((e=>e))}if("end"===t.type)return[{newEnv:E(e),newTermNode:t,remainingOperation:n}];throw new Error("Operation can only be applied to ConstNode with string value")}{if("branchend"===t.type){let n=t.condition[0],r=t.condition[1],[o,i]=(0,a.evaluateExpr)(g(e),n);if(i!==r)throw new Error("Violate BX properties: updates change if-then-else branch.")}let r=[];switch(r.push({newEnv:E(e),newTermNode:t,remainingOperation:n}),n.type){case"insert":const{str:o,position:i}=n;0===i&&r.push({newEnv:E(e),newTermNode:{type:"seq",nodes:[{type:"const",value:o},t]},remainingOperation:{type:"id"}});case"delete":case"replace":case"id":return r;case"bulk":return m(e,n,t);default:throw new Error(`Unhandled operation type: ${n}`)}}}else{if("loopfront"===t.type){let n=t.lst;if(!n.name)throw new Error("exp is not a Variable with a name property in loopfront");{let t=n.name;e[t+"_new"]=[[],[]]}}else if("looprear"===t.type){let n=t.lst;if(!n.name)throw new Error("exp is not a Variable with a name property in loopfront");{let t=n.name,r=e[t+"_new"][0];r=r.reverse(),e[t]=[r,[r]]}}const r=t.value;switch(n.type){case"insert":const{str:o,position:i}=n;if(0===r.length)return[{newEnv:E(e),newTermNode:t,remainingOperation:n}];if(0===i)return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:o+r}),remainingOperation:{type:"id"}},{newEnv:E(e),newTermNode:{type:"seq",nodes:[{type:"const",value:o},t]},remainingOperation:{type:"id"}}];if(i<r.length){const n=r.slice(0,i)+o+r.slice(i);return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}]}if(i===r.length)return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:r+o}),remainingOperation:{type:"id"}},{newEnv:E(e),newTermNode:t,remainingOperation:{type:"insert",str:o,position:i-r.length}}];{const n=i-r.length;return[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"insert",str:o,position:n}}]}case"delete":const{str:a,position:s}=n;if(0===s){if(r.startsWith(a)&&a.length<=r.length){const n=r.slice(a.length);let o=[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}];return a.length===r.length&&o.push({newEnv:E(e),newTermNode:{type:"bot"},remainingOperation:{type:"id"}}),o}if(a.startsWith(r)&&a.length>r.length){const n=a.slice(r.length);return[{newEnv:E(e),newTermNode:{type:"bot"},remainingOperation:{type:"delete",str:n,position:0}},{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:""}),remainingOperation:{type:"delete",str:n,position:0}}]}throw new Error("cannot delete, not match. delStr: "+a+", s_c: "+r)}if(s<r.length&&s+a.length<=r.length){const n=r.slice(0,s)+r.slice(s+a.length);return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}]}if(s<r.length&&s+a.length>r.length){const n=r.substring(0,s),t=a.substring(r.length-s);return[{newEnv:E(e),newTermNode:{type:"const",value:n},remainingOperation:{type:"delete",str:t,position:0}}]}{const n=s-r.length;return[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"delete",str:a,position:n}}]}case"replace":const{str1:l,str2:c,position:p}=n;if(0!==p){if(p<r.length&&p+l.length<=r.length){const n=r.slice(0,p)+c+r.slice(p+l.length);return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}]}if(p<r.length&&p+l.length>r.length){const n=r.substring(0,p),t=r.substring(p),o=c.substring(0,t.length),i={type:"replace",str1:l.substring(t.length),str2:c.substring(t.length),position:0},a={type:"const",value:n+o};return[{newEnv:E(e),newTermNode:a,remainingOperation:i}]}{const n=p-r.length;return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:r}),remainingOperation:{type:"replace",str1:l,str2:c,position:n}}]}}if(r.startsWith(l)&&l.length<=r.length){const n=c+r.slice(l.length);return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"id"}}]}if(l.startsWith(r)&&l.length>r.length){const n=c.slice(0,r.length),o=l.slice(r.length),i=c.slice(r.length);return[{newEnv:E(e),newTermNode:Object.assign(Object.assign({},t),{value:n}),remainingOperation:{type:"replace",str1:o,str2:i,position:0}}]}case"bulk":return m(e,n,t);case"id":return[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"id"}}];default:throw new Error(`Unhandled operation type: ${n}`)}}var s}function p(e,n,t){switch(t.type){case"constant":return{newEnv:e,newExp:w(n)};case"variable":if(!(t.name in e))throw new Error(`Variable ${t.name} not found in environment.`);const[o,i]=e[t.name];if(0===i.length){const r=E(e);return r[t.name]=[n,[n]],{newEnv:r,newExp:t}}if(1===i.length&&i[0]===n)return{newEnv:e,newExp:t};throw new Error(`Fail, variable cannot be updated to different value ${t.name}, previous: ${i[0]}, new: ${n}`);case"freeze":let[s,l]=(0,a.evaluateExpr)(g(e),t.expression);if(l!==n)throw new Error(`Fail, freezed expression cannot be changed, old: ${n}, new: ${l}`);return{newEnv:e,newExp:t};case"field":const c=t.object;if("variable"===c.type&&c.name in e){const[o,i]=e[c.name];if("object"===o.type){const a={type:"object",fields:Object.assign(Object.assign({},o.fields),{[t.field]:n})},s=function(e,n,t){const o=e.fields,i=n,a=(o[i],r(o,["symbol"==typeof i?i:i+""]));return a[n]=[t],{type:"object",fields:a}}(i[0],t.field,n),l=E(e);return l[c.name]=[a,[s]],{newEnv:l,newExp:t}}throw new Error("Field access's value is not an object")}throw new Error("Field access not start with variable.");case"binary":let d=g(e),[f,y]=(0,a.evaluateExpr)(d,t.left);if("number"==typeof n){if("number"!=typeof n||null===n)throw new Error("Value must be a non-null number");switch(t.operator){case"+":let r=p(e,n-y,t.right);return{newEnv:r.newEnv,newExp:Object.assign(Object.assign({},t),{right:r.newExp})};case"-":let o=p(e,y-n,t.right);return{newEnv:o.newEnv,newExp:Object.assign(Object.assign({},t),{right:o.newExp})};case"*":let i=p(e,n/y,t.right);return{newEnv:i.newEnv,newExp:Object.assign(Object.assign({},t),{right:i.newExp})};case"/":let a=p(e,y/n,t.right);return{newEnv:a.newEnv,newExp:Object.assign(Object.assign({},t),{right:a.newExp})}}}case"unary":return{newEnv:e,newExp:t};case"array":return{newEnv:{},newExp:{type:"array",elements:u(t.elements,n)}};default:throw new Error(`Unsupported expression type: ${t.type}`)}}function u(e,n){const t=[];for(let r=0;r<n.length;r++)r<e.length?t.push(d(e[r],n[r])):t.push(f(n[r]));return t}function d(e,n){switch(e.type){case"constant":return Object.assign(Object.assign({},e),{value:n});case"array":return Object.assign(Object.assign({},e),{elements:u(e.elements,n)});case"object":return Object.assign(Object.assign({},e),{fields:Object.keys(e.fields).reduce(((t,r)=>(t[r]=Object.assign(Object.assign({},e.fields[r]),{value:n.fields[r]}),t)),{})});default:throw new Error(`Unsupported expression type: ${e.type}`)}}function f(e){if("number"==typeof e||"boolean"==typeof e||"string"==typeof e||null===e)return{type:"constant",value:e};if(Array.isArray(e))return{type:"array",elements:e.map(f)};if("object"==typeof e&&null!==e)return{type:"object",fields:Object.keys(e.fields).reduce(((n,t)=>(n[t]={type:"constant",value:e.fields[t]},n)),{})};throw new Error("Unsupported value type: "+typeof e)}function y(e,n){if("number"==typeof n){const n=parseFloat(e);if(isNaN(n))throw new Error("convert to number fail: "+e);return n}if("boolean"==typeof n){if("true"===e)return!0;if("false"===e)return!1;throw new Error("convert to boolean fail: ${s}")}if("string"==typeof n)return e;throw new Error("Unsupported type: "+typeof n)}function b(e,n){const t=E(e);return delete t[n],t}function h(e,n){const t=e.fields,o=n;return t[o],{type:"object",fields:r(t,["symbol"==typeof o?o:o+""])}}function g(e){const n=new Map;for(const t in e)e.hasOwnProperty(t)&&n.set(t,e[t][0]);return n}function w(e){if(null===e||"number"==typeof e||"boolean"==typeof e||"string"==typeof e)return{type:"constant",value:e};if(Array.isArray(e))return{type:"constant",value:e.map((e=>w(e)))};if("object"===e.type){const n=e,t={};for(const e in n.fields)n.fields.hasOwnProperty(e)&&(t[e]=w(n.fields[e]));return{type:"constant",value:{type:"object",fields:t}}}throw new Error("Unhandled value type: "+typeof e)}function m(e,n,t){if("id"===n.type)return c(E(e),n,t);if("bulk"!==n.type||!n.operations)throw new Error("Invalid bulk operation");if(0==n.operations.length)return[{newEnv:E(e),newTermNode:t,remainingOperation:{type:"id"}}];if("seq"===t.type&&0==t.nodes.length)return[{newEnv:E(e),newTermNode:t,remainingOperation:n}];const[r,...o]=n.operations;if("seq"===t.type){const r=t.nodes[0],o=t.nodes.slice(1),i=m(e,n,r),a=[];for(const e of i){const n=m(e.newEnv,e.remainingOperation,{type:"seq",nodes:o});for(const t of n){let n=[];"seq"!=t.newTermNode.type?n.push(t.newTermNode):n=t.newTermNode.nodes,a.push({newEnv:t.newEnv,newTermNode:{type:"seq",nodes:[e.newTermNode,...n]},remainingOperation:t.remainingOperation})}}return a}if("lambda"===t.type){let r=N(n);return c(E(e),r,t)}return"insert"===r.type||"delete"===r.type||"replace"===r.type?c(E(e),r,t).map((e=>{let n=e.remainingOperation;if("id"===n.type||"insert"===n.type||"delete"===n.type||"replace"===n.type){let n=(0,l.evaluateTermNode)(e.newTermNode).length;const t=o.map((e=>{if("id"===e.type)return e;if("position"in e)return Object.assign(Object.assign({},e),{position:e.position-n});throw new Error("All operations must have positions")}));let r={type:"bulk",operations:[e.remainingOperation,...t]};return[{newEnv:e.newEnv,newTermNode:e.newTermNode,remainingOperation:r}]}throw new Error("nested bulk current not supported")})).reduce(((e,n)=>e.concat(n)),[]):"id"===r.type?0==o.length?c(E(e),r,t):m(e,{type:"bulk",operations:o},t):[]}function v(e){return!!("number"==typeof e||"boolean"==typeof e||"string"==typeof e||null===e||Array.isArray(e)&&e.every(v)||"object"==typeof e&&null!==e&&"object"===e.type&&"object"==typeof e.fields)}function O(e){if(null===e||"object"!=typeof e)return e;if(Array.isArray(e))return e.map(O);if(function(e){return e&&"object"==typeof e&&"object"===e.type&&"fields"in e}(e)){const n={};for(const t in e.fields)e.fields.hasOwnProperty(t)&&(n[t]=O(e.fields[t]));return{type:"object",fields:n}}const n={};for(const t in e)e.hasOwnProperty(t)&&(n[t]=O(e[t]));return n}function E(e){const n={};for(const t in e)if(e.hasOwnProperty(t)){const[r,o]=e[t];n[t]=[O(r),O(o)]}return n}function j(e,n,t){if("number"==typeof t||"boolean"==typeof t||"string"==typeof t||null===t)e[n]=[t,[]];else if(Array.isArray(t))e[n]=[t,[]];else if("object"==typeof t&&null!==t&&"fields"in t){const r={type:"object",fields:{}};for(const e in t.fields)r.fields[e]=[];e[n]=[t,[r]]}return e}function N(e){if("bulk"===e.type){const n=e.operations.map(N);return Object.assign(Object.assign({},e),{operations:n})}return Object.assign({},e)}},238:(e,n)=>{function t(e){if(null===e)return"null";if("number"==typeof e||"boolean"==typeof e||"string"==typeof e)return e.toString();if("object"===e.type){const n=e;let r="{";for(const e in n.fields)n.fields.hasOwnProperty(e)&&(r+=`${e}: ${t(n.fields[e])}, `);return r.length>1&&(r=r.slice(0,-2)),r+="}",r}if(Array.isArray(e)){const n=e;let r="[";for(const e of n)r+=`${t(e)}, `;return r.length>1&&(r=r.slice(0,-2)),r+="]",r}throw new Error("Unhandled value type: "+typeof e)}Object.defineProperty(n,"__esModule",{value:!0}),n.evaluateTermNode=function e(n){switch(n.type){case"const":case"sep":case"loopfront":case"looprear":return n.value;case"space":return" ".repeat(n.width);case"exp":return String(t(n.binding[1]));case"seq":return n.nodes.map((n=>e(n))).join("");case"lambda":return e(n.body);case"branchstart":case"branchend":case"end":case"bot":case"nop":return"";default:throw new Error(`Unhandled term node type: ${n.type}`)}},n.printValue=t},619:(e,n)=>{function t(e){let n=e.type;if("seq"===n)return r(e);if("declare"===n||"assign"===n)throw new Error("declare|assign node shall not be visible here.");if("lambda"===n){let n=e,r=t(n.body);return{type:"lambda",variable:n.variable,body:r,binding:n.binding,marker:n.marker}}return e}function r(e){let n=e.nodes,i=[];for(let e=0;e<n.length;e++){let a=n[e];if("declare"===a.type||"assign"===a.type){let t=a,[s,l]=o(n,e+1),{nodes:c}=r({type:"seq",nodes:s}),p=c.pop();if(void 0===p)throw new Error("Expected the last element to be a BranchEndNode, but the array was empty.");"branchend"!==(null==p?void 0:p.type)&&c.push(p);let u={type:"lambda",variable:t.name,body:{type:"seq",nodes:c},binding:t.value,marker:{type:a.type}};i.push(u),"branchend"===(null==p?void 0:p.type)&&i.push({type:"branchend",condition:p.condition}),e=l}else i.push(t(a))}return{type:"seq",nodes:i}}function o(e,n){let t=[],r=0;for(let o=n;o<e.length;o++){if("branchstart"===e[o].type)r++;else if("branchend"===e[o].type){if(0===r)return t.push(e[o]),[t,o];r--}if("end"===e[o].type)return t.push(e[o]),[t,o];t.push(e[o])}return[t,e.length-1]}Object.defineProperty(n,"__esModule",{value:!0}),n.lambdalize=t},784:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.unLambdalize=function e(n){switch(n.type){case"lambda":{const{variable:t,body:r,binding:o,marker:i}=n;let a;switch(i.type){case"declare":return a=e(r),{type:"seq",nodes:[{type:"declare",name:t,value:o},a]};case"assign":return a=e(r),{type:"seq",nodes:[{type:"assign",name:t,value:o},a]};default:return{type:"lambda",variable:t,body:e(r),binding:o,marker:i}}}case"seq":return{type:"seq",nodes:n.nodes.map(e)};default:return n}}},893:(e,n,t)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.printNode=function e(n,t=""){switch(console.log(t+n.type),n.type){case"const":case"sep":console.log(t+"  Value: "+n.value);break;case"space":console.log(t+"  Width: "+n.width);break;case"declare":case"assign":console.log(t+"  Name: "+n.name.name),o(n.value,t+"  ");break;case"exp":o(n.binding,t+"  ");break;case"seq":n.nodes.forEach((n=>e(n,t+"  ")));break;case"branchstart":o(n.condition,t+"  ");break;case"loopfront":console.log(t+"  front: "+n.value);break;case"looprear":console.log(t+"  rear: "+n.value);break;case"lambda":console.log(t+"  Variable: "+n.variable.name),e(n.body,t+"  "),o(n.binding,t+"  "),a(n.marker,t+"  ");break;case"callstart":console.log(t+"  Name: "+n.name);break;case"end":console.log(`${t}  End`)}},n.printBinding=o,n.printValue=i,n.printMarker=a;const r=t(235);function o(e,n){(0,r.printExpression)(e[0],n),i(e[1],n)}function i(e,n){if(null===e)console.log(`${n}null`);else if("number"==typeof e||"boolean"==typeof e||"string"==typeof e)console.log(`${n}${e}`);else{if("object"!=typeof e)throw new Error("Unhandled value type: "+typeof e);{console.log(`${n}{`);const t=e;for(const e in t)if(t.hasOwnProperty(e)){const r=n+"  ";console.log(`${r}${e}:`),i(t[e],r+"  ")}console.log(`${n}}`)}}}function a(e,n=""){console.log(n+e.type)}},446:(e,n)=>{function t(e,n){switch(n.type){case"constant":return[e,n.value];case"variable":const r=e.get(n.name);if(void 0===r)throw new Error(`Variable '${n.name}' not found in environment`);return[e,r];case"binary":let[o,i]=t(e,n.left),[a,s]=t(o,n.right);switch(n.operator){case"+":return[a,i+s];case"-":return[a,i-s];case"*":return[a,i*s];case"/":return[a,i/s];case"&&":return[a,i&&s];case"||":return[a,i||s];case">":return[a,i>s];case"<":return[a,i<s];case">=":return[a,i>=s];case"<=":return[a,i<=s];case"==":return[a,i==s];case"!=":return[a,i!=s];default:throw new Error("Unsupported binary operator")}case"unary":let[l,c]=t(e,n.operand);if("not"===n.operator)return[l,!c];throw new Error("Unsupported unary operator");case"field":let p,[u,d]=t(e,n.object);if("string"!=typeof d&&("object"!=typeof d||null===d))throw new Error(`Cannot access field '${n.field}' from non-object`);if(p="string"==typeof d?d[n.field]:d.fields[n.field],void 0===p)throw new Error(`Field '${n.field}' not found in object`);return[u,p];case"array":let f=[],y=e;for(const e of n.elements){let[n,r]=t(y,e);f.push(r),y=n}return[y,f];case"object":let b={type:"object",fields:{}},h=e;for(const e in n.fields)if(n.fields.hasOwnProperty(e)){let[r,o]=t(h,n.fields[e]);b.fields[e]=o,h=r}return[h,b];case"freeze":return t(e,n.expression);default:throw new Error("Unhandled expression type")}}Object.defineProperty(n,"__esModule",{value:!0}),n.partialEval=function e(n,r){switch(r.type){case"const":return[n,{type:"const",value:r.value}];case"space":return[n,{type:"space",width:r.width}];case"declare":const[o,i]=t(n,r.value);return o.set(r.name.name,i),[o,{type:"declare",name:r.name,value:[r.value,i]}];case"assign":const[a,s]=t(n,r.value);return a.set(r.name.name,s),[a,{type:"assign",name:r.name,value:[r.value,s]}];case"exp":const[l,c]=t(n,r.expression);return[l,{type:"exp",binding:[r.expression,c]}];case"seq":let p=n;const u=[];for(const n of r.nodes){const[t,r]=e(p,n);u.push(r),p=t}return[p,{type:"seq",nodes:u}];case"ite":const[d,f]=t(n,r.condition);if(!0===f){const[n,t]=e(d,r.trueBranch);return[n,{type:"seq",nodes:[{type:"branchstart",condition:[r.condition,f],trueBranch:r.trueBranch,falseBranch:r.falseBranch},t,{type:"branchend",condition:[r.condition,f]}]}]}if(!1===f){const[n,t]=e(d,r.falseBranch);return[n,{type:"seq",nodes:[{type:"branchstart",condition:[r.condition,f],trueBranch:r.trueBranch,falseBranch:r.falseBranch},t,{type:"branchend",condition:[r.condition,f]}]}]}throw new Error(`Condition does not evaluate to boolean: ${f}`);case"loop":const{lst:y,separator:b,front:h,rear:g,body:w}=r,[m,v]=t(n,y);if(Array.isArray(v)&&0===v.length)return[m,{type:"seq",nodes:[{type:"loopfront",lst:y,value:h.value,body:w,separator:b},{type:"looprear",lst:y,value:g.value}]}];if(Array.isArray(v)&&1===v.length){const t=v[0],r=w.variable.name,o=new Map(n);o.set(r,t);const[i,a]=e(o,w.body);return[i,{type:"seq",nodes:[{type:"loopfront",lst:y,value:h.value,body:w,separator:b},{type:"lambda",variable:w.variable,binding:[{type:"constant",value:t},t],marker:{type:"loopitem",lst:y},body:a},{type:"looprear",lst:y,value:g.value}]}]}if(Array.isArray(v)&&v.length>1){let t=new Map(n),o=[];for(let n=0;n<v.length;n++){const r=v[n],i=w.variable.name;t.set(i,r);const[a,s]=e(t,w.body);t=a,o.push({type:"lambda",variable:w.variable,body:s,binding:[{type:"constant",value:r},r],marker:{type:"loopitem",lst:y}})}let i=o[o.length-1];for(let e=o.length-2;e>=0;e--){let n=o[e];i={type:"lambda",variable:n.variable,binding:n.binding,marker:n.marker,body:{type:"seq",nodes:[n.body,r.separator,i]}}}return[t,{type:"seq",nodes:[{type:"loopfront",lst:y,value:h.value,body:w,separator:b},i,{type:"looprear",lst:y,value:g.value}]}]}throw new Error("Unsupported type or value for e_arr: "+typeof v);case"nop":return[n,{type:"nop"}];case"bot":return[n,{type:"bot"}];case"end":return[n,{type:"end"}];default:throw new Error(`Unhandled term node type: ${r.type}`)}},n.evaluateExpr=t,n.flatten=function e(n){return"seq"===n.type?{type:"seq",nodes:n.nodes.map((n=>e(n))).flatMap((e=>"seq"===e.type?e.nodes:[e]))}:"lambda"===n.type?Object.assign(Object.assign({},n),{body:e(n.body)}):n}},887:function(e,n,t){var r=this&&this.__createBinding||(Object.create?function(e,n,t,r){void 0===r&&(r=t);var o=Object.getOwnPropertyDescriptor(n,t);o&&!("get"in o?!n.__esModule:o.writable||o.configurable)||(o={enumerable:!0,get:function(){return n[t]}}),Object.defineProperty(e,r,o)}:function(e,n,t,r){void 0===r&&(r=t),e[r]=n[t]}),o=this&&this.__setModuleDefault||(Object.create?function(e,n){Object.defineProperty(e,"default",{enumerable:!0,value:n})}:function(e,n){e.default=n}),i=this&&this.__importStar||function(e){if(e&&e.__esModule)return e;var n={};if(null!=e)for(var t in e)"default"!==t&&Object.prototype.hasOwnProperty.call(e,t)&&r(n,e,t);return o(n,e),n};Object.defineProperty(n,"__esModule",{value:!0}),n.unPartialEval=l,n.flatten=function e(n){if("seq"===n.type){const t=n.nodes.map((n=>e(n)));return 1==t.length?t[0]:{type:"seq",nodes:t.flatMap((e=>"seq"===e.type?e.nodes:[e]))}}return"ite"===n.type?Object.assign(Object.assign({},n),{trueBranch:e(n.trueBranch),falseBranch:e(n.falseBranch)}):"loop"===n.type?Object.assign(Object.assign({},n),{body:Object.assign(Object.assign({},n.body),{body:e(n.body.body)})}):n};const a=i(t(454));function s(e){return e[0]}function l(e){switch(e.type){case"const":return a.constNode(e.value);case"space":return a.space(e.width);case"declare":return a.declare(e.name,s(e.value));case"assign":return a.assign(e.name,s(e.value));case"exp":return a.exp(s(e.binding));case"nop":return a.nop();case"end":return a.end();case"bot":return a.bot();case"seq":return c(e);case"lambda":return p(e);case"sep":return e;default:throw new Error(`Unknown node type: ${e.type}`)}}function c(e){const n=e.nodes,t=[];for(let e=0;e<n.length;e++){const o=n[e];if("branchstart"===o.type){const r=o.condition[0],i=o.condition[1],s=o.trueBranch,l=o.falseBranch;let p=1;const u=[];for(let t=e+1;t<n.length;t++){const e=n[t];if("branchstart"===e.type&&p++,"branchend"===e.type){if(1==p)break;p--,u.push(n[t])}else u.push(n[t])}i?t.push(a.ite(r,c({type:"seq",nodes:u}),l)):t.push(a.ite(r,s,c({type:"seq",nodes:u}))),e+=u.length+1}else if("loopfront"===o.type){let i=o,s=null,l=null,c=null,p=n[++e];if("looprear"===p.type)s=p;else{let t=p;if([l,c]=u(t),p=n[++e],"looprear"!==p.type)throw new Error("Shall end with looprear node");s=p}if(""===i.value&&""===s.value&&null===l&&null===c)t.push(a.bot());else if(null===l||d(l))t.push(a.loop(i.lst,i.separator,{type:"front",value:o.value},{type:"rear",value:s.value},i.body));else{if("bot"===l.type)throw new Error("lambda is bot node");if("lambdawithexpr"!==l.type)throw new Error("Must be lambda in loopitem");t.push(a.loop(i.lst,null===c?i.separator:c,{type:"front",value:o.value},{type:"rear",value:s.value},{type:"lambda",variable:(r=l).variable,body:r.body}))}}else t.push(l(o))}var r;return a.seq(...t)}function p(e){let{variable:n,body:t,binding:r,marker:o}=e;return{type:"lambdawithexpr",variable:n,body:l(t),exp:(i=r[1],Array.isArray(i)?{type:"array",elements:i.map(f)}:{type:"array",elements:[f(i)]})};var i}function u(e){let n=e,t=e.body,r=null,o=[],i=null;for(let e of t.nodes)"sep"===e.type?i=e:"lambda"===e.type?r=e:o.push(e);if(n.body=o.every(d)?{type:"bot"}:{type:"seq",nodes:o},null==r)return"bot"===n.body.type?[{type:"bot"},null]:[p(n),null];{let[e,t]=u(r);if("bot"===e.type&&null===t)return[p(n),i];if("bot"===n.body.type&&null===i)return[e,t];if("bot"===n.body.type&&""===(null==i?void 0:i.value))return[e,t];{let r=p(n);if(s=e,y((a=r).variable,s.variable)&&h(a.body,s.body)){if(null===t)return[r,i];if(null!=i&&t.value===i.value)return[r,i];throw new Error("sepNode not equal")}throw new Error("lambda body not equal")}}var a,s}function d(e){return"bot"===e.type}function f(e){if("number"==typeof e||"boolean"==typeof e||"string"==typeof e||null===e)return{type:"constant",value:e};if(Array.isArray(e))return{type:"array",elements:e.map(f)};if("object"===e.type){const n={};for(const t in e.fields)if(e.fields.hasOwnProperty(t)){const r=e.fields[t];n[t]={type:"constant",value:r}}return{type:"object",fields:n}}throw new Error("Unsupported Value type")}function y(e,n){return e.name===n.name}function b(e,n){if(e.type!==n.type)return!1;switch(e.type){case"constant":const t=e,r=n;return"object"==typeof t.value&&"object"==typeof r.value?b(t.value,r.value):t.value===r.value;case"variable":return e.name===n.name;case"binary":const o=e,i=n;return o.operator===i.operator&&b(o.left,i.left)&&b(o.right,i.right);case"unary":const a=e,s=n;return a.operator===s.operator&&b(a.operand,s.operand);case"field":const l=e,c=n;return l.field===c.field&&b(l.object,c.object);case"array":const p=e,u=n;return p.elements.length===u.elements.length&&p.elements.every(((e,n)=>b(e,u.elements[n])));case"object":const d=e,f=n,y=Object.keys(d.fields),h=Object.keys(f.fields);return y.length===h.length&&y.every((e=>f.fields.hasOwnProperty(e)&&b(d.fields[e],f.fields[e])));case"freeze":return b(e.expression,n.expression);default:return!1}}function h(e,n){if(e.type!==n.type)return!1;switch(e.type){case"const":return e.value===n.value;case"space":return e.width===n.width;case"declare":const t=e,r=n;return y(t.name,r.name)&&b(t.value,r.value);case"assign":const o=e,i=n;return y(o.name,i.name)&&b(o.value,i.value);case"exp":return b(e.expression,n.expression);case"seq":const a=e.nodes,s=n.nodes;return a.length===s.length&&a.every(((e,n)=>h(e,s[n])));case"ite":const l=e,c=n;return b(l.condition,c.condition)&&h(l.trueBranch,c.trueBranch)&&h(l.falseBranch,c.falseBranch);case"loop":const p=e,u=n;return b(p.lst,u.lst)&&p.separator.value===u.separator.value&&p.front.value===u.front.value&&p.rear.value===u.rear.value&&function(e,n){return y(e.variable,n.variable)&&h(e.body,n.body)}(p.body,u.body);case"nop":case"bot":case"end":return!0;case"call":const d=e,f=n;return h(d.func,f.func)&&Object.keys(d.args).length===Object.keys(f.args).length&&Object.keys(d.args).every((e=>b(d.args[e],f.args[e])));case"lambdawithexpr":const g=e,w=n;return y(g.variable,w.variable)&&h(g.body,w.body);default:return!1}}},577:(e,n)=>{function t(e){const n=/«[^»]*»/g;let t;const r=[];let o=0;for(;null!==(t=n.exec(e));)o<t.index&&r.push(e.slice(o,t.index)),r.push(t[0]),o=n.lastIndex;return o<e.length&&r.push(e.slice(o)),r}function r(e){var n,t,i;const a=[];let s=0;for(;s<e.length;){const l=e[s];if("string"==typeof l&&l.startsWith("«")&&l.endsWith("»")){const c=l.slice(1,-1).trim(),[p]=c.split(" ");switch(p.toUpperCase()){case"VAR":const l=c.split("=");a.push({type:"Directive",content:{type:"declare",name:l[0].split(" ")[1].trim(),expr:o(l[1].trim())}});break;case"IF":const p=c.match(/^(IF)\s+/i);if(p){const n=c.slice(p[0].length).trim(),t=[],i=[];let l=1,u=s+1;for(;u<e.length;){let n=e[u];if("string"==typeof n&&n.startsWith("«"))if(n.includes("ENDIF")||n.includes("endif")){if(l--,l<=0)break}else if((n.includes("else")||n.includes("ELSE"))&&1===l){if(l=0,!n.includes("if")&&!n.includes("IF")){u++;continue}n=n.replace(/else(?=if)/,"")}l>0?t.push(n):i.push(n),u++}const d=r(t),f=r(i);s=u,a.push({type:"Directive",content:{type:"if",expr:o(n),thenBranch:d,elseBranch:f}})}break;case"FOR":const u=/(\bfor\b|\bin\b|\bseparator\b|\bfront\b|\brear\b|[\[\],])|(\w+)|"([^"]*)"|\[([^\]]*)\]/gi,d=[];let f;for(;null!==(f=u.exec(c));)f[1]&&d.push(f[1]),f[2]&&d.push(f[2]),f[3]&&d.push(f[3]),f[4]&&d.push(f[4]);const y=c.match(/separator\s*"([^"]*)"/i);y&&y[1]&&d.push("separator",y[1]);const b=c.match(/front\s*(?:\[([^\]]*)\])?/i);b&&b[1]&&d.push("front",b[1]);const h=c.match(/rear\s*(?:\[([^\]]*)\])?/i);if(h&&h[1]&&d.push("rear",h[1]),d){const l=[];let c=1,p=s+1;for(;p<e.length&&c>0;){const n=e[p];if("string"==typeof n&&n.startsWith("«"))if(n.includes("ENDFOR")||n.includes("endfor")){if(c--,0===c)break}else(n.includes("FOR")||n.includes("for"))&&c++;c>0&&l.push(n),p++}const u=r(l);s=p,a.push({type:"Directive",content:{type:"for",name:d[1].trim(),expr:o(d[3].trim()),separator:{type:"separator",value:(null===(n=d[5])||void 0===n?void 0:n.trim())||""},front:{type:"front",value:(null===(t=d[7])||void 0===t?void 0:t.trim())||""},rear:{type:"rear",value:(null===(i=d[9])||void 0===i?void 0:i.trim())||""},fragment:u}})}break;default:if(c.includes("=")){const e=c.split("=");a.push({type:"Directive",content:{type:"assign",name:e[0].split(" ")[0].trim(),expr:o(e[1].trim())}})}else a.push({type:"Directive",content:{type:"exp",expr:o(c)}})}}else a.push(l);s++}return 1===a.length?a[0]:{type:"fragmentList",fragments:a}}function o(e){const n=function(e){const n=/"([^"\\]*(?:\\.[^"\\]*)*)"|'([^'\\]*(?:\\.[^'\\]*)*)'|(&&|\|\||[<>!=]=|[{}[\](),.:;!+\-*/<>])|(\s+)|([^\s{}[\](),.:;!+\-*/<>!=&|]+)/g,t=[];let r;for(;null!==(r=n.exec(e));)void 0!==r[1]?t.push(`"${r[1]}"`):void 0!==r[2]?t.push(`'${r[2]}'`):void 0!==r[3]?t.push(r[3]):void 0!==r[5]&&t.push(r[5]);return t}(e);let t=0;function r(){if("("===n[t]){t++;const e=o();if(")"===n[t])return t++,e;throw new Error("Mismatched parentheses")}if("["===n[t]){t++;const e=[];for(;"]"!==n[t];)","===n[t]?t++:e.push(o());return t++,{type:"array",elements:e}}if("{"===n[t]){t++;const e={};for(;"}"!==n[t];)if(","===n[t])t++;else{const r=n[t++];if(":"!==n[t])throw new Error("Expected colon in object literal");{t++;const n=o();e[r]=n}}return t++,{type:"object",fields:e}}if("-"===n[t]&&!isNaN(Number(n[t+1])))return t++,{type:"constant",value:-Number(n[t++])};if(!isNaN(Number(n[t])))return{type:"constant",value:Number(n[t++])};if(/^['"].*['"]$/.test(n[t]))return{type:"constant",value:n[t++].slice(1,-1)};if(/^[a-zA-Z_][a-zA-Z0-9_]*$/.test(n[t])){let e={type:"variable",name:n[t++]};for(;"."===n[t];){if(t++,/^[a-zA-Z_][a-zA-Z0-9_]*$/.test(n[t]))return{type:"field",object:e,field:n[t++]};throw new Error("Expected property name after '.'")}return e}if("!"===n[t])return t++,{type:"freeze",expression:r()};throw new Error(`Unexpected token: ${n[t]}`)}function o(){let e=r();for(;["+","-","*","/","&&","||",">","<",">=","<=","!=","==","=="].includes(n[t]);)e={type:"binary",operator:n[t++],left:e,right:r()};return e}return o()}Object.defineProperty(n,"__esModule",{value:!0}),n.parse=function(e){return r(t(e))},n.tokenize=t,n.parseTokens=r},775:function(e,n,t){var r=this&&this.__createBinding||(Object.create?function(e,n,t,r){void 0===r&&(r=t);var o=Object.getOwnPropertyDescriptor(n,t);o&&!("get"in o?!n.__esModule:o.writable||o.configurable)||(o={enumerable:!0,get:function(){return n[t]}}),Object.defineProperty(e,r,o)}:function(e,n,t,r){void 0===r&&(r=t),e[r]=n[t]}),o=this&&this.__setModuleDefault||(Object.create?function(e,n){Object.defineProperty(e,"default",{enumerable:!0,value:n})}:function(e,n){e.default=n}),i=this&&this.__importStar||function(e){if(e&&e.__esModule)return e;var n={};if(null!=e)for(var t in e)"default"!==t&&Object.prototype.hasOwnProperty.call(e,t)&&r(n,e,t);return o(n,e),n};Object.defineProperty(n,"__esModule",{value:!0}),n.translate=function(e){const n=s(e);return a.seq(...n)};const a=i(t(454));function s(e){if("string"==typeof e)return function(e){const n=[];let t="";for(let r of e)" "===r?(t.length>0&&(n.push(a.constNode(t)),t=""),n.push(a.space(1))):t+=r;return t.length>0&&n.push(a.constNode(t)),n}(e);switch(e.type){case"Directive":switch(e.content.type){case"declare":return[a.declare({type:"variable",name:e.content.name},e.content.expr)];case"assign":return[a.assign({type:"variable",name:e.content.name},e.content.expr)];case"exp":return[a.exp(e.content.expr)];case"if":return[a.ite(e.content.expr,{type:"seq",nodes:s(e.content.thenBranch)},l(e.content.elseBranch))];case"for":return[a.loop(e.content.expr,{type:"sep",value:e.content.separator.value},{type:"front",value:e.content.front.value},{type:"rear",value:e.content.rear.value},{type:"lambda",variable:{type:"variable",name:e.content.name},body:{type:"seq",nodes:s(e.content.fragment)}})];default:throw new Error(`Unknown directive: ${e}`)}case"fragmentList":return e.fragments.flatMap(s);default:throw new Error(`Unknown fragment: ${e}`)}}function l(e){if((n=e)&&"if"===n.type){const n=e;return a.ite(n.expr,{type:"seq",nodes:s(n.thenBranch)},l(n.elseBranch))}return function(e){return e&&"bot"===e.type}(e)?a.bot():{type:"seq",nodes:s(e)};var n}},63:(e,n)=>{Object.defineProperty(n,"__esModule",{value:!0}),n.isWhitespace=function(e){return/^( +)$/.test(e)},n.containsNewlineOrSpace=function(e){return/[\n\s]/.test(e)}}},n={};return function t(r){var o=n[r];if(void 0!==o)return o.exports;var i=n[r]={exports:{}};return e[r].call(i.exports,i,i.exports,t),i.exports}(612)})()));

package/dist/src/common/Exp.d.ts

@@ -1,4 +1,4 @@
-export type Expr = Constant | Variable | BinaryOperation | UnaryOperation | FieldAccess | ArrayLiteral | FreezeExp | ObjectLiteral;
+export declare type Expr = Constant | Variable | BinaryOperation | UnaryOperation | FieldAccess | ArrayLiteral | FreezeExp | ObjectLiteral;
 export interface Constant {
     type: 'constant';
     value: number | boolean | string | [] | null | ObjectLiteral;
@@ -42,8 +42,8 @@ export interface FunctionCall {
     func: Expr;
     args: Expr[];
 }
-export type BinaryOperator = '+' | '-' | '*' | '/' | '&&' | '||' | '>' | '<' | '>=' | '<=' | '!=' | '==';
-export type UnaryOperator = 'not';
+export declare type BinaryOperator = '+' | '-' | '*' | '/' | '&&' | '||' | '>' | '<' | '>=' | '<=' | '!=' | '==';
+export declare type UnaryOperator = 'not';
 export declare function findVariablesAndFields(exp: Expr): {
     variables: Variable[];
     fields: {

package/dist/src/core/AST.d.ts

@@ -1,5 +1,5 @@
 import { Expr, Variable } from "../common/Exp";
-export type TermNode = ConstNode | SpaceNode | DeclareNode | AssignNode | ExpNode | SeqNode | IfThenElseNode | LoopNode | CallNode | NopNode | BotNode | EndNode | LambdaWithExpr;
+export declare type TermNode = ConstNode | SpaceNode | DeclareNode | DeclareendNode | AssignNode | ExpNode | SeqNode | IfThenElseNode | LoopNode | CallNode | NopNode | BotNode | EndNode | LambdaWithExpr | SepNode;
 export interface ConstNode {
     type: 'const';
     value: string;
@@ -13,6 +13,10 @@ export interface DeclareNode {
     name: Variable;
     value: Expr;
 }
+export interface DeclareendNode {
+    type: 'declareend';
+    name: Variable;
+}
 export interface AssignNode {
     type: 'assign';
     name: Variable;
@@ -87,6 +91,7 @@ export declare function exp(expression: Expr): ExpNode;
 export declare function loop(lst: Expr, sep: SepNode, front: FrontNode, rear: RearNode, body: Lambda): LoopNode;
 export declare function ite(condition: Expr, trueBranch: TermNode, falseBranch: TermNode): IfThenElseNode;
 export declare function assign(name: Variable, value: Expr): AssignNode;
+export declare function sep(value: string): SepNode;
 export declare function nop(): NopNode;
 export declare function bot(): BotNode;
 export declare function end(): EndNode;

package/dist/src/fuse/Update.d.ts

@@ -1,4 +1,4 @@
-export type UpdateOperation = {
+export declare type UpdateOperation = {
     type: 'insert';
     str: string;
     position: number;

package/dist/src/lambda/AST.d.ts

@@ -1,7 +1,7 @@
 import * as PartilAST from "../partial/AST";
 import { Variable } from "../common/Exp";
 import * as CoreAST from "../core/AST";
-export type TermNode = PartilAST.ConstNode | PartilAST.SpaceNode | CoreAST.SepNode | PartilAST.ExpNode | SeqNode | LambdaAppNode | PartilAST.BranchStartNode | PartilAST.BranchEndNode | PartilAST.LoopFrontNode | PartilAST.LoopRearNode | PartilAST.EndNode | PartilAST.NopNode | PartilAST.BotNode | PartilAST.CallStartNode | PartilAST.CallEndNode;
+export declare type TermNode = PartilAST.ConstNode | PartilAST.SpaceNode | CoreAST.DeclareendNode | CoreAST.SepNode | PartilAST.ExpNode | SeqNode | LambdaAppNode | PartilAST.BranchStartNode | PartilAST.BranchEndNode | PartilAST.LoopFrontNode | PartilAST.LoopRearNode | PartilAST.EndNode | PartilAST.NopNode | PartilAST.BotNode | PartilAST.CallStartNode | PartilAST.CallEndNode;
 export interface SeqNode {
     type: 'seq';
     nodes: TermNode[];
@@ -13,7 +13,7 @@ export interface LambdaAppNode {
     binding: PartilAST.Binding;
     marker: Marker;
 }
-type Marker = PartilAST.LoopItemMarker | DeclareMarker | AssignMarker;
+declare type Marker = PartilAST.LoopItemMarker | DeclareMarker | AssignMarker;
 export interface DeclareMarker {
     type: 'declare';
 }

package/dist/src/partial/AST.d.ts

@@ -1,6 +1,6 @@
 import * as CoreAST from "../core/AST";
 import { Expr, Variable } from "../common/Exp";
-export type TermNode = ConstNode | SpaceNode | DeclareNode | AssignNode | ExpNode | NopNode | SeqNode | BranchStartNode | BranchEndNode | CoreAST.SepNode | LambdaAppNode | LoopFrontNode | LoopRearNode | EndNode | BotNode | CallStartNode | CallEndNode;
+export declare type TermNode = ConstNode | SpaceNode | DeclareNode | CoreAST.DeclareendNode | AssignNode | ExpNode | NopNode | SeqNode | BranchStartNode | BranchEndNode | CoreAST.SepNode | LambdaAppNode | LoopFrontNode | LoopRearNode | EndNode | BotNode | CallStartNode | CallEndNode;
 export interface ConstNode {
     type: 'const';
     value: string;
@@ -47,7 +47,7 @@ export interface LambdaAppNode {
     binding: Binding;
     marker: Marker;
 }
-export type Marker = LoopItemMarker;
+export declare type Marker = LoopItemMarker;
 export interface LoopItemMarker {
     type: 'loopitem';
     lst: Expr;
@@ -77,8 +77,8 @@ export interface CallStartNode {
 export interface CallEndNode {
     type: 'callend';
 }
-export type Binding = [Expr, Value];
-export type Value = number | boolean | string | null | ObjectValue | Value[];
+export declare type Binding = [Expr, Value];
+export declare type Value = number | boolean | string | null | ObjectValue | Value[];
 export interface ObjectValue {
     type: 'object';
     fields: {

package/dist/src/scope/scopelize.d.ts

@@ -0,0 +1,7 @@
+import * as CoreAST from "../core/AST";
+/**
+ * Given a CoreAST, for each decalre(x,e), add declareend(x) at the end of its scope.
+ * @param coreAST
+ * @returns
+ */
+export declare function scopelize(node: CoreAST.TermNode): CoreAST.TermNode;

package/dist/src/surface/AST.d.ts

@@ -1,7 +1,7 @@
 import { Expr } from "../common/Exp";
-export type Name = string;
-export type Literal = string;
-export type Fragment = Literal | Directive | FragmentList;
+export declare type Name = string;
+export declare type Literal = string;
+export declare type Fragment = Literal | Directive | FragmentList;
 export interface Directive {
     type: 'Directive';
     content: DeclareDirective | AssignDirective | ExprDirective | IfDirective | ForDirective;
@@ -26,7 +26,7 @@ export interface IfDirective {
     thenBranch: Fragment;
     elseBranch: ElseBranch;
 }
-export type ElseBranch = IfDirective | Fragment | Bot;
+export declare type ElseBranch = IfDirective | Fragment | Bot;
 export interface Bot {
     type: 'bot';
 }

package/dist/src/utils/Stack.d.ts

@@ -0,0 +1,10 @@
+export declare class Stack<T> {
+    private items;
+    push(element: T): void;
+    pop(): T | undefined;
+    peek(): T | undefined;
+    isEmpty(): boolean;
+    size(): number;
+    clear(): void;
+    print(): void;
+}

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "bit2",
-  "version": "0.0.5",
+  "version": "0.0.7",
   "main": "dist/bit2.js",
   "types": "dist/bit2.d.ts",
   "dependencies": {
@@ -22,26 +22,30 @@
     "core": "node dist/test/core/core.test.js",
     "core.0": "node dist/test/core/0.simple.test.js",
     "core.1": "node dist/test/core/1.core.test.js",
+    "scoped": "node dist/test/scopelize/scopelize.test.js",
     "partial": "node dist/test/partial/partial.test.js",
     "peval": "node dist/test/partialEval/peval.test.js",
     "lambda": "node dist/test/lambda/lambda.test.js",
     "evaluation": "node dist/test/lambda/evaluation.test.js",
     "lambdalize": "node dist/test/lambdalize/lambdalize.test.js",
-    "const": "node dist/test/fuse/const.test.js",
-    "space": "node dist/test/fuse/space.test.js",
-    "exp": "node dist/test/fuse/exp.test.js",
-    "branchnop": "node dist/test/fuse/branchnop.test.js",
-    "loop": "node dist/test/fuse/loop.test.js",
-    "ulambda": "node dist/test/fuse/lambda.test.js",
-    "useq": "node dist/test/fuse/seq.test.js",
-    "bulk": "node dist/test/fuse/bulk.test.js",
+    "fuse.const": "node dist/test/fuse/const.test.js",
+    "fuse.space": "node dist/test/fuse/space.test.js",
+    "fuse.exp": "node dist/test/fuse/exp.test.js",
+    "fuse.branchnop": "node dist/test/fuse/branchnop.test.js",
+    "fuse.loop": "node dist/test/fuse/loop.test.js",
+    "fuse.lambda": "node dist/test/fuse/lambda.test.js",
+    "fuse.seq": "node dist/test/fuse/seq.test.js",
+    "fuse.bulk": "node dist/test/fuse/bulk.test.js",
     "unlambdalize": "node dist/test/lambdalize/unLambdalize.test.js",
     "unpeval": "node dist/test/partialEval/unpeval.test.js",
     "bieval": "node dist/test/bx/biEval.test.js",
     "parser": "node dist/test/surface/parser.test.js",
     "translate": "node dist/test/translate/translate.test.js",
     "example.1": "node dist/test/examples/1.Assignment.test.js",
-    "example.2": "node dist/test/examples/2.Branch.test.js"
+    "example.2": "node dist/test/examples/2.Branch.test.js",
+    "example.3": "node dist/test/examples/3.Loop.test.js",
+    "example.4": "node dist/test/examples/4.Mixed.test.js",
+    "example.5": "node dist/test/examples/5.HTML.test.js"
   },
   "files": [
     "dist/bit2.js",