chore: remove unncessary annotation
This commit is contained in:
parent
b5eb64da3a
commit
362185147e
1 changed files with 2 additions and 2 deletions
|
|
@ -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)
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue