diff options
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/term.ml | 2 | ||||
| -rw-r--r-- | kernel/term.mli | 1 |
2 files changed, 0 insertions, 3 deletions
diff --git a/kernel/term.ml b/kernel/term.ml index 62c161be4c..3881cd12de 100644 --- a/kernel/term.ml +++ b/kernel/term.ml @@ -179,8 +179,6 @@ let destMeta c = match kind_of_term c with | _ -> raise DestKO let isMeta c = match kind_of_term c with Meta _ -> true | _ -> false -let isMetaOf mv c = - match kind_of_term c with Meta mv' -> Int.equal mv mv' | _ -> false (* Destructs a variable *) let destVar c = match kind_of_term c with diff --git a/kernel/term.mli b/kernel/term.mli index a8d9dfbfff..e393adb813 100644 --- a/kernel/term.mli +++ b/kernel/term.mli @@ -98,7 +98,6 @@ val isVarId : Id.t -> constr -> bool val isInd : constr -> bool val isEvar : constr -> bool val isMeta : constr -> bool -val isMetaOf : metavariable -> constr -> bool val isEvar_or_Meta : constr -> bool val isSort : constr -> bool val isCast : constr -> bool |