diff options
| author |  Gaëtan Gilbert <gaetan.gilbert@skyskimmer.net> | 2018-04-28 21:27:15 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert <gaetan.gilbert@skyskimmer.net> | 2018-05-17 18:47:10 +0200 |
| commit | 302adae094bbf76d8c951c557c85acb12a97aedc (patch) | |
| tree | 66e3cfab6cf5cda2f51a18308a5e893d621d21ae /proofs | |
| parent | dc7696652ccd23887a474f3d4141b1850e51d46f (diff) | |
Split off Universes functions about substitutions and constraints
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/proof_global.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/proof_global.ml b/proofs/proof_global.ml index 842003bc8..97cfccb8d 100644 --- a/proofs/proof_global.ml +++ b/proofs/proof_global.ml @@ -342,7 +342,7 @@ let close_proof ~keep_body_ucst_separate ?feedback_id ~now normalise them for the kernel. *) let subst_evar k = Proof.in_proof proof (fun m -> Evd.existential_opt_value0 m k) in - let nf = Universes.nf_evars_and_universes_opt_subst subst_evar + let nf = UnivSubst.nf_evars_and_universes_opt_subst subst_evar (UState.subst universes) in let make_body = if poly || now then |