diff options
Diffstat (limited to 'kernel/names.ml')
| -rw-r--r-- | kernel/names.ml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/kernel/names.ml b/kernel/names.ml index 3de12b1bc3..f4779acb6f 100644 --- a/kernel/names.ml +++ b/kernel/names.ml @@ -431,7 +431,6 @@ module KerPair = struct | Dual (kn,_) -> kn let same kn = Same kn - let dual knu knc = Dual (knu,knc) let make knu knc = if knu == knc then Same knc else Dual (knu,knc) let make1 = same @@ -726,7 +725,6 @@ let label = KerName.label let string_of_kn = KerName.to_string let pr_kn = KerName.print let kn_ord = KerName.compare -let kn_equal = KerName.equal (** Compatibility layer for [Constant] *) |