struct: fixes, full untested version of synt (without memoization, strightforward rewrite without testing)

This commit is contained in:
ProgramSnail 2026-05-05 18:14:58 +00:00
parent 99a18feee9
commit ddde0e9541
3 changed files with 195 additions and 41 deletions

View file

@ -926,7 +926,7 @@ $s in stmt, f in X, x in X, a in X$
$mu stretch(=>)^(m space t space x)_(cl vals, types cr) mu'$,
// TODO:: is c important ?
$mu stretch(=>)^(m space rf c t space rf x_(cl vals, types cr) mu'$,
$mu stretch(=>)^(m space rf c space t space rf x)_(cl vals, types cr) mu'$,
)
))
@ -1042,21 +1042,6 @@ $s in stmt, f in X, x in X, a in X$
#h(10pt)
#align(center, prooftree(
vertical-spacing: 4pt,
rule(
name: [ READ $p$],
$vals, mu tval p eqmu 0$,
$cl types, vals, mu cr
xarrow("READ" p)
cl types, vals, mu cr$,
)
))
#h(10pt)
#align(center, prooftree(
vertical-spacing: 4pt,
rule(
@ -1074,6 +1059,21 @@ $s in stmt, f in X, x in X, a in X$
)
))
#align(center, prooftree(
vertical-spacing: 4pt,
rule(
name: [ READ $p$],
$vals, mu tval p eqmu 0$,
$cl types, vals, mu cr
xarrow("READ" p)
cl types, vals, mu cr$,
)
))
#h(10pt)
#h(10pt)
#align(center, prooftree(