We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 599e4e0 commit 1b9b700Copy full SHA for 1b9b700
Effects/Prog.lean
@@ -165,13 +165,15 @@ instance {effs : List Effect} : Monad (Prog effs) where
165
pure := Prog.var
166
bind := Prog.bind
167
168
+@[reducible]
169
def opsMem
170
{effs : List Effect}
171
{e : Effect} :
172
e ∈ effs → e.ops ∈ List.map Effect.ops effs
173
| .here => .here
174
| .there m => .there (opsMem m)
175
176
177
def scpsMem
178
179
lean-toolchain
@@ -1 +1 @@
1
-leanprover/lean4:v4.28.0
+leanprover/lean4:v4.29.0
0 commit comments