Skip to content

Commit f4c68f3

Browse files
committed
Introduce \walk in 'abstract'
1 parent 4c6d630 commit f4c68f3

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

encoding/abstract/index.js

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -13,7 +13,7 @@ function psi(shared, list)
1313
const twins = shared[atom];
1414
const wleft = twins.left;
1515
const wright = twins.right;
16-
const agent = `\\fan_{this.uniq()}`;
16+
const agent = `\\ifan`;
1717
const tree = `${agent}(${wright}, ${wleft})`;
1818

1919
list.push(`${atom} = ${tree}`);
@@ -48,8 +48,8 @@ function gamma(obj, root, list)
4848
const body = obj.body;
4949
const fv = getfv(body);
5050
const wire = mkwire();
51-
const agent = (id in fv) ? id : "\\erase";
52-
const tree = `\\lambda(${agent}, ${wire})`;
51+
const agent = (id in fv) ? id : "\\nil";
52+
const tree = `\\ilam(${agent}, ${wire})`;
5353

5454
list.push(`${root} = ${tree}`);
5555

@@ -60,7 +60,7 @@ function gamma(obj, root, list)
6060
const left = obj.left;
6161
const right = obj.right;
6262
const shared = mktwins(left, right);
63-
const agent = `\\apply(${wright}, ${root})`;
63+
const agent = `\\iapp(${wright}, ${root})`;
6464

6565
list.push(`${wleft} = ${agent}`);
6666

@@ -74,7 +74,7 @@ function gamma(obj, root, list)
7474
function encode(generic, term)
7575
{
7676
const inconfig = [
77-
"\\read_{this.mkhole()}(!print) = root"
77+
"\\walk(\\read_{this.mkhole()}(!print)) = root"
7878
];
7979

8080
mkwire = generic.mkwire;

0 commit comments

Comments
 (0)