diff options
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/logic.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/logic.ml b/proofs/logic.ml index f883317503..5a29c3b0ee 100644 --- a/proofs/logic.ml +++ b/proofs/logic.ml @@ -329,7 +329,7 @@ let collect_meta_variables c = List.rev (collrec false [] c) let check_meta_variables c = - if not (List.distinct (collect_meta_variables c)) then + if not (List.distinct_f Int.compare (collect_meta_variables c)) then raise (RefinerError (NonLinearProof c)) let check_conv_leq_goal env sigma arg ty conclty = |