@[instance_reducible, always_inline]
instance Lean.Meta.Sym.Arith.instMonadGetVarOfMonadLift (m n : Type → Type) [MonadLift m n] [MonadGetVar m] :
Equations
- Lean.Meta.Sym.Arith.instMonadGetVarOfMonadLift m n = { getVar := fun (x : Lean.Grind.CommRing.Var) => liftM (Lean.Meta.Sym.Arith.getVar x) }
@[instance_reducible, always_inline]
instance Lean.Meta.Sym.Arith.instMonadMkVarOfMonadLift (m n : Type → Type) [MonadLift m n] [MonadMkVar m] :
Equations
- Lean.Meta.Sym.Arith.instMonadMkVarOfMonadLift m n = { mkVar := fun (e : Lean.Expr) => liftM (Lean.Meta.Sym.Arith.mkVar e) }