chore: remove unncessary annotation

This commit is contained in:
Leonardo de Moura 2020-02-04 14:21:26 -08:00
parent b5eb64da3a
commit 362185147e

View file

@ -32,8 +32,8 @@ set_option trace.Elab.definition true
def h (x : Nat) : StateT Nat IO Nat := do
s ← get;
a ← f; -- liftM inserted here
b ← g1 (1:Nat); -- liftM inserted here
a ← f; -- liftM inserted here
b ← g1 1; -- liftM inserted here
let x := g2 b;
IO.println b;
pure (s+a)