Fix judgment
This commit is contained in:
parent
64ee4dc432
commit
499ced914c
1 changed files with 1 additions and 1 deletions
|
|
@ -62,7 +62,7 @@ eval cxt = \case
|
|||
-- γ ⊢ e ⇓ v
|
||||
-- γ ⊢ e₁ ⇓ v₁
|
||||
-- ------------------
|
||||
-- γ ⊢ e e₁ ⇓ v
|
||||
-- γ ⊢ e e₁ ⇓ v + v₁
|
||||
|
||||
EAdd e e1 -> do
|
||||
v <- eval cxt e
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue