diff options
| author | Théo Zimmermann | 2019-05-24 16:36:46 +0200 |
|---|---|---|
| committer | Théo Zimmermann | 2019-05-24 16:36:46 +0200 |
| commit | 5727443376480be4793757fd5507621ad4f09509 (patch) | |
| tree | 2fff9e86c24d1d6d82c3ed59919d3b3de4112189 /plugins | |
| parent | 5596cf352d1c265fd5627dc19416d2b55c10f2b7 (diff) | |
| parent | be40007de49140d403bb1dad1af9f4f1e3fe5003 (diff) | |
Merge PR #10233: Fixing typos - Part 3
Reviewed-by: Zimmi48
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/ssr/ssrequality.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/ssr/ssrequality.ml b/plugins/ssr/ssrequality.ml index 59fc69f100..538d0c4e9a 100644 --- a/plugins/ssr/ssrequality.ml +++ b/plugins/ssr/ssrequality.ml @@ -313,7 +313,7 @@ let rw_progress rhs lhs ise = not (EConstr.eq_constr ise lhs (Evarutil.nf_evar i (* Coq has a more general form of "equation" (any type with a single *) (* constructor with no arguments with_rect_r elimination lemmas). *) (* However there is no clear way of determining the LHS and RHS of *) -(* such a generic Leibniz equation -- short of inspecting the type *) +(* such a generic Leibniz equation -- short of inspecting the type *) (* of the elimination lemmas. *) let rec strip_prod_assum c = match Constr.kind c with |