diff options
| author | Gaëtan Gilbert | 2018-03-02 13:37:07 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2018-04-13 14:10:04 +0200 |
| commit | f53890d1629ea7aaff86ea92e5ac27ab027b2e8d (patch) | |
| tree | 7e88d7d9d9fa6f9cc888fd85f46805181b1a119b /kernel/uGraph.mli | |
| parent | 9ab85ef978c78edb3e4e5ec97ec93a970f021fc2 (diff) | |
universe normalisation: put equivalence class partition in UGraph
ie don't go through having Eq constraints but directly to the unionfind.
Diffstat (limited to 'kernel/uGraph.mli')
| -rw-r--r-- | kernel/uGraph.mli | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/kernel/uGraph.mli b/kernel/uGraph.mli index d4fba63fb3..cca2eb472b 100644 --- a/kernel/uGraph.mli +++ b/kernel/uGraph.mli @@ -59,7 +59,10 @@ val empty_universes : t val sort_universes : t -> t -val constraints_of_universes : t -> Constraint.t +(** [constraints_of_universes g] returns [csts] and [partition] where + [csts] are the non-Eq constraints and [partition] is the partition + of the universes into equivalence classes. *) +val constraints_of_universes : t -> Constraint.t * LSet.t list val check_subtype : AUContext.t check_function (** [check_subtype univ ctx1 ctx2] checks whether [ctx2] is an instance of |