fix a comment
This commit is contained in:
parent
08a8c694b1
commit
cdf1ec6deb
1 changed files with 3 additions and 3 deletions
|
@ -222,9 +222,9 @@ eraseTerm ctx ty (Box val loc) = do
|
||||||
Erased => pure $ Erased loc
|
Erased => pure $ Erased loc
|
||||||
Kept => eraseTerm ctx a val
|
Kept => eraseTerm ctx a val
|
||||||
|
|
||||||
-- s ⤋ s' ⇐ A
|
-- s ⤋ s' ⇐ A
|
||||||
-- ----------------------------
|
-- ---------------------------------
|
||||||
-- let0 x = e in s ⤋ s' ⇐ A
|
-- let0 x = e in s ⤋ s'[⌷/x] ⇐ A
|
||||||
--
|
--
|
||||||
-- e ⤋ e' s ⤋ s' ⇐ A π ≠ 0
|
-- e ⤋ e' s ⤋ s' ⇐ A π ≠ 0
|
||||||
-- -------------------------------------
|
-- -------------------------------------
|
||||||
|
|
Loading…
Reference in a new issue