fix a comment

2023-12-04 23:38:17 +01:00 · 2023-12-04 23:38:17 +01:00 · cdf1ec6deb
commit cdf1ec6deb
parent 08a8c694b1
1 changed files with 3 additions and 3 deletions
--- a/lib/Quox/Untyped/Erase.idr
+++ b/lib/Quox/Untyped/Erase.idr
@ -222,9 +222,9 @@ eraseTerm ctx ty (Box val loc) = do
    Erased => pure $ Erased loc
    Kept   => eraseTerm ctx a val

--         s ⤋ s' ⇐ A
-- ----------------------------
--   let0 x = e in s ⤋ s' ⇐ A
+--            s ⤋ s' ⇐ A
+-- ---------------------------------
+--   let0 x = e in s ⤋ s'[⌷/x] ⇐ A
 --
 --     e ⤋ e'  s ⤋ s' ⇐ A   π ≠ 0
 -- -------------------------------------