Skip to content

Commit

Permalink
doc: fix typos (leanprover#2996)
Browse files Browse the repository at this point in the history
  • Loading branch information
marcusrossel authored Nov 30, 2023
1 parent 3a0edd0 commit 0ad611c
Show file tree
Hide file tree
Showing 2 changed files with 5 additions and 5 deletions.
6 changes: 3 additions & 3 deletions src/Lean/Expr.lean
Original file line number Diff line number Diff line change
Expand Up @@ -774,8 +774,8 @@ instance : BEq Expr where
beq := Expr.eqv

/--
Return true iff `a` and `b` are equal.
Binder names and annotations are taking into account.
Return `true` iff `a` and `b` are equal.
Binder names and annotations are taken into account.
-/
@[extern "lean_expr_equal"]
opaque equal (a : @& Expr) (b : @& Expr) : Bool
Expand Down Expand Up @@ -831,7 +831,7 @@ def isConst : Expr → Bool
| _ => false

/--
Return `true` if the given expression is a constant of the give name.
Return `true` if the given expression is a constant of the given name.
Examples:
- `` (.const `Nat []).isConstOf `Nat `` is `true`
- `` (.const `Nat []).isConstOf `False `` is `false`
Expand Down
4 changes: 2 additions & 2 deletions src/Lean/Meta/CollectMVars.lean
Original file line number Diff line number Diff line change
Expand Up @@ -28,12 +28,12 @@ partial def collectMVars (e : Expr) : StateRefT CollectMVars.State MetaM Unit :=
| none => pure ()
| some d => collectMVars (mkMVar d.mvarIdPending)

/-- Return metavariables in occurring the given expression. See `collectMVars` -/
/-- Return metavariables occurring in the given expression. See `collectMVars` -/
def getMVars (e : Expr) : MetaM (Array MVarId) := do
let (_, s) ← (collectMVars e).run {}
pure s.result

/-- Similar to getMVars, but removes delayed assignments. -/
/-- Similar to `getMVars`, but removes delayed assignments. -/
def getMVarsNoDelayed (e : Expr) : MetaM (Array MVarId) := do
let mvarIds ← getMVars e
mvarIds.filterM fun mvarId => not <$> mvarId.isDelayedAssigned
Expand Down

0 comments on commit 0ad611c

Please sign in to comment.