From 74c29764359272b29af081b30762549777ae8825 Mon Sep 17 00:00:00 2001 From: Guillaume Melquiond Date: Sat, 2 Jan 2016 17:05:03 +0100 Subject: Remove some useless type declarations. --- library/declare.ml | 3 --- library/keys.ml | 2 -- 2 files changed, 5 deletions(-) (limited to 'library') diff --git a/library/declare.ml b/library/declare.ml index 994a6557a..c1697a434 100644 --- a/library/declare.ml +++ b/library/declare.ml @@ -417,9 +417,6 @@ let assumption_message id = (** Global universe names, in a different summary *) -type universe_names = - (Univ.universe_level Idmap.t * Id.t Univ.LMap.t) - (* Discharged or not *) type universe_decl = polymorphic * (Id.t * Univ.universe_level) list diff --git a/library/keys.ml b/library/keys.ml index 3d277476f..6b2466f3d 100644 --- a/library/keys.ml +++ b/library/keys.ml @@ -62,8 +62,6 @@ module Keyset = Keymap.Set (* Mapping structure for references to be considered equivalent *) -type keys = Keyset.t Keymap.t - let keys = Summary.ref Keymap.empty ~name:"Keys_decl" let add_kv k v m = -- cgit v1.2.3