diff options
| author |  Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2017-02-21 12:56:28 +0100 |
|---|---|---|
| committer |  Matthieu Sozeau <mattam@mattam.org> | 2017-06-05 20:53:14 +0200 |
| commit | 36f3ae391ee188edb9d858d8832d7fd611db0482 (patch) | |
| tree | 781f6cdb17e10f06eea44552b44ce80329f792f5 /engine/evd.mli | |
| parent | e8137ae63b3b19436755f372b595e7343e942894 (diff) | |
Univs: fix bug #5365, generation of u+k <= v constraints
Use an explicit label ~algebraic for make_flexible_variable as well.
Diffstat (limited to 'engine/evd.mli')
| -rw-r--r-- | engine/evd.mli | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/engine/evd.mli b/engine/evd.mli index 86887f3dc..93d4a9d15 100644 --- a/engine/evd.mli +++ b/engine/evd.mli @@ -526,7 +526,9 @@ val new_sort_variable : ?loc:Loc.t -> ?name:string -> rigid -> evar_map -> evar_ val add_global_univ : evar_map -> Univ.Level.t -> evar_map val universe_rigidity : evar_map -> Univ.Level.t -> rigid -val make_flexible_variable : evar_map -> bool -> Univ.universe_level -> evar_map +val make_flexible_variable : evar_map -> algebraic:bool -> Univ.universe_level -> evar_map +(** See [UState.make_flexible_variable] *) + val is_sort_variable : evar_map -> sorts -> Univ.universe_level option (** [is_sort_variable evm s] returns [Some u] or [None] if [s] is not a local sort variable declared in [evm] *) |