6 lines
102 B
Text
6 lines
102 B
Text
def g (x : Nat) : IO Nat := do
|
|
IO.println x
|
|
pure x
|
|
|
|
def f {m} [MonadLiftT IO m] : m Nat :=
|
|
g 10
|